metawatch.c

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