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 #include <string.h>
   9 #include <stdio.h>
  10 #include <ctype.h>
  11 #include <stdlib.h>
  12 #include <locale.h>
  13
  14 #include "windef.h"
  15 #include "winbase.h"
  16 #include "wingdi.h"
  17 #include "winuser.h"
  18 #include "wine/windef16.h"
  19 #include "heap.h"
  20 #include "winver.h"
  21 #include "winnls.h"
  22 #include "winreg.h"
  23 #include "winerror.h"
  24 #include "debugtools.h"
  25
  26 DEFAULT_DEBUG_CHANNEL(ole);
  27
  28 static LPVOID lpNLSInfo = NULL;
  29
  30 /******************************************************************************
  31  *              GetLocaleInfo16 [OLE2NLS.5]
  32  * Is the last parameter really WORD for Win16?
  33  */
  34 INT16 WINAPI GetLocaleInfo16(LCID lcid,LCTYPE LCType,LPSTR buf,INT16 len)
  35 {
  36         return GetLocaleInfoA(lcid,LCType,buf,len);
  37 }
  38
  39 /******************************************************************************
  40  *              GetStringType16 [OLE2NLS.7]
  41  */
  42 BOOL16 WINAPI GetStringType16(LCID locale,DWORD dwInfoType,LPCSTR src,
  43                               INT16 cchSrc,LPWORD chartype)
  44 {
  45         return GetStringTypeExA(locale,dwInfoType,src,cchSrc,chartype);
  46 }
  47
  48 /***********************************************************************
  49  *           CompareString16       (OLE2NLS.8)
  50  */
  51 UINT16 WINAPI CompareString16(DWORD lcid,DWORD fdwStyle,
  52                               LPCSTR s1,DWORD l1,LPCSTR s2,DWORD l2)
  53 {
  54         return (UINT16)CompareStringA(lcid,fdwStyle,s1,l1,s2,l2);
  55 }
  56
  57 /******************************************************************************
  58  *      RegisterNLSInfoChanged  [OLE2NLS.10]
  59  */
  60 BOOL16 WINAPI RegisterNLSInfoChanged16(LPVOID lpNewNLSInfo) /* [???] FIXME */
  61 {
  62         FIXME("Fully implemented, but doesn't effect anything.\n");
  63
  64         if (!lpNewNLSInfo) {
  65                 lpNLSInfo = NULL;
  66                 return TRUE;
  67         }
  68         else {
  69                 if (!lpNLSInfo) {
  70                         lpNLSInfo = lpNewNLSInfo;
  71                         return TRUE;
  72                 }
  73         }
  74
  75         return FALSE; /* ptr not set */
  76 }
  77