Current Path : /usr/src/contrib/ntp/libntp/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
Current File : //usr/src/contrib/ntp/libntp/mstolfp.c |
/* * mstolfp - convert an ascii string in milliseconds to an l_fp number */ #include <stdio.h> #include <ctype.h> #include "ntp_fp.h" #include "ntp_stdlib.h" int mstolfp( const char *str, l_fp *lfp ) { register const char *cp; register char *bp; register const char *cpdec; char buf[100]; /* * We understand numbers of the form: * * [spaces][-][digits][.][digits][spaces|\n|\0] * * This is one enormous hack. Since I didn't feel like * rewriting the decoding routine for milliseconds, what * is essentially done here is to make a copy of the string * with the decimal moved over three places so the seconds * decoding routine can be used. */ bp = buf; cp = str; while (isspace((int)*cp)) cp++; if (*cp == '-') { *bp++ = '-'; cp++; } if (*cp != '.' && !isdigit((int)*cp)) return 0; /* * Search forward for the decimal point or the end of the string. */ cpdec = cp; while (isdigit((int)*cpdec)) cpdec++; /* * Found something. If we have more than three digits copy the * excess over, else insert a leading 0. */ if ((cpdec - cp) > 3) { do { *bp++ = (char)*cp++; } while ((cpdec - cp) > 3); } else { *bp++ = '0'; } /* * Stick the decimal in. If we've got less than three digits in * front of the millisecond decimal we insert the appropriate number * of zeros. */ *bp++ = '.'; if ((cpdec - cp) < 3) { register int i = 3 - (cpdec - cp); do { *bp++ = '0'; } while (--i > 0); } /* * Copy the remainder up to the millisecond decimal. If cpdec * is pointing at a decimal point, copy in the trailing number too. */ while (cp < cpdec) *bp++ = (char)*cp++; if (*cp == '.') { cp++; while (isdigit((int)*cp)) *bp++ = (char)*cp++; } *bp = '\0'; /* * Check to make sure the string is properly terminated. If * so, give the buffer to the decoding routine. */ if (*cp != '\0' && !isspace((int)*cp)) return 0; return atolfp(buf, lfp); }