Changeset 5764 for trunk/src/kernel32/lang.cpp

Timestamp:

May 20, 2001, 10:17:42 AM (24 years ago)

Author:

sandervl

Message:

DT: IFIRSTDAYOFWEEK changes/fixes

File:

• trunk/src/kernel32/lang.cpp (modified) (3 diffs)

trunk/src/kernel32/lang.cpp

@@ -1 @@
-/* $Id: lang.cpp,v 1.35 2001-05-19 08:24:47 sandervl Exp $ */
+/* $Id: lang.cpp,v 1.36 2001-05-20 08:17:41 sandervl Exp $ */
 /*
  * Win32 language API functions for OS/2
@@ -524 +524 @@
         LocaleFromUniStr(pInfoItem,wbuf,&ulInfoLen);
         UniFreeMem(pInfoItem);
-        if ((++wbuf[0])=='7') wbuf[0]='0';
         break;
 
@@ -914 +913 @@
 //******************************************************************************
 //******************************************************************************
-
-
-
-#if 0
-PHS: disabled for ole2nls.cpp
-
-/*****************************************************************************
- * Name      : BOOL SetLocaleInfoA
- * Purpose   : The SetLocaleInfoA function sets an item of locale information.
- *             It does so by making an entry in the process portion of the
- *             locale table. This setting only affects the user override portion
- *             of the locale settings; it does not set the system defaults.
- *             Only certain types of locale information, or LCTYPE values, can
- *             be set by this function. See the following Remarks section for a
- *             list of valid LCTYPE values.
- *             The locale information is always passed in as a null-terminated
- *             Unicode string in the Unicode (W) version of the function, and as
- *             a null-terminated ANSI string in the ANSI (A) version. No integers
- *             are allowed by this function; any numeric values must be specified
- *             as Unicode or ANSI text. Each LCTYPE has a particular format, as
- *             noted in Locale Identifiers.
- * Parameters: LCID    Locale   locale identifier
- *             LCTYPE  LCType   type of information to set
- *             LPCTSTR lpLCData pointer to information to set
- * Variables :
- * Result    : TRUE / FALSE
- * Remark    :
- * Status    : UNTESTED STUB
- *
- * Author    : Patrick Haller [Mon, 1998/06/15 08:00]
- *****************************************************************************/
-
-BOOL WIN32API SetLocaleInfoA(LCID   Locale,
-                                LCTYPE LCType,
-                                LPCSTR lpLCData)
-{
-  dprintf(("KERNEL32: SetLocaleInfoA(%08xh,%08xh,%08xh) not implemented.\n",
-           Locale,
-           LCType,
-           lpLCData));
-
-  return (FALSE);
-}
-
-
-/*****************************************************************************
- * Name      : BOOL SetLocaleInfoW
- * Purpose   : The SetLocaleInfoW function sets an item of locale information.
- *             It does so by making an entry in the process portion of the
- *             locale table. This setting only affects the user override portion
- *             of the locale settings; it does not set the system defaults.
- *             Only certain types of locale information, or LCTYPE values, can
- *             be set by this function. See the following Remarks section for a
- *             list of valid LCTYPE values.
- *             The locale information is always passed in as a null-terminated
- *             Unicode string in the Unicode (W) version of the function, and as
- *             a null-terminated ANSI string in the ANSI (A) version. No integers
- *             are allowed by this function; any numeric values must be specified
- *             as Unicode or ANSI text. Each LCTYPE has a particular format, as
- *             noted in Locale Identifiers.
- * Parameters: LCID    Locale   locale identifier
- *             LCTYPE  LCType   type of information to set
- *             LPCTSTR lpLCData pointer to information to set
- * Variables :
- * Result    : TRUE / FALSE
- * Remark    :
- * Status    : UNTESTED STUB
- *
- * Author    : Patrick Haller [Mon, 1998/06/15 08:00]
- *****************************************************************************/
-
-BOOL WIN32API SetLocaleInfoW(LCID    Locale,
-                                LCTYPE  LCType,
-                                LPCWSTR lpLCData)
-{
-  dprintf(("KERNEL32: SetLocaleInfoW(%08xh,%08xh,%08xh) not implemented.\n",
-           Locale,
-           LCType,
-           lpLCData));
-
-  return (FALSE);
-}
-
-
-/*****************************************************************************
- * Name      :
- * Purpose   :
- * Parameters:
- * Variables :
- * Result    :
- * Remark    :
- * Status    : UNTESTED STUB
- *
- * Author    : Patrick Haller [Tue, 1998/06/16 23:00]
- *****************************************************************************/
-
-ODINFUNCTION3(DWORD,VerLanguageNameA,DWORD,  wLang,
-                                     LPSTR,  szLang,
-                                     DWORD,  nSize)
-{
-  char    buffer[80];
-  LPCSTR  name;
-  DWORD   result;
-
-  dprintf(("KERNEL32: VerLanguageNameA not implemented"));
-
-  /*
-   * First, check \System\CurrentControlSet\control\Nls\Locale\<langid>
-   * from the registry.
-   */
-
-#if 0
-PHS: disabled because if interlinkage with registry
-  sprintf( buffer,
-           "\\System\\CurrentControlSet\\control\\Nls\\Locale\\%08x",
-           wLang );
-
-  result = RegQueryValueA(HKEY_LOCAL_MACHINE,
-                          buffer,
-                          szLang,
-                          (LPLONG)&nSize );
-  if (result == ERROR_SUCCESS ||
-      result == ERROR_MORE_DATA)
-    return nSize;
-#endif
-
-  /*
-   * If that fails, use the internal table
-   * (actually, Windows stores the names in a string table resource ...)
-   */
-
-  lstrcpynA(szLang,
-            "Language-Neutral",
-            nSize);
-
-  return strlen(szLang);
-}
-
-/*****************************************************************************
- * Name      :
- * Purpose   :
- * Parameters:
- * Variables :
- * Result    :
- * Remark    :
- * Status    : UNTESTED STUB
- *
- * Author    : Patrick Haller [Tue, 1998/06/16 23:00]
- *****************************************************************************/
-
-ODINFUNCTION3(DWORD,VerLanguageNameW,DWORD,  wLang,
-                                     LPWSTR, szLang,
-                                     DWORD,  nSize)
-{
-  LPSTR szLangA;
-  DWORD rc;
-
-  if ( (szLang == NULL) ||
-       (nSize  == 0) )          // validate parameters
-     return 0;
-
-  szLangA = (LPSTR)HEAP_malloc(nSize + 1);
-  rc = VerLanguageNameA(wLang,
-                        szLangA,
-                        nSize);
-  if (rc == ERROR_SUCCESS || rc == ERROR_MORE_DATA)
-    AsciiToUnicodeN(szLangA,
-                    szLang,
-                    nSize);
-  HEAP_free(szLangA);
-  return rc;
-}
-
-
-#endif
-