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 /*
 186    Options:
 187         B0   : row select, 0 first row, 1 second row
 188         B1   : display select, 0 upper OLED, 1 lower OLED
 189         B2   : if 1 send an event upon completion
 190         B3..4: scroll type,
 191         B5..7: unused
 192    Scroll types:
 193         B0: First buffer in a chain of scroll buffers
 194         B1: Any buffer except first or last
 195         B2: Last buffer of a chain
 196         B3: reserved / unused
 197    Payload:
 198         0: Start index col
 199         1..: data
 200 */
 201 void mw_write_oled_buffer(int mw_fd,
 202         unsigned char mode, /* idle or scroll */
 203         unsigned char oled, /* which OLED */
 204         unsigned char numcols,
 205         unsigned char col_index, /* starting index */
 206         unsigned char *buffer, int buflen)
 207 {
 208         unsigned char mdata[32];
 209         int i;
 210
 211         /* lower row first since display wil be updated after completion of upper row */
 212         if (buflen > 80) {
 213                 for (i=80; i<buflen; i+=20) {
 214                         mdata[0] = (i-80);
 215                         memcpy((mdata+1), (buffer+i), 20);
 216                         mw_send_frame(mw_fd, MW_WRITE_OLED_IDLE_DISPLAY_MSG, 0 | (oled ? 2 : 0), mdata, 21);
 217                 }
 218         }
 219         for (i=0; i<80; i+=20) {
 220                 mdata[0] = i;
 221                 memcpy((mdata+1), (buffer+i), 20);
 222                 mw_send_frame(mw_fd, MW_WRITE_OLED_IDLE_DISPLAY_MSG, 1 | (oled ? 2 : 0), mdata, 21);
 223         }
 224 }
 225
 226 void mw_enable_button(int mw_fd,
 227                 unsigned char mode,
 228                 unsigned char button_index,
 229                 unsigned char press_type,
 230                 unsigned char callback_type,
 231                 unsigned char callback_option)
 232 {
 233         unsigned char mdata[32];
 234
 235         memset(mdata, 0, 32);
 236         mdata[0] = mode;
 237         mdata[1] = button_index;
 238         mdata[2] = press_type;
 239         mdata[3] = callback_type;
 240         mdata[4] = callback_option;
 241         mw_send_frame(mw_fd, MW_ENABLE_BUTTON, 0, mdata, 5);
 242 }
 243
 244 void mw_disable_button(int mw_fd,
 245                 unsigned char mode,
 246                 unsigned char button_index,
 247                 unsigned char press_type)
 248 {
 249         unsigned char mdata[32];
 250
 251         memset(mdata, 0, 32);
 252         mdata[0] = mode;
 253         mdata[1] = button_index;
 254         mdata[2] = press_type;
 255         mw_send_frame(mw_fd, MW_ENABLE_BUTTON, 0, mdata, 3);
 256 }
 257
 258 /* ----------------------------------------------------------------------
 259  * Watch responses, events or notifications
 260  * ---------------------------------------------------------------------- */
 261
 262
 263 void mw_get_real_time_clock_response(int mw_fd, unsigned char *rtcrsp, int len)
 264 {
 265         struct tm mtm;
 266         unsigned short year;
 267         unsigned char clk1224, date_fmt;
 268
 269         if (len != 10) {
 270                 fprintf(stderr, "get real time clock response length wrong %d != 10\n", len);
 271                 return;
 272         }
 273
 274         year = *(unsigned short *)rtcrsp;
 275         mtm.tm_year = year - 1900;
 276         mtm.tm_mon = rtcrsp[2] - 1;
 277         mtm.tm_mday = rtcrsp[3];
 278         mtm.tm_wday = rtcrsp[4];
 279         mtm.tm_hour = rtcrsp[5];
 280         mtm.tm_min = rtcrsp[6];
 281         mtm.tm_sec = rtcrsp[7];
 282         clk1224 = rtcrsp[8];
 283         date_fmt = rtcrsp[9];
 284
 285         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");
 286 }
 287
 288 void mw_get_battery_voltage_response(int mw_fd, unsigned char *batrsp, int len)
 289 {
 290         unsigned short voltage = *(unsigned short *)batrsp;
 291         unsigned char power_good = batrsp[2];
 292         unsigned char bat_charging = batrsp[3];
 293
 294         fprintf(stderr, "battery is at %dV, %s and %s\n", voltage, power_good ? "power is good" : "power fault", bat_charging ? "charging" : "not charging");
 295 }
 296
 297 void mw_read_button_config_response(int mw_fd, unsigned char *btnrsp, int len)
 298 {
 299         fprintf(stderr, "read button config response\n");
 300         fprintf(stderr, "screen mode      : 0x%02x\n", btnrsp[0]);
 301         fprintf(stderr, "button index     : 0x%02x\n", btnrsp[1]);
 302         fprintf(stderr, "mask table       : 0x%02x (", btnrsp[2]);
 303         fprintf(stderr, "%s ", (btnrsp[2] & 0x01) ? "Absolute, " : "");
 304         fprintf(stderr, "%s ", (btnrsp[2] & 0x02) ? "Press&Release, " : "");
 305         fprintf(stderr, "%s ", (btnrsp[2] & 0x04) ? "Press&Hold, " : "");
 306         fprintf(stderr, "%s ", (btnrsp[2] & 0x08) ? "Press&LongHold, " : "");
 307         fprintf(stderr, "%s ", (btnrsp[2] & 0x10) ? "Immediate" : "");
 308         fprintf(stderr, ")\n");
 309         fprintf(stderr, "callback msg type: 0x%02x\n", btnrsp[3]);
 310         fprintf(stderr, "callback msg opts: 0x%02d\n", btnrsp[4]);
 311 }
 312
 313 void mw_read_light_sensor_response(int mw_fd, unsigned char *lightrsp, int len)
 314 {
 315         unsigned char power_good = lightrsp[0];
 316         unsigned char bat_charging = lightrsp[1];
 317         unsigned short voltage = *(unsigned short *)(lightrsp+2);
 318
 319         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");
 320 }
 321
 322 void mw_status_change_event(int mw_fd, unsigned char option, unsigned char *statrsp, int len)
 323 {
 324 #ifdef DEBUG
 325         fprintf(stderr, "Status change event for mode %s: %s\n", mw_screen_mode_names[option&0x0f], mw_status_string[statrsp[0]]);
 326 #endif
 327 }
 328
 329
 330 /* ----------------------------------------------------------------------
 331  * Protocol handling
 332  * ---------------------------------------------------------------------- */
 333
 334
 335 int decode_frame(int mw_fd, unsigned char *buf, int len)
 336 {
 337         unsigned short crc;
 338         unsigned char msglen;
 339         unsigned char msgtype;
 340         unsigned char msgopt;
 341         unsigned char *msgdata;
 342         unsigned char msgdatalen;
 343
 344         /* check frame */
 345         crc = *(unsigned short *)(buf+len-2);
 346         if (crc != crc16ccitt(buf, len-2)) {
 347                 fprintf(stderr, "decode frame CRC error\n");
 348                 return 1;
 349         }
 350 #ifdef DEBUG
 351          else
 352                 fprintf(stderr, "decode frame CRC OK\n");
 353 #endif
 354         if (buf[0] != MW_SOF) {
 355                 fprintf(stderr, "decode frame SOF not found\n");
 356                 return 1;
 357         }
 358 #ifdef DEBUG
 359          else
 360         fprintf(stderr, "decode frame found SOF\n");
 361 #endif
 362
 363         msglen = buf[1];
 364         msgtype = buf[2];
 365         msgopt = buf[3];
 366         msgdata = (buf+4);
 367         msgdatalen = msglen - 4 - 2;
 368
 369         switch (msgtype) {
 370                 case MW_GET_DEVICE_TYPE_RSP:
 371                         fprintf(stderr, "Got device type ");
 372                         switch(msgdata[0]) {
 373                                 case 0:
 374                                         fprintf(stderr, "Reserved\n");
 375                                         break;
 376                                 case 1:
 377                                         fprintf(stderr, "Ana-Digi\n");
 378                                         break;
 379                                 case 2:
 380                                         fprintf(stderr, "Digital\n");
 381                                         break;
 382                                 case 3:
 383                                         fprintf(stderr, "Development Board Digital\n");
 384                                         break;
 385                                 case 4:
 386                                         fprintf(stderr, "Development Board Ana-Digi\n");
 387                                         break;
 388                                 default:
 389                                         fprintf(stderr, "unknown %d\n", msgdata[0]);
 390                                         break;
 391                         };
 392                         break;
 393                 case MW_GET_INFORMATION_STRING_RSP:
 394                         msgdata[len-2] = 0;
 395                         fprintf(stderr, "Got info string '%s'\n", msgdata);
 396                         break;
 397                 case MW_GET_REAL_TIME_CLOCK_RSP:
 398                         mw_get_real_time_clock_response(mw_fd, msgdata, msgdatalen);
 399                         break;
 400                 case MW_READ_BATTERY_VOLTAGE_RSP:
 401                         mw_get_battery_voltage_response(mw_fd, msgdata, msgdatalen);
 402                         break;
 403                 case MW_READ_LIGHT_SENSOR_RSP:
 404                         mw_read_light_sensor_response(mw_fd, msgdata, msgdatalen);
 405                         break;
 406                 case MW_LOW_BATTERY_WARNING_MSG:
 407                         fprintf(stderr, "Watch battery low, please connect charger\n");
 408                         break;
 409                 case MW_READ_BUTTON_CONFIG_RSP:
 410                         mw_read_button_config_response(mw_fd, msgdata, msgdatalen);
 411                         break;
 412                 case MW_BUTTON_EVENT_MESSAGE:
 413                         fprintf(stderr, "Button event message\n");
 414                         break;
 415                 case MW_LOW_BATTERY_BT_OFF_MSG:
 416                         fprintf(stderr, "Watch battery extremely low - radio will turn off\n");
 417                         break;
 418                 case MW_STATUS_CHANGE_EVENT:
 419                         mw_status_change_event(mw_fd, msgopt, msgdata, msgdatalen);
 420                         break;
 421                 default:
 422                         fprintf(stderr, "Unkown msgtype 0x%02x\n", msgtype);
 423                         break;
 424         };
 425
 426         return 0;
 427 }
 428
 429
 430 /* ----------------------------------------------------------------------
 431  * Convenience functions not strictly part of the protocol
 432  * ---------------------------------------------------------------------- */
 433
 434 /* if flip=1 bits in each byte are inverted 7->1, 6->2, 5->3,...
 435    if invert=1 each byte is inverted
 436  */
 437 void bmap_buffer_flipinvert(unsigned char flip, unsigned char invert, unsigned char *buf, int len)
 438 {
 439         int i;
 440         unsigned char tmp;
 441
 442         while (len--) {
 443                 tmp = 0;
 444                 if (flip) {
 445                         for (i=0; i<8; i++)
 446                                 tmp |= ((*buf & (1<<i)) >> i) << (7-i);
 447                         // fprintf(stderr, "0x%02x -> 0x%02x\n", *buf, tmp);
 448                 } else
 449                         tmp = *buf;
 450                 *buf = invert ? ~tmp : tmp;
 451                 buf++;
 452         }
 453 }
 454
 455
 456 void mw_send_bitmap(int mw_fd, unsigned char mode, int width, int height, int offset, unsigned char *bmapbuf, int buflen)
 457 {
 458 #ifdef DEBUG
 459         unsigned int i, x;
 460 #endif
 461         unsigned int y, rowlength;
 462         unsigned char mw_buf[24];
 463
 464         rowlength = (((width-1) / 8) + 1);
 465         if ((height + offset) > 96)
 466                 height = 96 - offset;
 467
 468 #ifdef DEBUG
 469         fprintf(stderr, "row length = %d bytes\n", rowlength);
 470         fprintf(stderr, "bitmap resolution is %d x %d\n", width, height);
 471         fprintf(stderr, "\n");
 472         for (y=0; y<height; y++) {
 473                 for (x=0; x<rowlength; x++) {
 474                         for (i=0; i<8; i++)
 475                                 fprintf(stderr, "%c", (bmapbuf[(y*rowlength)+x] & (1<<(7-i))) ? '.' : ' ');
 476                 }
 477                 fprintf(stderr, "\n");
 478         }
 479         fprintf(stderr, "\n");
 480 #endif
 481
 482         for (y=0; y<height; y+=2) {
 483                 memset(mw_buf, 0, 24);
 484                 memcpy(mw_buf, (bmapbuf+(y*rowlength)), (rowlength > 12) ? 12 : rowlength);
 485                 memcpy((mw_buf+12), (bmapbuf+((y+1)*rowlength)), (rowlength > 12) ? 12 : rowlength);
 486                 mw_write_buffer(mw_fd, mode, 0, offset+y, mw_buf, 24);
 487         }
 488 }
 489