2 * Copyright (c) 1992, 1993 Eugene W. Stark
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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
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 $
36 * Xten - user command interface to X-10 daemon
44 #include <sys/types.h>
45 #include <sys/socket.h>
54 char *X10housenames[] = {
55 "A", "B", "C", "D", "E", "F", "G", "H",
56 "I", "J", "K", "L", "M", "N", "O", "P",
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",
69 int find(char *, char *[]);
70 static void usage(void);
77 int c, tmp, h, k, sock, error;
79 struct sockaddr_un sa;
80 char *sockpath = SOCKPATH;
81 char reply[CMDLEN], cmd[CMDLEN], *cp;
84 if(argc == 2 && !strcmp(argv[1], "-")) interactive++;
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");
96 * If interactive, copy standard input to daemon and report results
100 while(!feof(stdin)) {
101 if(fgets(cmd, CMDLEN, stdin) != NULL) {
102 fprintf(daemon, "%s", cmd);
104 if(fgets(reply, CMDLEN, daemon) != NULL) {
105 fprintf(stdout, "%s", reply);
113 * Otherwise, interpret arguments and issue commands to daemon,
114 * handling retries in case of errors.
116 if((h = find(argv[1], X10housenames)) < 0)
117 errx(1, "invalid house code: %s", argv[1]);
122 if((tmp = find(cp, X10housenames)) >= 0) {
128 while(*cp != '\0' && *cp != ':') cp++;
129 if(*cp == ':') c = atoi(cp+1);
132 if((k = find(argv[0], X10cmdnames)) < 0) {
133 warnx("invalid key/unit code: %s", argv[0]);
137 while(error < RETRIES) {
138 fprintf(daemon, "send %s %s %d\n", X10housenames[h], X10cmdnames[k], c);
140 fgets(reply, CMDLEN, daemon);
141 if(strncmp(reply, "ERROR", 5)) break;
145 if(error == RETRIES) {
146 warnx("command failed: send %s %s %d",
147 X10housenames[h], X10cmdnames[k], c);
152 fprintf(daemon, "done\n");
153 fgets(reply, CMDLEN, daemon);
161 "usage: xten house key[:cnt] [[house] key[:cnt] ...]\n");
172 for(i = 0; tab[i] != NULL; i++) {
173 if(strcasecmp(s, tab[i]) == 0) return(i);