smb_oem.c revision da6c28aaf62fa55f0fdb8004aa40f88f23bf53f0
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2007 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
/*
* Support for oem <-> unicode translations.
*/
#ifndef _KERNEL
#include <stdio.h>
#include <stdlib.h>
#include <thread.h>
#include <synch.h>
#include <string.h>
#endif /* _KERNEL */
#include <smbsrv/alloc.h>
#include <smbsrv/string.h>
#include <smbsrv/oem.h>
#include <sys/byteorder.h>
/*
* name: Name used to show on the telnet/GUI.
* filename: The actual filename contains the codepage.
* doublebytes: The codepage is double or single byte.
* oempage: The oempage is used to convert Unicode to OEM chars.
* Memory needs to be allocated for value field of oempage
* to store the entire table.
* unipage: The unipage is used to convert OEM to Unicode chars.
* Memory needs to be allocated for value field of unipage
* to store the entire table.
* valid: This field indicates if the page is valid or not.
* ref: This ref count is used to keep track of the usage of BOTH
* oempage and unipage.
* Note: If the cpid of the table is changed, please change the
* codepage_id in oem.h as well.
*/
typedef struct oem_codepage {
char *filename;
unsigned int bytesperchar;
oempage_t oempage;
oempage_t unicodepage;
unsigned int valid;
unsigned int ref;
} oem_codepage_t;
static oem_codepage_t oemcp_table[] = {
{"850.cpg", 1, {0, 0}, {0, 0}, 0, 0}, /* Multilingual Latin1 */
{"950.cpg", 2, {1, 0}, {1, 0}, 0, 0}, /* Chinese Traditional */
{"1252.cpg", 1, {2, 0}, {2, 0}, 0, 0}, /* MS Latin1 */
{"949.cpg", 2, {3, 0}, {3, 0}, 0, 0}, /* Korean */
{"936.cpg", 2, {4, 0}, {4, 0}, 0, 0}, /* Chinese Simplified */
{"932.cpg", 2, {5, 0}, {5, 0}, 0, 0}, /* Japanese */
{"852.cpg", 1, {6, 0}, {6, 0}, 0, 0}, /* Multilingual Latin2 */
{"1250.cpg", 1, {7, 0}, {7, 0}, 0, 0}, /* MS Latin2 */
{"1253.cpg", 1, {8, 0}, {8, 0}, 0, 0}, /* MS Greek */
{"737.cpg", 1, {9, 0}, {9, 0}, 0, 0}, /* Greek */
{"1254.cpg", 1, {10, 0}, {10, 0}, 0, 0}, /* MS Turkish */
{"857.cpg", 1, {11, 0}, {11, 0}, 0, 0}, /* Multilingual Latin5 */
{"1251.cpg", 1, {12, 0}, {12, 0}, 0, 0}, /* MS Cyrillic */
{"866.cpg", 1, {13, 0}, {13, 0}, 0, 0}, /* Cyrillic II */
{"1255.cpg", 1, {14, 0}, {14, 0}, 0, 0}, /* MS Hebrew */
{"862.cpg", 1, {15, 0}, {15, 0}, 0, 0}, /* Hebrew */
{"1256.cpg", 1, {16, 0}, {16, 0}, 0, 0}, /* MS Arabic */
{"720.cpg", 1, {17, 0}, {17, 0}, 0, 0} /* Arabic */
};
static language lang_table[] = {
{"Arabic", OEM_CP_IND_720, OEM_CP_IND_1256},
{"Brazilian", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Chinese Traditional", OEM_CP_IND_950, OEM_CP_IND_950},
{"Chinese Simplified", OEM_CP_IND_936, OEM_CP_IND_936},
{"Czech", OEM_CP_IND_852, OEM_CP_IND_1250},
{"Danish", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Dutch", OEM_CP_IND_850, OEM_CP_IND_1252},
{"English", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Finnish", OEM_CP_IND_850, OEM_CP_IND_1252},
{"French", OEM_CP_IND_850, OEM_CP_IND_1252},
{"German", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Greek", OEM_CP_IND_737, OEM_CP_IND_1253},
{"Hebrew", OEM_CP_IND_862, OEM_CP_IND_1255},
{"Hungarian", OEM_CP_IND_852, OEM_CP_IND_1250},
{"Italian", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Japanese", OEM_CP_IND_932, OEM_CP_IND_932},
{"Korean", OEM_CP_IND_949, OEM_CP_IND_949},
{"Norwegian", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Polish", OEM_CP_IND_852, OEM_CP_IND_1250},
{"Russian", OEM_CP_IND_866, OEM_CP_IND_1251},
{"Slovak", OEM_CP_IND_852, OEM_CP_IND_1250},
{"Slovenian", OEM_CP_IND_852, OEM_CP_IND_1250},
{"Spanish", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Swedish", OEM_CP_IND_850, OEM_CP_IND_1252},
{"Turkish", OEM_CP_IND_857, OEM_CP_IND_1254}
};
/*
* The oem_default_smb_cp is the default smb codepage for English.
* It is actually codepage 850.
*/
mts_wchar_t oem_default_smb_cp[256] = {
0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007,
0x0008, 0x0009, 0x000A, 0x000B, 0x000C, 0x000D, 0x000E, 0x000F,
0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017,
0x0018, 0x0019, 0x001A, 0x001B, 0x001C, 0x001D, 0x001E, 0x001F,
0x0020, 0x0021, 0x0022, 0x0023, 0x0024, 0x0025, 0x0026, 0x0027,
0x0028, 0x0029, 0x002A, 0x002B, 0x002C, 0x002D, 0x002E, 0x002F,
0x0030, 0x0031, 0x0032, 0x0033, 0x0034, 0x0035, 0x0036, 0x0037,
0x0038, 0x0039, 0x003A, 0x003B, 0x003C, 0x003D, 0x003E, 0x003F,
0x0040, 0x0041, 0x0042, 0x0043, 0x0044, 0x0045, 0x0046, 0x0047,
0x0048, 0x0049, 0x004A, 0x004B, 0x004C, 0x004D, 0x004E, 0x004F,
0x0050, 0x0051, 0x0052, 0x0053, 0x0054, 0x0055, 0x0056, 0x0057,
0x0058, 0x0059, 0x005A, 0x005B, 0x005C, 0x005D, 0x005E, 0x005F,
0x0060, 0x0061, 0x0062, 0x0063, 0x0064, 0x0065, 0x0066, 0x0067,
0x0068, 0x0069, 0x006A, 0x006B, 0x006C, 0x006D, 0x006E, 0x006F,
0x0070, 0x0071, 0x0072, 0x0073, 0x0074, 0x0075, 0x0076, 0x0077,
0x0078, 0x0079, 0x007A, 0x007B, 0x007C, 0x007D, 0x007E, 0x007F,
0x00C7, 0x00FC, 0x00E9, 0x00E2, 0x00E4, 0x00E0, 0x00E5, 0x00E7,
0x00EA, 0x00EB, 0x00E8, 0x00EF, 0x00EE, 0x00EC, 0x00C4, 0x00C5,
0x00C9, 0x00E6, 0x00C6, 0x00F4, 0x00F6, 0x00F2, 0x00FB, 0x00F9,
0x00FF, 0x00D6, 0x00DC, 0x00F8, 0x00A3, 0x00D8, 0x00D7, 0x0192,
0x00E1, 0x00ED, 0x00F3, 0x00FA, 0x00F1, 0x00D1, 0x00AA, 0x00BA,
0x00BF, 0x00AE, 0x00AC, 0x00BD, 0x00BC, 0x00A1, 0x00AB, 0x00BB,
0x2591, 0x2592, 0x2593, 0x2502, 0x2524, 0x00C1, 0x00C2, 0x00C0,
0x00A9, 0x2563, 0x2551, 0x2557, 0x255D, 0x00A2, 0x00A5, 0x2510,
0x2514, 0x2534, 0x252C, 0x251C, 0x2500, 0x253C, 0x00E3, 0x00C3,
0x255A, 0x2554, 0x2569, 0x2566, 0x2560, 0x2550, 0x256C, 0x00A4,
0x00F0, 0x00D0, 0x00CA, 0x00CB, 0x00C8, 0x0131, 0x00CD, 0x00CE,
0x00CF, 0x2518, 0x250C, 0x2588, 0x2584, 0x00A6, 0x00CC, 0x2580,
0x00D3, 0x00DF, 0x00D4, 0x00D2, 0x00F5, 0x00D5, 0x00B5, 0x00FE,
0x00DE, 0x00DA, 0x00DB, 0x00D9, 0x00FD, 0x00DD, 0x00AF, 0x00B4,
0x00AD, 0x00B1, 0x2017, 0x00BE, 0x00B6, 0x00A7, 0x00F7, 0x00B8,
0x00B0, 0x00A8, 0x00B7, 0x00B9, 0x00B3, 0x00B2, 0x25A0, 0x00A0
};
/*
* The oem_default_telnet_cp is the default telnet codepage for English.
* It is actually codepage 1252.
*/
mts_wchar_t oem_default_telnet_cp[256] = {
0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7, 0x8,
0x9, 0x000A, 0x000B, 0x000C, 0x000D, 0x000E, 0x000F, 0x10,
0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18,
0x19, 0x001A, 0x001B, 0x001C, 0x001D, 0x001E, 0x001F, 0x20,
0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28,
0x29, 0x002A, 0x002B, 0x002C, 0x002D, 0x002E, 0x002F, 0x30,
0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38,
0x39, 0x003A, 0x003B, 0x003C, 0x003D, 0x003E, 0x003F, 0x40,
0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48,
0x49, 0x004A, 0x004B, 0x004C, 0x004D, 0x004E, 0x004F, 0x50,
0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58,
0x59, 0x005A, 0x005B, 0x005C, 0x005D, 0x005E, 0x005F, 0x60,
0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68,
0x69, 0x006A, 0x006B, 0x006C, 0x006D, 0x006E, 0x006F, 0x70,
0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78,
0x79, 0x007A, 0x007B, 0x007C, 0x007D, 0x007E, 0x007F, 0x20AC,
0x81, 0x201A, 0x192, 0x201E, 0x2026, 0x2020, 0x2021, 0x02C6,
0x2030, 0x160, 0x2039, 0x152, 0x8D, 0x017D, 0x8F, 0x90,
0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014, 0x02DC,
0x2122, 0x161, 0x203A, 0x153, 0x9D, 0x017E, 0x178, 0x00A0,
0x00A1, 0x00A2, 0x00A3, 0x00A4, 0x00A5, 0x00A6, 0x00A7, 0x00A8,
0x00A9, 0x00AA, 0x00AB, 0x00AC, 0x00AD, 0x00AE, 0x00AF, 0x00B0,
0x00B1, 0x00B2, 0x00B3, 0x00B4, 0x00B5, 0x00B6, 0x00B7, 0x00B8,
0x00B9, 0x00BA, 0x00BB, 0x00BC, 0x00BD, 0x00BE, 0x00BF, 0x00C0,
0x00C1, 0x00C2, 0x00C3, 0x00C4, 0x00C5, 0x00C6, 0x00C7, 0x00C8,
0x00C9, 0x00CA, 0x00CB, 0x00CC, 0x00CD, 0x00CE, 0x00CF, 0x00D0,
0x00D1, 0x00D2, 0x00D3, 0x00D4, 0x00D5, 0x00D6, 0x00D7, 0x00D8,
0x00D9, 0x00DA, 0x00DB, 0x00DC, 0x00DD, 0x00DE, 0x00DF, 0x00E0,
0x00E1, 0x00E2, 0x00E3, 0x00E4, 0x00E5, 0x00E6, 0x00E7, 0x00E8,
0x00E9, 0x00EA, 0x00EB, 0x00EC, 0x00ED, 0x00EE, 0x00EF, 0x00F0,
0x00F1, 0x00F2, 0x00F3, 0x00F4, 0x00F5, 0x00F6, 0x00F7, 0x00F8,
0x00F9, 0x00FA, 0x00FB, 0x00FC, 0x00FD, 0x00FE, 0x00FF
};
#define MAX_OEMPAGES (sizeof (oemcp_table) / sizeof (oemcp_table[0]))
#define MAX_UNI_IDX 65536
/*
* oem_codepage_bytesperchar
*
* This function returns the max bytes per oem char for the specified
* oem table. This basically shows if the oem codepage is single or
* double bytes.
*/
static unsigned int
oem_codepage_bytesperchar(unsigned int cpid)
{
if (cpid >= MAX_OEMPAGES)
return (0);
else
return (oemcp_table[cpid].bytesperchar);
}
/*
* oem_get_codepage_path
*
* This function will get the codepage path.
*/
const char *
oem_get_codepage_path(void)
{
#ifdef PBSHORTCUT /* */
const char *path = getenv("codepage.oem.directory");
if (path == 0)
return ("/");
else
return (path);
#else /* PBSHORTCUT */
return ("/");
#endif /* PBSHORTCUT */
}
/*
* oem_codepage_init
*
* This function will init oem page via the cpid of the oem table.
* The function oem_codepage_free must be called when the oempage is
* no longer needed to free up the allocated memory. If the codepage is
* successfully initialized, zero will be the return value; otherwise
* -1 will be the return value.
*/
int
oem_codepage_init(unsigned int cpid)
{
#ifndef _KERNEL
FILE *fp;
static mutex_t mutex;
char buf[32];
char filePath[100];
#endif /* _KERNEL */
unsigned int max_oem_index;
const char *codepagePath = oem_get_codepage_path();
mts_wchar_t *default_oem_cp = 0;
oem_codepage_t *oemcp;
/*
* The OEM codepages 850 and 1252 are stored in kernel; therefore,
* no need for codepagePath to be defined to work.
*/
if (cpid >= MAX_OEMPAGES ||
(codepagePath == 0 &&
cpid != oem_default_smb_cpid && cpid != oem_default_telnet_cpid))
return (-1);
max_oem_index = 1 << oem_codepage_bytesperchar(cpid) * 8;
/*
* Use mutex so no two same index can be initialize
* at the same time.
*/
#ifndef _KERNEL
(void) mutex_lock(&mutex);
#endif /* _KERNEL */
oemcp = &oemcp_table[cpid];
if (oemcp->valid) {
oemcp->valid++;
#ifndef _KERNEL
(void) mutex_unlock(&mutex);
#endif /* _KERNEL */
return (0);
}
oemcp->oempage.value =
MEM_ZALLOC("oem", max_oem_index * sizeof (mts_wchar_t));
if (oemcp->oempage.value == 0) {
#ifndef _KERNEL
(void) mutex_unlock(&mutex);
#endif /* _KERNEL */
return (-1);
}
oemcp->unicodepage.value =
MEM_ZALLOC("oem", MAX_UNI_IDX * sizeof (mts_wchar_t));
if (oemcp->unicodepage.value == 0) {
MEM_FREE("oem", oemcp->oempage.value);
oemcp->oempage.value = 0;
#ifndef _KERNEL
(void) mutex_unlock(&mutex);
#endif /* _KERNEL */
return (-1);
}
/*
* The default English page is stored in kernel.
* Therefore, no need to go to codepage files.
*/
#ifndef _KERNEL
if (cpid == oem_default_smb_cpid)
default_oem_cp = oem_default_smb_cp;
else if (cpid == oem_default_telnet_cpid)
default_oem_cp = oem_default_telnet_cp;
else
default_oem_cp = 0;
#else /* _KERNEL */
default_oem_cp = oem_default_smb_cp;
#endif /* _KERNEL */
if (default_oem_cp) {
int i;
for (i = 0; i < max_oem_index; i++) {
oemcp->oempage.value[i] = default_oem_cp[i];
oemcp->unicodepage.value[default_oem_cp[i]] =
(mts_wchar_t)i;
}
#ifdef _KERNEL
}
/*
* XXX This doesn't seem right. How do we handle the situation
* where default_oem_cp == 0 in the kernel?
* Is this a PBSHORTCUT?
*/
#else
} else {
/*
* The codepage is not one of the default that stores
* in the include
* file; therefore, we need to read from the file.
*/
(void) snprintf(filePath, sizeof (filePath),
"%s/%s", codepagePath, oemcp->filename);
fp = fopen(filePath, "r");
if (fp == 0) {
MEM_FREE("oem", oemcp->oempage.value);
MEM_FREE("oem", oemcp->unicodepage.value);
#ifndef _KERNEL
(void) mutex_unlock(&mutex);
#endif /* _KERNEL */
return (-1);
}
while (fgets(buf, 32, fp) != 0) {
char *endptr;
unsigned int oemval, unival;
endptr = (char *)strchr(buf, ' ');
if (endptr == 0) {
continue;
}
oemval = strtol(buf, &endptr, 0);
unival = strtol(endptr+1, 0, 0);
if (oemval >= max_oem_index || unival >= MAX_UNI_IDX) {
continue;
}
oemcp->oempage.value[oemval] = unival;
oemcp->unicodepage.value[unival] = oemval;
}
(void) fclose(fp);
}
#endif /* _KERNEL */
oemcp->valid = 1;
#ifndef _KERNEL
(void) mutex_unlock(&mutex);
#endif /* _KERNEL */
return (0);
}
/*
* oem_codepage_free
*
* This function will clear the valid bit and free the memory
* allocated to the oem/unipage by oem_codepage_init if the ref count
* is zero.
*/
void
oem_codepage_free(unsigned int cpid)
{
oem_codepage_t *oemcp;
if (cpid >= MAX_OEMPAGES || !oemcp_table[cpid].valid)
return;
oemcp = &oemcp_table[cpid];
oemcp->valid--;
if (oemcp->ref != 0 || oemcp->valid != 0)
return;
if (oemcp->oempage.value != 0) {
MEM_FREE("oem", oemcp->oempage.value);
oemcp->oempage.value = 0;
}
if (oemcp->unicodepage.value != 0) {
MEM_FREE("oem", oemcp->unicodepage.value);
oemcp->unicodepage.value = 0;
}
}
/*
* oem_get_oempage
*
* This function will return the current oempage and increment
* the ref count. The function oem_release_page should always
* be called when finish using the oempage to decrement the
* ref count.
*/
static oempage_t *
oem_get_oempage(unsigned int cpid)
{
if (cpid >= MAX_OEMPAGES)
return (0);
if (oemcp_table[cpid].valid) {
oemcp_table[cpid].ref++;
return (&oemcp_table[cpid].oempage);
}
return (0);
}
/*
* oem_get_unipage
*
* This function will return the current unipage and increment
* the ref count. The function oem_release_page should always
* be called when finish using the unipage to decrement the
* ref count.
*/
static oempage_t *
oem_get_unipage(unsigned int cpid)
{
if (cpid >= MAX_OEMPAGES)
return (0);
if (oemcp_table[cpid].valid) {
oemcp_table[cpid].ref++;
return (&oemcp_table[cpid].unicodepage);
}
return (0);
}
/*
* oem_release_page
*
* This function will decrement the ref count and check the valid
* bit. It will free the memory allocated for the pages
* if the
* valid bit is not set, ref count is zero and the page is not
* already freed.
*/
static void
oem_release_page(oempage_t *page)
{
oem_codepage_t *oemcp = &oemcp_table[page->cpid];
page = 0;
if (oemcp->ref > 0)
oemcp->ref--;
if (oemcp->ref != 0 || oemcp->valid)
return;
if (oemcp->oempage.value != 0) {
MEM_FREE("oem", oemcp->oempage.value);
oemcp->oempage.value = 0;
}
if (oemcp->unicodepage.value != 0) {
MEM_FREE("oem", oemcp->unicodepage.value);
oemcp->unicodepage.value = 0;
}
}
/*
* unicodestooems
*
* Convert unicode string to oem string. The function will stop
* converting the unicode string when size nbytes - 1 is reached
* or when there is not enough room to store another unicode.
* If the function is called when the codepage is not initialized
* or when the codepage initialize failed, it will return 0.
* Otherwise, the total # of the converted unicode is returned.
*/
size_t
unicodestooems(
char *oemstring,
const mts_wchar_t *unicodestring,
size_t nbytes,
unsigned int cpid)
{
oempage_t *unipage;
unsigned int count = 0;
mts_wchar_t oemchar;
if (cpid >= MAX_OEMPAGES)
return (0);
if (unicodestring == 0 || oemstring == 0)
return (0);
if ((unipage = oem_get_unipage(cpid)) == 0)
return (0);
while ((oemchar = unipage->value[*unicodestring]) != 0) {
if (oemchar & 0xff00 && nbytes >= MTS_MB_CHAR_MAX) {
*oemstring++ = oemchar >> 8;
*oemstring++ = (char)oemchar;
nbytes -= 2;
} else if (nbytes > 1) {
*oemstring++ = (char)oemchar;
nbytes--;
} else
break;
count++;
unicodestring++;
}
*oemstring = 0;
oem_release_page(unipage);
return (count);
}
/*
* oemstounicodes
*
* Convert oem string to unicode string. The function will stop
* converting the oem string when unicodestring len reaches nwchars - 1.
* or when there is not enough room to store another oem char.
* If the function is called when the codepage is not initialized
* or when the codepage initialize failed, it will return 0.
* Otherwise, the total # of the converted oem chars is returned.
* The oem char can be either 1 or 2 bytes.
*/
size_t
oemstounicodes(
mts_wchar_t *unicodestring,
const char *oemstring,
size_t nwchars,
unsigned int cpid)
{
oempage_t *oempage;
size_t count = nwchars;
mts_wchar_t oemchar;
if (cpid >= MAX_OEMPAGES)
return (0);
if (unicodestring == 0 || oemstring == 0)
return (0);
if ((oempage = oem_get_oempage(cpid)) == 0)
return (0);
while ((oemchar = (mts_wchar_t)*oemstring++ & 0xff) != 0) {
/*
* Cannot find one byte oemchar in table. Must be
* a lead byte. Try two bytes.
*/
if ((oempage->value[oemchar] == 0) && (oemchar != 0)) {
oemchar = oemchar << 8 | (*oemstring++ & 0xff);
if (oempage->value[oemchar] == 0) {
*unicodestring = 0;
break;
}
}
#ifdef _BIG_ENDIAN
*unicodestring = LE_IN16(&oempage->value[oemchar]);
#else
*unicodestring = oempage->value[oemchar];
#endif
count--;
unicodestring++;
}
*unicodestring = 0;
oem_release_page(oempage);
return (nwchars - count);
}
/*
* oem_get_lang_table
*
* This function returns a pointer to the language table.
*/
language *
oem_get_lang_table(void)
{
return (lang_table);
}
/*
* oem_no_of_languages
*
* This function returns total languages support in the system.
*/
int
oem_no_of_languages(void)
{
return (sizeof (lang_table)/sizeof (lang_table[0]));
}
#ifndef _KERNEL
#if 1
/*
* TESTING Functions
*/
void
oemcp_print(unsigned int cpid)
{
unsigned int bytesperchar, max_index, i;
oempage_t *oempage, *unipage;
unsigned int counter = 0;
if (cpid >= MAX_OEMPAGES) {
(void) printf("oemcp cpid %d is invalid\n", cpid);
return;
}
if ((oempage = oem_get_oempage(cpid)) == 0) {
(void) printf("oemcp of cpid %d is invalid\n", cpid);
return;
}
if ((unipage = oem_get_unipage(cpid)) == 0) {
(void) printf("unicp of cpid %d is invalid\n", cpid);
return;
}
if ((bytesperchar = oem_codepage_bytesperchar(cpid)) == 0) {
(void) printf("bytesperchar of cpid %d is not correct\n", cpid);
return;
}
max_index = 1 << bytesperchar * 8;
(void) printf("OEMPAGE:\n");
for (i = 0; i < max_index; i++) {
if ((counter + 1) % 4 == 0 &&
(oempage->value[i] != 0 || i == 0)) {
(void) printf("%x %x\n", i, oempage->value[i]);
counter++;
} else if (oempage->value[i] != 0 || i == 0) {
(void) printf("%x %x, ", i, oempage->value[i]);
counter++;
}
}
counter = 0;
(void) printf("\n\nUNIPAGE:\n");
for (i = 0; i < 65536; i++) {
if ((counter + 1) % 8 == 0 &&
(unipage->value[i] != 0 || i == 0)) {
(void) printf("%x %x\n", i, unipage->value[i]);
counter++;
} else if (unipage->value[i] != 0 || i == 0) {
(void) printf("%x %x, ", i, unipage->value[i]);
counter++;
}
}
(void) printf("\n");
oem_release_page(oempage);
oem_release_page(unipage);
}
void
oemstringtest(unsigned int cpid)
{
unsigned char *c, *cbuf;
unsigned char cbuf1[100] = {0xfe, 0xfd, 0xf2, 0xe9,
0x63, 0xce, 0xdb, 0x8c, 0x9c, 0x21, 0};
unsigned char cbuf2[100] = {0xfe, 0xfc, 0x63, 0x81, 0x42,
0x91, 0x40, 0x24, 0xff, 0x49};
mts_wchar_t buf[100], *wc;
if (cpid == 1)
cbuf = cbuf1;
else if (cpid == 2)
cbuf = cbuf2;
/*
* Before oem->uni conversion.
*/
(void) printf("Before oem->uni conversion: ");
for (c = cbuf; *c != 0; c++)
(void) printf("%x ", *c);
(void) printf("\n");
/*
* oem->uni conversion
*/
(void) oemstounicodes(buf, (const char *)cbuf, 100, cpid);
/*
* After oem->uni conversion.
*/
(void) printf("After oem->uni conversion: ");
for (wc = buf; *wc != 0; wc++)
(void) printf("%x ", *wc);
(void) printf("\n");
/*
* uni->oem conversion
*/
(void) unicodestooems((char *)cbuf, buf, 100, cpid);
/*
* After uni->oem conversion.
*/
(void) printf("After uni->oem conversion: ");
for (c = cbuf; *c != 0; c++)
(void) printf("%x ", *c);
(void) printf("\n");
}
#endif
#endif /* _KERNEL */