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