1 /* 2 * /src/NTP/ntp-4/libparse/clk_dcf7000.c,v 4.6 1999/11/28 09:13:49 kardel RELEASE_19991128_A 3 * 4 * clk_dcf7000.c,v 4.6 1999/11/28 09:13:49 kardel RELEASE_19991128_A 5 * 6 * ELV DCF7000 module 7 * 8 * Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998 by Frank Kardel 9 * Friedrich-Alexander Universit�t Erlangen-N�rnberg, Germany 10 * 11 * This program is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 14 * 15 */ 16 17 #ifdef HAVE_CONFIG_H 18 # include <config.h> 19 #endif 20 21 #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_DCF7000) 22 23 #include "ntp_fp.h" 24 #include "ntp_unixtime.h" 25 #include "ntp_calendar.h" 26 27 #include "parse.h" 28 29 #ifndef PARSESTREAM 30 #include "ntp_stdlib.h" 31 #include <stdio.h> 32 #else 33 #include "sys/parsestreams.h" 34 extern void printf P((const char *, ...)); 35 #endif 36 37 static struct format dcf7000_fmt = 38 { /* ELV DCF7000 */ 39 { 40 { 6, 2}, { 3, 2}, { 0, 2}, 41 { 12, 2}, { 15, 2}, { 18, 2}, 42 { 9, 2}, { 21, 2}, 43 }, 44 (const unsigned char *)" - - - - - - - \r", 45 0 46 }; 47 static u_long cvt_dcf7000 P((unsigned char *, int, struct format *, clocktime_t *, void *)); 48 static unsigned long inp_dcf7000 P((parse_t *, unsigned int, timestamp_t *)); 49 50 clockformat_t clock_dcf7000 = 51 { 52 inp_dcf7000, /* DCF7000 input handling */ 53 cvt_dcf7000, /* ELV DCF77 conversion */ 54 0, /* no direct PPS monitoring */ 55 (void *)&dcf7000_fmt, /* conversion configuration */ 56 "ELV DCF7000", /* ELV clock */ 57 24, /* string buffer */ 58 0 /* no private data (complete pakets) */ 59 }; 60 61 /* 62 * cvt_dcf7000 63 * 64 * convert dcf7000 type format 65 */ 66 static u_long 67 cvt_dcf7000( 68 unsigned char *buffer, 69 int size, 70 struct format *format, 71 clocktime_t *clock_time, 72 void *local 73 ) 74 { 75 if (!Strok(buffer, format->fixed_string)) 76 { 77 return CVT_NONE; 78 } 79 else 80 { 81 if (Stoi(&buffer[format->field_offsets[O_DAY].offset], &clock_time->day, 82 format->field_offsets[O_DAY].length) || 83 Stoi(&buffer[format->field_offsets[O_MONTH].offset], &clock_time->month, 84 format->field_offsets[O_MONTH].length) || 85 Stoi(&buffer[format->field_offsets[O_YEAR].offset], &clock_time->year, 86 format->field_offsets[O_YEAR].length) || 87 Stoi(&buffer[format->field_offsets[O_HOUR].offset], &clock_time->hour, 88 format->field_offsets[O_HOUR].length) || 89 Stoi(&buffer[format->field_offsets[O_MIN].offset], &clock_time->minute, 90 format->field_offsets[O_MIN].length) || 91 Stoi(&buffer[format->field_offsets[O_SEC].offset], &clock_time->second, 92 format->field_offsets[O_SEC].length)) 93 { 94 return CVT_FAIL|CVT_BADFMT; 95 } 96 else 97 { 98 unsigned char *f = &buffer[format->field_offsets[O_FLAGS].offset]; 99 long flags; 100 101 clock_time->flags = 0; 102 clock_time->usecond = 0; 103 104 if (Stoi(f, &flags, format->field_offsets[O_FLAGS].length)) 105 { 106 return CVT_FAIL|CVT_BADFMT; 107 } 108 else 109 { 110 if (flags & 0x1) 111 clock_time->utcoffset = -2*60*60; 112 else 113 clock_time->utcoffset = -1*60*60; 114 115 if (flags & 0x2) 116 clock_time->flags |= PARSEB_ANNOUNCE; 117 118 if (flags & 0x4) 119 clock_time->flags |= PARSEB_NOSYNC; 120 } 121 return CVT_OK; 122 } 123 } 124 } 125 126 /* 127 * inp_dcf700 128 * 129 * grep data from input stream 130 */ 131 static u_long 132 inp_dcf7000( 133 parse_t *parseio, 134 unsigned int ch, 135 timestamp_t *tstamp 136 ) 137 { 138 unsigned int rtc; 139 140 parseprintf(DD_PARSE, ("inp_dcf7000(0x%lx, 0x%x, ...)\n", (long)parseio, ch)); 141 142 switch (ch) 143 { 144 case '\r': 145 parseprintf(DD_PARSE, ("inp_dcf7000: EOL seen\n")); 146 parseio->parse_dtime.parse_stime = *tstamp; /* collect timestamp */ 147 if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP) 148 return parse_end(parseio); 149 else 150 return rtc; 151 152 default: 153 return parse_addchar(parseio, ch); 154 } 155 } 156 157 #else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_DCF7000) */ 158 int clk_dcf7000_bs; 159 #endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_DCF7000) */ 160 161 /* 162 * History: 163 * 164 * clk_dcf7000.c,v 165 * Revision 4.6 1999/11/28 09:13:49 kardel 166 * RECON_4_0_98F 167 * 168 * Revision 4.5 1998/06/14 21:09:34 kardel 169 * Sun acc cleanup 170 * 171 * Revision 4.4 1998/06/13 12:01:59 kardel 172 * fix SYSV clock name clash 173 * 174 * Revision 4.3 1998/06/12 15:22:27 kardel 175 * fix prototypes 176 * 177 * Revision 4.2 1998/06/12 09:13:24 kardel 178 * conditional compile macros fixed 179 * printf prototype 180 * 181 * Revision 4.1 1998/05/24 09:39:51 kardel 182 * implementation of the new IO handling model 183 * 184 * Revision 4.0 1998/04/10 19:45:28 kardel 185 * Start 4.0 release version numbering 186 * 187 * from V3 3.18 log info deleted 1998/04/11 kardel 188 */ 189