contrib/ntp/libparse/clk_dcf7000.c

   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%p, 0x%x, ...)\n", (void*)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  */