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