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 "format_data.h"
00033 #include "script.h"
00034 #include "error_management.h"
00035
00036 #define ADD_DATA(data_i) if (cur_arg == n_arg) \
00037 { \
00038 f = (float) data_i; \
00039 value_to_print = f; \
00040 }
00041
00042
00043 char *format_data_after_int(char *_buffer)
00044 {
00045 int stop = 0;
00046
00047
00048 if (*_buffer == '-')
00049 _buffer++;
00050
00051 while(*_buffer && !stop)
00052 {
00053 if (*_buffer < '0' || *_buffer > '9')
00054 stop = 1;
00055 else
00056 _buffer++;
00057 }
00058
00059
00060 return _buffer;
00061 }
00062
00063
00064 char *format_data_after_float(char *_buffer)
00065 {
00066 int stop = 0;
00067
00068
00069 _buffer = format_data_after_int(_buffer);
00070
00071 if (*_buffer == '.')
00072 _buffer++;
00073
00074 if (*_buffer == '-')
00075 return _buffer;
00076
00077 _buffer = format_data_after_int(_buffer);
00078
00079 return _buffer;
00080 }
00081
00082
00083 int format_data_get_data(char *_input, char *_pattern, int n_arg)
00084 {
00085 char _str[256];
00086 char _cur_pattern[256];
00087 char _value[32];
00088 char _str_value[256];
00089 char *_ppattern, *_pcur_pattern, *_pstr;
00090 int stop = 0;
00091 int cur_arg;
00092 int i_buffer = 0;
00093 int i;
00094 float f, value_to_print;
00095 char *_end_of_line;
00096
00097 char _temp[256];
00098 char _buffer_temp[256];
00099
00100
00101 while(*_input)
00102 {
00103
00104 _ppattern = _pattern;
00105
00106 cur_arg = 0;
00107 stop = 0;
00108
00109 _end_of_line = _input;
00110
00111 while(*_end_of_line && *_end_of_line != '\n')
00112 _end_of_line++;
00113
00114
00115 while(*_ppattern && !stop)
00116 {
00117
00118 if (_input > _end_of_line)
00119 {
00120 stop = 1;
00121 break;
00122 }
00123
00124 _input = templates_get_string(_input, _str);
00125
00126 _ppattern = templates_get_string(_ppattern, _cur_pattern);
00127
00128 _pstr = _str;
00129 _pcur_pattern = _cur_pattern;
00130
00131 while(*_pstr && !stop)
00132 {
00133
00134 switch(*_pcur_pattern)
00135 {
00136
00137 case '%':
00138 _pcur_pattern++;
00139 cur_arg++;
00140 switch(*_pcur_pattern)
00141 {
00142
00143 case 'd':
00144 case 'i':
00145
00146 if (!sscanf(_pstr, "%f", &i))
00147 stop = 1;
00148
00149 else
00150 {
00151
00152 _pstr = format_data_after_int(_pstr);
00153
00154 ADD_DATA(i);
00155 }
00156 break;
00157
00158 case 'f':
00159
00160 if (!sscanf(_pstr, "%f", &f))
00161 stop = 1;
00162
00163 else
00164 {
00165
00166 _pstr = format_data_after_float(_pstr);
00167
00168 ADD_DATA(f);
00169 }
00170 break;
00171
00172 case '%':
00173
00174 cur_arg--;
00175 if (*_pstr != '%')
00176 stop = 1;
00177 else
00178 _pstr++;
00179 break;
00180 default:
00181
00182 SET_ERROR("Pattern not supported!");
00183 stop = 1;
00184 break;
00185 }
00186
00187 _pcur_pattern++;
00188 break;
00189
00190 default:
00191
00192 if (*_pstr != *_pcur_pattern)
00193 stop = 1;
00194 else
00195 {
00196 _pstr++;
00197 _pcur_pattern++;
00198 }
00199 }
00200 }
00201 }
00202
00203 if (!stop)
00204 printf("%.10f\r\n", value_to_print);
00205 }
00206
00207 return i_buffer/sizeof(float);
00208 }