1 /* 2 * /src/NTP/ntp4-dev/libparse/clk_rcc8000.c,v 4.9 2004/11/14 15:29:41 kardel RELEASE_20050508_A 3 * 4 * clk_rcc8000.c,v 4.9 2004/11/14 15:29:41 kardel RELEASE_20050508_A 5 * 6 * Radiocode Clocks Ltd RCC 8000 Intelligent Off-Air Master Clock support 7 * 8 * Created by R.E.Broughton from clk_trimtaip.c 9 * 10 * This program is distributed in the hope that it will be useful, 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. 13 * 14 */ 15 16 #if HAVE_CONFIG_H 17 # include <config.h> 18 #endif 19 20 #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_RCC8000) 21 22 #include "ntp_fp.h" 23 #include "ntp_unixtime.h" 24 #include "ntp_calendar.h" 25 26 #include "parse.h" 27 28 #ifndef PARSESTREAM 29 #include "ntp_stdlib.h" 30 #include <stdio.h> 31 #else 32 #include "sys/parsestreams.h" 33 extern void printf P((const char *, ...)); 34 #endif 35 36 /* Type II Serial Output format 37 * 38 * 0000000000111111111122222222223 / char 39 * 0123456789012345678901234567890 \ posn 40 * HH:MM:SS.XYZ DD/MM/YY DDD W Prn Actual 41 * 33 44 55 666 00 11 22 7 Parse 42 * : : . / / rn Check 43 * "15:50:36.534 30/09/94 273 5 A\x0d\x0a" 44 * 45 * DDD - Day of year number 46 * W - Day of week number (Sunday is 0) 47 * P is the Status. See comment below for details. 48 */ 49 50 #define O_USEC O_WDAY 51 static struct format rcc8000_fmt = 52 { { { 13, 2 }, {16, 2}, { 19, 2}, /* Day, Month, Year */ 53 { 0, 2 }, { 3, 2}, { 6, 2}, /* Hour, Minute, Second */ 54 { 9, 3 }, {28, 1}, { 0, 0}, /* uSec, Status (Valid,Reject,BST,Leapyear) */ }, 55 (const unsigned char *)" : : . / / \r\n", 56 /*"15:50:36.534 30/09/94 273 5 A\x0d\x0a" */ 57 0 58 }; 59 60 static unsigned long cvt_rcc8000 P((unsigned char *, int, struct format *, clocktime_t *, void *)); 61 static unsigned long inp_rcc8000 P((parse_t *, unsigned int, timestamp_t *)); 62 63 clockformat_t clock_rcc8000 = 64 { 65 inp_rcc8000, /* no input handling */ 66 cvt_rcc8000, /* Radiocode clock conversion */ 67 0, /* no direct PPS monitoring */ 68 (void *)&rcc8000_fmt, /* conversion configuration */ 69 "Radiocode RCC8000", 70 31, /* string buffer */ 71 0 /* no private data */ 72 }; 73 74 static unsigned long 75 cvt_rcc8000( 76 unsigned char *buffer, 77 int size, 78 struct format *format, 79 clocktime_t *clock_time, 80 void *local 81 ) 82 { 83 if (!Strok(buffer, format->fixed_string)) return CVT_NONE; 84 #define OFFS(x) format->field_offsets[(x)].offset 85 #define STOI(x, y) Stoi(&buffer[OFFS(x)], y, format->field_offsets[(x)].length) 86 if ( STOI(O_DAY, &clock_time->day) || 87 STOI(O_MONTH, &clock_time->month) || 88 STOI(O_YEAR, &clock_time->year) || 89 STOI(O_HOUR, &clock_time->hour) || 90 STOI(O_MIN, &clock_time->minute) || 91 STOI(O_SEC, &clock_time->second) || 92 STOI(O_USEC, &clock_time->usecond) 93 ) return CVT_FAIL|CVT_BADFMT; 94 clock_time->usecond *= 1000; 95 96 clock_time->utcoffset = 0; 97 98 #define RCCP buffer[28] 99 /* 100 * buffer[28] is the ASCII representation of a hex character ( 0 through F ) 101 * The four bits correspond to: 102 * 8 - Valid Time 103 * 4 - Reject Code 104 * 2 - British Summer Time (receiver set to emit GMT all year.) 105 * 1 - Leap year 106 */ 107 #define RCC8000_VALID 0x8 108 #define RCC8000_REJECT 0x4 109 #define RCC8000_BST 0x2 110 #define RCC8000_LEAPY 0x1 111 112 clock_time->flags = 0; 113 114 if ( (RCCP >= '0' && RCCP <= '9') || (RCCP >= 'A' && RCCP <= 'F') ) 115 { 116 register int flag; 117 118 flag = (RCCP >= '0' && RCCP <= '9' ) ? RCCP - '0' : RCCP - 'A' + 10; 119 120 if (!(flag & RCC8000_VALID)) 121 clock_time->flags |= PARSEB_POWERUP; 122 123 clock_time->flags |= PARSEB_UTC; /* British special - guess why 8-) */ 124 125 /* other flags not used */ 126 } 127 return CVT_OK; 128 } 129 /* 130 * inp_rcc8000 131 * 132 * grep data from input stream 133 */ 134 static u_long 135 inp_rcc8000( 136 parse_t *parseio, 137 unsigned int ch, 138 timestamp_t *tstamp 139 ) 140 { 141 unsigned int rtc; 142 143 parseprintf(DD_PARSE, ("inp_rcc8000(0x%lx, 0x%x, ...)\n", (long)parseio, ch)); 144 145 switch (ch) 146 { 147 case '\n': 148 parseprintf(DD_PARSE, ("inp_rcc8000: EOL seen\n")); 149 if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP) 150 return parse_end(parseio); 151 else 152 return rtc; 153 154 155 default: 156 if (parseio->parse_index == 0) /* take sample at start of message */ 157 { 158 parseio->parse_dtime.parse_stime = *tstamp; /* collect timestamp */ 159 } 160 return parse_addchar(parseio, ch); 161 } 162 } 163 164 #else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_RCC8000) */ 165 int clk_rcc8000_bs; 166 #endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_RCC8000) */ 167 168 /* 169 * History: 170 * 171 * clk_rcc8000.c,v 172 * Revision 4.9 2004/11/14 15:29:41 kardel 173 * support PPSAPI, upgrade Copyright to Berkeley style 174 * 175 * Revision 4.6 1999/11/28 09:13:51 kardel 176 * RECON_4_0_98F 177 * 178 * Revision 4.5 1998/06/14 21:09:38 kardel 179 * Sun acc cleanup 180 * 181 * Revision 4.4 1998/06/13 12:05:02 kardel 182 * fix SYSV clock name clash 183 * 184 * Revision 4.3 1998/06/12 15:22:29 kardel 185 * fix prototypes 186 * 187 * Revision 4.2 1998/06/12 09:13:25 kardel 188 * conditional compile macros fixed 189 * printf prototype 190 * 191 * Revision 4.1 1998/05/24 09:39:53 kardel 192 * implementation of the new IO handling model 193 * 194 * Revision 4.0 1998/04/10 19:45:30 kardel 195 * Start 4.0 release version numbering 196 * 197 * from V3 3.5 log info deleted 1998/04/11 kardel 198 */ 199