Fix and extend get_light_sensor and get_voltage, move system clock query out of libra...
[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 /* ----------------------------------------------------------------------
55  * Debugging helpers
56  * ---------------------------------------------------------------------- */
57
58 void dump_frame(unsigned char *frame, int len)
59 {
60         int i;
61
62         for (i=0; i<len; i++)
63                 fprintf(stderr, "0x%02x ", frame[i]);
64         fprintf(stderr, "\n");
65 }
66
67
68 int mw_send_frame(mwdevice_t *mwdevice, unsigned char msg_type, unsigned char options, unsigned char *data, unsigned char len)
69 {
70         unsigned short crc;
71         unsigned char frame[64];
72         int tlen = len + 6; /* payload + 6 bytes frameing */
73         int ret;
74
75         memset(frame, 0, 64);
76         frame[0] = MW_SOF;
77         frame[1] = len + 6;
78         frame[2] = msg_type;
79         frame[3] = options;
80         if (data != NULL && len > 0)
81                 memcpy(frame+4, data, len);
82
83         crc = crc16ccitt(frame, len+4);
84         *(unsigned short *)(frame+len+4) = crc;
85
86 #ifdef DEBUG
87         dump_frame(frame, tlen);
88 #endif
89
90         while (((ret = write(mwdevice->mw_fd, frame, tlen)) >= 0) && (tlen > 0))
91                 tlen -= ret;
92
93         if (MW_FRAME_DELAY)
94                 usleep(MW_FRAME_DELAY);
95
96         if (tlen == 0 && ret >= 0)
97                 return 0;
98         else
99                 return ret;
100 }
101
102
103 /* ----------------------------------------------------------------------
104  * Host to watch commands
105  * ---------------------------------------------------------------------- */
106
107
108 int mw_set_rtc(mwdevice_t *mwdevice, struct tm *mw_tm)
109 {
110         unsigned short year;
111         unsigned char data[32];
112
113         year = mw_tm->tm_year + 1900;  
114         data[0] = (year & 0x0f00) >> 8;
115         data[1] = (year & 0x00ff);
116         data[2] = mw_tm->tm_mon + 1;
117         data[3] = mw_tm->tm_mday;
118         data[4] = mw_tm->tm_wday;
119         data[5] = mw_tm->tm_hour;
120         data[6] = mw_tm->tm_min;
121         data[7] = mw_tm->tm_sec;
122
123         return mw_send_frame(mwdevice, MW_SET_REAL_TIME_CLOCK, 0, data, 8);
124 }
125
126 int mw_nval_operation(mwdevice_t *mwdevice, unsigned char operation, unsigned short identifier, unsigned char size, void *mdata)
127 {
128         unsigned char data[32];
129
130         data[0] = (identifier & 0x00ff);
131         data[1] = (identifier & 0xff00) >> 8;
132         data[2] = size;
133         if (size > 0 && mdata != NULL)
134                 memcpy((data+3), mdata, size);
135
136         if (operation == MW_NVAL_OPERATION_READ || operation == MW_NVAL_OPERATION_WRITE) {
137                 return mw_send_frame(mwdevice, MW_NVAL_OPERATION, operation, data, 3+size);
138         } else
139                 return -1;
140 }
141
142 int mw_set_vibrate_mode(mwdevice_t *mwdevice, unsigned char enable, unsigned short on_time, unsigned short off_time, unsigned char cycles)
143 {
144         unsigned char mdata[7];
145
146         mdata[0] = enable;
147         *(unsigned short *)(mdata+1) = on_time; /* miliseconds */
148         *(unsigned short *)(mdata+3) = off_time; /* miliseconds */
149         mdata[5] = cycles;
150
151         return mw_send_frame(mwdevice, MW_SET_VIBRATE_MODE, 0, mdata, 6);
152 }
153
154 int mw_configure_watch_mode(mwdevice_t *mwdevice, unsigned char mode, unsigned char save, unsigned char timeout, unsigned char invert)
155 {
156         unsigned char mdata[3];
157
158         mdata[0] = timeout; /* seconds */
159         mdata[1] = invert; /* 0=normal, 1=invert */
160
161         return mw_send_frame(mwdevice, MW_CONFIGURE_MODE, (mode & 0x0f) | ((save & 0x01) << 4), mdata, 2);
162 }
163
164 int mw_update_display(mwdevice_t *mwdevice, unsigned char mode, unsigned char copy)
165 {
166         mwdevice->screen_mode = (mode & 0x0f);
167         return mw_send_frame(mwdevice, MW_UPDATE_DISPLAY, (mode & 0x0f) | ((copy & 0x01) << 4), NULL, 0);
168 }
169
170 int mw_load_template(mwdevice_t *mwdevice, unsigned char mode, unsigned char template_select)
171 {
172         return mw_send_frame(mwdevice, MW_LOAD_TEMPLATE, (mode & 0x0f), &template_select, 1);
173 }
174
175 /*
176  * send line for screen-mode mode from *buffer to watch, starting at display row row_offset
177  * this is only for digital LCD watch
178  */
179 int mw_write_buffer(mwdevice_t *mwdevice,
180                 unsigned char mode,
181                 unsigned char numlines,         /* number of lines, 0=two lines or 1=one line */
182                 unsigned char row_offset,       /* start at row_offset in display, e.g. lower part in idle @31 */
183                 unsigned char *buffer, int buflen)
184 {
185         unsigned char mdata[32];
186
187         if (mwdevice->devtype != MW_DEVICE_TYPE_DIGITAL && mwdevice->devtype != MW_DEVICE_TYPE_DEVB_DIGI)
188                 return -1;
189
190         buflen = 12 * (buflen / 12);    /* crop to 12 bytes */
191         if ((numlines == 0 && buflen < 12) || (numlines == 1 && buflen < 24)) {
192                 fprintf(stderr, "mw_write_buffer: bufferlen does not match number of lines\n");
193                 return -1;
194         };
195         memset(mdata, 0, 32);
196         mdata[0] = row_offset;
197         memcpy((mdata+1), buffer, 12);
198         if (numlines == 0) {
199                 mdata[13] = row_offset+1;
200                 memcpy((mdata+14), (buffer+12), 12);
201         };
202
203         return mw_send_frame(mwdevice, MW_WRITE_BUFFER, (mode & 0x0f) | (((numlines & 0x01)<< 4) & 0x10), mdata, numlines ? 13 : 26);
204 }
205
206 /*
207    Options:
208         B0   : row select, 0 first row, 1 second row
209         B1   : display select, 0 upper OLED, 1 lower OLED
210         B2   : if 1 send an event upon completion
211         B3..4: scroll type,
212         B5..7: unused
213    Scroll types:
214         B0: First buffer in a chain of scroll buffers
215         B1: Any buffer except first or last
216         B2: Last buffer of a chain
217         B3: reserved / unused
218    Payload:
219         0: Start index col
220         1..: data
221 */
222 int mw_write_oled_buffer(mwdevice_t *mwdevice,
223         unsigned char mode, /* idle or scroll */
224         unsigned char oled, /* which OLED */
225         unsigned char numcols,
226         unsigned char col_index, /* starting index */
227         unsigned char *buffer, int buflen)
228 {
229         unsigned char mdata[32];
230         int i;
231
232         if (mwdevice->devtype != MW_DEVICE_TYPE_ANA_DIGI && mwdevice->devtype != MW_DEVICE_TYPE_DEVB_ANA_DIGI)
233                 return -1;
234         
235         fprintf(stderr, "write oled buf len = %d\n", buflen);
236         /* lower row first since display wil be updated after completion of upper row */
237         if (buflen > 80) {
238                 for (i=80; i<buflen; i+=20) {
239                         mdata[0] = (i-80);
240                         memcpy((mdata+1), (buffer+i), 20);
241                         mw_send_frame(mwdevice, MW_WRITE_OLED_IDLE_DISPLAY_MSG, 0 | (oled ? 2 : 0), mdata, 21);
242                 }
243         }
244         for (i=0; i<80; i+=20) {
245                 mdata[0] = i;
246                 memcpy((mdata+1), (buffer+i), 20);
247                 mw_send_frame(mwdevice, MW_WRITE_OLED_IDLE_DISPLAY_MSG, 1 | (oled ? 2 : 0), mdata, 21);
248         }
249
250         return 0;
251 }
252
253 int mw_enable_button(mwdevice_t *mwdevice,
254                 unsigned char mode,
255                 unsigned char button_index,
256                 unsigned char press_type,
257                 unsigned char callback_type,
258                 unsigned char callback_option)
259 {
260         unsigned char mdata[32];
261
262         memset(mdata, 0, 32);
263         mdata[0] = mode;
264         mdata[1] = button_index;
265         mdata[2] = press_type;
266         mdata[3] = callback_type;
267         mdata[4] = callback_option;
268
269         return mw_send_frame(mwdevice, MW_ENABLE_BUTTON, 0, mdata, 5);
270 }
271
272 int mw_disable_button(mwdevice_t *mwdevice,
273                 unsigned char mode,
274                 unsigned char button_index,
275                 unsigned char press_type)
276 {
277         unsigned char mdata[32];
278
279         memset(mdata, 0, 32);
280         mdata[0] = mode;
281         mdata[1] = button_index;
282         mdata[2] = press_type;
283
284         return mw_send_frame(mwdevice, MW_ENABLE_BUTTON, 0, mdata, 3);
285 }
286
287 int mw_advance_watch_hands(mwdevice_t *mwdevice, unsigned char hours, unsigned char minutes, unsigned char seconds)
288 {
289         unsigned char mdata[4];
290         
291         if (hours > 12)
292                 return -1;
293         if (minutes > 60)
294                 return -1;
295         if (seconds > 60)
296                 return -1;
297
298         mdata[0] = hours;
299         mdata[1] = minutes;
300         mdata[2] = seconds;
301
302         return mw_send_frame(mwdevice, MW_ADVANCE_WATCH_HANDS, 0, mdata, 3);
303 }
304
305
306 /* ----------------------------------------------------------------------
307  * Watch responses, events or notifications
308  * ---------------------------------------------------------------------- */
309
310 int mw_get_device_type_response(mwdevice_t *mwdevice, unsigned char devtype)
311 {
312 #ifdef DEBUG
313         fprintf(stderr, "Got device type ");
314         switch(devtype) {
315                 case 0:
316                         fprintf(stderr, "Reserved\n");
317                         break;
318                 case 1:
319                         fprintf(stderr, "Ana-Digi\n");
320                         break;
321                 case 2:
322                         fprintf(stderr, "Digital\n");
323                         break;
324                 case 3:
325                         fprintf(stderr, "Development Board Digital\n");
326                         break;
327                 case 4:
328                         fprintf(stderr, "Development Board Ana-Digi\n");
329                         break;
330                 default:
331                         fprintf(stderr, "unknown %d\n", devtype);
332                         break;
333         };
334 #endif
335         mwdevice->devtype = devtype;
336         if (mwdevice->mw_get_device_type_response_cb != NULL)
337                 mwdevice->mw_get_device_type_response_cb(mwdevice, devtype, mwdevice->mw_gdtypersp_data);
338         return 0;
339 }
340
341 void mw_set_get_device_type_response_cb(mwdevice_t *mwdevice, void (*mw_get_device_type_response_cb) (mwdevice_t *mwdevice, unsigned char devtype, void *user_data), void *user_data)
342 {
343         if (mw_get_device_type_response_cb != NULL)
344                 mwdevice->mw_get_device_type_response_cb = mw_get_device_type_response_cb;
345         if (user_data != NULL)
346                 mwdevice->mw_gdtypersp_data = user_data;
347 }
348
349 int mw_nval_operation_response(mwdevice_t *mwdevice, unsigned char operation, unsigned short identifier, unsigned char size, void *mdata)
350 {
351         return -1;
352 }
353
354 int mw_get_real_time_clock_response(mwdevice_t *mwdevice, unsigned char *rtcrsp, int len)
355 {
356         struct tm mtm;
357         unsigned short year;
358
359         if (len != 8) {
360                 fprintf(stderr, "get real time clock response length wrong %d != 10\n", len);
361                 return -1;
362         }
363
364         year = *(unsigned short *)rtcrsp;
365         mtm.tm_year = year - 1900;
366         mtm.tm_mon = rtcrsp[2] - 1;
367         mtm.tm_mday = rtcrsp[3];
368         mtm.tm_wday = rtcrsp[4];
369         mtm.tm_hour = rtcrsp[5];
370         mtm.tm_min = rtcrsp[6];
371         mtm.tm_sec = rtcrsp[7];
372
373 #ifdef DEBUG
374         fprintf(stderr, "watch RTC is %s\n", asctime(&mtm));
375 #endif
376         if (mwdevice->mw_get_real_time_clock_response_cb != NULL)
377                 mwdevice->mw_get_real_time_clock_response_cb(mwdevice, &mtm, mwdevice->mw_grtcrsp_data);
378
379         return 0;
380 }
381
382 void mw_set_get_real_time_clock_response_cb(mwdevice_t *mwdevice, void (*mw_get_real_time_clock_response_cb) (mwdevice_t *mwdevice, struct tm *mw_tm, void *user_data), void *user_data)
383 {
384         if (mw_get_real_time_clock_response_cb != NULL)
385                 mwdevice->mw_get_real_time_clock_response_cb = mw_get_real_time_clock_response_cb;
386         if (user_data != NULL)
387                 mwdevice->mw_grtcrsp_data = user_data;
388 }
389
390
391 int mw_get_battery_voltage_response(mwdevice_t *mwdevice, unsigned char *batrsp, int len)
392 {
393         unsigned char power_good = batrsp[0];
394         unsigned char bat_charging = batrsp[1];
395         unsigned short voltage = *(unsigned short *)(batrsp+2);
396         unsigned short voltage_avg = *(unsigned short *)(batrsp+4);
397
398 #ifdef DEBUG
399         fprintf(stderr, "battery is at %dmV (average is %dmV), %s and %s\n", voltage, voltage_avg, power_good ? "power is good" : "power fault", bat_charging ? "charging" : "not charging");
400 #endif
401
402         if (mwdevice->mw_get_battery_voltage_response_cb != NULL)
403                 mwdevice->mw_get_battery_voltage_response_cb(mwdevice, &voltage, &voltage_avg, &power_good, &bat_charging, mwdevice->mw_gbatvrsp_data);
404
405         return 0;
406 }
407
408 void mw_set_get_battery_voltage_response_cb(mwdevice_t *mwdevice, void (*mw_get_battery_voltage_response_cb) (mwdevice_t *mwdevice, unsigned short *voltage, unsigned short *voltage_avg, unsigned char *pgood, unsigned char *charging, void *user_data), void *user_data)
409 {
410         if (mw_get_battery_voltage_response_cb != NULL)
411                 mwdevice->mw_get_battery_voltage_response_cb = mw_get_battery_voltage_response_cb;
412         if (user_data != NULL)
413                 mwdevice->mw_gbatvrsp_data = user_data;
414 }
415
416 int mw_read_button_config_response(mwdevice_t *mwdevice, unsigned char *btnrsp, int len)
417 {
418 #ifdef DEBUG
419         fprintf(stderr, "read button config response\n");
420         fprintf(stderr, "screen mode      : 0x%02x\n", btnrsp[0]);
421         fprintf(stderr, "button index     : 0x%02x\n", btnrsp[1]);
422         fprintf(stderr, "mask table       : 0x%02x (", btnrsp[2]);
423         fprintf(stderr, "%s ", (btnrsp[2] & 0x01) ? "Absolute, " : "");
424         fprintf(stderr, "%s ", (btnrsp[2] & 0x02) ? "Press&Release, " : "");
425         fprintf(stderr, "%s ", (btnrsp[2] & 0x04) ? "Press&Hold, " : "");
426         fprintf(stderr, "%s ", (btnrsp[2] & 0x08) ? "Press&LongHold, " : "");
427         fprintf(stderr, "%s ", (btnrsp[2] & 0x10) ? "Immediate" : "");
428         fprintf(stderr, ")\n");
429         fprintf(stderr, "callback msg type: 0x%02x\n", btnrsp[3]);
430         fprintf(stderr, "callback msg opts: 0x%02d\n", btnrsp[4]);
431 #endif
432
433         return 0;
434 }
435
436 void mw_set_read_button_config_response_cb(mwdevice_t *mwdevice, void (*mw_read_button_config_response_cb) (mwdevice_t *mwdevice, void *user_data), void *user_data)
437 {
438         if (mw_read_button_config_response_cb != NULL)
439                 mwdevice->mw_read_button_config_response_cb = mw_read_button_config_response_cb;
440         if (user_data != NULL)
441                 mwdevice->mw_rbtncnfrsp_data = user_data;
442 }
443
444 int mw_button_event_message(mwdevice_t *mwdevice, unsigned char *btnevt, int len, unsigned char opts)
445 {
446 #ifdef DEBUG
447         fprintf(stderr, "  button %d options %d\n", btnevt[0], opts);
448 #endif
449
450         if (mwdevice->mw_button_event_message_cb != NULL)
451                 mwdevice->mw_button_event_message_cb(mwdevice, btnevt[0], opts, mwdevice->mw_btnevmsg_data);
452
453         return 0;
454 }
455
456 void mw_set_button_event_message_cb(mwdevice_t *mwdevice, void (*mw_button_event_message_cb) (mwdevice_t *mwdevice, unsigned char buttons, unsigned char options, void *user_data), void *user_data)
457 {
458         if (mw_button_event_message_cb != NULL)
459                 mwdevice->mw_button_event_message_cb = mw_button_event_message_cb;
460         if (user_data != NULL)
461                 mwdevice->mw_btnevmsg_data = user_data;
462 }
463
464 int mw_read_light_sensor_response(mwdevice_t *mwdevice, unsigned char *lightrsp, int len)
465 {
466         unsigned short light_level = *(unsigned short *)(lightrsp);
467         unsigned short light_level_avg = *(unsigned short *)(lightrsp+2);
468
469 #ifdef DEBUG
470         fprintf(stderr, "light sensor is at %d, average at %d\n", light_level, light_level_avg);
471 #endif
472
473         if (mwdevice->mw_read_light_sensor_response_cb != NULL)
474                 mwdevice->mw_read_light_sensor_response_cb(mwdevice, &light_level, &light_level_avg, mwdevice->mw_rlsrsp_data);
475
476         return 0;
477 }
478
479 void mw_set_read_light_sensor_response_cb(mwdevice_t *mwdevice, void (*mw_read_light_sensor_response_cb) (mwdevice_t *mwdevice, unsigned short *light_level, unsigned short *light_level_avg, void *user_data), void *user_data)
480 {
481         if (mw_read_light_sensor_response_cb != NULL)
482                 mwdevice->mw_read_light_sensor_response_cb = mw_read_light_sensor_response_cb;
483         if (user_data != NULL)
484                 mwdevice->mw_rlsrsp_data = user_data;
485 }
486
487 int mw_status_change_event(mwdevice_t *mwdevice, unsigned char option, unsigned char *statrsp, int len)
488 {
489         unsigned char mode = (option & 0x0f);
490         unsigned char status = statrsp[0];
491 #ifdef DEBUG
492         fprintf(stderr, "Status change event for mode %s: %s\n", mw_screen_mode_names[mode], mw_status_string[status]); 
493 #endif
494
495         // mwdevice->screen_mode = mode;
496         if (mwdevice->mw_status_change_event_cb != NULL)
497                 mwdevice->mw_status_change_event_cb(mwdevice, &mode, &status, mwdevice->mw_stchev_data);
498
499         return 0;
500 }
501
502 void mw_set_status_change_event_cb(mwdevice_t *mwdevice, void (*mw_status_change_event_cb) (mwdevice_t *mwdevice, unsigned char *scrmode, unsigned char *status, void *user_data), void *user_data)
503 {
504         if (mw_status_change_event_cb != NULL)
505                 mwdevice->mw_status_change_event_cb = mw_status_change_event_cb;
506         if (user_data != NULL)
507                 mwdevice->mw_stchev_data = user_data;
508 }
509
510
511 /* ----------------------------------------------------------------------
512  * Protocol handling
513  * ---------------------------------------------------------------------- */
514
515 int mw_decode_frame(mwdevice_t *mwdevice, unsigned char *buf, int len)
516 {
517         unsigned short crc;
518         unsigned char msglen;
519         unsigned char msgtype;
520         unsigned char msgopt;
521         unsigned char *msgdata;
522         unsigned char msgdatalen;
523
524         /* check frame */
525         crc = *(unsigned short *)(buf+len-2);
526         if (crc != crc16ccitt(buf, len-2)) {
527                 fprintf(stderr, "decode frame CRC error\n");
528                 return -1;
529         }
530         if (buf[0] != MW_SOF) {
531                 fprintf(stderr, "decode frame SOF not found\n");
532                 return -1;
533         }
534
535         msglen = buf[1];
536         msgtype = buf[2];
537         msgopt = buf[3];
538         msgdata = (buf+4);
539         msgdatalen = msglen - 4 - 2;
540
541         switch (msgtype) {
542                 case MW_GET_DEVICE_TYPE_RSP:
543                         mw_get_device_type_response(mwdevice, msgdata[0]);
544                         break;
545                 case MW_GET_INFORMATION_STRING_RSP:
546                         msgdata[len-2] = 0;
547                         fprintf(stderr, "Got info string '%s'\n", msgdata);
548                         break;
549                 case MW_GET_REAL_TIME_CLOCK_RSP:
550                         mw_get_real_time_clock_response(mwdevice, msgdata, msgdatalen);
551                         break;
552                 case MW_READ_BATTERY_VOLTAGE_RSP:
553                         mw_get_battery_voltage_response(mwdevice, msgdata, msgdatalen);
554                         break;
555                 case MW_READ_LIGHT_SENSOR_RSP:
556                         mw_read_light_sensor_response(mwdevice, msgdata, msgdatalen);
557                         break;
558                 case MW_LOW_BATTERY_WARNING_MSG:
559                         fprintf(stderr, "Watch battery low, please connect charger\n");
560                         break;
561                 case MW_READ_BUTTON_CONFIG_RSP:
562                         mw_read_button_config_response(mwdevice, msgdata, msgdatalen);
563                         break;
564                 case MW_BUTTON_EVENT_MESSAGE:
565                         fprintf(stderr, "Button event message\n");
566                         mw_button_event_message(mwdevice, msgdata, msgdatalen, msgopt);
567                         break;
568                 case MW_LOW_BATTERY_BT_OFF_MSG:
569                         fprintf(stderr, "Watch battery extremely low - radio will turn off\n");
570                         break;
571                 case MW_NVAL_OPERATION_RSP:
572                         fprintf(stderr, "NVAL operation response - ");
573                         switch (msgopt) {
574                                 case 0x00:
575                                         fprintf(stderr, "success\n");
576                                         break;
577                                 case 0x01:
578                                         fprintf(stderr, "failure!\n");
579                                         break;
580                                 case 0x09:
581                                         fprintf(stderr, "Item Not initialized (Identifier Not found\n");
582                                         break;
583                                 case 0x0a:
584                                         fprintf(stderr, "Operation failed\n");
585                                         break;
586                                 case 0x0c:
587                                         fprintf(stderr, "Bad Item length\n");
588                                         break;
589                                 default:
590                                         fprintf(stderr, "unknown status 0x%02x\n", msgopt);
591                                         break;
592                         };
593                         break;
594                 case MW_STATUS_CHANGE_EVENT:
595                         mw_status_change_event(mwdevice, msgopt, msgdata, msgdatalen);
596                         break;
597                 default:
598                         fprintf(stderr, "Unkown msgtype 0x%02x\n", msgtype);
599                         break;
600         };
601
602         return msglen;
603 }
604
605
606 int mw_feed_msg_buffer(mwdevice_t *mwdevice, unsigned char *buf, int len)
607 {
608         char msgbuf[64];
609         int tlen;
610
611         if (len <= 0)
612                 return -1;
613
614         memcpy((mwdevice->pbuf+mwdevice->pbuf_len), buf, len);
615         mwdevice->pbuf_len += len;
616         
617         while (mwdevice->pbuf_len > 0) {
618                 /* scan for MW_SOF */
619                 while (mwdevice->pbuf[0] != MW_SOF) {
620                         memmove(mwdevice->pbuf, (mwdevice->pbuf+1), --mwdevice->pbuf_len);
621                 }
622                 tlen = mwdevice->pbuf[1];
623                 /* OK, there is an SOF but the message is too short */
624                 if (tlen > mwdevice->pbuf_len) {
625                         /* we have to wait for more data to come in */
626                         break;
627                 }
628                 /* here we have a complete msg */
629                 memcpy(msgbuf, mwdevice->pbuf, tlen);
630                 mw_decode_frame(mwdevice, (unsigned char *)msgbuf, tlen);
631                 memmove(mwdevice->pbuf, (mwdevice->pbuf+tlen), tlen);
632                 mwdevice->pbuf_len -= tlen;
633         }
634         return 0;
635 }
636
637
638 /* ----------------------------------------------------------------------
639  * General code usage
640  * ---------------------------------------------------------------------- */
641
642 int mw_init(mwdevice_t *mwdevice, int mw_fd)
643 {
644         memset(mwdevice, 0, sizeof(mwdevice_t));
645         mwdevice->mw_fd = mw_fd;
646         memset(mwdevice->pbuf, 0, MW_PBUF_LEN);
647         mwdevice->pbuf_len = 0;
648
649         /* figure out which device we run with */
650         mw_send_frame(mwdevice, MW_GET_DEVICE_TYPE, 0, NULL, 0);
651
652         return 0;
653 }
654
655 /* ----------------------------------------------------------------------
656  * Convenience functions not strictly part of the protocol
657  * ---------------------------------------------------------------------- */
658
659 int mw_get_resolution(mwdevice_t *mwdevice, unsigned int *width, unsigned int *height)
660 {
661         if (width == NULL || height == NULL)
662                 return -1;
663
664         switch (mwdevice->devtype) {
665                 case MW_DEVICE_TYPE_RESERVED:
666                         return -1;
667                 case MW_DEVICE_TYPE_ANA_DIGI:
668                 case MW_DEVICE_TYPE_DEVB_ANA_DIGI:
669                         *width = 80;
670                         *height = 16;
671                         break;
672                 case MW_DEVICE_TYPE_DIGITAL:
673                 case MW_DEVICE_TYPE_DEVB_DIGI:
674                         *width = 96;
675                         *height = 96;
676                         break;
677                 default:
678                         break;
679         };
680
681         return 0;
682 }
683
684
685 /* if flip=1 bits in each byte are inverted 7->1, 6->2, 5->3,...
686    if invert=1 each byte is inverted
687  */
688 void bmap_buffer_flipinvert(unsigned char flip, unsigned char invert, unsigned char *buf, int len)
689 {
690         int i;
691         unsigned char tmp;
692
693         while (len--) {
694                 tmp = 0;
695                 if (flip) {
696                         for (i=0; i<8; i++)
697                                 tmp |= ((*buf & (1<<i)) >> i) << (7-i);
698                         // fprintf(stderr, "0x%02x -> 0x%02x\n", *buf, tmp);
699                 } else
700                         tmp = *buf;
701                 *buf = invert ? ~tmp : tmp;
702                 buf++;
703         }
704 }
705
706
707 void mw_send_bitmap(mwdevice_t *mwdevice, unsigned char mode, int width, int height, int offset, unsigned char *bmapbuf, int buflen)
708 {
709 #ifdef DEBUG
710         unsigned int i, x;
711 #endif
712         unsigned int y, rowlength;
713         unsigned char mw_buf[24];
714
715         rowlength = (((width-1) / 8) + 1);
716         if ((height + offset) > 96)
717                 height = 96 - offset;
718
719 #ifdef DEBUG
720         fprintf(stderr, "row length = %d bytes\n", rowlength);
721         fprintf(stderr, "bitmap resolution is %d x %d\n", width, height);
722         fprintf(stderr, "\n");
723         for (y=0; y<height; y++) {
724                 for (x=0; x<rowlength; x++) {
725                         for (i=0; i<8; i++)
726                                 fprintf(stderr, "%c", (bmapbuf[(y*rowlength)+x] & (1<<(7-i))) ? '.' : ' ');
727                 }
728                 fprintf(stderr, "\n");
729         }
730         fprintf(stderr, "\n");
731 #endif
732
733         for (y=0; y<height; y+=2) {
734                 memset(mw_buf, 0, 24);
735                 memcpy(mw_buf, (bmapbuf+(y*rowlength)), (rowlength > 12) ? 12 : rowlength);
736                 memcpy((mw_buf+12), (bmapbuf+((y+1)*rowlength)), (rowlength > 12) ? 12 : rowlength);
737                 mw_write_buffer(mwdevice, mode, 0, offset+y, mw_buf, 24);
738         }
739 }
740