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 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 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%lx, 0x%x, ...)\n", (long)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