usr.sbin/xten/xten.c

   1 /*-
   2  * Copyright (c) 1992, 1993 Eugene W. Stark
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by Eugene W. Stark.
  16  * 4. The name of the author may not be used to endorse or promote products
  17  *    derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY EUGENE W. STARK (THE AUTHOR) ``AS IS'' AND
  20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
  23  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  24  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  25  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  *
  31  * $FreeBSD: src/usr.sbin/xten/xten.c,v 1.4 1999/08/28 01:21:02 peter Exp $
  32  * $DragonFly: src/usr.sbin/xten/xten.c,v 1.3 2003/11/03 19:31:44 eirikn Exp $
  33  */
  34
  35 /*
  36  * Xten - user command interface to X-10 daemon
  37  */
  38
  39 #include <err.h>
  40 #include <stdio.h>
  41 #include <stdlib.h>
  42 #include <string.h>
  43 #include <unistd.h>
  44 #include <sys/types.h>
  45 #include <sys/socket.h>
  46 #include <sys/un.h>
  47 #include "xtend.h"
  48 #include "xten.h"
  49 #include "paths.h"
  50
  51 #define RETRIES 10
  52 #define CMDLEN 512
  53
  54 char *X10housenames[] = {
  55   "A", "B", "C", "D", "E", "F", "G", "H",
  56   "I", "J", "K", "L", "M", "N", "O", "P",
  57   NULL
  58 };
  59
  60 char *X10cmdnames[] = {
  61   "1", "2", "3", "4", "5", "6", "7", "8",
  62   "9", "10", "11", "12", "13", "14", "15", "16",
  63   "AllUnitsOff", "AllLightsOn", "On", "Off", "Dim", "Bright", "AllLightsOff",
  64   "ExtendedCode", "HailRequest", "HailAcknowledge", "PreSetDim0", "PreSetDim1",
  65   "ExtendedData", "StatusOn", "StatusOff", "StatusRequest",
  66   NULL
  67 };
  68
  69 int find(char *, char *[]);
  70 static void usage(void);
  71
  72 int
  73 main(argc, argv)
  74 int argc;
  75 char *argv[];
  76 {
  77   int c, tmp, h, k, sock, error;
  78   FILE *daemon;
  79   struct sockaddr_un sa;
  80   char *sockpath = SOCKPATH;
  81   char reply[CMDLEN], cmd[CMDLEN], *cp;
  82   int interactive = 0;
  83
  84   if(argc == 2 && !strcmp(argv[1], "-")) interactive++;
  85   else if(argc < 3)
  86     usage();
  87   if((sock = socket(AF_UNIX, SOCK_STREAM, 0)) < 0)
  88     errx(1, "can't create socket");
  89   strcpy(sa.sun_path, sockpath);
  90   sa.sun_family = AF_UNIX;
  91   if(connect(sock, (struct sockaddr *)(&sa), strlen(sa.sun_path) + 2) < 0)
  92     errx(1, "can't connect to X-10 daemon");
  93   if((daemon = fdopen(sock, "w+")) == NULL)
  94     errx(1, "can't attach stream to socket");
  95   /*
  96    * If interactive, copy standard input to daemon and report results
  97    * on standard output.
  98    */
  99   if(interactive) {
 100     while(!feof(stdin)) {
 101       if(fgets(cmd, CMDLEN, stdin) != NULL) {
 102         fprintf(daemon, "%s", cmd);
 103         fflush(daemon);
 104         if(fgets(reply, CMDLEN, daemon) != NULL) {
 105           fprintf(stdout, "%s", reply);
 106           fflush(stdout);
 107         }
 108       }
 109     }
 110     exit(0);
 111   }
 112   /*
 113    * Otherwise, interpret arguments and issue commands to daemon,
 114    * handling retries in case of errors.
 115    */
 116   if((h = find(argv[1], X10housenames)) < 0)
 117     errx(1, "invalid house code: %s", argv[1]);
 118   argv++;
 119   argv++;
 120   while(argc >= 3) {
 121     cp = argv[0];
 122     if((tmp = find(cp, X10housenames)) >= 0) {
 123       h = tmp;
 124       argv++;
 125       argc--;
 126       continue;
 127     }
 128     while(*cp != '\0' && *cp != ':') cp++;
 129     if(*cp == ':') c = atoi(cp+1);
 130     else c = 2;
 131     *cp = '\0';
 132     if((k = find(argv[0], X10cmdnames)) < 0) {
 133       warnx("invalid key/unit code: %s", argv[0]);
 134       error++;
 135     }
 136     error = 0;
 137     while(error < RETRIES) {
 138       fprintf(daemon, "send %s %s %d\n", X10housenames[h], X10cmdnames[k], c);
 139       fflush(daemon);
 140       fgets(reply, CMDLEN, daemon);
 141       if(strncmp(reply, "ERROR", 5)) break;
 142       error++;
 143       usleep(200000);
 144     }
 145     if(error == RETRIES) {
 146       warnx("command failed: send %s %s %d",
 147               X10housenames[h], X10cmdnames[k], c);
 148     }
 149     argc--;
 150     argv++;
 151   }
 152   fprintf(daemon, "done\n");
 153   fgets(reply, CMDLEN, daemon);
 154   exit(0);
 155 }
 156
 157 static void
 158 usage()
 159 {
 160         fprintf(stderr,
 161                 "usage: xten house key[:cnt] [[house] key[:cnt] ...]\n");
 162         exit(1);
 163 }
 164
 165 int
 166 find(s, tab)
 167 char *s;
 168 char *tab[];
 169 {
 170         int i;
 171
 172         for(i = 0; tab[i] != NULL; i++) {
 173           if(strcasecmp(s, tab[i]) == 0) return(i);
 174         }
 175         return(-1);
 176 }