432 |
return retval; |
return retval; |
433 |
} |
} |
434 |
|
|
435 |
|
long boa_atol(const char *s) |
436 |
|
{ |
437 |
|
long int retval; |
438 |
|
char reconv[22]; |
439 |
|
|
440 |
|
if (!isdigit(*s)) |
441 |
|
return -1; |
442 |
|
|
443 |
|
retval = atol( s); |
444 |
|
if (retval < 0) |
445 |
|
return -1; |
446 |
|
|
447 |
|
simple_itoa(retval, reconv); |
448 |
|
if (memcmp(s,reconv,strlen(s)) != 0) { |
449 |
|
return -1; |
450 |
|
} |
451 |
|
return retval; |
452 |
|
} |
453 |
|
|
454 |
/* returns -1 on error */ |
/* returns -1 on error */ |
455 |
int create_temporary_file(short want_unlink, char *storage, int size) |
int create_temporary_file(short want_unlink, char *storage, int size) |
456 |
{ |
{ |