kolibrios-fun/programs/cmm/lib/lib.obj/iconv.h
Kirill Lipatov (Leency) 11403613c7 complete update c-- libraries
git-svn-id: svn://kolibrios.org@3107 a494cfbc-eb01-0410-851d-a64ba20cac60
2012-12-15 00:16:06 +00:00

41 lines
1.0 KiB
C

//convert text characters
dword iconv_lib = #a_iconv_lib;
char a_iconv_lib[19]="/sys/lib/iconv.obj\0";
dword iconv_open = #aIconv_open;
dword iconv = #aIconv;
dword am5__ = 0x0;
dword bm5__ = 0x0;
char aIconv_open[11] = "iconv_open\0";
char aIconv[6] = "iconv\0";
dword ChangeCharset(dword from_chs, to_chs, conv_buf)
{
dword cd, in_len, out_len, new_buf;
debug (from_chs);
debug (to_chs);
iconv_open stdcall (from_chs, to_chs); //CP866, CP1251, CP1252, KOI8-RU, UTF-8, ISO8859-5
if (EAX==-1) { debug("iconv: wrong charset,\nuse only CP866, CP1251, CP1252, KOI8-RU, UTF-8, ISO8859-5"); return 0; }
cd = EAX;
in_len = out_len = strlen(conv_buf);
new_buf = mem_Alloc(in_len);
iconv stdcall (cd, #conv_buf, #in_len, #new_buf, #out_len);
cd = EAX;
if (cd!=0)
{
debug("iconv: something is wrong with stdcall iconv()");
debug(itoa(cd));
debug("in_len");
debug(itoa(in_len));
debug("out_len");
debug(itoa(out_len));
new_buf = 0;
}
return new_buf;
}