msvcrt: Add _mbctohira_l implementation.

dlls/msvcr100/msvcr100.spec

@@ -1084,7 +1084,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-@ stub _mbctohira_l
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 @ stub _mbctokata_l
 @ cdecl _mbctolower(long)

dlls/msvcr110/msvcr110.spec

@@ -1441,7 +1441,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-@ stub _mbctohira_l
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 @ stub _mbctokata_l
 @ cdecl _mbctolower(long)

dlls/msvcr120/msvcr120.spec

@@ -1452,7 +1452,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-@ stub _mbctohira_l
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 @ stub _mbctokata_l
 @ cdecl _mbctolower(long)

dlls/msvcr80/msvcr80.spec

@@ -756,7 +756,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-@ stub _mbctohira_l
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 @ stub _mbctokata_l
 @ cdecl _mbctolower(long)

dlls/msvcr90/msvcr90.spec

@@ -734,7 +734,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-@ stub _mbctohira_l
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 @ stub _mbctokata_l
 @ cdecl _mbctolower(long)

dlls/msvcrt/mbcs.c

@@ -2950,18 +2950,26 @@ int CDECL mbsrtowcs_s(size_t *ret, wchar_t *wcstr, size_t len,
 }
 
 /*********************************************************************
- *		_mbctohira (MSVCRT.@)
+ *		_mbctohira_l (MSVCRT.@)
  *
  *              Converts a sjis katakana character to hiragana.
  */
-unsigned int CDECL _mbctohira(unsigned int c)
+unsigned int CDECL _mbctohira_l(unsigned int c, _locale_t locale)
 {
-    if(_ismbckata(c) && c <= 0x8393)
+    if(_ismbckata_l(c, locale) && c <= 0x8393)
         return (c - 0x8340 - (c >= 0x837f ? 1 : 0)) + 0x829f;
     return c;
 }
 
 /*********************************************************************
+ *		_mbctohira (MSVCRT.@)
+ */
+unsigned int CDECL _mbctohira(unsigned int c)
+{
+    return _mbctohira_l(c, NULL);
+}
+
+/*********************************************************************
  *		_mbctokata (MSVCRT.@)
  *
  *              Converts a sjis hiragana character to katakana.

dlls/msvcrt/msvcrt.spec

@@ -701,7 +701,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-# stub _mbctohira_l(long ptr)
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 # stub _mbctokata_l(long ptr)
 @ cdecl _mbctolower(long)

dlls/ucrtbase/ucrtbase.spec

@@ -599,7 +599,7 @@
 @ cdecl _mbclen(ptr)
 @ cdecl _mbclen_l(ptr ptr)
 @ cdecl _mbctohira(long)
-@ stub _mbctohira_l
+@ cdecl _mbctohira_l(long ptr)
 @ cdecl _mbctokata(long)
 @ stub _mbctokata_l
 @ cdecl _mbctolower(long)
@@ -1169,7 +1169,7 @@
 @ cdecl _o__mbclen(ptr) _mbclen
 @ cdecl _o__mbclen_l(ptr ptr) _mbclen_l
 @ cdecl _o__mbctohira(long) _mbctohira
-@ stub _o__mbctohira_l
+@ cdecl _o__mbctohira_l(long ptr) _mbctohira_l
 @ cdecl _o__mbctokata(long) _mbctokata
 @ stub _o__mbctokata_l
 @ cdecl _o__mbctolower(long) _mbctolower