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>