1 /*        $NetBSD: clk_computime.c,v 1.7 2024/08/18 20:47:17 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 NONEMPTY_TRANSLATION_UNIT
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