CHNOSProject/chn/chnlib02.c

   1 //\r
   2 //  chnlib02.c\r
   3 //  AI003\r
   4 //\r
   5 //  Created by 西田　耀 on 13/02/09.\r
   6 //  Copyright (c) 2013年 Hikaru Nishida. All rights reserved.\r
   7 //\r
   8 \r
   9 //複数の種類の関数に依存する関数群\r
  10 \r
  11 //\r
  12 //Include headers\r
  13 //\r
  14 \r
  15 #include <stdio.h>\r
  16 #include "chnlib.h"\r
  17 \r
  18 //\r
  19 //Functions\r
  20 //\r
  21 \r
  22 int CHNLIB_String_Search_UIPArrayStringLocation(const CHNLIB_String *s, int s_start, const CHNLIB_UIPArray *list, int *location)\r
  23 {\r
  24     //文字列&s[s_start]に含まれている中で最も左側にある、Array内のStringタグの文字列のArrayにおける添字と、その文字列が開始する、文字列&s[s_start]中の添字を返す。\r
  25     //locaton!=NULLの時、*locationに、発見された文字列の最初のバイトの&s[s_start]における添字が代入される。\r
  26     //Arrayの文字列がすべて見つからなかった場合、AI_ARRAY_INDEX_NOTFOUNDを返す。そのときの*locatonには0が代入される。\r
  27     int i, i_max, j, j_max;\r
  28     CHNLIB_String *tag;\r
  29     const char *cstr_s;\r
  30     \r
  31     if(s == NULL || list == NULL){\r
  32         if(location != NULL){\r
  33             *location = 0;\r
  34         }\r
  35         return CHNLIB_UIPArray_INDEX_NOTFOUND;\r
  36     }\r
  37     cstr_s = CHNLIB_String_GetReferencePointerOfCString(s);\r
  38     i_max = CHNLIB_CString_GetByteLength(cstr_s);\r
  39     \r
  40     j_max = CHNLIB_UIPArray_GetNumberOfDatas(list);\r
  41     for(i = s_start; i < i_max; i++){\r
  42         for(j = 0; j < j_max; j++){\r
  43             tag = (CHNLIB_String *)CHNLIB_UIPArray_GetPointerByIndex(list, j);\r
  44             if(CHNLIB_StructureHeader_GetTypeID(tag) == CHNLIB_STRUCT_ID_String){\r
  45                 if(CHNLIB_CString_CompareString(&cstr_s[i], CHNLIB_String_GetReferencePointerOfCString(tag))){\r
  46                     if(location != NULL){\r
  47                         *location = i - s_start;\r
  48                     }\r
  49                     return j;\r
  50                 }\r
  51             }\r
  52         }\r
  53     }\r
  54     \r
  55     if(location != NULL){\r
  56         *location = 0;\r
  57     }\r
  58     return CHNLIB_UIPArray_INDEX_NOTFOUND;\r
  59 }\r
  60 \r
  61 int CHNLIB_UIPArray_GetSeparatedStringByUIPArray(CHNLIB_UIPArray **separated, const CHNLIB_UIPArray *list, const CHNLIB_String *s)\r
  62 {\r
  63     //listにある文字列でsを分割し、その結果をseparatedに追加する。\r
  64     //listに存在する文字列は新しくメモリを確保せず、リスト中のStringタグへのポインタをseparatedに記録する。\r
  65     //従ってseparatedを解放する際は、listのdata32をすべてTrueにした上で、CHNLIB_UIPArray_FreeSelectedAllを利用するべきである。\r
  66     //listにない文字列はdata32==False(0)\r
  67     //listにある文字列はdata32==tag->data32\r
  68     int index, end, end_end, location;\r
  69     \r
  70     if(s == NULL){\r
  71         return 1;\r
  72     }\r
  73    \r
  74     end = 0;\r
  75     end_end = CHNLIB_String_GetLength(s);\r
  76     for(;;){\r
  77         index = CHNLIB_String_Search_UIPArrayStringLocation(s, end, list, &location);\r
  78         if(index == CHNLIB_UIPArray_INDEX_NOTFOUND){\r
  79             //もうリストの文字列はない\r
  80             if(end != end_end){\r
  81                 //でもまだ文字列は残っている\r
  82                 CHNLIB_UIPArray_AppendLast(separated, False, CHNLIB_String_ExtractByLength(s, end, CHNLIB_MAX_STRING_LENGTH));\r
  83             }\r
  84             break;\r
  85         }\r
  86         //リストの文字列が見つかった\r
  87         if(location != 0){\r
  88             //リストの文字列の前に、リストにない文字列がある\r
  89             CHNLIB_UIPArray_AppendLast(separated, False, CHNLIB_String_ExtractByLength(s, end, location));\r
  90             end += location;\r
  91         }\r
  92         CHNLIB_UIPArray_AppendLast(separated, CHNLIB_UIPArray_GetData32ByIndex(list, index), CHNLIB_UIPArray_GetPointerByIndex(list, index));\r
  93         end += CHNLIB_String_GetLength(CHNLIB_UIPArray_GetPointerByIndex(list, index));\r
  94     }\r
  95     return 0;\r
  96 }\r
  97 \r
  98 int CHNLIB_UIPArray_GetSeparatedUTF8Character(CHNLIB_UIPArray **separated, const CHNLIB_String *s)\r
  99 {\r
 100     //[UTF-8]\r
 101     //文字列sを、UTF-8の一文字ごとに分割し、その文字のUnicodeをdata32、その一文字に該当するStringをpointerに格納し、separatedに追加する形で返す。\r
 102     //不完全なUTF-8文字列は無視される。\r
 103     const char *p, *q, *p_base;\r
 104     uint u;\r
 105     \r
 106     if(separated == NULL || CHNLIB_StructureHeader_GetTypeID(s) != CHNLIB_STRUCT_ID_String){\r
 107         return 1;\r
 108     }\r
 109     \r
 110     p_base = CHNLIB_String_GetReferencePointerOfCString(s);;\r
 111     p = p_base;\r
 112     \r
 113     for(;;){\r
 114         u = CHNLIB_UTF8_GetNextUnicodeOfCharacter(p, &q);\r
 115         if(u == 0){\r
 116             //終端文字\r
 117             break;\r
 118         }\r
 119         CHNLIB_UIPArray_AppendLast(separated, u, CHNLIB_String_ExtractByLength(s, (int)(p - p_base), (int)(q - p)));\r
 120         p = q;\r
 121     }\r
 122     \r
 123     return 0;\r
 124 }\r
 125 \r
 126 CHNLIB_String *CHNLIB_ReadLine(FILE *fp)\r
 127 {\r
 128     //改行文字を削除して、読み込んだ文字列一行を返す。\r
 129     char s[CHNLIB_MAX_STRING_LENGTH];\r
 130     \r
 131     if(fgets(s, sizeof(s), fp) == NULL){\r
 132         return NULL;\r
 133     }\r
 134     \r
 135     CHNLIB_CString_DeleteLastCRLF(s);\r
 136     \r
 137     return CHNLIB_String_Initialize(s);\r
 138 }\r
 139 \r
 140 \r