5 #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_VARITEXT)
7 * /src/NTP/ntp4-dev/libparse/clk_varitext.c,v 1.5 2005/04/16 17:32:10 kardel RELEASE_20050508_A
9 * clk_varitext.c,v 1.5 2005/04/16 17:32:10 kardel RELEASE_20050508_A
11 * Varitext code variant by A.McConnell 1997/01/19
13 * Supports Varitext's Radio Clock
15 * Used the Meinberg/Computime clock as a template for Varitext Radio Clock
18 * Copyright (c) 1995-2005 by Frank Kardel <kardel <AT> ntp.org>
19 * Copyright (c) 1989-1994 by Frank Kardel, Friedrich-Alexander Universitaet Erlangen-Nuernberg, Germany
21 * Redistribution and use in source and binary forms, with or without
22 * modification, are permitted provided that the following conditions
24 * 1. Redistributions of source code must retain the above copyright
25 * notice, this list of conditions and the following disclaimer.
26 * 2. Redistributions in binary form must reproduce the above copyright
27 * notice, this list of conditions and the following disclaimer in the
28 * documentation and/or other materials provided with the distribution.
29 * 3. Neither the name of the author nor the names of its contributors
30 * may be used to endorse or promote products derived from this software
31 * without specific prior written permission.
33 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
34 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
35 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
36 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
37 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
38 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
39 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
40 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
41 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
42 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
48 #include "ntp_unixtime.h"
49 #include "ntp_calendar.h"
54 # include "ntp_stdlib.h"
57 # include "sys/parsestreams.h"
58 extern int printf (const char *, ...);
61 /* static const u_char VT_INITIALISED = 0x01; */
62 /* static const u_char VT_SYNCHRONISED = 0x02; */
63 /* static const u_char VT_ALARM_STATE = 0x04; */
64 static const u_char VT_BST = 0x08;
65 /* static const u_char VT_SEASON_CHANGE = 0x10; */
66 /* static const u_char VT_LAST_TELEGRAM_OK = 0x20; */
69 * The Varitext receiver sends a datagram in the following format every minute
71 * Timestamp T:YY:MM:MD:WD:HH:MM:SSCRLFSTXXX
72 * Pos 0123456789012345678901 2 3 4567
73 * 0000000000111111111122 2 2 2222
74 * Parse T: : : : : : : \r\n
76 * T Startcharacter "T" specifies start of the timestamp
77 * YY Year MM Month 1-12
86 * Bit 0 - Set= Initialised; Reset=Time Invalid (DO NOT USE)
87 * Bit 1 - Set= Synchronised; Reset= Unsynchronised
88 * Bit 2 - Set= Alarm state; Reset= No alarm
89 * Bit 3 - Set= BST; Reset= GMT
90 * Bit 4 - Set= Seasonal change in approx hour; Reset= No seasonal change expected
91 * Bit 5 - Set= Last MSF telegram was OK; Reset= Last telegram was in error;
94 * XXX Checksum calculated using Fletcher's method (ignored for now).
97 static struct format varitext_fmt =
100 {8, 2}, {5, 2}, {2, 2}, /* day, month, year */
101 {14, 2}, {17, 2}, {20, 2}, /* hour, minute, second */
102 {11, 2}, {24, 1} /* dayofweek, status */
104 (const unsigned char*)"T: : : : : : : \r\n ",
108 static parse_cvt_fnc_t cvt_varitext;
109 static parse_inp_fnc_t inp_varitext;
112 unsigned char start_found;
113 unsigned char end_found;
114 unsigned char end_count;
115 unsigned char previous_ch;
119 clockformat_t clock_varitext =
121 inp_varitext, /* Because of the strange format we need to parse it ourselves */
122 cvt_varitext, /* Varitext conversion */
123 0, /* no PPS monitoring */
124 (void *)&varitext_fmt, /* conversion configuration */
125 "Varitext Radio Clock", /* Varitext Radio Clock */
126 30, /* string buffer */
127 sizeof(struct varitext), /* Private data size required to hold current parse state */
131 * parse_cvt_fnc_t cvt_varitext
133 * convert simple type format
137 unsigned char *buffer,
139 struct format *format,
140 clocktime_t *clock_time,
145 if (!Strok(buffer, format->fixed_string)) {
148 if (Stoi(&buffer[format->field_offsets[O_DAY].offset], &clock_time->day,
149 format->field_offsets[O_DAY].length) ||
150 Stoi(&buffer[format->field_offsets[O_MONTH].offset], &clock_time->month,
151 format->field_offsets[O_MONTH].length) ||
152 Stoi(&buffer[format->field_offsets[O_YEAR].offset], &clock_time->year,
153 format->field_offsets[O_YEAR].length) ||
154 Stoi(&buffer[format->field_offsets[O_HOUR].offset], &clock_time->hour,
155 format->field_offsets[O_HOUR].length) ||
156 Stoi(&buffer[format->field_offsets[O_MIN].offset], &clock_time->minute,
157 format->field_offsets[O_MIN].length) ||
158 Stoi(&buffer[format->field_offsets[O_SEC].offset], &clock_time->second,
159 format->field_offsets[O_SEC].length)) {
160 return CVT_FAIL | CVT_BADFMT;
162 u_char *f = (u_char*) &buffer[format->field_offsets[O_FLAGS].offset];
164 clock_time->flags = 0;
165 clock_time->utcoffset = 0;
167 if (((*f) & VT_BST)) /* BST flag is set so set to indicate daylight saving time is active and utc offset */
169 clock_time->utcoffset = -1*60*60;
170 clock_time->flags |= PARSEB_DST;
173 if (!((*f) & VT_INITIALISED)) Clock not initialised
174 clock_time->flags |= PARSEB_POWERUP;
176 if (!((*f) & VT_SYNCHRONISED)) Clock not synchronised
177 clock_time->flags |= PARSEB_NOSYNC;
179 if (((*f) & VT_SEASON_CHANGE)) Seasonal change expected in the next hour
180 clock_time->flags |= PARSEB_ANNOUNCE;
187 /* parse_inp_fnc_t inp_varitext */
195 struct varitext *t = (struct varitext *)parseio->parse_pdata;
198 parseprintf(DD_PARSE, ("inp_varitext(0x%p, 0x%x, ...)\n", (void*)parseio, ch));
201 return PARSE_INP_SKIP; /* local data not allocated - sigh! */
206 if ((t->previous_ch == 'T') && (ch == ':'))
208 parseprintf(DD_PARSE, ("inp_varitext: START seen\n"));
210 parseio->parse_data[0] = 'T';
211 parseio->parse_index=1;
212 parseio->parse_dtime.parse_stime = t->tstamp; /* Time stamp at packet start */
220 if ((rtc = parse_addchar(parseio, ch)) != PARSE_INP_SKIP)
222 parseprintf(DD_PARSE, ("inp_varitext: ABORTED due to too many characters\n"));
224 memset(t, 0, sizeof(struct varitext));
230 if (++(t->end_count) == 4) /* Finally found the end of the message */
232 parseprintf(DD_PARSE, ("inp_varitext: END seen\n"));
234 memset(t, 0, sizeof(struct varitext));
235 if ((rtc = parse_addchar(parseio, 0)) == PARSE_INP_SKIP)
236 return parse_end(parseio);
242 if ((t->previous_ch == '\r') && (ch == '\n'))
251 return PARSE_INP_SKIP;
254 #else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_VARITEXT) */
256 #endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_VARITEXT) */
262 * Revision 1.5 2005/04/16 17:32:10 kardel
265 * Revision 1.4 2004/11/14 15:29:41 kardel
266 * support PPSAPI, upgrade Copyright to Berkeley style
269 * Revision 1.0 1997/06/02 13:16:30 McConnell