amd64 - mpt(4) should use {,u}int32_t for S32/U32
[dragonfly.git] / libexec / xtend / user.c
1 /*-
2  * Copyright (c) 1992, 1993, 1995 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/libexec/xtend/user.c,v 1.9 1999/08/28 00:10:30 peter Exp $
32  * $DragonFly: src/libexec/xtend/user.c,v 1.3 2003/11/14 03:54:32 dillon Exp $
33  */
34
35 #include <ctype.h>
36 #include <stdio.h>
37 #include <string.h>
38 #include <unistd.h>
39 #include <sys/param.h>
40 #include <sys/time.h>
41 #include "xtend.h"
42 #include "xten.h"
43 #include "paths.h"
44
45 MONENTRY Monitor[MAXMON];
46
47 int find (char *, char *[]);
48 void printstatus (FILE *, STATUS *);
49
50 /*
51  * Process a user command
52  */
53
54 int
55 user_command()
56 {
57   char h;
58   char *m;
59   int i, k, n, error;
60   char cmd[512], dumppath[MAXPATHLEN+1], pkt[3];
61   FILE *dumpf;
62
63   error = 0;
64   if(fgets(cmd, 512, User) != NULL) {
65     m = cmd;
66     while ( *m != '\0' ) {
67         if(isupper(*m))
68             *m = tolower(*m);
69         m++;
70     }
71     if(sscanf(cmd, "status %c %d", &h, &i) == 2
72                 && h >= 'a' && h <= 'p' && i >= 1 && i <= 16) {
73       h -= 'a';
74       i--;
75       printstatus(User, &Status[h][i]);
76     } else if(sscanf(cmd, "send %c %s %d", &h, cmd, &n) == 3
77               && h >= 'a' && h <= 'p' && (i = find(cmd, X10cmdnames)) >= 0) {
78       h -= 'a';
79       pkt[0] = h;
80       pkt[1] = i;
81       pkt[2] = n;
82       if(write(tw523, pkt, 3) != 3) {
83         fprintf(Log, "%s:  Transmission error (packet [%s %s]:%d).\n",
84                 thedate(), X10housenames[h], X10cmdnames[i], n);
85         error++;
86       } else {
87         fprintf(User, "OK\n");
88       }
89     } else if(!strcmp("dump\n", cmd)) {
90       strcpy(dumppath, X10DIR);
91       strcat(dumppath, "/");
92       strcat(dumppath, X10DUMPNAME);
93       if((dumpf = fopen(dumppath, "w")) != NULL) {
94         for(h = 0; h < 16; h++) {
95           for(i = 0; i < 16; i++) {
96             if(Status[h][i].lastchange) {
97               fprintf(dumpf, "%s%d\t", X10housenames[h], i+1);
98               printstatus(dumpf, &Status[h][i]);
99             }
100           }
101         }
102         fclose(dumpf);
103         fprintf(User, "OK\n");
104       } else {
105         error++;
106       }
107     } else if(sscanf(cmd, "monitor %c %d", &h, &i) == 2
108               && h >= 'a' && h <= 'p' && i >= 1 && i <= 16) {
109       h -= 'a';
110       i--;
111       for(k = 0; k < MAXMON; k++) {
112         if(!Monitor[k].inuse) break;
113       }
114       if(k == MAXMON) {
115         error++;
116       } else {
117         Monitor[k].house = h;
118         Monitor[k].unit = i;
119         Monitor[k].user = User;
120         Monitor[k].inuse = 1;
121         fprintf(Log, "%s:  Adding %c %d to monitor list (entry %d)\n",
122                 thedate(), h+'A', i+1, k);
123         fprintf(User, "OK\n");
124         fflush(User);
125         User = NULL;
126         return(0);  /* We don't want caller to close stream */
127       }
128     } else if(!strcmp("done\n", cmd)) {
129         fprintf(User, "OK\n");
130         fflush(User);
131         return(1);
132     } else {
133       if(feof(User)) {
134         return(1);
135       } else {
136         error++;
137       }
138     }
139   } else {
140     error++;
141   }
142   if(error) {
143     fprintf(User, "ERROR\n");
144   }
145   fflush(User);
146   return(0);
147 }
148
149 int
150 find(s, tab)
151 char *s;
152 char *tab[];
153 {
154         int i;
155
156         for(i = 0; tab[i] != NULL; i++) {
157           if(strcasecmp(s, tab[i]) == 0) return(i);
158         }
159         return(-1);
160 }
161
162 void
163 printstatus(f, s)
164 FILE *f;
165 STATUS *s;
166 {
167   fprintf(f, "%s:%d", s->onoff ? "On" : "Off", s->brightness);
168   switch(s->selected) {
169   case IDLE:
170     fprintf(f, " (normal) "); break;
171   case SELECTED:
172     fprintf(f, " (selected) "); break;
173   case DIMMING:
174     fprintf(f, " (dimming) "); break;
175   case BRIGHTENING:
176     fprintf(f, " (brightening) "); break;
177   case REQUESTED:
178     fprintf(f, " (requested) "); break;
179   case HAILED:
180     fprintf(f, " (hailed) "); break;
181   default:
182     fprintf(f, " (bogus) "); break;
183   }
184   fprintf(f, "%s", ctime(&s->lastchange));
185 }
186