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