contrib/ntp/util/timetrim.c

   1 #if defined(sgi) || defined(_UNICOSMP)
   2 /*
   3  * timetrim.c
   4  *
   5  * "timetrim" allows setting and adjustment of the system clock frequency
   6  * trim parameter on Silicon Graphics machines.  The trim value native
   7  * units are nanoseconds per second (10**-9), so a trim value of 1 makes
   8  * the system clock step ahead 1 nanosecond more per second than a value
   9  * of zero.  Xntpd currently uses units of 2**-20 secs for its frequency
  10  * offset (drift) values; to convert to a timetrim value, multiply by
  11  * 1E9 / 2**20 (about 954).
  12  *
  13  * "timetrim" with no arguments just prints out the current kernel value.
  14  * With a numeric argument, the kernel value is set to the supplied value.
  15  * The "-i" flag causes the supplied value to be added to the kernel value.
  16  * The "-n" option causes all input and output to be in xntpd units rather
  17  * than timetrim native units.
  18  *
  19  * Note that there is a limit of +-3000000 (0.3%) on the timetrim value
  20  * which is (silently?) enforced by the kernel.
  21  *
  22  */
  23
  24 #ifdef HAVE_CONFIG_H
  25 #include <config.h>
  26 #endif
  27
  28 #include <stdio.h>
  29 #include <ctype.h>
  30 #include <stdlib.h>
  31 #ifdef HAVE_SYS_SYSSGI_H
  32 # include <sys/syssgi.h>
  33 #endif
  34 #ifdef HAVE_SYS_SYSTUNE_H
  35 # include <sys/systune.h>
  36 #endif
  37
  38 #define abs(X) (((X) < 0) ? -(X) : (X))
  39 #define USAGE "usage: timetrim [-n] [[-i] value]\n"
  40 #define SGITONTP(X) ((double)(X) * 1048576.0/1.0e9)
  41 #define NTPTOSGI(X) ((long)((X) * 1.0e9/1048576.0))
  42
  43 int
  44 main(
  45         int argc,
  46         char *argv[]
  47         )
  48 {
  49         char *rem;
  50         int incremental = 0, ntpunits = 0;
  51         long timetrim;
  52         double value;
  53
  54         while (--argc && **++argv == '-' && isalpha((int)argv[0][1])) {
  55                 switch (argv[0][1]) {
  56                     case 'i':
  57                         incremental++;
  58                         break;
  59                     case 'n':
  60                         ntpunits++;
  61                         break;
  62                     default:
  63                         fprintf(stderr, USAGE);
  64                         exit(1);
  65                 }
  66         }
  67
  68 #ifdef HAVE_SYS_SYSSGI_H
  69         if (syssgi(SGI_GETTIMETRIM, &timetrim) < 0) {
  70                 perror("syssgi");
  71                 exit(2);
  72         }
  73 #endif
  74 #ifdef HAVE_SYS_SYSTUNE_H
  75         if (systune(SYSTUNE_GET, "timetrim", &timetrim) < 0) {
  76                 perror("systune");
  77                 exit(2);
  78         }
  79 #endif
  80
  81         if (argc == 0) {
  82                 if (ntpunits)
  83                     fprintf(stdout, "%0.5f\n", SGITONTP(timetrim));
  84                 else
  85                     fprintf(stdout, "%ld\n", timetrim);
  86         } else if (argc != 1) {
  87                 fprintf(stderr, USAGE);
  88                 exit(1);
  89         } else {
  90                 value = strtod(argv[0], &rem);
  91                 if (*rem != '\0') {
  92                         fprintf(stderr, USAGE);
  93                         exit(1);
  94                 }
  95                 if (ntpunits)
  96                     value = NTPTOSGI(value);
  97                 if (incremental)
  98                     timetrim += value;
  99                 else
 100                     timetrim = value;
 101 #ifdef HAVE_SYS_SYSSGI_H
 102                 if (syssgi(SGI_SETTIMETRIM, timetrim) < 0) {
 103                         perror("syssgi");
 104                         exit(2);
 105                 }
 106 #endif
 107 #ifdef HAVE_SYS_SYSTUNE_H
 108                 if (systune(SYSTUNE_SET, "timer", "timetrim", &timetrim) < 0) {
 109                         perror("systune");
 110                         exit(2);
 111                 }
 112 #endif
 113         }
 114         return 0;
 115 }
 116 #endif