+#include <stdlib.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+#include <dirent.h>
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
-
-#ifndef HAVE_STRNLEN
-/* original in mysql, strings/strnlen.c.
-uint strnlen(register const char *s, register uint maxlen)
-{
- const char *end= (const char *)memchr(s, '\0', maxlen);
- return end ? (uint) (end - s) : maxlen;
-}
-*/
-static inline int
-strnlen (register const char *s, register int maxlen)
-{
- const char *end= (const char *)memchr(s, '\0', maxlen);
- return end ? (int) (end - s) : maxlen;
-}
-#endif
-
+#include "sysdep.h"
#include "chise.h"
#include "chise-name.h"
+const unsigned char chise_db_dir[] = CHISE_DB_DIR;
+const unsigned char chise_system_db_dir[] = CHISE_SI_DB_DIR;
CHISE_Feature_Table*
chise_ds_open_feature_table (CHISE_DS *ds, const char *feature);
int chise_ft_close (CHISE_Feature_Table *table);
+
CHISE_CCS_Table*
chise_ds_open_ccs_table (CHISE_DS *ds, const char *ccs);
typedef DB CHISE_Attribute_Table;
CHISE_Attribute_Table*
-chise_open_attribute_table (const unsigned char *db_dir,
- const char *encoding, const char *feature,
+CHISE_Attribute_Table_open (const unsigned char *db_dir,
+ const char *category,
+ const char *key_type, const char *name,
DBTYPE real_subtype,
u_int32_t accessmask, int modemask);
-int chise_close_attribute_table (CHISE_Attribute_Table *db);
+int CHISE_Attribute_Table_close (CHISE_Attribute_Table *db);
-int chise_get_attribute_table (CHISE_Attribute_Table *db,
+int chise_attribute_table_get (CHISE_Attribute_Table *db,
char *key, CHISE_Value *valdatum);
-int chise_put_attribute_table (CHISE_Attribute_Table *db,
+int chise_attribute_table_put (CHISE_Attribute_Table *db,
char *key, unsigned char *value);
#define xzero(lvalue) ((void) memset (&(lvalue), '\0', sizeof (lvalue)))
CHISE_Char_ID
-chise_char_id_parse_c_string (unsigned char *str, int len)
-{
- int i = 0;
-
- if ( (len >= 2) && (str[i++] == '?') )
- {
- unsigned char c = str[i++];
- int counter;
- CHISE_Char_ID cid;
-
- if (c == '\\')
- {
- if (len < 3)
- return -1;
- c = str[i++];
- if (c == '^')
- {
- if (len < 4)
- return -1;
- c = str[i++];
- if (c == '?')
- return 0x7F;
- else
- return c & (0x80 | 0x1F);
- }
- }
- if ( c < 0xC0 )
- {
- cid = c;
- counter = 0;
- }
- else if ( c < 0xE0 )
- {
- cid = c & 0x1f;
- counter = 1;
- }
- else if ( c < 0xF0 )
- {
- cid = c & 0x0f;
- counter = 2;
- }
- else if ( c < 0xF8 )
- {
- cid = c & 0x07;
- counter = 3;
- }
- else if ( c < 0xFC )
- {
- cid = c & 0x03;
- counter = 4;
- }
- else
- {
- cid = c & 0x01;
- counter = 5;
- }
-
- if (counter + 2 <= len)
- {
- int j;
-
- for (j = 0; j < counter; j++)
- cid = (cid << 6) | (str[j + i] & 0x3F);
- return cid;
- }
- }
- return -1;
-}
+chise_char_id_parse_c_string (unsigned char *str, size_t len);
int
-chise_format_char_id (CHISE_Char_ID cid, unsigned char *dest, int len)
-{
- int i = 0;
-
- dest[i++] = '?';
- if (cid == '\t')
- {
- dest[i++] = '\\';
- dest[i++] = 't';
- dest[i] = '\0';
- return i;
- }
- else if (cid == '\n')
- {
- dest[i++] = '\\';
- dest[i++] = 'n';
- dest[i] = '\0';
- return i;
- }
- else if (cid == '\r')
- {
- dest[i++] = '\\';
- dest[i++] = 'r';
- dest[i] = '\0';
- return i;
- }
- else if (cid == 0x1C)
- {
- dest[i++] = '\\';
- dest[i++] = '^';
- dest[i++] = '\\';
- dest[i++] = '\\';
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0x1F)
- {
- dest[i++] = '\\';
- dest[i++] = '^';
- dest[i++] = '@' + cid;
- dest[i] = '\0';
- return i;
- }
- else if ( (cid == ' ') || (cid == '"') ||
- (cid == '#') || (cid == '\'') ||
- (cid == '(') || (cid == ')') ||
- (cid == ',') || (cid == '.') ||
- (cid == ';') || (cid == '?') ||
- (cid == '[') || (cid == '\\') ||
- (cid == ']') || (cid == '`') )
- {
- dest[i++] = '\\';
- dest[i++] = cid;
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0x7E)
- {
- dest[i++] = cid;
- dest[i] = '\0';
- return i;
- }
- else if (cid == 0x7F)
- {
- dest[i++] = '\\';
- dest[i++] = '^';
- dest[i++] = '?';
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0x9F)
- {
- dest[i++] = '\\';
- dest[i++] = '^';
- dest[i++] = ((cid + '@') >> 6) | 0xC0;
- dest[i++] = ((cid + '@') & 0x3F) | 0x80;
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0x7FF)
- {
- dest[i++] = (cid >> 6) | 0xC0;
- dest[i++] = (cid & 0x3F) | 0x80;
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0xFFFF)
- {
- dest[i++] = (cid >> 12) | 0xE0;
- dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
- dest[i++]= (cid & 0x3F) | 0x80;
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0x1FFFFF)
- {
- dest[i++]= (cid >> 18) | 0xF0;
- dest[i++]= ((cid >> 12) & 0x3F) | 0x80;
- dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
- dest[i++]= (cid & 0x3F) | 0x80;
- dest[i] = '\0';
- return i;
- }
- else if (cid <= 0x3FFFFFF)
- {
- dest[i++]= (cid >> 24) | 0xF8;
- dest[i++]= ((cid >> 18) & 0x3F) | 0x80;
- dest[i++]= ((cid >> 12) & 0x3F) | 0x80;
- dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
- dest[i++]= (cid & 0x3F) | 0x80;
- dest[i] = '\0';
- return i;
- }
- else
- {
- dest[i++]= (cid >> 30) | 0xFC;
- dest[i++]= ((cid >> 24) & 0x3F) | 0x80;
- dest[i++]= ((cid >> 18) & 0x3F) | 0x80;
- dest[i++]= ((cid >> 12) & 0x3F) | 0x80;
- dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
- dest[i++]= (cid & 0x3F) | 0x80;
- dest[i] = '\0';
- return i;
- }
-}
+chise_format_char_id (CHISE_Char_ID cid, unsigned char *dest, size_t len);
struct CHISE_DS
};
CHISE_DS*
-chise_open_data_source (CHISE_DS_Type type, char *location,
- DBTYPE subtype, int modemask)
+CHISE_DS_open (CHISE_DS_Type type, const unsigned char *location,
+ int subtype, int modemask)
{
CHISE_DS *ds = (CHISE_DS*)malloc (sizeof (CHISE_DS));
size_t len = strlen (location);
return NULL;
ds->type = type;
- ds->subtype = subtype;
+ ds->subtype = ( (subtype != 0) ? subtype : DB_HASH );
ds->modemask = modemask;
ds->location = (unsigned char*)malloc (len + 1);
if (ds->location == NULL)
}
int
-chise_ds_close (CHISE_DS *ds)
+CHISE_DS_close (CHISE_DS *ds)
{
if (ds->location != NULL)
free (ds->location);
return ft;
}
-CHISE_CCS_Table*
+CHISE_CCS
chise_ds_get_ccs (CHISE_DS *ds, const unsigned char *ccs)
{
CHISE_CCS_Table* ct;
return ct;
}
+int
+chise_ds_foreach_char_feature_name (CHISE_DS *ds,
+ int (*func) (CHISE_DS *ds,
+ unsigned char *name))
+{
+ unsigned char *dname
+ = alloca (strlen (ds->location) + sizeof ("/character/feature") + 1);
+ DIR *dir;
+ struct dirent *de;
+
+ strcpy (dname, ds->location);
+ strcat (dname, "/character/feature");
+
+ if ( (dir = opendir (dname)) == NULL)
+ return -1;
+
+ while ( (de = readdir (dir)) != NULL )
+ {
+ if ( (strcmp (de->d_name, ".") != 0) &&
+ (strcmp (de->d_name, "..") != 0) )
+ {
+ int i, need_to_decode = 0;
+ unsigned char *cp;
+ unsigned char *name;
+ unsigned char *np;
+
+ for (cp = de->d_name, i = 0; *cp != '\0'; i++)
+ {
+ if (*cp++ == '%')
+ need_to_decode = 1;
+ }
+ if (need_to_decode)
+ {
+ int index = -1;
+ int ch, c[2];
+ int hex[2];
+
+ name = (unsigned char *) alloca (i);
+ cp = de->d_name;
+ np = name;
+
+ while ( (ch = *cp++) != '\0')
+ {
+ if (ch == '%')
+ {
+ if (index >= 0)
+ {
+ *np++ = '%';
+ if (index == 1)
+ *np++ = c[0];
+ }
+ index = 0;
+ }
+ else if (index >= 0)
+ {
+ c[index] = ch;
+
+ if ( ('0' <= ch) && (ch <= '9') )
+ hex[index++] = ch - '0';
+ else if ( ('A' <= ch) && (ch <= 'F') )
+ hex[index++] = ch - 'A' + 10;
+ else if ( ('a' <= ch) && (ch <= 'f') )
+ hex[index++] = ch - 'a' + 10;
+ else
+ {
+ *np++ = '%';
+ if (index == 1)
+ *np++ = c[0];
+ *np++ = ch;
+ index = -1;
+ continue;
+ }
+ if (index == 2)
+ {
+ *np++ = (hex[0] << 4) | hex[1];
+ index = -1;
+ continue;
+ }
+ }
+ else
+ *np++ = ch;
+ }
+ *np = '\0';
+ }
+ else
+ name = de->d_name;
+
+ if (func (ds, name))
+ return closedir (dir);
+ }
+ }
+ return closedir (dir);
+}
struct CHISE_Feature_Table
{
if (table->db == NULL)
status = -1;
else
- status = chise_close_attribute_table (table->db);
+ status = CHISE_Attribute_Table_close (table->db);
if (table->name == NULL)
status = -1;
}
int
-chise_char_load_feature_value (CHISE_Char_ID cid,
- CHISE_Feature_Table *table,
- CHISE_Value *valdatum)
+chise_feature_setup_db (CHISE_Feature feature, int writable)
{
- unsigned char key_buf[8];
+ u_int32_t access;
- if (table->db == NULL)
+ if (feature == NULL)
+ return -1;
+
+ if (writable)
{
- CHISE_DS *ds = table->ds;
+ if ((feature->access & DB_CREATE) == 0)
+ {
+ if (feature->db != NULL)
+ {
+ CHISE_Attribute_Table_close (feature->db);
+ feature->db = NULL;
+ }
+ feature->access = 0;
+ }
+ access = DB_CREATE;
+ }
+ else
+ access = DB_RDONLY;
- table->db = chise_open_attribute_table (ds->location,
- "system-char-id", table->name,
- ds->subtype,
- DB_RDONLY, ds->modemask);
- if (table->db == NULL)
+ if (feature->db == NULL)
+ {
+ CHISE_DS *ds = feature->ds;
+
+ feature->db
+ = CHISE_Attribute_Table_open (ds->location, "character",
+ "feature", feature->name,
+ ds->subtype, access, ds->modemask);
+ if (feature->db == NULL)
return -1;
- table->access = DB_RDONLY;
+ feature->access = access;
}
+ return 0;
+}
+
+int
+chise_feature_sync (CHISE_Feature feature)
+{
+ int status;
+
+ if (feature->db == NULL)
+ status = 0;
+ else
+ status = CHISE_Attribute_Table_close (feature->db);
+ feature->db = NULL;
+ feature->access = 0;
+ return status;
+}
+
+int
+chise_char_set_feature_value (CHISE_Char_ID cid,
+ CHISE_Feature feature,
+ unsigned char *value)
+{
+ unsigned char key_buf[8];
+
+ if (feature == NULL)
+ return -1;
+ if (chise_feature_setup_db (feature, 1))
+ return -1;
chise_format_char_id (cid, key_buf, 8);
- return chise_get_attribute_table (table->db,
- key_buf, valdatum);
+ return chise_attribute_table_put (feature->db, key_buf, value);
+}
+
+int
+chise_char_load_feature_value (CHISE_Char_ID cid,
+ CHISE_Feature_Table *table,
+ CHISE_Value *valdatum)
+{
+ unsigned char key_buf[8];
+
+ if (chise_feature_setup_db (table, 0))
+ return -1;
+ chise_format_char_id (cid, key_buf, 8);
+ return chise_attribute_table_get (table->db, key_buf, valdatum);
}
unsigned char*
unsigned char *buf, size_t size)
{
CHISE_Value valdatum;
- unsigned char key_buf[8];
- int status;
-
- if (table->db == NULL)
- {
- CHISE_DS *ds = table->ds;
+ unsigned char key_buf[8];
+ int status;
- table->db = chise_open_attribute_table (ds->location,
- "system-char-id", table->name,
- ds->subtype,
- DB_RDONLY, ds->modemask);
- if (table->db == NULL)
- return NULL;
- table->access = DB_RDONLY;
- }
+ if (chise_feature_setup_db (table, 0))
+ return NULL;
chise_format_char_id (cid, key_buf, 8);
- status = chise_get_attribute_table (table->db,
+ status = chise_attribute_table_get (table->db,
key_buf, &valdatum);
if (status)
return NULL;
}
int
-chise_char_feature_value_iterate (CHISE_Feature feature,
- int (*func) (CHISE_Char_ID cid,
- CHISE_Feature feature,
- CHISE_Value *valdatum))
+chise_feature_foreach_char_with_value (CHISE_Feature feature,
+ int (*func) (CHISE_Char_ID cid,
+ CHISE_Feature feature,
+ CHISE_Value *valdatum))
{
DBT keydatum, valdatum;
DBC *dbcp;
int status;
- if (feature->db == NULL)
- {
- CHISE_DS *ds = feature->ds;
-
- feature->db
- = chise_open_attribute_table (ds->location,
- "system-char-id", feature->name,
- ds->subtype,
- DB_RDONLY, ds->modemask);
- if (feature->db == NULL)
- return -1;
- feature->access = DB_RDONLY;
- }
+ if (chise_feature_setup_db (feature, 0))
+ return -1;
xzero (keydatum);
xzero (valdatum);
unsigned char *key_str = (unsigned char *)keydatum.data;
int key_len = strnlen (key_str, keydatum.size);
CHISE_Char_ID key = chise_char_id_parse_c_string (key_str, key_len);
- int ret;
+ int ret = func (key, feature, &valdatum);
- if (ret = func (key, feature, &valdatum))
+ if (ret)
break;
}
dbcp->c_close (dbcp);
if (table->db == NULL)
status = 0;
else
- status = chise_close_attribute_table (table->db);
+ status = CHISE_Attribute_Table_close (table->db);
if (table->name == NULL)
status = -1;
}
int
+chise_ccs_setup_db (CHISE_CCS ccs, int writable)
+{
+ u_int32_t access;
+
+ if (ccs == NULL)
+ return -1;
+
+ if (writable)
+ {
+ if ((ccs->access & DB_CREATE) == 0)
+ {
+ if (ccs->db != NULL)
+ {
+ CHISE_Attribute_Table_close (ccs->db);
+ ccs->db = NULL;
+ }
+ ccs->access = 0;
+ }
+ access = DB_CREATE;
+ }
+ else
+ access = DB_RDONLY;
+
+ if (ccs->db == NULL)
+ {
+ CHISE_DS *ds = ccs->ds;
+
+ ccs->db
+ = CHISE_Attribute_Table_open (ds->location, "character",
+ "by_feature", ccs->name,
+ ds->subtype, access, ds->modemask);
+ if (ccs->db == NULL)
+ return -1;
+ ccs->access = access;
+ }
+ return 0;
+}
+
+int
chise_ccs_sync (CHISE_CCS ccs)
{
int status;
if (ccs->db == NULL)
status = 0;
else
- status = chise_close_attribute_table (ccs->db);
+ status = CHISE_Attribute_Table_close (ccs->db);
ccs->db = NULL;
ccs->access = 0;
return status;
int status = 0;
char key_buf[16];
- if (ccs->db == NULL)
- {
- CHISE_DS *ds = ccs->ds;
+ if (ccs == NULL)
+ return -1;
- ccs->db = chise_open_attribute_table (ds->location,
- ccs->name, "system-char-id",
- ds->subtype,
- DB_RDONLY, ds->modemask);
- if (ccs->db == NULL)
- return -1;
- ccs->access = DB_RDONLY;
- }
+ if (chise_ccs_setup_db (ccs, 0))
+ return -1;
sprintf(key_buf, "%d", code_point);
- status = chise_get_attribute_table (ccs->db, key_buf, &valdatum);
+ status = chise_attribute_table_get (ccs->db, key_buf, &valdatum);
if (!status)
{
unsigned char *str
chise_ccs_set_decoded_char (CHISE_CCS ccs,
int code_point, CHISE_Char_ID cid)
{
- CHISE_Value valdatum;
char key_buf[16], val_buf[8];
- if ((ccs->access & DB_CREATE) == 0)
- {
- if (ccs->db != NULL)
- {
- chise_close_attribute_table (ccs->db);
- ccs->db = NULL;
- }
- ccs->access = 0;
- }
- if (ccs->db == NULL)
- {
- CHISE_DS *ds = ccs->ds;
+ if (ccs == NULL)
+ return -1;
- ccs->db = chise_open_attribute_table (ds->location,
- ccs->name, "system-char-id",
- ds->subtype,
- DB_CREATE, ds->modemask);
- if (ccs->db == NULL)
- return -1;
- ccs->access = DB_CREATE;
- }
+ if (chise_ccs_setup_db (ccs, 1))
+ return -1;
sprintf(key_buf, "%d", code_point);
chise_format_char_id (cid, val_buf, 8);
- return chise_put_attribute_table (ccs->db, key_buf, val_buf);
+ return chise_attribute_table_put (ccs->db, key_buf, val_buf);
}
CHISE_Attribute_Table*
-chise_open_attribute_table (const unsigned char *db_dir,
- const char *encoding, const char *feature,
+CHISE_Attribute_Table_open (const unsigned char *db_dir,
+ const char *category,
+ const char *key_type, const char *name,
DBTYPE real_subtype,
u_int32_t accessmask, int modemask)
{
DB* dbase;
int status;
- int len, flen, i;
+ int len, name_len, i;
int size;
char *db_file_name, *sp;
+ struct stat statbuf;
status = db_create (&dbase, NULL, 0);
if (status)
return NULL;
+ if ( (accessmask & DB_CREATE) && stat (db_dir, &statbuf) )
+ mkdir (db_dir, modemask);
+
len = strlen (db_dir);
- flen = strlen (feature);
- size = len + strlen (encoding) + flen * 3 + 4;
+ name_len = strlen (name);
+ size = len + strlen (category) + strlen (key_type) + name_len * 3 + 5;
db_file_name = alloca (size);
strcpy (db_file_name, db_dir);
if (db_file_name[len - 1] != '/')
db_file_name[len++] = '/';
db_file_name[len] = '\0';
}
- strcat (db_file_name, encoding);
+
+ strcat (db_file_name, category);
+ if ( (accessmask & DB_CREATE) && stat (db_file_name, &statbuf) )
+ mkdir (db_file_name, modemask);
+ strcat (db_file_name, "/");
+
+ strcat (db_file_name, key_type);
+ if ( (accessmask & DB_CREATE) && stat (db_file_name, &statbuf) )
+ mkdir (db_file_name, modemask);
strcat (db_file_name, "/");
- /* strcat (db_file_name, feature); */
+
+ /* strcat (db_file_name, name); */
sp = &db_file_name[strlen (db_file_name)];
- for (i = 0; i < flen; i++)
+ for (i = 0; i < name_len; i++)
{
- int c = feature[i];
+ int c = name[i];
if ( (c == '/') || (c == '%') )
{
}
int
-chise_close_attribute_table (CHISE_Attribute_Table *db)
+CHISE_Attribute_Table_close (CHISE_Attribute_Table *db)
{
if (db)
{
}
int
-chise_get_attribute_table (CHISE_Attribute_Table *db,
+chise_attribute_table_get (CHISE_Attribute_Table *db,
char *key, CHISE_Value *valdatum)
{
DBT keydatum;
}
int
-chise_put_attribute_table (CHISE_Attribute_Table *db,
+chise_attribute_table_put (CHISE_Attribute_Table *db,
char *key, unsigned char *value)
{
DBT keydatum, valdatum;
status = db->put (db, NULL, &keydatum, &valdatum, 0);
return status;
}
+
+CHISE_Char_ID
+chise_char_id_parse_c_string (unsigned char *str, size_t len)
+{
+ int i = 0;
+
+ if ( (len >= 2) && (str[i++] == '?') )
+ {
+ unsigned char c = str[i++];
+ int counter;
+ CHISE_Char_ID cid;
+
+ if (c == '\\')
+ {
+ if (len < 3)
+ return -1;
+ c = str[i++];
+ if (c == '^')
+ {
+ if (len < 4)
+ return -1;
+ c = str[i++];
+ if (c == '?')
+ return 0x7F;
+ else
+ return c & (0x80 | 0x1F);
+ }
+ }
+ if ( c < 0xC0 )
+ {
+ cid = c;
+ counter = 0;
+ }
+ else if ( c < 0xE0 )
+ {
+ cid = c & 0x1f;
+ counter = 1;
+ }
+ else if ( c < 0xF0 )
+ {
+ cid = c & 0x0f;
+ counter = 2;
+ }
+ else if ( c < 0xF8 )
+ {
+ cid = c & 0x07;
+ counter = 3;
+ }
+ else if ( c < 0xFC )
+ {
+ cid = c & 0x03;
+ counter = 4;
+ }
+ else
+ {
+ cid = c & 0x01;
+ counter = 5;
+ }
+
+ if (counter + 2 <= len)
+ {
+ int j;
+
+ for (j = 0; j < counter; j++)
+ cid = (cid << 6) | (str[j + i] & 0x3F);
+ return cid;
+ }
+ }
+ return -1;
+}
+
+int
+chise_format_char_id (CHISE_Char_ID cid, unsigned char *dest, size_t len)
+{
+ int i = 0;
+
+ dest[i++] = '?';
+ if (cid == '\t')
+ {
+ dest[i++] = '\\';
+ dest[i++] = 't';
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid == '\n')
+ {
+ dest[i++] = '\\';
+ dest[i++] = 'n';
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid == '\r')
+ {
+ dest[i++] = '\\';
+ dest[i++] = 'r';
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid == 0x1C)
+ {
+ dest[i++] = '\\';
+ dest[i++] = '^';
+ dest[i++] = '\\';
+ dest[i++] = '\\';
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0x1F)
+ {
+ dest[i++] = '\\';
+ dest[i++] = '^';
+ dest[i++] = '@' + cid;
+ dest[i] = '\0';
+ return i;
+ }
+ else if ( (cid == ' ') || (cid == '"') ||
+ (cid == '#') || (cid == '\'') ||
+ (cid == '(') || (cid == ')') ||
+ (cid == ',') || (cid == '.') ||
+ (cid == ';') || (cid == '?') ||
+ (cid == '[') || (cid == '\\') ||
+ (cid == ']') || (cid == '`') )
+ {
+ dest[i++] = '\\';
+ dest[i++] = cid;
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0x7E)
+ {
+ dest[i++] = cid;
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid == 0x7F)
+ {
+ dest[i++] = '\\';
+ dest[i++] = '^';
+ dest[i++] = '?';
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0x9F)
+ {
+ dest[i++] = '\\';
+ dest[i++] = '^';
+ dest[i++] = ((cid + '@') >> 6) | 0xC0;
+ dest[i++] = ((cid + '@') & 0x3F) | 0x80;
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0x7FF)
+ {
+ dest[i++] = (cid >> 6) | 0xC0;
+ dest[i++] = (cid & 0x3F) | 0x80;
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0xFFFF)
+ {
+ dest[i++] = (cid >> 12) | 0xE0;
+ dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
+ dest[i++]= (cid & 0x3F) | 0x80;
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0x1FFFFF)
+ {
+ dest[i++]= (cid >> 18) | 0xF0;
+ dest[i++]= ((cid >> 12) & 0x3F) | 0x80;
+ dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
+ dest[i++]= (cid & 0x3F) | 0x80;
+ dest[i] = '\0';
+ return i;
+ }
+ else if (cid <= 0x3FFFFFF)
+ {
+ dest[i++]= (cid >> 24) | 0xF8;
+ dest[i++]= ((cid >> 18) & 0x3F) | 0x80;
+ dest[i++]= ((cid >> 12) & 0x3F) | 0x80;
+ dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
+ dest[i++]= (cid & 0x3F) | 0x80;
+ dest[i] = '\0';
+ return i;
+ }
+ else
+ {
+ dest[i++]= (cid >> 30) | 0xFC;
+ dest[i++]= ((cid >> 24) & 0x3F) | 0x80;
+ dest[i++]= ((cid >> 18) & 0x3F) | 0x80;
+ dest[i++]= ((cid >> 12) & 0x3F) | 0x80;
+ dest[i++]= ((cid >> 6) & 0x3F) | 0x80;
+ dest[i++]= (cid & 0x3F) | 0x80;
+ dest[i] = '\0';
+ return i;
+ }
+}