dd3af80b80a7bedde765fd8cea43bb168ea95d42
[metawatch.git] / metawatch.c
1 /*
2  * (c) 2011 Siegen, Germany by Nils Faerber <nils.faerber@kernelconcepts.de>
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19
20 #include <stdio.h>
21 #include <sys/types.h>
22 #include <sys/stat.h>
23 #include <fcntl.h>
24 #include <unistd.h>
25 #include <stdlib.h>
26 #include <string.h>
27 #include <time.h>
28 #include <termios.h>
29 #include <ctype.h>
30
31 #include "metawatch.h"
32 #include "metawatch_protocol.h"
33 #include "crc16ccitt.h"
34
35
36 #ifdef DEBUG
37 const char *mw_screen_mode_names[] = {
38         "idle screen",
39         "application screen",
40         "notification screen",
41         "scroll"
42 };
43
44 const char *mw_status_string[] = {
45         "Reserved",
46         "Mode Change",
47         "Display Timeout"
48 };
49 #endif
50
51
52 #define MW_FRAME_DELAY          0x00
53
54 void dump_frame(unsigned char *frame, int len)
55 {
56         int i;
57
58         for (i=0; i<len; i++)
59                 fprintf(stderr, "0x%02x ", frame[i]);
60         fprintf(stderr, "\n");
61 }
62
63
64 int mw_send_frame(int mw_fd, unsigned char msg_type, unsigned char options, unsigned char *data, unsigned char len)
65 {
66         unsigned short crc;
67         unsigned char frame[64];
68         int tlen = len + 6; /* payload + 6 bytes frameing */
69         int ret;
70
71         memset(frame, 0, 64);
72         frame[0] = MW_SOF;
73         frame[1] = len + 6;
74         frame[2] = msg_type;
75         frame[3] = options;
76         if (data != NULL && len > 0)
77                 memcpy(frame+4, data, len);
78
79         crc = crc16ccitt(frame, len+4);
80         *(unsigned short *)(frame+len+4) = crc;
81
82 #ifdef DEBUG
83         dump_frame(frame, tlen);
84 #endif
85
86         while (((ret = write(mw_fd, frame, tlen)) >= 0) && (tlen > 0))
87                 tlen -= ret;
88
89         if (MW_FRAME_DELAY)
90                 usleep(MW_FRAME_DELAY);
91
92         if (tlen == 0 && ret >= 0)
93                 return 0;
94         else
95                 return ret;
96 }
97
98
99 /* ----------------------------------------------------------------------
100  * Host to watch commands
101  * ---------------------------------------------------------------------- */
102
103
104 void mw_set_rtc(int mw_fd, unsigned char clk1224, unsigned char date_fmt)
105 {
106         time_t mtime;
107         struct tm mtm;
108         unsigned short year;
109         unsigned char data[32];
110
111         mtime = time(NULL);
112         localtime_r(&mtime, &mtm);
113
114         year = mtm.tm_year + 1900;  
115         data[0] = (year & 0x0f00) >> 8;
116         data[1] = (year & 0x00ff);
117         data[2] = mtm.tm_mon + 1;
118         data[3] = mtm.tm_mday;
119         data[4] = mtm.tm_wday;
120         data[5] = mtm.tm_hour;
121         data[6] = mtm.tm_min;
122         data[7] = mtm.tm_sec;
123         data[8] = clk1224;
124         data[9] = date_fmt;
125
126         mw_send_frame(mw_fd, MW_SET_REAL_TIME_CLOCK, 0, data, 10);
127 }
128
129 void mw_set_vibrate_mode(int mw_fd, unsigned char enable, unsigned short on_time, unsigned short off_time, unsigned char cycles)
130 {
131         unsigned char mdata[7];
132
133         mdata[0] = enable;
134         *(unsigned short *)(mdata+1) = on_time; /* miliseconds */
135         *(unsigned short *)(mdata+3) = off_time; /* miliseconds */
136         mdata[5] = cycles;
137         mw_send_frame(mw_fd, MW_SET_VIBRATE_MODE, 0, mdata, 6);
138 }
139
140 void mw_configure_watch_mode(int mw_fd, unsigned char mode, unsigned char save, unsigned char timeout, unsigned char invert)
141 {
142         unsigned char mdata[3];
143
144         mdata[0] = timeout; /* seconds */
145         mdata[1] = invert; /* 0=normal, 1=invert */
146         mw_send_frame(mw_fd, MW_CONFIGURE_MODE, (mode & 0x0f) | ((save & 0x01) << 4), mdata, 2);
147 }
148
149 void mw_update_display(int mw_fd, unsigned char mode, unsigned char copy)
150 {
151         mw_send_frame(mw_fd, MW_UPDATE_DISPLAY, (mode & 0x0f) | ((copy & 0x01) << 4), NULL, 0);
152 }
153
154 void mw_load_template(int mw_fd, unsigned char mode, unsigned char template_select)
155 {
156         mw_send_frame(mw_fd, MW_LOAD_TEMPLATE, (mode & 0x0f), &template_select, 1);
157 }
158
159 /*
160  * send line for screen-mode mode from *buffer to watch, starting at display row row_offset
161  */
162 void mw_write_buffer(int mw_fd,
163                 unsigned char mode,
164                 unsigned char numlines,         /* number of lines, 0=two lines or 1=one line */
165                 unsigned char row_offset,       /* start at row_offset in display, e.g. lower part in idle @31 */
166                 unsigned char *buffer, int buflen)
167 {
168         unsigned char mdata[32];
169
170         buflen = 12 * (buflen / 12);    /* crop to 12 bytes */
171         if ((numlines == 0 && buflen < 12) || (numlines == 1 && buflen < 24)) {
172                 fprintf(stderr, "mw_write_buffer: bufferlen does not match number of lines\n");
173                 return;
174         };
175         memset(mdata, 0, 32);
176         mdata[0] = row_offset;
177         memcpy((mdata+1), buffer, 12);
178         if (numlines == 0) {
179                 mdata[13] = row_offset+1;
180                 memcpy((mdata+14), (buffer+12), 12);
181         };
182         mw_send_frame(mw_fd, MW_WRITE_BUFFER, (mode & 0x0f) | (((numlines & 0x01)<< 4) & 0x10), mdata, numlines ? 13 : 26);
183 }
184
185 void mw_enable_button(int mw_fd,
186                 unsigned char mode,
187                 unsigned char button_index,
188                 unsigned char press_type,
189                 unsigned char callback_type,
190                 unsigned char callback_option)
191 {
192         unsigned char mdata[32];
193
194         memset(mdata, 0, 32);
195         mdata[0] = mode;
196         mdata[1] = button_index;
197         mdata[2] = press_type;
198         mdata[3] = callback_type;
199         mdata[4] = callback_option;
200         mw_send_frame(mw_fd, MW_ENABLE_BUTTON, 0, mdata, 5);
201 }
202
203 void mw_disable_button(int mw_fd,
204                 unsigned char mode,
205                 unsigned char button_index,
206                 unsigned char press_type)
207 {
208         unsigned char mdata[32];
209
210         memset(mdata, 0, 32);
211         mdata[0] = mode;
212         mdata[1] = button_index;
213         mdata[2] = press_type;
214         mw_send_frame(mw_fd, MW_ENABLE_BUTTON, 0, mdata, 3);
215 }
216
217 /* ----------------------------------------------------------------------
218  * Watch responses, events or notifications
219  * ---------------------------------------------------------------------- */
220
221
222 void mw_get_real_time_clock_response(int mw_fd, unsigned char *rtcrsp, int len)
223 {
224         struct tm mtm;
225         unsigned short year;
226         unsigned char clk1224, date_fmt;
227
228         if (len != 10) {
229                 fprintf(stderr, "get real time clock response too short %d != 10\n", len);
230                 return;
231         }
232
233         year = *(unsigned short *)rtcrsp;
234         mtm.tm_year = year - 1900;
235         mtm.tm_mon = rtcrsp[2] - 1;
236         mtm.tm_mday = rtcrsp[3];
237         mtm.tm_wday = rtcrsp[4];
238         mtm.tm_hour = rtcrsp[5];
239         mtm.tm_min = rtcrsp[6];
240         mtm.tm_sec = rtcrsp[7];
241         clk1224 = rtcrsp[8];
242         date_fmt = rtcrsp[9];
243
244         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");
245 }
246
247 void mw_get_battery_voltage_response(int mw_fd, unsigned char *batrsp, int len)
248 {
249         unsigned short voltage = *(unsigned short *)batrsp;
250         unsigned char power_good = batrsp[2];
251         unsigned char bat_charging = batrsp[3];
252
253         fprintf(stderr, "battery is at %dV, %s and %s\n", voltage, power_good ? "power is good" : "power fault", bat_charging ? "charging" : "not charging");
254 }
255
256 void mw_read_button_config_response(int mw_fd, unsigned char *btnrsp, int len)
257 {
258         fprintf(stderr, "read button config response\n");
259         fprintf(stderr, "screen mode      : 0x%02x\n", btnrsp[0]);
260         fprintf(stderr, "button index     : 0x%02x\n", btnrsp[1]);
261         fprintf(stderr, "mask table       : 0x%02x (", btnrsp[2]);
262         fprintf(stderr, "%s ", (btnrsp[2] & 0x01) ? "Absolute, " : "");
263         fprintf(stderr, "%s ", (btnrsp[2] & 0x02) ? "Press&Release, " : "");
264         fprintf(stderr, "%s ", (btnrsp[2] & 0x04) ? "Press&Hold, " : "");
265         fprintf(stderr, "%s ", (btnrsp[2] & 0x08) ? "Press&LongHold, " : "");
266         fprintf(stderr, "%s ", (btnrsp[2] & 0x10) ? "Immediate" : "");
267         fprintf(stderr, ")\n");
268         fprintf(stderr, "callback msg type: 0x%02x\n", btnrsp[3]);
269         fprintf(stderr, "callback msg opts: 0x%02d\n", btnrsp[4]);
270 }
271
272 void mw_read_light_sensor_response(int mw_fd, unsigned char *lightrsp, int len)
273 {
274         unsigned char power_good = lightrsp[0];
275         unsigned char bat_charging = lightrsp[1];
276         unsigned short voltage = *(unsigned short *)(lightrsp+2);
277
278         fprintf(stderr, "light sensor is at %d, power stat: %s and %s\n", voltage, power_good ? "power is good" : "power fault", bat_charging ? "charging" : "not charging");
279 }
280
281 void mw_status_change_event(int mw_fd, unsigned char option, unsigned char *statrsp, int len)
282 {
283 #ifdef DEBUG
284         fprintf(stderr, "Status change event for mode %s: %s\n", mw_screen_mode_names[option&0x0f], mw_status_string[statrsp[0]]);      
285 #endif
286 }
287
288
289 /* ----------------------------------------------------------------------
290  * Protocol handling
291  * ---------------------------------------------------------------------- */
292
293
294 int decode_frame(int mw_fd, unsigned char *buf, int len)
295 {
296         unsigned short crc;
297         unsigned char msglen;
298         unsigned char msgtype;
299         unsigned char msgopt;
300         unsigned char *msgdata;
301
302         /* check frame */
303         crc = *(unsigned short *)(buf+len-2);
304         if (crc != crc16ccitt(buf, len-2)) {
305                 fprintf(stderr, "decode frame CRC error\n");
306                 return 1;
307         }
308 #ifdef DEBUG
309          else
310                 fprintf(stderr, "decode frame CRC OK\n");
311 #endif
312         if (buf[0] != MW_SOF) {
313                 fprintf(stderr, "decode frame SOF not found\n");
314                 return 1;
315         }
316 #ifdef DEBUG
317          else
318         fprintf(stderr, "decode frame found SOF\n");
319 #endif
320
321         msglen = buf[1];
322         msgtype = buf[2];
323         msgopt = buf[3];
324         msgdata = (buf+4);
325
326         switch (msgtype) {
327                 case MW_GET_DEVICE_TYPE_RSP:
328                         fprintf(stderr, "Got device type ");
329                         switch(msgdata[0]) {
330                                 case 0:
331                                         fprintf(stderr, "Reserved\n");
332                                         break;
333                                 case 1:
334                                         fprintf(stderr, "Ana-Digi\n");
335                                         break;
336                                 case 2:
337                                         fprintf(stderr, "Digital\n");
338                                         break;
339                                 case 3:
340                                         fprintf(stderr, "Development Board Digital\n");
341                                         break;
342                                 case 4:
343                                         fprintf(stderr, "Development Board Ana-Digi\n");
344                                         break;
345                                 default:
346                                         fprintf(stderr, "unknown %d\n", msgdata[0]);
347                                         break;
348                         };
349                         break;
350                 case MW_GET_INFORMATION_STRING_RSP:
351                         msgdata[len-2] = 0;
352                         fprintf(stderr, "Got info string '%s'\n", msgdata);
353                         break;
354                 case MW_GET_REAL_TIME_CLOCK_RSP:
355                         mw_get_real_time_clock_response(mw_fd, msgdata, len-2);
356                         break;
357                 case MW_READ_BATTERY_VOLTAGE_RSP:
358                         mw_get_battery_voltage_response(mw_fd, msgdata, len-2);
359                         break;
360                 case MW_READ_LIGHT_SENSOR_RSP:
361                         mw_read_light_sensor_response(mw_fd, msgdata, len-2);
362                         break;
363                 case MW_LOW_BATTERY_WARNING_MSG:
364                         fprintf(stderr, "Watch battery low, please connect charger\n");
365                         break;
366                 case MW_READ_BUTTON_CONFIG_RSP:
367                         mw_read_button_config_response(mw_fd, msgdata, len-2);
368                         break;
369                 case MW_BUTTON_EVENT_MESSAGE:
370                         fprintf(stderr, "Button event message\n");
371                         break;
372                 case MW_LOW_BATTERY_BT_OFF_MSG:
373                         fprintf(stderr, "Watch battery extremely low - radio will turn off\n");
374                         break;
375                 case MW_STATUS_CHANGE_EVENT:
376                         mw_status_change_event(mw_fd, msgopt, msgdata, len-2);
377                         break;
378                 default:
379                         fprintf(stderr, "Unkown msgtype 0x%02x\n", msgtype);
380                         break;
381         };
382
383         return 0;
384 }
385
386
387 /* ----------------------------------------------------------------------
388  * Convenience functions not strictly part of the protocol
389  * ---------------------------------------------------------------------- */
390
391 /* if flip=1 bits in each byte are inverted 7->1, 6->2, 5->3,...
392    if invert=1 each byte is inverted
393  */
394 void bmap_buffer_flipinvert(unsigned char flip, unsigned char invert, unsigned char *buf, int len)
395 {
396         int i;
397         unsigned char tmp;
398
399         while (len--) {
400                 tmp = 0;
401                 if (flip) {
402                         for (i=0; i<8; i++)
403                                 tmp |= ((*buf & (1<<i)) >> i) << (7-i);
404                         // fprintf(stderr, "0x%02x -> 0x%02x\n", *buf, tmp);
405                 } else
406                         tmp = *buf;
407                 *buf = invert ? ~tmp : tmp;
408                 buf++;
409         }
410 }
411
412
413 void mw_send_bitmap(int mw_fd, unsigned char mode, int width, int height, int offset, unsigned char *bmapbuf, int buflen)
414 {
415 #ifdef DEBUG
416         unsigned int i, x;
417 #endif
418         unsigned int y, rowlength;
419         unsigned char mw_buf[24];
420
421         rowlength = (((width-1) / 8) + 1);
422         if ((height + offset) > 96)
423                 height = 96 - offset;
424
425 #ifdef DEBUG
426         fprintf(stderr, "row length = %d bytes\n", rowlength);
427         fprintf(stderr, "bitmap resolution is %d x %d\n", width, height);
428         fprintf(stderr, "\n");
429         for (y=0; y<height; y++) {
430                 for (x=0; x<rowlength; x++) {
431                         for (i=0; i<8; i++)
432                                 fprintf(stderr, "%c", (bmapbuf[(y*rowlength)+x] & (1<<(7-i))) ? '.' : ' ');
433                 }
434                 fprintf(stderr, "\n");
435         }
436         fprintf(stderr, "\n");
437 #endif
438
439         for (y=0; y<height; y+=2) {
440                 memset(mw_buf, 0, 24);
441                 memcpy(mw_buf, (bmapbuf+(y*rowlength)), (rowlength > 12) ? 12 : rowlength);
442                 memcpy((mw_buf+12), (bmapbuf+((y+1)*rowlength)), (rowlength > 12) ? 12 : rowlength);
443                 mw_write_buffer(mw_fd, mode, 0, offset+y, mw_buf, 24);
444         }
445 }
446