21 const int ErrorBufferSize=4096;
\r
26 static char ErrorBuffer[ErrorBufferSize];
\r
28 FILE * LogFile=NULL;
\r
43 // switch file buffering off
\r
46 setbuf(stdout,NULL);
\r
51 void my_random_init() {
\r
57 int my_random_int(int n) {
\r
63 r = int(floor(my_random_double()*double(n)));
\r
69 // my_random_double()
\r
71 double my_random_double() {
\r
75 r = double(rand()) / (double(RAND_MAX) + 1.0);
\r
76 ASSERT(r>=0.0&&r<1.0);
\r
83 sint64 my_atoll(const char string[]) {
\r
87 sscanf(string,S64_FORMAT,&n);
\r
94 int my_round(double x) {
\r
96 return int(floor(x+0.5));
\r
101 void * my_malloc(size_t size) {
\r
107 address = malloc(size);
\r
108 if (address == NULL) my_fatal("my_malloc(): malloc(): %s\n",strerror(errno));
\r
115 void * my_realloc(void * address, size_t size) {
\r
117 ASSERT(address!=NULL);
\r
120 address = realloc(address,size);
\r
121 if (address == NULL) my_fatal("my_realloc(): realloc(): %s\n",strerror(errno));
\r
128 void my_free(void * address) {
\r
130 ASSERT(address!=NULL);
\r
137 void my_log_open(const char file_name[]) {
\r
139 ASSERT(file_name!=NULL);
\r
141 LogFile = fopen(file_name,"a");
\r
143 //line buffering doesn't work too well in MSVC and/or windows
\r
144 if (LogFile != NULL) setvbuf(LogFile,NULL,_IOLBF,0); // line buffering
\r
150 void my_log_close() {
\r
152 if (LogFile != NULL) fclose(LogFile);
\r
158 void my_log(const char format[], ...) {
\r
162 ASSERT(format!=NULL);
\r
164 if (LogFile != NULL) {
\r
165 fprintf(LogFile,"%.3f ",now_real());
\r
166 va_start(ap,format);
\r
168 vfprintf(LogFile,format,ap);
\r
178 void my_fatal(const char format[], ...) {
\r
182 ASSERT(format!=NULL);
\r
184 va_start(ap,format);
\r
186 vfprintf(stderr,format,ap);
\r
187 if (LogFile != NULL) vfprintf(LogFile,format,ap);
\r
190 if (Error) { // recursive error
\r
191 my_log("POLYGLOT *** RECURSIVE ERROR ***\n");
\r
192 exit(EXIT_FAILURE);
\r
200 // my_file_read_line()
\r
202 bool my_file_read_line(FILE * file, char string[], int size) {
\r
207 ASSERT(file!=NULL);
\r
208 ASSERT(string!=NULL);
\r
211 if (fgets(string,size,file) == NULL) {
\r
215 my_fatal("my_file_read_line(): fgets(): %s\n",strerror(errno));
\r
219 // remove CRs and LFs
\r
224 while ((c=string[src++]) != '\0') {
\r
225 if (c != '\r' && c != '\n') string[dst++] = c;
\r
228 string[dst] = '\0';
\r
233 // my_string_empty()
\r
235 bool my_string_empty(const char string[]) {
\r
237 return string == NULL || string[0] == '\0';
\r
240 // my_string_whitespace()
\r
242 bool my_string_whitespace(const char string[]){
\r
244 while(string[pos]!='\0'){
\r
245 if(string[pos]!=' ' && string[pos]!='\t'){
\r
253 // my_string_equal()
\r
255 bool my_string_equal(const char string_1[], const char string_2[]) {
\r
257 ASSERT(string_1!=NULL);
\r
258 ASSERT(string_2!=NULL);
\r
260 return strcmp(string_1,string_2) == 0;
\r
263 // my_string_case_equal()
\r
265 bool my_string_case_equal(const char string_1[], const char string_2[]) {
\r
269 ASSERT(string_1!=NULL);
\r
270 ASSERT(string_2!=NULL);
\r
277 if (tolower(c1) != tolower(c2)) return false;
\r
278 if (c1 == '\0') return true;
\r
286 char * my_strdup(const char string[]) {
\r
290 ASSERT(string!=NULL);
\r
292 // strdup() is not ANSI C
\r
294 address = (char *) my_malloc(strlen(string)+1);
\r
295 strcpy(address,string);
\r
300 // my_string_clear()
\r
302 void my_string_clear(const char * * variable) {
\r
304 ASSERT(variable!=NULL);
\r
306 if (*variable != NULL) {
\r
307 my_free((void*)(*variable));
\r
314 void my_string_set(const char * * variable, const char string[]) {
\r
316 ASSERT(variable!=NULL);
\r
317 ASSERT(string!=NULL);
\r
319 if (*variable != NULL) my_free((void*)(*variable));
\r
320 *variable = my_strdup(string);
\r
323 // my_timer_reset()
\r
325 void my_timer_reset(my_timer_t * timer) {
\r
327 ASSERT(timer!=NULL);
\r
329 timer->start_real = 0.0;
\r
330 timer->elapsed_real = 0.0;
\r
331 timer->running = false;
\r
334 // my_timer_start()
\r
336 void my_timer_start(my_timer_t * timer) {
\r
337 // timer->start_real = 0.0;
\r
338 timer->elapsed_real = 0.0;
\r
339 // timer->running = false;
\r
340 ASSERT(timer!=NULL);
\r
342 timer->running = true;
\r
343 timer->start_real = now_real();
\r
348 void my_timer_stop(my_timer_t * timer) {
\r
350 ASSERT(timer!=NULL);
\r
352 ASSERT(timer->running);
\r
354 timer->elapsed_real += now_real() - timer->start_real;
\r
355 timer->start_real = 0.0;
\r
356 timer->running = false;
\r
359 // my_timer_elapsed_real()
\r
361 double my_timer_elapsed_real(const my_timer_t * timer) {
\r
365 ASSERT(timer!=NULL);
\r
367 elapsed = timer->elapsed_real;
\r
368 if (timer->running) elapsed += now_real() - timer->start_real;
\r
370 if (elapsed < 0.0) elapsed = 0.0;
\r
380 FORMAT_MESSAGE_FROM_SYSTEM,
\r
387 return ErrorBuffer;
\r
389 return strerror(errno);
\r