dist/ntp/libparse/clk_computime.c

   1 /*      $NetBSD: clk_computime.c,v 1.3 2003/12/04 16:23:37 drochner Exp $       */
   2
   3 #ifdef HAVE_CONFIG_H
   4 # include <config.h>
   5 #endif
   6
   7 #if defined(REFCLOCK) && defined(CLOCK_PARSE) && defined(CLOCK_COMPUTIME)
   8 /*
   9  * /src/NTP/ntp4-dev/libparse/clk_computime.c,v 4.10 2005/04/16 17:32:10 kardel RELEASE_20050508_A
  10  *
  11  * clk_computime.c,v 4.10 2005/04/16 17:32:10 kardel RELEASE_20050508_A
  12  *
  13  * Supports Diem's Computime Radio Clock
  14  *
  15  * Used the Meinberg clock as a template for Diem's Computime Radio Clock
  16  *
  17  * adapted by Alois Camenzind <alois.camenzind@ubs.ch>
  18  *
  19  * Copyright (c) 1995-2005 by Frank Kardel <kardel <AT> ntp.org>
  20  * Copyright (c) 1989-1994 by Frank Kardel, Friedrich-Alexander Universität Erlangen-Nürnberg, Germany
  21  *
  22  * Redistribution and use in source and binary forms, with or without
  23  * modification, are permitted provided that the following conditions
  24  * are met:
  25  * 1. Redistributions of source code must retain the above copyright
  26  *    notice, this list of conditions and the following disclaimer.
  27  * 2. Redistributions in binary form must reproduce the above copyright
  28  *    notice, this list of conditions and the following disclaimer in the
  29  *    documentation and/or other materials provided with the distribution.
  30  * 3. Neither the name of the author nor the names of its contributors
  31  *    may be used to endorse or promote products derived from this software
  32  *    without specific prior written permission.
  33  *
  34  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  35  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  36  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  37  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  38  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  39  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  40  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  41  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  42  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  43  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  44  * SUCH DAMAGE.
  45  *
  46  */
  47
  48 #include "ntp_fp.h"
  49 #include "ntp_unixtime.h"
  50 #include "ntp_calendar.h"
  51 #include "ntp_stdlib.h"
  52
  53 #include "parse.h"
  54
  55 #ifndef PARSESTREAM
  56 #include <stdio.h>
  57 #else
  58 #include "sys/parsestreams.h"
  59 extern void printf P((const char *, ...));
  60 #endif
  61
  62 /*
  63  * The Computime receiver sends a datagram in the following format every minute
  64  *
  65  * Timestamp    T:YY:MM:MD:WD:HH:MM:SSCRLF
  66  * Pos          0123456789012345678901 2 3
  67  *              0000000000111111111122 2 2
  68  * Parse        T:  :  :  :  :  :  :  rn
  69  *
  70  * T    Startcharacter "T" specifies start of the timestamp
  71  * YY   Year MM Month 1-12
  72  * MD   Day of the month
  73  * WD   Day of week
  74  * HH   Hour
  75  * MM   Minute
  76  * SS   Second
  77  * CR   Carriage return
  78  * LF   Linefeed
  79  *
  80  */
  81
  82 static struct format computime_fmt =
  83 {
  84         {
  85                 {8, 2},  {5,  2}, {2,  2},      /* day, month, year */
  86                 {14, 2}, {17, 2}, {20, 2},      /* hour, minute, second */
  87                 {11, 2},                        /* dayofweek,  */
  88         },
  89         (const unsigned char *)"T:  :  :  :  :  :  :  \r\n",
  90         0
  91 };
  92
  93 static u_long cvt_computime P((unsigned char *, int, struct format *, clocktime_t *, void *));
  94 static unsigned long inp_computime P((parse_t *, unsigned int, timestamp_t *));
  95
  96 clockformat_t   clock_computime =
  97 {
  98         inp_computime,          /* Computime input handling */
  99         cvt_computime,          /* Computime conversion */
 100         0,                      /* no PPS monitoring */
 101         (void *)&computime_fmt, /* conversion configuration */
 102         "Diem's Computime Radio Clock", /* Computime Radio Clock */
 103         24,                     /* string buffer */
 104         0                       /* no private data (complete pakets) */
 105 };
 106
 107 /*
 108  * cvt_computime
 109  *
 110  * convert simple type format
 111  */
 112 static          u_long
 113 cvt_computime(
 114         unsigned char *buffer,
 115         int            size,
 116         struct format *format,
 117         clocktime_t   *clock_time,
 118         void          *local
 119         )
 120 {
 121
 122         if (!Strok(buffer, format->fixed_string)) {
 123                 return CVT_NONE;
 124         } else {
 125                 if (Stoi(&buffer[format->field_offsets[O_DAY].offset], &clock_time->day,
 126                          format->field_offsets[O_DAY].length) ||
 127                     Stoi(&buffer[format->field_offsets[O_MONTH].offset], &clock_time->month,
 128                          format->field_offsets[O_MONTH].length) ||
 129                     Stoi(&buffer[format->field_offsets[O_YEAR].offset], &clock_time->year,
 130                          format->field_offsets[O_YEAR].length) ||
 131                     Stoi(&buffer[format->field_offsets[O_HOUR].offset], &clock_time->hour,
 132                          format->field_offsets[O_HOUR].length) ||
 133                     Stoi(&buffer[format->field_offsets[O_MIN].offset], &clock_time->minute,
 134                          format->field_offsets[O_MIN].length) ||
 135                     Stoi(&buffer[format->field_offsets[O_SEC].offset], &clock_time->second,
 136                          format->field_offsets[O_SEC].length)) {
 137                         return CVT_FAIL | CVT_BADFMT;
 138                 } else {
 139
 140                         clock_time->flags = 0;
 141                         clock_time->utcoffset = 0;      /* We have UTC time */
 142
 143                         return CVT_OK;
 144                 }
 145         }
 146 }
 147
 148 /*
 149  * inp_computime
 150  *
 151  * grep data from input stream
 152  */
 153 static u_long
 154 inp_computime(
 155               parse_t      *parseio,
 156               unsigned int  ch,
 157               timestamp_t  *tstamp
 158               )
 159 {
 160         unsigned int rtc;
 161
 162         parseprintf(DD_PARSE, ("inp_computime(0x%lx, 0x%x, ...)\n", (long)parseio, ch));
 163
 164         switch (ch)
 165         {
 166         case 'T':
 167                 parseprintf(DD_PARSE, ("inp_computime: START seen\n"));
 168
 169                 parseio->parse_index = 1;
 170                 parseio->parse_data[0] = ch;
 171                 parseio->parse_dtime.parse_stime = *tstamp; /* collect timestamp */
 172                 return PARSE_INP_SKIP;
 173
 174         case '\n':
 175                 parseprintf(DD_PARSE, ("inp_computime: END seen\n"));
 176                 if ((rtc = parse_addchar(parseio, ch)) == PARSE_INP_SKIP)
 177                         return parse_end(parseio);
 178                 else
 179                         return rtc;
 180
 181         default:
 182                 return parse_addchar(parseio, ch);
 183         }
 184 }
 185
 186 #else /* not (REFCLOCK && CLOCK_PARSE && CLOCK_COMPUTIME) */
 187 int clk_computime_bs;
 188 #endif /* not (REFCLOCK && CLOCK_PARSE && CLOCK_COMPUTIME) */
 189
 190 /*
 191  * clk_computime.c,v
 192  * Revision 4.10  2005/04/16 17:32:10  kardel
 193  * update copyright
 194  *
 195  * Revision 4.9  2004/11/14 15:29:41  kardel
 196  * support PPSAPI, upgrade Copyright to Berkeley style
 197  *
 198  * Revision 4.6  1999/11/28 09:13:49  kardel
 199  * RECON_4_0_98F
 200  *
 201  * Revision 4.5  1998/06/14 21:09:34  kardel
 202  * Sun acc cleanup
 203  *
 204  * Revision 4.4  1998/06/13 12:00:38  kardel
 205  * fix SYSV clock name clash
 206  *
 207  * Revision 4.3  1998/06/12 15:22:26  kardel
 208  * fix prototypes
 209  *
 210  * Revision 4.2  1998/06/12 09:13:24  kardel
 211  * conditional compile macros fixed
 212  * printf prototype
 213  *
 214  * Revision 4.1  1998/05/24 09:39:51  kardel
 215  * implementation of the new IO handling model
 216  *
 217  * Revision 4.0  1998/04/10 19:45:27  kardel
 218  * Start 4.0 release version numbering
 219  *
 220  * from V3 1.8 log info deleted 1998/04/11 kardel
 221  */