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 #include "heap.h"
  28
  29 #include "debugtools.h"
  30
  31 DEFAULT_DEBUG_CHANNEL(ole);
  32
  33 static LPVOID lpNLSInfo = NULL;
  34
  35 /******************************************************************************
  36  *              GetLocaleInfoA  [OLE2NLS.5]
  37  * Is the last parameter really WORD for Win16?
  38  */
  39 INT16 WINAPI GetLocaleInfo16(LCID lcid,LCTYPE LCType,LPSTR buf,INT16 len)
  40 {
  41         return GetLocaleInfoA(lcid,LCType,buf,len);
  42 }
  43
  44 /******************************************************************************
  45  *              GetStringTypeA  [OLE2NLS.7]
  46  */
  47 BOOL16 WINAPI GetStringType16(LCID locale,DWORD dwInfoType,LPCSTR src,
  48                               INT16 cchSrc,LPWORD chartype)
  49 {
  50         return GetStringTypeExA(locale,dwInfoType,src,cchSrc,chartype);
  51 }
  52
  53 /******************************************************************************
  54  *              GetUserDefaultLCID      [OLE2NLS.1]
  55  */
  56 LCID WINAPI GetUserDefaultLCID16(void)
  57 {
  58     return GetUserDefaultLCID();
  59 }
  60
  61 /******************************************************************************
  62  *              GetSystemDefaultLCID    [OLE2NLS.2]
  63  */
  64 LCID WINAPI GetSystemDefaultLCID16(void)
  65 {
  66     return GetSystemDefaultLCID();
  67 }
  68
  69 /******************************************************************************
  70  *              GetUserDefaultLangID    [OLE2NLS.3]
  71  */
  72 LANGID WINAPI GetUserDefaultLangID16(void)
  73 {
  74     return GetUserDefaultLangID();
  75 }
  76
  77 /******************************************************************************
  78  *              GetSystemDefaultLangID  [OLE2NLS.4]
  79  */
  80 LANGID WINAPI GetSystemDefaultLangID16(void)
  81 {
  82     return GetSystemDefaultLangID();
  83 }
  84
  85 /******************************************************************************
  86  *              LCMapStringA    [OLE2NLS.6]
  87  */
  88 INT16 LCMapString16(LCID lcid, DWORD mapflags, LPCSTR srcstr, INT16 srclen,
  89                     LPSTR dststr, INT16 dstlen)
  90 {
  91     return LCMapStringA(lcid, mapflags, srcstr, srclen, dststr, dstlen);
  92 }
  93
  94 /***********************************************************************
  95  *           CompareStringA       (OLE2NLS.8)
  96  */
  97 UINT16 WINAPI CompareString16(DWORD lcid,DWORD fdwStyle,
  98                               LPCSTR s1,DWORD l1,LPCSTR s2,DWORD l2)
  99 {
 100         return (UINT16)CompareStringA(lcid,fdwStyle,s1,l1,s2,l2);
 101 }
 102
 103 /******************************************************************************
 104  *      RegisterNLSInfoChanged  [OLE2NLS.9]
 105  */
 106 BOOL16 WINAPI RegisterNLSInfoChanged16(LPVOID lpNewNLSInfo) /* [???] FIXME */
 107 {
 108         FIXME("Fully implemented, but doesn't effect anything.\n");
 109
 110         if (!lpNewNLSInfo) {
 111                 lpNLSInfo = NULL;
 112                 return TRUE;
 113         }
 114         else {
 115                 if (!lpNLSInfo) {
 116                         lpNLSInfo = lpNewNLSInfo;
 117                         return TRUE;
 118                 }
 119         }
 120
 121         return FALSE; /* ptr not set */
 122 }
 123