1 /*	$NetBSD: clk_computime.c,v 1.6 2020/05/25 20:47:25 christos Exp $	*/
2 
3 #ifdef HAVE_CONFIG_H
4 # include <config.h>
5 #endif
6 
7 #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_COMPUTIME)
8 /*
9  * /src/NTP/ntp4-dev/libparse/clk_computime.c,v 4.10 2005/04/16 17:32:10 kardel RELEASE_20050508_A
10  *
11  * clk_computime.c,v 4.10 2005/04/16 17:32:10 kardel RELEASE_20050508_A
12  *
13  * Supports Diem's Computime Radio Clock
14  *
15  * Used the Meinberg clock as a template for Diem's Computime Radio Clock
16  *
17  * adapted by Alois Camenzind <alois.camenzind@ubs.ch>
18  *
19  * Copyright (c) 1995-2005 by Frank Kardel <kardel <AT> ntp.org>
20  * Copyright (c) 1989-1994 by Frank Kardel, Friedrich-Alexander Universitaet Erlangen-Nuernberg, Germany
21  *
22  * Redistribution and use in source and binary forms, with or without
23  * modification, are permitted provided that the following conditions
24  * are met:
25  * 1. Redistributions of source code must retain the above copyright
26  *    notice, this list of conditions and the following disclaimer.
27  * 2. Redistributions in binary form must reproduce the above copyright
28  *    notice, this list of conditions and the following disclaimer in the
29  *    documentation and/or other materials provided with the distribution.
30  * 3. Neither the name of the author nor the names of its contributors
31  *    may be used to endorse or promote products derived from this software
32  *    without specific prior written permission.
33  *
34  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
35  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
36  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
37  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
38  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
39  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
40  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
41  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
42  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
43  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
44  * SUCH DAMAGE.
45  *
46  */
47 
48 #include "ntp_fp.h"
49 #include "ntp_unixtime.h"
50 #include "ntp_calendar.h"
51 #include "ntp_stdlib.h"
52 
53 #include "parse.h"
54 
55 #ifndef PARSESTREAM
56 #include <stdio.h>
57 #else
58 #include "sys/parsestreams.h"
59 extern int printf (const char *, ...);
60 #endif
61 
62 /*
63  * The Computime receiver sends a datagram in the following format every minute
64  *
65  * Timestamp	T:YY:MM:MD:WD:HH:MM:SSCRLF
66  * Pos          0123456789012345678901 2 3
67  *              0000000000111111111122 2 2
68  * Parse        T:  :  :  :  :  :  :  rn
69  *
70  * T	Startcharacter "T" specifies start of the timestamp
71  * YY	Year MM	Month 1-12
72  * MD	Day of the month
73  * WD	Day of week
74  * HH	Hour
75  * MM   Minute
76  * SS   Second
77  * CR   Carriage return
78  * LF   Linefeed
79  *
80  */
81 
82 static struct format computime_fmt =
83 {
84 	{
85 		{8, 2},  {5,  2}, {2,  2},	/* day, month, year */
86 		{14, 2}, {17, 2}, {20, 2},	/* hour, minute, second */
87 		{11, 2},                        /* dayofweek,  */
88 	},
89 	(const unsigned char *)"T:  :  :  :  :  :  :  \r\n",
90 	0
91 };
92 
93 static parse_cvt_fnc_t cvt_computime;
94 static parse_inp_fnc_t inp_computime;
95 
96 clockformat_t clock_computime =
97 {
98 	inp_computime,		/* Computime input handling */
99 	cvt_computime,		/* Computime conversion */
100 	0,			/* no PPS monitoring */
101 	(void *)&computime_fmt,	/* conversion configuration */
102 	"Diem's Computime Radio Clock",	/* Computime Radio Clock */
103 	24,			/* string buffer */
104 	0			/* no private data (complete packets) */
105 };
106 
107 /*
108  * parse_cvt_fnc_t cvt_computime
109  *
110  * convert simple type format
111  */
112 static u_long
cvt_computime(unsigned char * buffer,int size,struct format * format,clocktime_t * clock_time,void * local)113 cvt_computime(
114 	unsigned char *buffer,
115 	int            size,
116 	struct format *format,
117 	clocktime_t   *clock_time,
118 	void          *local
119 	)
120 {
121 
122 	if (!Strok(buffer, format->fixed_string)) {
123 		return CVT_NONE;
124 	} else {
125 		if (Stoi(&buffer[format->field_offsets[O_DAY].offset], &clock_time->day,
126 			 format->field_offsets[O_DAY].length) ||
127 		    Stoi(&buffer[format->field_offsets[O_MONTH].offset], &clock_time->month,
128 			 format->field_offsets[O_MONTH].length) ||
129 		    Stoi(&buffer[format->field_offsets[O_YEAR].offset], &clock_time->year,
130 			 format->field_offsets[O_YEAR].length) ||
131 		    Stoi(&buffer[format->field_offsets[O_HOUR].offset], &clock_time->hour,
132 			 format->field_offsets[O_HOUR].length) ||
133 		    Stoi(&buffer[format->field_offsets[O_MIN].offset], &clock_time->minute,
134 			 format->field_offsets[O_MIN].length) ||
135 		    Stoi(&buffer[format->field_offsets[O_SEC].offset], &clock_time->second,
136 			 format->field_offsets[O_SEC].length)) {
137 			return CVT_FAIL | CVT_BADFMT;
138 		} else {
139 
140 			clock_time->flags = 0;
141 			clock_time->utcoffset = 0;	/* We have UTC time */
142 
143 			return CVT_OK;
144 		}
145 	}
146 }
147 
148 /*
149  * parse_inp_fnc_t inp_computime
150  *
151  * grab data from input stream
152  */
153 static u_long
inp_computime(parse_t * parseio,char ch,timestamp_t * tstamp)154 inp_computime(
155 	      parse_t      *parseio,
156 	      char         ch,
157 	      timestamp_t  *tstamp
158 	      )
159 {
160 	unsigned int rtc;
161 
162 	parseprintf(DD_PARSE, ("inp_computime(0x%p, 0x%x, ...)\n", (void*)parseio, ch));
163 
164 	switch (ch)
165 	{
166 	case 'T':
167 		parseprintf(DD_PARSE, ("inp_computime: START seen\n"));
168 
169 		parseio->parse_index = 1;
170 		parseio->parse_data[0] = ch;
171 		parseio->parse_dtime.parse_stime = *tstamp; /* collect timestamp */
172 		return PARSE_INP_SKIP;
173 
174 	case '\n':
175 		parseprintf(DD_PARSE, ("inp_computime: END seen\n"));
176 		if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP)
177 			return parse_end(parseio);
178 		else
179 			return rtc;
180 
181 	default:
182 		return parse_addchar(parseio, ch);
183 	}
184 }
185 
186 #else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_COMPUTIME) */
187 int clk_computime_bs;
188 #endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_COMPUTIME) */
189 
190 /*
191  * clk_computime.c,v
192  * Revision 4.10  2005/04/16 17:32:10  kardel
193  * update copyright
194  *
195  * Revision 4.9  2004/11/14 15:29:41  kardel
196  * support PPSAPI, upgrade Copyright to Berkeley style
197  *
198  * Revision 4.6  1999/11/28 09:13:49  kardel
199  * RECON_4_0_98F
200  *
201  * Revision 4.5  1998/06/14 21:09:34  kardel
202  * Sun acc cleanup
203  *
204  * Revision 4.4  1998/06/13 12:00:38  kardel
205  * fix SYSV clock name clash
206  *
207  * Revision 4.3  1998/06/12 15:22:26  kardel
208  * fix prototypes
209  *
210  * Revision 4.2  1998/06/12 09:13:24  kardel
211  * conditional compile macros fixed
212  * printf prototype
213  *
214  * Revision 4.1  1998/05/24 09:39:51  kardel
215  * implementation of the new IO handling model
216  *
217  * Revision 4.0  1998/04/10 19:45:27  kardel
218  * Start 4.0 release version numbering
219  *
220  * from V3 1.8 log info deleted 1998/04/11 kardel
221  */
222