clk_computime.c revision 82499 
1#ifdef HAVE_CONFIG_H
2# include <config.h>
3#endif
4
5#if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_COMPUTIME)
6/*
7 * /src/NTP/ntp-4/libparse/clk_computime.c,v 4.6 1999/11/28 09:13:49 kardel RELEASE_19991128_A
8 *
9 * clk_computime.c,v 4.6 1999/11/28 09:13:49 kardel RELEASE_19991128_A
10 *
11 * Supports Diem's Computime Radio Clock
12 *
13 * Used the Meinberg clock as a template for Diem's Computime Radio Clock
14 *
15 * adapted by Alois Camenzind <alois.camenzind@ubs.ch>
16 *
17 * Copyright (C) 1992-1998 by Frank Kardel
18 * Friedrich-Alexander Universit�t Erlangen-N�rnberg, Germany
19 *
20 * This program is distributed in the hope that it will be useful, but WITHOUT
21 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
22 * FITNESS FOR A PARTICULAR PURPOSE.
23 *
24 */
25
26#include "ntp_fp.h"
27#include "ntp_unixtime.h"
28#include "ntp_calendar.h"
29#include "ntp_stdlib.h"
30
31#include "parse.h"
32
33#ifndef PARSESTREAM
34#include <stdio.h>
35#else
36#include "sys/parsestreams.h"
37extern void printf P((const char *, ...));
38#endif
39
40/*
41 * The Computime receiver sends a datagram in the following format every minute
42 *
43 * Timestamp	T:YY:MM:MD:WD:HH:MM:SSCRLF
44 * Pos          0123456789012345678901 2 3
45 *              0000000000111111111122 2 2
46 * Parse        T:  :  :  :  :  :  :  rn
47 *
48 * T	Startcharacter "T" specifies start of the timestamp
49 * YY	Year MM	Month 1-12
50 * MD	Day of the month
51 * WD	Day of week
52 * HH	Hour
53 * MM   Minute
54 * SS   Second
55 * CR   Carriage return
56 * LF   Linefeed
57 *
58 */
59
60static struct format computime_fmt =
61{
62	{
63		{8, 2},  {5,  2}, {2,  2},	/* day, month, year */
64		{14, 2}, {17, 2}, {20, 2},	/* hour, minute, second */
65		{11, 2},                        /* dayofweek,  */
66	},
67	(const unsigned char *)"T:  :  :  :  :  :  :  \r\n",
68	0
69};
70
71static u_long cvt_computime P((unsigned char *, int, struct format *, clocktime_t *, void *));
72static unsigned long inp_computime P((parse_t *, unsigned int, timestamp_t *));
73
74clockformat_t   clock_computime =
75{
76	inp_computime,		/* Computime input handling */
77	cvt_computime,		/* Computime conversion */
78	0,			/* no PPS monitoring */
79	(void *)&computime_fmt,	/* conversion configuration */
80	"Diem's Computime Radio Clock",	/* Computime Radio Clock */
81	24,			/* string buffer */
82	0			/* no private data (complete pakets) */
83};
84
85/*
86 * cvt_computime
87 *
88 * convert simple type format
89 */
90static          u_long
91cvt_computime(
92	unsigned char *buffer,
93	int            size,
94	struct format *format,
95	clocktime_t   *clock_time,
96	void          *local
97	)
98{
99
100	if (!Strok(buffer, format->fixed_string)) {
101		return CVT_NONE;
102	} else {
103		if (Stoi(&buffer[format->field_offsets[O_DAY].offset], &clock_time->day,
104			 format->field_offsets[O_DAY].length) ||
105		    Stoi(&buffer[format->field_offsets[O_MONTH].offset], &clock_time->month,
106			 format->field_offsets[O_MONTH].length) ||
107		    Stoi(&buffer[format->field_offsets[O_YEAR].offset], &clock_time->year,
108			 format->field_offsets[O_YEAR].length) ||
109		    Stoi(&buffer[format->field_offsets[O_HOUR].offset], &clock_time->hour,
110			 format->field_offsets[O_HOUR].length) ||
111		    Stoi(&buffer[format->field_offsets[O_MIN].offset], &clock_time->minute,
112			 format->field_offsets[O_MIN].length) ||
113		    Stoi(&buffer[format->field_offsets[O_SEC].offset], &clock_time->second,
114			 format->field_offsets[O_SEC].length)) {
115			return CVT_FAIL | CVT_BADFMT;
116		} else {
117
118			clock_time->flags = 0;
119			clock_time->utcoffset = 0;	/* We have UTC time */
120
121			return CVT_OK;
122		}
123	}
124}
125
126/*
127 * inp_computime
128 *
129 * grep data from input stream
130 */
131static u_long
132inp_computime(
133	      parse_t      *parseio,
134	      unsigned int  ch,
135	      timestamp_t  *tstamp
136	      )
137{
138	unsigned int rtc;
139
140	parseprintf(DD_PARSE, ("inp_computime(0x%lx, 0x%x, ...)\n", (long)parseio, ch));
141
142	switch (ch)
143	{
144	case 'T':
145		parseprintf(DD_PARSE, ("inp_computime: START seen\n"));
146
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;
151
152	case '\n':
153		parseprintf(DD_PARSE, ("inp_computime: END seen\n"));
154		if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP)
155			return parse_end(parseio);
156		else
157			return rtc;
158
159	default:
160		return parse_addchar(parseio, ch);
161	}
162}
163
164#else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_COMPUTIME) */
165int clk_computime_bs;
166#endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_COMPUTIME) */
167
168/*
169 * clk_computime.c,v
170 * Revision 4.6  1999/11/28 09:13:49  kardel
171 * RECON_4_0_98F
172 *
173 * Revision 4.5  1998/06/14 21:09:34  kardel
174 * Sun acc cleanup
175 *
176 * Revision 4.4  1998/06/13 12:00:38  kardel
177 * fix SYSV clock name clash
178 *
179 * Revision 4.3  1998/06/12 15:22:26  kardel
180 * fix prototypes
181 *
182 * Revision 4.2  1998/06/12 09:13:24  kardel
183 * conditional compile macros fixed
184 * printf prototype
185 *
186 * Revision 4.1  1998/05/24 09:39:51  kardel
187 * implementation of the new IO handling model
188 *
189 * Revision 4.0  1998/04/10 19:45:27  kardel
190 * Start 4.0 release version numbering
191 *
192 * from V3 1.8 log info deleted 1998/04/11 kardel
193 */
194