开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数据库系统 > MySQL数据库 > 查看源码
ctype-sjis.c
资源名称：mysql-3.23.35.tar.gz　[点击查看]
上传用户：tsgydb
上传日期：2007-04-14
资源大小：10674k
文件大小：12k
源码类别：

MySQL数据库

开发平台：

Visual C++

ctype-sjis.c：源码内容
  1. /* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
  2.    
  3.    This library is free software; you can redistribute it and/or
  4.    modify it under the terms of the GNU Library General Public
  5.    License as published by the Free Software Foundation; either
  6.    version 2 of the License, or (at your option) any later version.
  7.    
  8.    This library is distributed in the hope that it will be useful,
  9.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11.    Library General Public License for more details.
  12.    
  13.    You should have received a copy of the GNU Library General Public
  14.    License along with this library; if not, write to the Free
  15.    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  16.    MA 02111-1307, USA */
  18. /* This file is for Shift JIS charset, and created by tommy@valley.ne.jp.
  19.  */
  21. #include <global.h>
  22. #include "m_string.h"
  23. #include "m_ctype.h"
  25. /*
  26.  * This comment is parsed by configure to create ctype.c,
  27.  * so don't change it unless you know what you are doing.
  28.  *
  29.  * .configure. strxfrm_multiply_sjis=1
  30.  * .configure. mbmaxlen_sjis=2
  31.  */
  33. uchar NEAR ctype_sjis[257] =
  34. {
  35.     0, /* For standard library */
  36.     0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040, /* NUL ^A - ^G */
  37.     0040, 0050, 0050, 0050, 0050, 0050, 0040, 0040, /* ^H - ^O */
  38.     0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040, /* ^P - ^W */
  39.     0040, 0040, 0040, 0040, 0040, 0040, 0040, 0040, /* ^X - ^Z ^[ ^ ^] ^^ ^_ */
  40.     0110, 0020, 0020, 0020, 0020, 0020, 0020, 0020, /* SPC ! " # $ % ^ ' */
  41.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020, /* ( ) * + , - . / */
  42.     0204, 0204, 0204, 0204, 0204, 0204, 0204, 0204, /* 0 1 2 3 4 5 6 7 */
  43.     0204, 0204, 0020, 0020, 0020, 0020, 0020, 0020, /* 8 9 : ; < = > ? */
  44.     0020, 0201, 0201, 0201, 0201, 0201, 0201, 0001, /* @ A B C D E F G */
  45.     0001, 0001, 0001, 0001, 0001, 0001, 0001, 0001, /* H I J K L M N O */
  46.     0001, 0001, 0001, 0001, 0001, 0001, 0001, 0001, /* P Q R S T U V W */
  47.     0001, 0001, 0001, 0020, 0020, 0020, 0020, 0020, /* X Y Z [  ] ^ _ */
  48.     0020, 0202, 0202, 0202, 0202, 0202, 0202, 0002, /* ` a b c d e f g */
  49.     0002, 0002, 0002, 0002, 0002, 0002, 0002, 0002, /* h i j k l m n o */
  50.     0002, 0002, 0002, 0002, 0002, 0002, 0002, 0002, /* p q r s t u v w */
  51.     0002, 0002, 0002, 0020, 0020, 0020, 0020, 0040, /* x y z { | } + DEL */
  52.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  53.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  54.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  55.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  56.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  57.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  58.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  59.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  60.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  61.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  62.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  63.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  64.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  65.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  66.     0020, 0020, 0020, 0020, 0020, 0020, 0020, 0020,
  67.     0020, 0020, 0020, 0020, 0020, 0000, 0000, 0000
  68. };
  70. uchar NEAR to_lower_sjis[]=
  71. {
  72.   '00','01','02','03','04','05','06','07',
  73.   '10','11','12','13','14','15','16','17',
  74.   '20','21','22','23','24','25','26','27',
  75.   '30','31','32','33','34','35','36','37',
  76.   ' ',  '!', '"',   '#',   '$',   '%',   '&',   ''',
  77.   '(',  ')', '*',   '+',   ',',   '-',   '.',   '/',
  78.   '0',  '1', '2',   '3',   '4',   '5',   '6',   '7',
  79.   '8',  '9', ':',   ';',   '<',   '=',   '>',   '?',
  80.   '@',  'a', 'b',   'c',   'd',   'e',   'f',   'g',
  81.   'h',  'i', 'j',   'k',   'l',   'm',   'n',   'o',
  82.   'p',  'q', 'r',   's',   't',   'u',   'v',   'w',
  83.   'x',  'y', 'z',   '[',   '\',  ']',   '^',   '_',
  84.   '`',  'a', 'b',   'c',   'd',   'e',   'f',   'g',
  85.   'h',  'i', 'j',   'k',   'l',   'm',   'n',   'o',
  86.   'p',  'q', 'r',   's',   't',   'u',   'v',   'w',
  87.   'x',  'y', 'z',   '{',   '|',   '}',   '~',   '177',
  88.   '200','201','202','203','204','205','206','207',
  89.   '210','211','212','213','214','215','216','217',
  90.   '220','221','222','223','224','225','226','227',
  91.   '230','231','232','233','234','235','236','237',
  92.   '240','241','242','243','244','245','246','247',
  93.   '250','251','252','253','254','255','256','257',
  94.   '260','261','262','263','264','265','266','267',
  95.   '270','271','272','273','274','275','276','277',
  96.   '300','301','302','303','304','305','306','307',
  97.   '310','311','312','313','314','315','316','317',
  98.   '320','321','322','323','324','325','326','327',
  99.   '330','331','332','333','334','335','336','337',
  100.   '340','341','342','343','344','345','346','347',
  101.   '350','351','352','353','354','355','356','357',
  102.   '360','361','362','363','364','365','366','367',
  103.   '370','371','372','373','374','375','376','377'
  104. };
  106. uchar NEAR to_upper_sjis[]=
  107. {
  108.   '00','01','02','03','04','05','06','07',
  109.   '10','11','12','13','14','15','16','17',
  110.   '20','21','22','23','24','25','26','27',
  111.   '30','31','32','33','34','35','36','37',
  112.   ' ',  '!', '"',   '#',   '$',   '%',   '&',   ''',
  113.   '(',  ')', '*',   '+',   ',',   '-',   '.',   '/',
  114.   '0',  '1', '2',   '3',   '4',   '5',   '6',   '7',
  115.   '8',  '9', ':',   ';',   '<',   '=',   '>',   '?',
  116.   '@',  'A', 'B',   'C',   'D',   'E',   'F',   'G',
  117.   'H',  'I', 'J',   'K',   'L',   'M',   'N',   'O',
  118.   'P',  'Q', 'R',   'S',   'T',   'U',   'V',   'W',
  119.   'X',  'Y', 'Z',   '[',   '\',  ']',   '^',   '_',
  120.   '`',  'A', 'B',   'C',   'D',   'E',   'F',   'G',
  121.   'H',  'I', 'J',   'K',   'L',   'M',   'N',   'O',
  122.   'P',  'Q', 'R',   'S',   'T',   'U',   'V',   'W',
  123.   'X',  'Y', 'Z',   '{',   '|',   '}',   '~',   '177',
  124.   '200','201','202','203','204','205','206','207',
  125.   '210','211','212','213','214','215','216','217',
  126.   '220','221','222','223','224','225','226','227',
  127.   '230','231','232','233','234','235','236','237',
  128.   '240','241','242','243','244','245','246','247',
  129.   '250','251','252','253','254','255','256','257',
  130.   '260','261','262','263','264','265','266','267',
  131.   '270','271','272','273','274','275','276','277',
  132.   '300','301','302','303','304','305','306','307',
  133.   '310','311','312','313','314','315','316','317',
  134.   '320','321','322','323','324','325','326','327',
  135.   '330','331','332','333','334','335','336','337',
  136.   '340','341','342','343','344','345','346','347',
  137.   '350','351','352','353','354','355','356','357',
  138.   '360','361','362','363','364','365','366','367',
  139.   '370','371','372','373','374','375','376','377'
  140. };
  142. uchar NEAR sort_order_sjis[]=
  143. {
  144.   '00','01','02','03','04','05','06','07',
  145.   '10','11','12','13','14','15','16','17',
  146.   '20','21','22','23','24','25','26','27',
  147.   '30','31','32','33','34','35','36','37',
  148.   ' ',  '!', '"',   '#',   '$',   '%',   '&',   ''',
  149.   '(',  ')', '*',   '+',   ',',   '-',   '.',   '/',
  150.   '0',  '1', '2',   '3',   '4',   '5',   '6',   '7',
  151.   '8',  '9', ':',   ';',   '<',   '=',   '>',   '?',
  152.   '@',  'A', 'B',   'C',   'D',   'E',   'F',   'G',
  153.   'H',  'I', 'J',   'K',   'L',   'M',   'N',   'O',
  154.   'P',  'Q', 'R',   'S',   'T',   'U',   'V',   'W',
  155.   'X',  'Y', 'Z',   '[',   '\',  ']',   '^',   '_',
  156.   '`',  'A', 'B',   'C',   'D',   'E',   'F',   'G',
  157.   'H',  'I', 'J',   'K',   'L',   'M',   'N',   'O',
  158.   'P',  'Q', 'R',   'S',   'T',   'U',   'V',   'W',
  159.   'X',  'Y', 'Z',   '{',   '|',   '}',   '~',   '177',
  160.   '200','201','202','203','204','205','206','207',
  161.   '210','211','212','213','214','215','216','217',
  162.   '220','221','222','223','224','225','226','227',
  163.   '230','231','232','233','234','235','236','237',
  164.   '240','241','242','243','244','245','246','247',
  165.   '250','251','252','253','254','255','256','257',
  166.   '260','261','262','263','264','265','266','267',
  167.   '270','271','272','273','274','275','276','277',
  168.   '300','301','302','303','304','305','306','307',
  169.   '310','311','312','313','314','315','316','317',
  170.   '320','321','322','323','324','325','326','327',
  171.   '330','331','332','333','334','335','336','337',
  172.   '340','341','342','343','344','345','346','347',
  173.   '350','351','352','353','354','355','356','357',
  174.   '360','361','362','363','364','365','366','367',
  175.   '370','371','372','373','374','375','376','377'
  176. };
  178. #define issjishead(c) ((0x81<=(c) && (c)<=0x9f) || 
  179.                        ((0xe0<=(c)) && (c)<=0xfc))
  180. #define issjistail(c) ((0x40<=(c) && (c)<=0x7e) || 
  181.                        (0x80<=(c) && (c)<=0xfc))
  184. int ismbchar_sjis(const char* p, const char *e)
  185. {
  186.   return (issjishead((uchar) *p) && (e-p)>1 && issjistail((uchar)p[1]) ? 2: 0);
  187. }
  189. my_bool ismbhead_sjis(uint c)
  190. {
  191.   return issjishead((uchar) c);
  192. }
  194. int mbcharlen_sjis(uint c)
  195. {
  196.   return (issjishead((uchar) c) ? 2: 0);
  197. }
  200. #define sjiscode(c,d) ((((uint) (uchar)(c)) << 8) | (uint) (uchar) (d))
  202. int my_strnncoll_sjis(const uchar *s1, int len1, const uchar *s2, int len2)
  203. {
  204.   const uchar *e1 = s1 + len1;
  205.   const uchar *e2 = s2 + len2;
  206.   while (s1 < e1 && s2 < e2) {
  207.     if (ismbchar_sjis((char*) s1, (char*) e1) &&
  208. ismbchar_sjis((char*) s2, (char*) e2)) {
  209.       uint c1 = sjiscode(*s1, *(s1+1));
  210.       uint c2 = sjiscode(*s2, *(s2+1));
  211.       if (c1 != c2)
  212. return c1 - c2;
  213.       s1 += 2;
  214.       s2 += 2;
  215.     } else {
  216.       if (sort_order_sjis[(uchar)*s1] != sort_order_sjis[(uchar)*s2])
  217. return sort_order_sjis[(uchar)*s1] - sort_order_sjis[(uchar)*s2];
  218.       s1++;
  219.       s2++;
  220.     }
  221.   }
  222.   return len1 - len2;
  223. }
  225. int my_strcoll_sjis(const uchar *s1, const uchar *s2)
  226. {
  227.   return (uint) my_strnncoll_sjis(s1,(uint) strlen((char*) s1),
  228.   s2,(uint) strlen((char*) s2));
  229. }
  231. int my_strnxfrm_sjis(uchar *dest, uchar *src, int len, int srclen)
  232. {
  233.   uchar *d_end = dest + len;
  234.   uchar *s_end = src + srclen;
  235.   while (dest < d_end && src < s_end) {
  236.     if (ismbchar_sjis((char*) src, (char*) s_end)) {
  237.       *dest++ = *src++;
  238.       if (dest < d_end && src < s_end)
  239. *dest++ = *src++;
  240.     } else {
  241.       *dest++ = sort_order_sjis[(uchar)*src++];
  242.     }
  243.   }
  244.   return srclen;
  245. }
  247. int my_strxfrm_sjis(uchar *dest, uchar *src, int len)
  248. {
  249.   return my_strnxfrm_sjis(dest, src, len, (uint) strlen((char*) src));
  250. }
  253. /*
  254. ** Calculate min_str and max_str that ranges a LIKE string.
  255. ** Arguments:
  256. ** ptr Pointer to LIKE string.
  257. ** ptr_length Length of LIKE string.
  258. ** escape Escape character in LIKE.  (Normally '').
  259. ** All escape characters should be removed from min_str and max_str
  260. ** res_length Length of min_str and max_str.
  261. ** min_str Smallest case sensitive string that ranges LIKE.
  262. ** Should be space padded to res_length.
  263. ** max_str Largest case sensitive string that ranges LIKE.
  264. ** Normally padded with the biggest character sort value.
  265. **
  266. ** The function should return 0 if ok and 1 if the LIKE string can't be
  267. ** optimized !
  268. */
  270. #define max_sort_char ((char) 255)
  271. #define wild_one '_'
  272. #define wild_many '%'
  274. my_bool my_like_range_sjis(const char *ptr,uint ptr_length,pchar escape,
  275.                       uint res_length, char *min_str,char *max_str,
  276.                       uint *min_length,uint *max_length)
  277. {
  278.   const char *end=ptr+ptr_length;
  279.   char *min_org=min_str;
  280.   char *min_end=min_str+res_length;
  282.   while (ptr < end && min_str < min_end) {
  283.     if (ismbchar_sjis(ptr, end)) {
  284.       *min_str++ = *max_str++ = *ptr++;
  285.       if (min_str < min_end)
  286. *min_str++ = *max_str++ = *ptr++;
  287.       continue;
  288.     }
  289.     if (*ptr == escape && ptr+1 < end) {
  290.       ptr++; /* Skip escape */
  291.       if (ismbchar_sjis(ptr, end))
  292. *min_str++ = *max_str++ = *ptr++;
  293.       if (min_str < min_end)
  294. *min_str++ = *max_str++ = *ptr++;
  295.       continue;
  296.     }
  297.     if (*ptr == wild_one) { /* '_' in SQL */
  298.       *min_str++ = ''; /* This should be min char */
  299.       *max_str++ = max_sort_char;
  300.       ptr++;
  301.       continue;
  302.     }
  303.     if (*ptr == wild_many) { /* '%' in SQL */
  304.       *min_length = (uint)(min_str - min_org);
  305.       *max_length = res_length;
  306.       do {
  307. *min_str++ = ' '; /* Because if key compression */
  308. *max_str++ = max_sort_char;
  309.       } while (min_str < min_end);
  310.       return 0;
  311.     }
  312.     *min_str++ = *max_str++ = *ptr++;
  313.   }
  314.   *min_length = *max_length = (uint)(min_str - min_org);
  315.   while (min_str < min_end)
  316.     *min_str++ = *max_str++ = ' '; /* Because if key compression */
  317.   return 0;
  318. }