Move the MAKEDEV step at the end of make upgrade so you can background it
[dragonfly.git] / libexec / xtend / packet.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/packet.c,v 1.8 1999/08/28 00:10:30 peter Exp $
32  * $DragonFly: src/libexec/xtend/packet.c,v 1.2 2003/06/17 04:27:08 dillon Exp $
33  */
34
35 #include <stdio.h>
36 #include <sys/time.h>
37 #include "xtend.h"
38 #include "xten.h"
39
40 char *X10housenames[] = {
41   "A", "B", "C", "D", "E", "F", "G", "H",
42   "I", "J", "K", "L", "M", "N", "O", "P",
43   NULL
44 };
45
46 char *X10cmdnames[] = {
47   "1", "2", "3", "4", "5", "6", "7", "8",
48   "9", "10", "11", "12", "13", "14", "15", "16",
49   "AllUnitsOff", "AllLightsOn", "On", "Off", "Dim", "Bright", "AllLightsOff",
50   "ExtendedCode", "HailRequest", "HailAcknowledge", "PreSetDim0", "PreSetDim1",
51   "ExtendedData", "StatusOn", "StatusOff", "StatusRequest",
52   NULL
53 };
54
55 /*
56  * Log a packet and update device status accordingly
57  */
58
59 void
60 logpacket(p)
61 unsigned char *p;
62 {
63   fprintf(Log, "%s:  %s %s ", thedate(),
64           X10housenames[p[1]], X10cmdnames[p[2]]);
65   if(p[0] & TW_RCV_LOCAL) fprintf(Log, "(loc,");
66   else fprintf(Log, "(rem,");
67   if(p[0] & TW_RCV_ERROR) fprintf(Log, "err)");
68   else fprintf(Log, " ok)");
69   fprintf(Log, "\n");
70 }
71
72 /*
73  * Process a received packet p, updating device status information both
74  * in core and on disk.
75  */
76
77 void
78 processpacket(p)
79 unsigned char *p;
80 {
81   int i, j, h, k;
82   STATUS *s;
83
84   /*
85    * If the packet had the error flag set, there is no other useful info.
86    */
87   if(p[0] & TW_RCV_ERROR) return;
88   /*
89    * First update in-core status information for the device.
90    */
91   h = p[1]; k = p[2];
92   if(k < 16) {  /* We received a unit code, to select a particular device */
93     s = &Status[h][k];
94     s->selected = SELECTED;
95     s->lastchange = time(NULL);
96     s->changed = 1;
97   } else {  /* We received a key code, to execute some function */
98     /*
99      * Change in status depends on the key code received
100      */
101     if(k == DIM) {
102       /*
103        * We can't really track DIM/BRIGHT properly the way things are right
104        * now.  The TW523 reports the first, fourth, seventh, etc. Dim packet.
105        * We don't really have any way to tell when gaps occur, to cancel
106        * selection.  For now, we'll assume that successive sequences of
107        * Dim/Bright commands are never transmitted without some other
108        * intervening command, and we make a good guess about how many units of
109        * dim/bright are represented by each packet actually reported by the
110        * TW523.
111        */
112       for(i = 0; i < 16; i++) {
113         s = &Status[h][i];
114         switch(s->selected) {
115         case SELECTED:  /* Selected, but not being dimmed or brightened */
116           if(s->onoff == 0) {
117             s->onoff = 1;
118             s->brightness = 15;
119           }
120           s->brightness -= 2;
121           if(s->brightness < 0) s->brightness = 0;
122           s->selected = DIMMING;
123           s->lastchange = time(NULL);
124           s->changed = 1;
125           break;
126         case DIMMING:  /* Selected and being dimmed */
127           s->brightness -=3;
128           if(s->brightness < 0) s->brightness = 0;
129           s->lastchange = time(NULL);
130           s->changed = 1;
131           break;
132         case BRIGHTENING:  /* Selected and being brightened (an error) */
133           s->selected = IDLE;
134           s->lastchange = time(NULL);
135           s->changed = 1;
136           break;
137         default:
138           break;
139         }
140       }
141     } else if(k == BRIGHT) {
142       /*
143        * Same problem here...
144        */
145       for(i = 0; i < 16; i++) {
146         s = &Status[h][i];
147         switch(s->selected) {
148         case SELECTED:  /* Selected, but not being dimmed or brightened */
149           if(s->onoff == 0) {
150             s->onoff = 1;
151             s->brightness = 15;
152           }
153           s->brightness += 2;
154           if(s->brightness > 15) s->brightness = 15;
155           s->selected = BRIGHTENING;
156           s->lastchange = time(NULL);
157           s->changed = 1;
158           break;
159         case DIMMING:  /* Selected and being dimmed (an error) */
160           s->selected = IDLE;
161           s->lastchange = time(NULL);
162           s->changed = 1;
163           break;
164         case BRIGHTENING:  /* Selected and being brightened */
165           s->brightness +=3;
166           if(s->brightness > 15) s->brightness = 15;
167           s->lastchange = time(NULL);
168           s->changed = 1;
169           break;
170         default:
171           break;
172         }
173       }
174     } else {  /* Other key codes besides Bright and Dim */
175       /*
176        * We cancel brightening and dimming on ALL units on ALL house codes,
177        * because the arrival of a different packet indicates a gap that
178        * terminates any prior sequence of brightening and dimming
179        */
180       for(j = 0; j < 16; j++) {
181         for(i = 0; i < 16; i++) {
182           s = &Status[j][i];
183           if(s->selected == BRIGHTENING || s->selected == DIMMING) {
184             s->selected = IDLE;
185             s->lastchange = time(NULL);
186             s->changed = 1;
187           }
188         }
189       }
190       switch(k) {
191       case ALLUNITSOFF:
192         for(i = 0; i < 16; i++) {
193           s = &Status[h][i];
194           s->onoff = 0;
195           s->selected = IDLE;
196           s->brightness = 0;
197           s->lastchange = time(NULL);
198           s->changed = 1;
199         }
200         break;
201       case ALLLIGHTSON:
202         /* Does AllLightsOn cancel selectedness of non-lights? */
203         for(i = 0; i < 16; i++) {
204           s = &Status[h][i];
205           if(s->devcap & ISLIGHT) {
206             s->onoff = 1;
207             s->selected = IDLE;
208             s->brightness = 15;
209             s->lastchange = time(NULL);
210             s->changed = 1;
211           }
212         }
213         break;
214       case UNITON:
215         for(i = 0; i < 16; i++) {
216           s = &Status[h][i];
217           if(s->selected == SELECTED) {
218             s->onoff = 1;
219             s->selected = IDLE;
220             s->brightness = 15;
221             s->lastchange = time(NULL);
222             s->changed = 1;
223           }
224         }
225         break;
226       case UNITOFF:
227         for(i = 0; i < 16; i++) {
228           s = &Status[h][i];
229           if(s->selected == SELECTED) {
230             s->onoff = 0;
231             s->selected = IDLE;
232             s->lastchange = time(NULL);
233             s->changed = 1;
234           }
235         }
236         break;
237       case ALLLIGHTSOFF:
238         /* Does AllLightsOff cancel selectedness of non-lights? */
239         for(i = 0; i < 16; i++) {
240           s = &Status[h][i];
241           if(s->devcap & ISLIGHT) {
242             s->onoff = 0;
243             s->selected = IDLE;
244             s->lastchange = time(NULL);
245             s->changed = 1;
246           }
247         }
248         break;
249       case EXTENDEDCODE:
250         break;
251       case HAILREQUEST:
252         for(i = 0; i < 16; i++) {
253           s = &Status[h][i];
254           if(s->selected == SELECTED) {
255             s->selected = HAILED;
256             s->lastchange = time(NULL);
257             s->changed = 1;
258           }
259         }
260         break;
261       case HAILACKNOWLEDGE:
262         /* Do these commands cancel selection of devices not affected? */
263         for(i = 0; i < 16; i++) {
264           s = &Status[h][i];
265           if(s->selected == HAILED) {
266             s->selected = IDLE;
267             s->lastchange = time(NULL);
268             s->changed = 1;
269           }
270         }
271         break;
272       case PRESETDIM0:
273       case PRESETDIM1:
274         /* I don't really understand these */
275         for(i = 0; i < 16; i++) {
276           s = &Status[h][i];
277           if(s->selected == SELECTED) {
278             s->selected = IDLE;
279             s->lastchange = time(NULL);
280             s->changed = 1;
281           }
282         }
283         break;
284       case EXTENDEDDATA:
285         /* Who knows?  The TW523 can't receive these anyway. */
286         break;
287       case STATUSON:
288         for(i = 0; i < 16; i++) {
289           s = &Status[h][i];
290           if(s->selected == REQUESTED) {
291             s->onoff = 1;
292             s->selected = IDLE;
293             s->lastchange = time(NULL);
294             s->changed = 1;
295           }
296         }
297         break;
298       case STATUSOFF:
299         for(i = 0; i < 16; i++) {
300           if(s->selected == REQUESTED) {
301             s = &Status[h][i];
302             s->onoff = 0;
303             s->selected = IDLE;
304             s->brightness = 0;
305             s->lastchange = time(NULL);
306             s->changed = 1;
307           }
308         }
309       case STATUSREQUEST:
310         for(i = 0; i < 16; i++) {
311           s = &Status[h][i];
312           if(s->selected) {
313             s->selected = REQUESTED;
314             s->lastchange = time(NULL);
315             s->changed = 1;
316           }
317         }
318         break;
319       }
320     }
321   }
322 }