forked from KolibriOS/kolibrios
1ef1a0a3a0
2. better encoding in WebBrowser 3. fix error_init() in lib/dll.h git-svn-id: svn://kolibrios.org@5690 a494cfbc-eb01-0410-851d-a64ba20cac60
72 lines
1.5 KiB
C
72 lines
1.5 KiB
C
//convert text characters
|
|
#ifndef INCLUDE_LIBICONV_H
|
|
#define INCLUDE_LIBICONV_H
|
|
#print "[include <obj/iconv.h>]\n"
|
|
|
|
#ifndef INCLUDE_KOLIBRI_H
|
|
#include "../lib/kolibri.h"
|
|
#endif
|
|
|
|
#ifndef INCLUDE_DLL_H
|
|
#include "../lib/dll.h"
|
|
#endif
|
|
|
|
dword iconv_lib = #a_iconv_lib;
|
|
char a_iconv_lib[19]="/sys/lib/iconv.obj\0";
|
|
|
|
dword iconv_open = #aIconv_open;
|
|
dword iconv = #aIconv;
|
|
$DD 2 dup 0
|
|
|
|
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;
|
|
|
|
iconv_open stdcall (from_chs, to_chs); //CP866, CP1251, CP1252, KOI8-RU, UTF-8, ISO8859-5
|
|
if (EAX==-1)
|
|
{
|
|
debug(from_chs);
|
|
debug(to_chs);
|
|
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)+1;
|
|
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()");
|
|
debugi(cd);
|
|
debug("in_len");
|
|
debugi(in_len);
|
|
debug("out_len");
|
|
debugi(out_len);
|
|
new_buf = free(new_buf);
|
|
return 0;
|
|
}
|
|
strcpy(conv_buf, new_buf);
|
|
free(new_buf);
|
|
return conv_buf;
|
|
}
|
|
|
|
|
|
:char *charsets[] = { " ", "UTF-8", "KOI8-RU", "CP1251", "CP1252", "ISO8859-5", "CP866"};
|
|
:int cur_charset;
|
|
enum {
|
|
CH_NULL,
|
|
CH_UTF8,
|
|
CH_KOI8,
|
|
CH_CP1251,
|
|
CH_CP1252,
|
|
CH_ISO8859_5,
|
|
CH_CP866
|
|
};
|
|
|
|
#endif |