15451e9685e26b7b29a33d682cf27f7469ba15a2
[metawatch.git] / metawatch.c
1 /*
2  * (c) 2011 Siegen, Germany by Nils Faerber
3  *
4  * license GPL
5  */
6 #include <stdio.h>
7 #include <sys/types.h>
8 #include <sys/stat.h>
9 #include <fcntl.h>
10 #include <unistd.h>
11 #include <stdlib.h>
12 #include <string.h>
13 #include <time.h>
14 #include <termios.h>
15
16 #include "metawatch_protocol.h"
17 #include "crc16ccitt.h"
18
19
20 void dump_frame(unsigned char *frame, int len)
21 {
22         int i;
23
24         for (i=0; i<len; i++)
25                 fprintf(stderr, "0x%02x ", frame[i]);
26         fprintf(stderr, "\n");
27 }
28
29
30 int mw_send_packet(int mw_fd, unsigned char msg_type, unsigned char options, unsigned char *data, unsigned char len)
31 {
32         unsigned short crc;
33         unsigned char frame[64];
34         int tlen = len + 6; /* payload + 6 bytes frameing */
35         int ret;
36
37         memset(frame, 0, 64);
38         frame[0] = MW_SOF;
39         frame[1] = len + 6;
40         frame[2] = msg_type;
41         frame[3] = options;
42         if (data != NULL && len > 0)
43                 memcpy(frame+4, data, len);
44
45         crc = crc16ccitt(frame, len+4);
46         *(unsigned short *)(frame+len+4) = crc;
47
48         dump_frame(frame, tlen);
49
50         while (((ret = write(mw_fd, frame, tlen)) >= 0) && (tlen > 0))
51                 tlen -= ret;
52
53         if (tlen == 0 && ret >= 0)
54                 return 0;
55         else
56                 return ret;
57 }
58
59 /*
60  * host to watch commands
61  */
62
63 void mw_set_rtc(int mw_fd, unsigned char clk1224, unsigned char date_fmt)
64 {
65         time_t mtime;
66         struct tm mtm;
67         unsigned short year;
68         unsigned char data[32];
69
70         mtime = time(NULL);
71         localtime_r(&mtime, &mtm);
72
73         year = mtm.tm_year + 1900;  
74         data[0] = (year & 0x0f00) >> 8;
75         data[1] = (year & 0x00ff);
76         data[2] = mtm.tm_mon + 1;
77         data[3] = mtm.tm_mday;
78         data[4] = mtm.tm_wday;
79         data[5] = mtm.tm_hour;
80         data[6] = mtm.tm_min;
81         data[7] = mtm.tm_sec;
82         data[8] = clk1224;
83         data[9] = date_fmt;
84
85         mw_send_packet(mw_fd, MW_SET_REAL_TIME_CLOCK, 0, data, 10);
86 }
87
88 /*
89  * watch responses, events or notifications
90  */
91 void mw_get_real_time_clock_response(int mw_fd, unsigned char *rtcrsp, int len)
92 {
93         struct tm mtm;
94         unsigned short year;
95         unsigned char clk1224, date_fmt;
96
97         if (len != 10) {
98                 fprintf(stderr, "get real time clock response too short %d != 10\n", len);
99                 return;
100         }
101
102         year = *(unsigned short *)rtcrsp;
103         mtm.tm_year = year - 1900;
104         mtm.tm_mon = rtcrsp[2] - 1;
105         mtm.tm_mday = rtcrsp[3];
106         mtm.tm_wday = rtcrsp[4];
107         mtm.tm_hour = rtcrsp[5];
108         mtm.tm_min = rtcrsp[6];
109         mtm.tm_sec = rtcrsp[7];
110         clk1224 = rtcrsp[8];
111         date_fmt = rtcrsp[9];
112
113         fprintf(stderr, "watch RTC is %s, clock format is %s, date format is %s\n", asctime(&mtm), clk1224 ? "24h" : "AM/PM", date_fmt ? "DD/MM" : "MM/DD");
114 }
115
116 void mw_get_battery_voltage_response(int mw_fd, unsigned char *batrsp, int len)
117 {
118         unsigned short voltage = *(unsigned short *)batrsp;
119         unsigned char power_good = batrsp[2];
120         unsigned char bat_charging = batrsp[3];
121
122         fprintf(stderr, "battery is at %dV, %s and %s\n", voltage, power_good ? "power is good" : "power fault", bat_charging ? "charging" : "not charging");
123 }
124
125 int decode_frame(int mw_fd, unsigned char *buf, int len)
126 {
127         unsigned short crc;
128         unsigned char msglen;
129         unsigned char msgtype;
130         unsigned char msgopt;
131         unsigned char *msgdata;
132
133         /* check frame */
134         crc = *(unsigned short *)(buf+len-2);
135         if (crc != crc16ccitt(buf, len-2)) {
136                 fprintf(stderr, "decode frame CRC error\n");
137                 return 1;
138         } else
139                 fprintf(stderr, "decode frame CRC OK\n");
140         if (buf[0] != MW_SOF) {
141                 fprintf(stderr, "decode frame SOF not found\n");
142                 return 1;
143         } else
144         fprintf(stderr, "decode frame found SOF\n");
145
146         msglen = buf[1];
147         msgtype = buf[2];
148         msgopt = buf[3];
149         msgdata = (buf+4);
150
151         switch (msgtype) {
152                 case MW_GET_REAL_TIME_CLOCK_RSP:
153                         mw_get_real_time_clock_response(mw_fd, msgdata, len-4-2);
154                         break;
155                 case MW_GET_INFORMATION_STRING_RSP:
156                         msgdata[len-4-2] = 0;
157                         fprintf(stderr, "Got info string '%s'\n", (msgdata+4));
158                         break;
159                 case MW_READ_BATTERY_VOLTAGE_RSP:
160                         mw_get_battery_voltage_response(mw_fd, msgdata, len-4-2);
161                         break;
162                 case MW_LOW_BATTERY_WARNING_MSG:
163                         fprintf(stderr, "Watch battery low, please connect charger\n");
164                         break;
165                 case MW_LOW_BATTERY_BT_OFF_MSG:
166                         fprintf(stderr, "Watch battery extremely low - radio will turn off\n");
167                         break;
168                 default:
169                         fprintf(stderr, "Unkown msgtype 0x%02x\n", msgtype);
170                         break;
171         };
172
173         return 0;
174 }
175
176
177 void process_cmd(char *cmdline, int clinep, int mw_fd)
178 {
179         unsigned char mdata[32];
180         unsigned char *mdatap = mdata;
181
182         fprintf(stderr, "command: '%s'\n", cmdline);
183
184         if (strncmp(cmdline, "quit", 4) == 0) {
185                 close(mw_fd);
186                 exit(0);
187         }
188
189         if (strncmp(cmdline, "srtc", 4) == 0) {
190                 fprintf(stderr, "Setting RTC from system time...");
191                 mw_set_rtc(mw_fd, MW_RTC_CLOCK_24HR, MW_RTC_DATE_DDMM);
192                 fprintf(stderr, "OK\n");
193         }
194         if (strncmp(cmdline, "grtc", 4) == 0) {
195                 mw_send_packet(mw_fd, MW_GET_REAL_TIME_CLOCK, 0, NULL, 0);
196         }
197         if (strncmp(cmdline, "gistr", 5) == 0) {
198                 mdata[0] = 0;
199                 mw_send_packet(mw_fd, MW_GET_INFORMATION_STRING, 0, mdata, 1);
200         }
201         if (strncmp(cmdline, "gdtype", 6) == 0) {
202                 mw_send_packet(mw_fd, MW_GET_DEVICE_TYPE, 0, NULL, 0);
203         }
204         if (strncmp(cmdline, "rvbat", 5) == 0) {
205                 mw_send_packet(mw_fd, MW_READ_BATTERY_VOLTAGE_MSG, 0, NULL, 0);
206         }
207         if (strncmp(cmdline, "modecfg", 6) == 0) {
208                 memset(mdata, 0, 32);
209                 mdata[0] = 4; /* timeout */
210                 mdata[1] = 1; /* invert display */
211                 mw_send_packet(mw_fd, MW_CONFIGURE_MODE, 0, mdata, 27);
212         }
213         if (strncmp(cmdline, "rbtcfg", 6) == 0) {
214                 mdata[0] = 0; /* idle screen */
215                 mdata[1] = 1; /* button index */
216                 mdata[2] = 2; /* button press type */
217                 mdata[3] = 3; /* callback message type */
218                 mdata[4] = 4; /* callback message option */
219                 mw_send_packet(mw_fd, MW_READ_BUTTON_CONFIG, 0, NULL, 0);
220         }
221         if (strncmp(cmdline, "svib", 4) == 0) {
222                 mdata[0] = 1; /* enable */
223                 *(unsigned short *)(mdatap+1) = 500; /* on miliseconds */
224                 *(unsigned short *)(mdatap+3) = 500; /* off miliseconds */
225                 mdata[5] = 10;
226                 mw_send_packet(mw_fd, MW_SET_VIBRATE_MODE, 0, mdata, 6);
227         }
228 }
229
230 int menu(int mw_fd)
231 {
232         fd_set mfds;
233         struct termios tconfd;
234         char cmdline[128];
235         unsigned char msg_buf[64];
236         unsigned char clinep = 0;
237         int rcvd;
238
239         tcgetattr(0, &tconfd);
240         cfmakeraw(&tconfd);
241         tconfd.c_oflag |= ONLCR | OPOST;
242         tconfd.c_lflag |= ISIG;
243         tcsetattr(0, TCSANOW, &tconfd);
244
245         FD_ZERO(&mfds);
246         FD_SET(0, &mfds);
247         FD_SET(mw_fd, &mfds);
248
249         memset(cmdline, 0, 128);
250
251         do {
252                 rcvd = 0;
253                 if (select(mw_fd+1, &mfds, NULL, NULL, NULL) > 0) {
254                         if (FD_ISSET(mw_fd, &mfds)) {
255                                 rcvd = read(mw_fd, msg_buf, 64);
256                                 fprintf(stderr, "read %d bytes:\n", rcvd);
257                                 if (rcvd > 0) {
258                                         dump_frame(msg_buf, rcvd);
259                                         decode_frame(mw_fd, msg_buf, rcvd);
260                                 }
261                         };
262                         if (FD_ISSET(0, &mfds)) {
263                                 rcvd = read(0, (cmdline+clinep), 1);
264                                 if (rcvd > 0) {
265                                         if (cmdline[clinep] == '\r') {
266                                                 printf("\n");
267                                                 cmdline[clinep--] = '\0';
268                                                 process_cmd(cmdline, clinep, mw_fd);
269                                                 clinep = 0;
270                                                 memset(cmdline, 0, 128);
271                                         } else {
272                                                 clinep++;
273                                                 if (clinep > 75)
274                                                         clinep = 75;
275                                                 printf("\r> %s", cmdline);
276                                                 fflush(stdout);
277                                         }
278                                 }
279                         };
280                 } else
281                         break;
282                 FD_ZERO(&mfds);
283                 FD_SET(0, &mfds);
284                 FD_SET(mw_fd, &mfds);
285         } while (rcvd > 0);
286
287         return 0;
288 }
289
290 int main(int argc, char **argv)
291 {
292         int mw_fd;
293
294         if (argc != 2) {
295                 fprintf(stderr, "Usage:\n\t%s <devicename>\n", argv[0]);
296                 return 1;
297         };
298   
299         crc16ccitt_init();
300
301         mw_fd = open(argv[1], O_RDWR);
302         if (mw_fd < 0) {
303                 perror("open");
304                 return 1;
305         };
306
307         menu(mw_fd);
308
309         fsync(mw_fd);
310
311         close(mw_fd);
312
313         return 0;
314 };
315