| /* |
| * OLE2NLS library |
| * |
| * Copyright 1995 Martin von Loewis |
| */ |
| |
| /* At the moment, these are only empty stubs. |
| */ |
| |
| #include <string.h> |
| #include "windows.h" |
| #include "ole.h" |
| #include "winnls.h" |
| #include "stddebug.h" |
| #include "debug.h" |
| |
| /*********************************************************************** |
| * GetUserDefaultLCID (OLE2NLS.1) |
| */ |
| DWORD WINAPI GetUserDefaultLCID() |
| { |
| /* Default sorting, neutral sublanguage */ |
| #if #LANG(En) |
| return 9; |
| #elif #LANG(De) |
| return 7; |
| #elif #LANG(No) |
| return 0x14; |
| #else |
| /* Neutral language */ |
| return 0; |
| #endif |
| } |
| |
| /*********************************************************************** |
| * GetSystemDefaultLCID (OLE2NLS.2) |
| */ |
| DWORD WINAPI GetSystemDefaultLCID() |
| { |
| return GetUserDefaultLCID(); |
| } |
| |
| /*********************************************************************** |
| * GetUserDefaultLangID (OLE2NLS.3) |
| */ |
| WORD WINAPI GetUserDefaultLangID() |
| { |
| return (WORD)GetUserDefaultLCID(); |
| } |
| |
| /*********************************************************************** |
| * GetSystemDefaultLangID (OLE2NLS.4) |
| */ |
| WORD WINAPI GetSystemDefaultLangID() |
| { |
| return GetUserDefaultLangID(); |
| } |
| |
| /*********************************************************************** |
| * GetLocaleInfoA (OLE2NLS.5) |
| * Is the last parameter really WORD for Win16? |
| */ |
| int WINAPI GetLocaleInfoA(DWORD lcid,DWORD LCType,LPSTR buf,WORD len) |
| { |
| char *retString; |
| int retLen; |
| dprintf_ole(stddeb,"GetLocaleInfoA(%8lX,%8lX,%p,%4X)\n", |
| lcid,LCType,buf,len); |
| /* Wine is supporting only the default locale */ |
| if(lcid!=GetUserDefaultLCID()) |
| { |
| dprintf_ole(stdnimp,"GetLocaleInfoA: Unknown locale\n"); |
| return 0; |
| } |
| /* As an option, we could obtain the value from win.ini. |
| This would not match the Wine compile-time option. |
| Also, not all identifiers are available from win.ini */ |
| retString=0; |
| retLen=0; |
| /* If we are through all of this, retLen should not be zero anymore. |
| If it is, the value is not supported */ |
| #define LOCVAL(type,value) if(type==LCType) \ |
| {retLen=strlen(value)+1;\ |
| retString=value; \ |
| } |
| #define UNSUPPORTED(type) if(type==lcid)retString=#type; |
| |
| /* I really wish I would know a better way to do this */ |
| UNSUPPORTED(LOCALE_ILANGUAGE) |
| UNSUPPORTED(LOCALE_SLANGUAGE) |
| UNSUPPORTED(LOCALE_SENGLANGUAGE) |
| UNSUPPORTED(LOCALE_SABBREVLANGNAME) |
| UNSUPPORTED(LOCALE_SNATIVELANGNAME) |
| UNSUPPORTED(LOCALE_ICOUNTRY) |
| UNSUPPORTED(LOCALE_SCOUNTRY) |
| UNSUPPORTED(LOCALE_SENGCOUNTRY) |
| UNSUPPORTED(LOCALE_SABBREVCTRYNAME) |
| UNSUPPORTED(LOCALE_SNATIVECTRYNAME) |
| UNSUPPORTED(LOCALE_IDEFAULTLANGUAGE) |
| UNSUPPORTED(LOCALE_IDEFAULTCOUNTRY) |
| UNSUPPORTED(LOCALE_IDEFAULTCODEPAGE) |
| UNSUPPORTED(LOCALE_IDEFAULTANSICODEPAGE) |
| UNSUPPORTED(LOCALE_SLIST) |
| UNSUPPORTED(LOCALE_IMEASURE) |
| UNSUPPORTED(LOCALE_SDECIMAL) |
| UNSUPPORTED(LOCALE_STHOUSAND) |
| UNSUPPORTED(LOCALE_SGROUPING) |
| UNSUPPORTED(LOCALE_IDIGITS) |
| UNSUPPORTED(LOCALE_ILZERO) |
| UNSUPPORTED(LOCALE_INEGNUMBER) |
| UNSUPPORTED(LOCALE_SNATIVEDIGITS) |
| UNSUPPORTED(LOCALE_SCURRENCY) |
| UNSUPPORTED(LOCALE_SINTLSYMBOL) |
| UNSUPPORTED(LOCALE_SMONDECIMALSEP) |
| UNSUPPORTED(LOCALE_SMONTHOUSANDSEP) |
| UNSUPPORTED(LOCALE_SMONGROUPING) |
| UNSUPPORTED(LOCALE_ICURRDIGITS) |
| UNSUPPORTED(LOCALE_IINTLCURRDIGITS) |
| UNSUPPORTED(LOCALE_ICURRENCY) |
| UNSUPPORTED(LOCALE_INEGCURR) |
| UNSUPPORTED(LOCALE_SDATE) |
| UNSUPPORTED(LOCALE_STIME) |
| UNSUPPORTED(LOCALE_SSHORTDATE) |
| UNSUPPORTED(LOCALE_SLONGDATE) |
| UNSUPPORTED(LOCALE_STIMEFORMAT) |
| UNSUPPORTED(LOCALE_IDATE) |
| UNSUPPORTED(LOCALE_ILDATE) |
| UNSUPPORTED(LOCALE_ITIME) |
| UNSUPPORTED(LOCALE_ITIMEMARKPOSN) |
| UNSUPPORTED(LOCALE_ICENTURY) |
| UNSUPPORTED(LOCALE_ITLZERO) |
| UNSUPPORTED(LOCALE_IDAYLZERO) |
| UNSUPPORTED(LOCALE_IMONLZERO) |
| UNSUPPORTED(LOCALE_S1159) |
| UNSUPPORTED(LOCALE_S2359) |
| UNSUPPORTED(LOCALE_ICALENDARTYPE) |
| UNSUPPORTED(LOCALE_IOPTIONALCALENDAR) |
| UNSUPPORTED(LOCALE_IFIRSTDAYOFWEEK) |
| UNSUPPORTED(LOCALE_IFIRSTWEEKOFYEAR) |
| UNSUPPORTED(LOCALE_SDAYNAME1) |
| UNSUPPORTED(LOCALE_SDAYNAME2) |
| UNSUPPORTED(LOCALE_SDAYNAME3) |
| UNSUPPORTED(LOCALE_SDAYNAME4) |
| UNSUPPORTED(LOCALE_SDAYNAME5) |
| UNSUPPORTED(LOCALE_SDAYNAME6) |
| UNSUPPORTED(LOCALE_SDAYNAME7) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME1) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME2) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME3) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME4) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME5) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME6) |
| UNSUPPORTED(LOCALE_SABBREVDAYNAME7) |
| UNSUPPORTED(LOCALE_SMONTHNAME1) |
| UNSUPPORTED(LOCALE_SMONTHNAME2) |
| UNSUPPORTED(LOCALE_SMONTHNAME3) |
| UNSUPPORTED(LOCALE_SMONTHNAME4) |
| UNSUPPORTED(LOCALE_SMONTHNAME5) |
| UNSUPPORTED(LOCALE_SMONTHNAME6) |
| UNSUPPORTED(LOCALE_SMONTHNAME7) |
| UNSUPPORTED(LOCALE_SMONTHNAME8) |
| UNSUPPORTED(LOCALE_SMONTHNAME9) |
| UNSUPPORTED(LOCALE_SMONTHNAME10) |
| UNSUPPORTED(LOCALE_SMONTHNAME11) |
| UNSUPPORTED(LOCALE_SMONTHNAME12) |
| UNSUPPORTED(LOCALE_SMONTHNAME13) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME1) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME2) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME3) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME4) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME5) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME6) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME7) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME8) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME9) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME10) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME11) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME12) |
| UNSUPPORTED(LOCALE_SABBREVMONTHNAME13) |
| UNSUPPORTED(LOCALE_SPOSITIVESIGN) |
| UNSUPPORTED(LOCALE_SNEGATIVESIGN) |
| UNSUPPORTED(LOCALE_IPOSSIGNPOSN) |
| UNSUPPORTED(LOCALE_INEGSIGNPOSN) |
| UNSUPPORTED(LOCALE_IPOSSYMPRECEDES) |
| UNSUPPORTED(LOCALE_IPOSSEPBYSPACE) |
| UNSUPPORTED(LOCALE_INEGSYMPRECEDES) |
| UNSUPPORTED(LOCALE_INEGSEPBYSPACE) |
| |
| /* Now, the language specific definitions. They don't have to be |
| complete */ |
| #if #LANG(De) |
| /* This definitions apply to Germany only. Users in Austria |
| or Switzerland might want to modify them */ |
| LOCVAL(LOCALE_ILANGUAGE,"9") |
| LOCVAL(LOCALE_SLANGUAGE,"Deutsch") |
| LOCVAL(LOCALE_SENGLANGUAGE,"German") |
| LOCVAL(LOCALE_SABBREVLANGNAME,"deu") |
| LOCVAL(LOCALE_SNATIVELANGNAME,"Deutsch") |
| LOCVAL(LOCALE_ICOUNTRY,"49") |
| LOCVAL(LOCALE_SCOUNTRY,"Deutschland") |
| LOCVAL(LOCALE_SENGCOUNTRY,"Deutschland") |
| LOCVAL(LOCALE_SABBREVCTRYNAME,"De") |
| LOCVAL(LOCALE_SNATIVECTRYNAME,"Deutschland") |
| LOCVAL(LOCALE_IDEFAULTLANGUAGE,"9") |
| LOCVAL(LOCALE_IDEFAULTCOUNTRY,"49") |
| /* Dunno |
| LOCVAL(LOCALE_IDEFAULTCODEPAGE) |
| LOCVAL(LOCALE_IDEFAULTANSICODEPAGE) |
| */ |
| LOCVAL(LOCALE_SLIST,";") |
| LOCVAL(LOCALE_IMEASURE,"0") |
| LOCVAL(LOCALE_SDECIMAL,",") |
| LOCVAL(LOCALE_STHOUSAND,".") |
| /* |
| LOCVAL(LOCALE_SGROUPING) |
| */ |
| LOCVAL(LOCALE_IDIGITS,"2") |
| LOCVAL(LOCALE_ILZERO,"1") |
| /* |
| LOCVAL(LOCALE_INEGNUMBER) |
| Is this "0123456789" ?? |
| LOCVAL(LOCALE_SNATIVEDIGITS) |
| */ |
| LOCVAL(LOCALE_SCURRENCY,"DM") |
| /* |
| LOCVAL(LOCALE_SINTLSYMBOL) |
| LOCVAL(LOCALE_SMONDECIMALSEP) |
| LOCVAL(LOCALE_SMONTHOUSANDSEP) |
| LOCVAL(LOCALE_SMONGROUPING) |
| */ |
| LOCVAL(LOCALE_ICURRDIGITS,"2") |
| /* |
| LOCVAL(LOCALE_IINTLCURRDIGITS) |
| */ |
| LOCVAL(LOCALE_ICURRENCY,"3") |
| LOCVAL(LOCALE_INEGCURR,"8") |
| LOCVAL(LOCALE_SDATE,".") |
| LOCVAL(LOCALE_STIME,":") |
| LOCVAL(LOCALE_SSHORTDATE,"dd.MM.yyyy") |
| LOCVAL(LOCALE_SLONGDATE,"ddd, d. MMMM yyyy") |
| /* |
| LOCVAL(LOCALE_STIMEFORMAT) |
| */ |
| LOCVAL(LOCALE_IDATE,"1") |
| /* |
| LOCVAL(LOCALE_ILDATE) |
| */ |
| LOCVAL(LOCALE_ITIME,"1") |
| /* |
| LOCVAL(LOCALE_ITIMEMARKPOSN) |
| LOCVAL(LOCALE_ICENTURY) |
| */ |
| LOCVAL(LOCALE_ITLZERO,"1") |
| /* |
| LOCVAL(LOCALE_IDAYLZERO) |
| LOCVAL(LOCALE_IMONLZERO) |
| LOCVAL(LOCALE_S1159) |
| LOCVAL(LOCALE_S2359) |
| LOCVAL(LOCALE_ICALENDARTYPE) |
| LOCVAL(LOCALE_IOPTIONALCALENDAR) |
| LOCVAL(LOCALE_IFIRSTDAYOFWEEK) |
| LOCVAL(LOCALE_IFIRSTWEEKOFYEAR) |
| */ |
| LOCVAL(LOCALE_SDAYNAME1,"Montag") |
| LOCVAL(LOCALE_SDAYNAME2,"Dienstag") |
| LOCVAL(LOCALE_SDAYNAME3,"Mittwoch") |
| LOCVAL(LOCALE_SDAYNAME4,"Donnerstag") |
| LOCVAL(LOCALE_SDAYNAME5,"Freitag") |
| LOCVAL(LOCALE_SDAYNAME6,"Sonnabend") |
| LOCVAL(LOCALE_SDAYNAME7,"Sonntag") |
| LOCVAL(LOCALE_SABBREVDAYNAME1,"Mo") |
| LOCVAL(LOCALE_SABBREVDAYNAME2,"Di") |
| LOCVAL(LOCALE_SABBREVDAYNAME3,"Mi") |
| LOCVAL(LOCALE_SABBREVDAYNAME4,"Do") |
| LOCVAL(LOCALE_SABBREVDAYNAME5,"Fr") |
| LOCVAL(LOCALE_SABBREVDAYNAME6,"Sa") |
| LOCVAL(LOCALE_SABBREVDAYNAME7,"So") |
| LOCVAL(LOCALE_SMONTHNAME1,"Januar") |
| LOCVAL(LOCALE_SMONTHNAME2,"Februar") |
| LOCVAL(LOCALE_SMONTHNAME3,"März") |
| LOCVAL(LOCALE_SMONTHNAME4,"April") |
| LOCVAL(LOCALE_SMONTHNAME5,"Mai") |
| LOCVAL(LOCALE_SMONTHNAME6,"Juni") |
| LOCVAL(LOCALE_SMONTHNAME7,"Juli") |
| LOCVAL(LOCALE_SMONTHNAME8,"August") |
| LOCVAL(LOCALE_SMONTHNAME9,"September") |
| LOCVAL(LOCALE_SMONTHNAME10,"Oktober") |
| LOCVAL(LOCALE_SMONTHNAME11,"November") |
| LOCVAL(LOCALE_SMONTHNAME12,"Dezember") |
| LOCVAL(LOCALE_SMONTHNAME13,"") |
| LOCVAL(LOCALE_SABBREVMONTHNAME1,"Jan") |
| LOCVAL(LOCALE_SABBREVMONTHNAME2,"Feb") |
| LOCVAL(LOCALE_SABBREVMONTHNAME3,"Mär") |
| LOCVAL(LOCALE_SABBREVMONTHNAME4,"Apr") |
| LOCVAL(LOCALE_SABBREVMONTHNAME5,"Mai") |
| LOCVAL(LOCALE_SABBREVMONTHNAME6,"Jun") |
| LOCVAL(LOCALE_SABBREVMONTHNAME7,"Jul") |
| LOCVAL(LOCALE_SABBREVMONTHNAME8,"Aug") |
| LOCVAL(LOCALE_SABBREVMONTHNAME9,"Sep") |
| LOCVAL(LOCALE_SABBREVMONTHNAME10,"Okt") |
| LOCVAL(LOCALE_SABBREVMONTHNAME11,"Nov") |
| LOCVAL(LOCALE_SABBREVMONTHNAME12,"Dez") |
| LOCVAL(LOCALE_SABBREVMONTHNAME13,"") |
| /* |
| LOCVAL(LOCALE_SPOSITIVESIGN) |
| LOCVAL(LOCALE_SNEGATIVESIGN) |
| LOCVAL(LOCALE_IPOSSIGNPOSN) |
| LOCVAL(LOCALE_INEGSIGNPOSN) |
| LOCVAL(LOCALE_IPOSSYMPRECEDES) |
| LOCVAL(LOCALE_IPOSSEPBYSPACE) |
| LOCVAL(LOCALE_INEGSYMPRECEDES) |
| LOCVAL(LOCALE_INEGSEPBYSPACE) |
| */ |
| #endif /* LANG(De) */ |
| |
| /*Insert other languages here*/ |
| |
| |
| |
| if(!retLen) |
| { |
| if(!retString)fprintf(stderr,"Unkown LC type %lX\n",LCType); |
| else fprintf(stderr,"'%s' not supported for your language.\n", |
| retString); |
| return 0; |
| } |
| |
| if(retLen>len)retLen=len; |
| strncpy(buf,retString,len); |
| return retLen; |
| } |
| |
| |
| /*********************************************************************** |
| * CompareStringA (OLE2NLS.8) |
| * This implementation ignores the locale, and trusts in libc |
| */ |
| int CompareStringA(DWORD lcid, DWORD fdwStyle, |
| char *s1, int l1, char *s2,int l2) |
| { |
| int len,ret; |
| if(fdwStyle & NORM_IGNORENONSPACE) |
| { |
| fprintf(stdnimp, "CompareStringA: IGNORENONSPACE not supprted\n"); |
| } |
| if(fdwStyle & NORM_IGNORESYMBOLS) |
| fprintf(stdnimp, "CompareStringA: IGNORESYMBOLS not supported\n"); |
| /* Is strcmp defaulting to string sort or to word sort?? */ |
| /* FIXME: Handle NORM_STRINGSORT */ |
| l1 = (l1==-1)?strlen(s1):l1; |
| l2 = (l2==-1)?strlen(s2):l2; |
| len = l1<l2 ? l1:l2; |
| ret = (fdwStyle & NORM_IGNORECASE) ? |
| strncasecmp(s1,s2,len) : |
| strncmp(s1,s2,len); |
| /* not equal, return 1 or 3 */ |
| if(ret!=0)return ret+2; |
| /* same len, return 2 */ |
| if(l1==l2)return 2; |
| /* the longer one is lexically greater */ |
| return (l1<l2)? 1 : 3; |
| } |
| |
