/* * OLE2NLS library * * Copyright 1995 Martin von Loewis */ /* At the moment, these are only empty stubs. */ #include #include "windows.h" #include "ole.h" #include "options.h" #include "winnls.h" #include "stddebug.h" #include "debug.h" /*********************************************************************** * GetUserDefaultLCID (OLE2NLS.1) */ DWORD WINAPI GetUserDefaultLCID() { /* Default sorting, neutral sublanguage */ switch(Options.language) { case LANG_En: return 0x09; case LANG_Es: return 0x07; /* Just a Guess :-) */ case LANG_De: return 0x07; case LANG_No: return 0x14; case LANG_Fr: case LANG_Fi: case LANG_Da: case LANG_Cz: default: return 0; /* Neutral language */ } } /*********************************************************************** * 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 */ switch(Options.language) { case 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) */ break; /* LANG(De) */ case LANG_Da: /* LOCVAL(LOCALE_ILANGUAGE,"9") */ LOCVAL(LOCALE_SLANGUAGE,"Dansk") LOCVAL(LOCALE_SENGLANGUAGE,"Danish") LOCVAL(LOCALE_SABBREVLANGNAME,"dan") LOCVAL(LOCALE_SNATIVELANGNAME,"Dansk") LOCVAL(LOCALE_ICOUNTRY,"45") LOCVAL(LOCALE_SCOUNTRY,"Danmark") LOCVAL(LOCALE_SENGCOUNTRY,"Denmark") LOCVAL(LOCALE_SABBREVCTRYNAME,"Da") LOCVAL(LOCALE_SNATIVECTRYNAME,"Danmark") /* LOCVAL(LOCALE_IDEFAULTLANGUAGE,"9") */ LOCVAL(LOCALE_IDEFAULTCOUNTRY,"45") /* 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) */ /* LOCVAL(LOCALE_SNATIVEDIGITS) */ LOCVAL(LOCALE_SCURRENCY,"kr") /* 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,"Mandag") LOCVAL(LOCALE_SDAYNAME2,"Tirsdag") LOCVAL(LOCALE_SDAYNAME3,"Onsdag") LOCVAL(LOCALE_SDAYNAME4,"Torsdag") LOCVAL(LOCALE_SDAYNAME5,"Fredag") LOCVAL(LOCALE_SDAYNAME6,"Lørdag") LOCVAL(LOCALE_SDAYNAME7,"Søndag") LOCVAL(LOCALE_SABBREVDAYNAME1,"Ma") LOCVAL(LOCALE_SABBREVDAYNAME2,"Ti") LOCVAL(LOCALE_SABBREVDAYNAME3,"On") LOCVAL(LOCALE_SABBREVDAYNAME4,"To") LOCVAL(LOCALE_SABBREVDAYNAME5,"Fr") LOCVAL(LOCALE_SABBREVDAYNAME6,"Lø") LOCVAL(LOCALE_SABBREVDAYNAME7,"Sø") LOCVAL(LOCALE_SMONTHNAME1,"Januar") LOCVAL(LOCALE_SMONTHNAME2,"Februar") LOCVAL(LOCALE_SMONTHNAME3,"Marts") LOCVAL(LOCALE_SMONTHNAME4,"April") LOCVAL(LOCALE_SMONTHNAME5,"Maj") 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,"December") LOCVAL(LOCALE_SMONTHNAME13,"") LOCVAL(LOCALE_SABBREVMONTHNAME1,"Jan") LOCVAL(LOCALE_SABBREVMONTHNAME2,"Feb") LOCVAL(LOCALE_SABBREVMONTHNAME3,"Mar") LOCVAL(LOCALE_SABBREVMONTHNAME4,"Apr") LOCVAL(LOCALE_SABBREVMONTHNAME5,"Maj") 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,"Dec") 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) */ break; /* LANG(Da) */ /*Insert other languages here*/ default: break; } /* switch */ 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; lstrcpyn(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