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