git.oblomov.eu Git - wine/blob - dlls/ole32/ole2nls.c

   1 /*
   2  *      OLE2NLS library
   3  *
   4  *      Copyright 1995  Martin von Loewis
   5  *      Copyright 1998  David Lee Lambert
   6  *      Copyright 2000  Julio César Gázquez
   7  */
   8
   9 #include "config.h"
  10
  11 #include <string.h>
  12 #include <stdio.h>
  13 #include <ctype.h>
  14 #include <stdlib.h>
  15 #include <locale.h>
  16
  17 #include "windef.h"
  18 #include "winbase.h"
  19 #include "winerror.h"
  20 #include "wingdi.h"
  21 #include "winnls.h"
  22 #include "winreg.h"
  23 #include "winuser.h"
  24 #include "winver.h"
  25
  26 #include "wine/winbase16.h"
  27
  28 #include "debugtools.h"
  29
  30 DEFAULT_DEBUG_CHANNEL(ole);
  31
  32 static LPVOID lpNLSInfo = NULL;
  33
  34 /******************************************************************************
  35  *              GetLocaleInfoA  [OLE2NLS.5]
  36  * Is the last parameter really WORD for Win16?
  37  */
  38 INT16 WINAPI GetLocaleInfo16(LCID lcid,LCTYPE LCType,LPSTR buf,INT16 len)
  39 {
  40         return GetLocaleInfoA(lcid,LCType,buf,len);
  41 }
  42
  43 /******************************************************************************
  44  *              GetStringTypeA  [OLE2NLS.7]
  45  */
  46 BOOL16 WINAPI GetStringType16(LCID locale,DWORD dwInfoType,LPCSTR src,
  47                               INT16 cchSrc,LPWORD chartype)
  48 {
  49         return GetStringTypeExA(locale,dwInfoType,src,cchSrc,chartype);
  50 }
  51
  52 /******************************************************************************
  53  *              GetUserDefaultLCID      [OLE2NLS.1]
  54  */
  55 LCID WINAPI GetUserDefaultLCID16(void)
  56 {
  57     return GetUserDefaultLCID();
  58 }
  59
  60 /******************************************************************************
  61  *              GetSystemDefaultLCID    [OLE2NLS.2]
  62  */
  63 LCID WINAPI GetSystemDefaultLCID16(void)
  64 {
  65     return GetSystemDefaultLCID();
  66 }
  67
  68 /******************************************************************************
  69  *              GetUserDefaultLangID    [OLE2NLS.3]
  70  */
  71 LANGID WINAPI GetUserDefaultLangID16(void)
  72 {
  73     return GetUserDefaultLangID();
  74 }
  75
  76 /******************************************************************************
  77  *              GetSystemDefaultLangID  [OLE2NLS.4]
  78  */
  79 LANGID WINAPI GetSystemDefaultLangID16(void)
  80 {
  81     return GetSystemDefaultLangID();
  82 }
  83
  84 /******************************************************************************
  85  *              LCMapStringA    [OLE2NLS.6]
  86  */
  87 INT16 LCMapString16(LCID lcid, DWORD mapflags, LPCSTR srcstr, INT16 srclen,
  88                     LPSTR dststr, INT16 dstlen)
  89 {
  90     return LCMapStringA(lcid, mapflags, srcstr, srclen, dststr, dstlen);
  91 }
  92
  93 /***********************************************************************
  94  *           CompareStringA       (OLE2NLS.8)
  95  */
  96 UINT16 WINAPI CompareString16(DWORD lcid,DWORD fdwStyle,
  97                               LPCSTR s1,DWORD l1,LPCSTR s2,DWORD l2)
  98 {
  99         return (UINT16)CompareStringA(lcid,fdwStyle,s1,l1,s2,l2);
 100 }
 101
 102 /******************************************************************************
 103  *      RegisterNLSInfoChanged  [OLE2NLS.9]
 104  */
 105 BOOL16 WINAPI RegisterNLSInfoChanged16(LPVOID lpNewNLSInfo) /* [???] FIXME */
 106 {
 107         FIXME("Fully implemented, but doesn't effect anything.\n");
 108
 109         if (!lpNewNLSInfo) {
 110                 lpNLSInfo = NULL;
 111                 return TRUE;
 112         }
 113         else {
 114                 if (!lpNLSInfo) {
 115                         lpNLSInfo = lpNewNLSInfo;
 116                         return TRUE;
 117                 }
 118         }
 119
 120         return FALSE; /* ptr not set */
 121 }
 122