File:  [ELWIX - Embedded LightWeight unIX -] / embedaddon / ntp / libparse / clk_rcc8000.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs - revision graph
Tue May 29 12:08:38 2012 UTC (12 years, 1 month ago) by misho
Branches: ntp, MAIN
CVS tags: v4_2_6p5p0, v4_2_6p5, HEAD
ntp 4.2.6p5

    1: /*
    2:  * /src/NTP/ntp4-dev/libparse/clk_rcc8000.c,v 4.9 2004/11/14 15:29:41 kardel RELEASE_20050508_A
    3:  *  
    4:  * clk_rcc8000.c,v 4.9 2004/11/14 15:29:41 kardel RELEASE_20050508_A
    5:  *
    6:  * Radiocode Clocks Ltd RCC 8000 Intelligent Off-Air Master Clock support
    7:  *
    8:  * Created by R.E.Broughton from clk_trimtaip.c
    9:  *
   10:  * This program is distributed in the hope that it will be useful,
   11:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
   12:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
   13:  *
   14:  */
   15: 
   16: #if HAVE_CONFIG_H
   17: # include <config.h>
   18: #endif
   19: 
   20: #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_RCC8000)
   21: 
   22: #include "ntp_fp.h"
   23: #include "ntp_unixtime.h"
   24: #include "ntp_calendar.h"
   25: 
   26: #include "parse.h"
   27: 
   28: #ifndef PARSESTREAM
   29: #include "ntp_stdlib.h"
   30: #include <stdio.h>
   31: #else
   32: #include "sys/parsestreams.h"
   33: extern int printf (const char *, ...);
   34: #endif
   35: 
   36: /* Type II Serial Output format
   37:  *
   38:  *	0000000000111111111122222222223	/ char
   39:  *	0123456789012345678901234567890	\ posn
   40:  *	HH:MM:SS.XYZ DD/MM/YY DDD W Prn   Actual
   41:  *      33 44 55 666 00 11 22       7     Parse
   42:  *        :  :  .      /  /          rn   Check
   43:  *     "15:50:36.534 30/09/94 273 5 A\x0d\x0a"
   44:  *
   45:  * DDD - Day of year number
   46:  *   W - Day of week number (Sunday is 0)
   47:  * P is the Status. See comment below for details.
   48:  */
   49: 
   50: #define	O_USEC		O_WDAY
   51: static struct format rcc8000_fmt =
   52: { { { 13, 2 }, {16, 2}, { 19, 2}, /* Day, Month, Year */ 
   53:     {  0, 2 }, { 3, 2}, {  6, 2}, /* Hour, Minute, Second */ 
   54:     {  9, 3 }, {28, 1}, {  0, 0}, /* uSec, Status (Valid,Reject,BST,Leapyear) */  },
   55:   (const unsigned char *)"  :  :  .      /  /          \r\n", 
   56:   /*"15:50:36.534 30/09/94 273 5 A\x0d\x0a" */
   57:   0 
   58: };
   59: 
   60: static unsigned long cvt_rcc8000 (unsigned char *, int, struct format *, clocktime_t *, void *);
   61: static unsigned long inp_rcc8000 (parse_t *, unsigned int, timestamp_t *);
   62: 
   63: clockformat_t clock_rcc8000 =
   64: {
   65:   inp_rcc8000,			/* no input handling */
   66:   cvt_rcc8000,			/* Radiocode clock conversion */
   67:   0,				/* no direct PPS monitoring */
   68:   (void *)&rcc8000_fmt,		/* conversion configuration */
   69:   "Radiocode RCC8000",
   70:   31,				/* string buffer */
   71:   0				/* no private data */
   72: };
   73: 
   74: static unsigned long
   75: cvt_rcc8000(
   76: 	    unsigned char *buffer,
   77: 	    int            size,
   78: 	    struct format *format,
   79: 	    clocktime_t   *clock_time,
   80: 	    void          *local
   81: 	    )
   82: {
   83: 	if (!Strok(buffer, format->fixed_string)) return CVT_NONE;
   84: #define	OFFS(x) format->field_offsets[(x)].offset
   85: #define STOI(x, y) Stoi(&buffer[OFFS(x)], y, format->field_offsets[(x)].length)
   86: 	if (	STOI(O_DAY,	&clock_time->day)	||
   87: 		STOI(O_MONTH,	&clock_time->month)	||
   88: 		STOI(O_YEAR,	&clock_time->year)	||
   89: 		STOI(O_HOUR,	&clock_time->hour)	||
   90: 		STOI(O_MIN,	&clock_time->minute)	||
   91: 		STOI(O_SEC,	&clock_time->second)	||
   92: 		STOI(O_USEC,	&clock_time->usecond)
   93: 		) return CVT_FAIL|CVT_BADFMT;
   94: 	clock_time->usecond *= 1000;
   95: 
   96: 	clock_time->utcoffset = 0;
   97: 
   98: #define RCCP buffer[28]
   99: 	/*
  100: 	 * buffer[28] is the ASCII representation of a hex character ( 0 through F )
  101: 	 *      The four bits correspond to:
  102: 	 *      8 - Valid Time
  103: 	 *      4 - Reject Code
  104: 	 *      2 - British Summer Time (receiver set to emit GMT all year.)
  105: 	 *      1 - Leap year
  106: 	 */
  107: #define RCC8000_VALID  0x8
  108: #define RCC8000_REJECT 0x4
  109: #define RCC8000_BST    0x2
  110: #define RCC8000_LEAPY  0x1
  111: 
  112: 	clock_time->flags = 0;
  113: 
  114: 	if ( (RCCP >= '0' && RCCP <= '9') || (RCCP >= 'A' && RCCP <= 'F') )
  115: 	{
  116: 		register int flag;
  117: 
  118: 		flag = (RCCP >= '0' && RCCP <= '9' ) ?  RCCP - '0' : RCCP - 'A' + 10;
  119: 
  120: 		if (!(flag & RCC8000_VALID))
  121: 		    clock_time->flags |= PARSEB_POWERUP;
  122: 
  123: 		clock_time->flags |= PARSEB_UTC; /* British special - guess why 8-) */
  124:     
  125: 		/* other flags not used */
  126: 	}
  127: 	return CVT_OK;
  128: }
  129: /*
  130:  * inp_rcc8000
  131:  *
  132:  * grep data from input stream
  133:  */
  134: static u_long
  135: inp_rcc8000(
  136: 	    parse_t      *parseio,
  137: 	    unsigned int  ch,
  138: 	    timestamp_t  *tstamp
  139: 	  )
  140: {
  141: 	unsigned int rtc;
  142: 	
  143: 	parseprintf(DD_PARSE, ("inp_rcc8000(0x%lx, 0x%x, ...)\n", (long)parseio, ch));
  144: 	
  145: 	switch (ch)
  146: 	{
  147: 	case '\n':
  148: 		parseprintf(DD_PARSE, ("inp_rcc8000: EOL seen\n"));
  149: 		if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP)
  150: 			return parse_end(parseio);
  151: 		else
  152: 			return rtc;
  153: 		
  154: 
  155: 	default:
  156: 		if (parseio->parse_index == 0) /* take sample at start of message */
  157: 		{
  158: 			parseio->parse_dtime.parse_stime = *tstamp; /* collect timestamp */
  159: 		}
  160: 		return parse_addchar(parseio, ch);
  161: 	}
  162: }
  163: 
  164: #else  /* not (REFCLOCK && CLOCK_PARSE && CLOCK_RCC8000) */
  165: int clk_rcc8000_bs;
  166: #endif  /* not (REFCLOCK && CLOCK_PARSE && CLOCK_RCC8000) */
  167: 
  168: /*
  169:  * History:
  170:  *
  171:  * clk_rcc8000.c,v
  172:  * Revision 4.9  2004/11/14 15:29:41  kardel
  173:  * support PPSAPI, upgrade Copyright to Berkeley style
  174:  *
  175:  * Revision 4.6  1999/11/28 09:13:51  kardel
  176:  * RECON_4_0_98F
  177:  *
  178:  * Revision 4.5  1998/06/14 21:09:38  kardel
  179:  * Sun acc cleanup
  180:  *
  181:  * Revision 4.4  1998/06/13 12:05:02  kardel
  182:  * fix SYSV clock name clash
  183:  *
  184:  * Revision 4.3  1998/06/12 15:22:29  kardel
  185:  * fix prototypes
  186:  *
  187:  * Revision 4.2  1998/06/12 09:13:25  kardel
  188:  * conditional compile macros fixed
  189:  * printf prototype
  190:  *
  191:  * Revision 4.1  1998/05/24 09:39:53  kardel
  192:  * implementation of the new IO handling model
  193:  *
  194:  * Revision 4.0  1998/04/10 19:45:30  kardel
  195:  * Start 4.0 release version numbering
  196:  *
  197:  * from V3 3.5 log info deleted 1998/04/11 kardel
  198:  */

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>