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