00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032 #include "error_management.h"
00033 #include "script.h"
00034
00035 _fct_is_separator script_is_separator = NULL;
00036
00037 int templates_is_space(char c)
00038 {
00039 int result;
00040
00041 switch(c)
00042 {
00043
00044 case ' ':
00045 case '\t':
00046 case '\n':
00047 case '\r':
00048
00049 result = 1;
00050 break;
00051
00052 default:
00053
00054 if (script_is_separator)
00055 result = script_is_separator(c);
00056
00057 else
00058 result = 0;
00059 }
00060
00061 return result;
00062 }
00063
00064 void script_set_is_separator_fct(_fct_is_separator is_separator)
00065 {
00066
00067 script_is_separator = is_separator;
00068 }
00069
00070 char *templates_skip_spaces(char *_str)
00071 {
00072 char *_pstr;
00073
00074 ASSERT(_str);
00075
00076 _pstr = _str;
00077
00078 while(templates_is_space(*_pstr))
00079 _pstr++;
00080
00081 return _pstr;
00082 }
00083
00084 char *templates_get_arg(char *_args, int num)
00085 {
00086 char *_new_args;
00087 int i;
00088
00089 ASSERT(_args);
00090
00091 _new_args = _args;
00092
00093 _new_args = templates_skip_spaces(_new_args);
00094
00095
00096 for(i=0; i<num; i++)
00097 {
00098
00099 while(!templates_is_space(*_new_args))
00100 _new_args++;
00101
00102 _new_args = templates_skip_spaces(_new_args);
00103 }
00104
00105
00106 return _new_args;
00107 }
00108
00109 char *templates_get_string(char *_src, char *_dst)
00110 {
00111 BOOL hold;
00112
00113 ASSERT(_src);
00114
00115 _src = templates_skip_spaces(_src);
00116
00117 hold = FALSE;
00118
00119 while((!templates_is_space(*_src) || hold) && *_src)
00120 {
00121
00122 switch(*_src)
00123 {
00124
00125 case '\"':
00126
00127 hold = !hold;
00128 break;
00129
00130 default:
00131 *_dst++ = *_src;
00132 }
00133 *_src++;
00134 }
00135 *_dst = '\0';
00136
00137 _src = templates_skip_spaces(_src);
00138
00139 return _src;
00140 }
00141
00142 int script_get_value(char *_str)
00143 {
00144 int value;
00145 char *_pstr;
00146
00147 ASSERT(_str);
00148
00149 _str = templates_skip_spaces(_str);
00150
00151 value = 0;
00152
00153
00154 if (_str[0] == '0' && _str[1] == 'x')
00155 sscanf(&_str[2], "%X", &value);
00156
00157 else if (_pstr = strchr(_str, 'h'))
00158 {
00159 *_pstr = '\0';
00160 sscanf(_str, "%X", &value);
00161 *_pstr = 'h';
00162 }
00163
00164 else
00165 sscanf(_str, "%i", &value);
00166
00167 return value;
00168 }