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"
54extern int printf (const char *, ...);
55#endif
56
57static 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
68static parse_cvt_fnc_t cvt_dcf7000;
69static parse_inp_fnc_t inp_dcf7000;
70
71clockformat_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 */
87static u_long
88cvt_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 */
152static u_long
153inp_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) */
179int 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