2 * /src/NTP/ntp4-dev/libparse/clk_wharton.c,v 4.2 2004/11/14 15:29:41 kardel RELEASE_20050508_A
4 * clk_wharton.c,v 4.2 2004/11/14 15:29:41 kardel RELEASE_20050508_A
6 * From Philippe De Muyter <phdm@macqel.be>, 1999
12 #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_WHARTON_400A)
14 * Support for WHARTON 400A Series clock + 404.2 serial interface.
16 * Copyright (C) 1999, 2000 by Philippe De Muyter <phdm@macqel.be>
18 * This program is distributed in the hope that it will be useful, but WITHOUT
19 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
20 * FITNESS FOR A PARTICULAR PURPOSE.
29 #include "ntp_stdlib.h"
32 #include "sys/parsestreams.h"
33 extern void printf (const char *, ...);
37 * In private e-mail alastair@wharton.co.uk said :
38 * "If you are going to use the 400A and 404.2 system [for ntp] I recommend
39 * that you set the 400A to output the message every second. The start of
40 * transmission of the first byte of the message is synchronised to the
42 * The WHARTON 400A Series is able to send date/time serial messages
43 * in 7 output formats. We use format 1 here because it is the shortest.
44 * For use with this driver, the WHARTON 400A Series clock must be set-up
46 * Programmable Selected
48 * BST or CET display 3 9 or 11
49 * No external controller 7 0
50 * Serial Output Format 1 9 1
51 * Baud rate 9600 bps 10 96
52 * Bit length 8 bits 11 8
55 * WHARTON 400A Series output format 1 is as follows :
57 * Timestamp STXssmmhhDDMMYYSETX
58 * Pos 0 12345678901234
61 * STX start transmission (ASCII 0x02)
62 * ETX end transmission (ASCII 0x03)
63 * ss Second expressed in reversed decimal (units then tens)
64 * mm Minute expressed in reversed decimal
65 * hh Hour expressed in reversed decimal
66 * DD Day of month expressed in reversed decimal
67 * MM Month expressed in reversed decimal (January is 1)
68 * YY Year (without century) expressed in reversed decimal
69 * S Status byte : 0x30 +
70 * bit 0 0 = MSF source 1 = DCF source
71 * bit 1 0 = Winter time 1 = Summer time
72 * bit 2 0 = not synchronised 1 = synchronised
73 * bit 3 0 = no early warning 1 = early warning
77 static parse_cvt_fnc_t cvt_wharton_400a;
78 static parse_inp_fnc_t inp_wharton_400a;
81 * parse_cvt_fnc_t cvt_wharton_400a
83 * convert simple type format
87 unsigned char *buffer,
89 struct format *format,
90 clocktime_t *clock_time,
96 /* The given `size' includes a terminating null-character. */
97 if (size != 15 || buffer[0] != STX || buffer[14] != ETX
98 || buffer[13] < '0' || buffer[13] > ('0' + 0xf))
100 for (i = 1; i < 13; i += 1)
101 if (buffer[i] < '0' || buffer[i] > '9')
103 clock_time->second = (buffer[2] - '0') * 10 + buffer[1] - '0';
104 clock_time->minute = (buffer[4] - '0') * 10 + buffer[3] - '0';
105 clock_time->hour = (buffer[6] - '0') * 10 + buffer[5] - '0';
106 clock_time->day = (buffer[8] - '0') * 10 + buffer[7] - '0';
107 clock_time->month = (buffer[10] - '0') * 10 + buffer[9] - '0';
108 clock_time->year = (buffer[12] - '0') * 10 + buffer[11] - '0';
109 clock_time->usecond = 0;
110 if (buffer[13] & 0x1) /* We have CET time */
111 clock_time->utcoffset = -1*60*60;
112 else /* We have BST time */
113 clock_time->utcoffset = 0;
114 if (buffer[13] & 0x2) {
115 clock_time->flags |= PARSEB_DST;
116 clock_time->utcoffset += -1*60*60;
118 if (!(buffer[13] & 0x4))
119 clock_time->flags |= PARSEB_NOSYNC;
120 if (buffer[13] & 0x8)
121 clock_time->flags |= PARSEB_ANNOUNCE;
127 * parse_inp_fnc_t inp_wharton_400a
129 * grab data from input stream
140 parseprintf(DD_PARSE, ("inp_wharton_400a(0x%p, 0x%x, ...)\n", (void*)parseio, ch));
145 parseprintf(DD_PARSE, ("inp_wharton_400a: STX seen\n"));
147 parseio->parse_index = 1;
148 parseio->parse_data[0] = ch;
149 parseio->parse_dtime.parse_stime = *tstamp; /* collect timestamp */
150 return PARSE_INP_SKIP;
153 parseprintf(DD_PARSE, ("inp_wharton_400a: ETX seen\n"));
154 if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP)
155 return parse_end(parseio);
160 return parse_addchar(parseio, ch);
164 clockformat_t clock_wharton_400a =
166 inp_wharton_400a, /* input handling function */
167 cvt_wharton_400a, /* conversion function */
168 0, /* no PPS monitoring */
169 0, /* conversion configuration */
170 "WHARTON 400A Series clock Output Format 1", /* String format name */
171 15, /* string buffer */
172 0 /* no private data (complete packets) */
175 #else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_WHARTON_400A) */
176 int clk_wharton_400a_bs;
177 #endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_WHARTON_400A) */
181 * Revision 4.1 1999/02/28 15:27:24 kardel
182 * wharton clock integration