metawatch.c

   1 /*
   2  * (c) 2011 Siegen, Germany by Nils Faerber
   3  *
   4  * license LGPL
   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 #define MW_FRAME_DELAY          0x00
  21
  22 void dump_frame(unsigned char *frame, int len)
  23 {
  24         int i;
  25
  26         for (i=0; i<len; i++)
  27                 fprintf(stderr, "0x%02x ", frame[i]);
  28         fprintf(stderr, "\n");
  29 }
  30
  31
  32 int mw_send_frame(int mw_fd, unsigned char msg_type, unsigned char options, unsigned char *data, unsigned char len)
  33 {
  34         unsigned short crc;
  35         unsigned char frame[64];
  36         int tlen = len + 6; /* payload + 6 bytes frameing */
  37         int ret;
  38
  39         memset(frame, 0, 64);
  40         frame[0] = MW_SOF;
  41         frame[1] = len + 6;
  42         frame[2] = msg_type;
  43         frame[3] = options;
  44         if (data != NULL && len > 0)
  45                 memcpy(frame+4, data, len);
  46
  47         crc = crc16ccitt(frame, len+4);
  48         *(unsigned short *)(frame+len+4) = crc;
  49
  50         dump_frame(frame, tlen);
  51
  52         while (((ret = write(mw_fd, frame, tlen)) >= 0) && (tlen > 0))
  53                 tlen -= ret;
  54
  55         if (MW_FRAME_DELAY)
  56                 usleep(MW_FRAME_DELAY);
  57
  58         if (tlen == 0 && ret >= 0)
  59                 return 0;
  60         else
  61                 return ret;
  62 }
  63
  64 /*
  65  * host to watch commands
  66  */
  67
  68 void mw_set_rtc(int mw_fd, unsigned char clk1224, unsigned char date_fmt)
  69 {
  70         time_t mtime;
  71         struct tm mtm;
  72         unsigned short year;
  73         unsigned char data[32];
  74
  75         mtime = time(NULL);
  76         localtime_r(&mtime, &mtm);
  77
  78         year = mtm.tm_year + 1900;
  79         data[0] = (year & 0x0f00) >> 8;
  80         data[1] = (year & 0x00ff);
  81         data[2] = mtm.tm_mon + 1;
  82         data[3] = mtm.tm_mday;
  83         data[4] = mtm.tm_wday;
  84         data[5] = mtm.tm_hour;
  85         data[6] = mtm.tm_min;
  86         data[7] = mtm.tm_sec;
  87         data[8] = clk1224;
  88         data[9] = date_fmt;
  89
  90         mw_send_frame(mw_fd, MW_SET_REAL_TIME_CLOCK, 0, data, 10);
  91 }
  92
  93 void mw_set_vibrate_mode(int mw_fd, unsigned char enable, unsigned short on_time, unsigned short off_time, unsigned char cycles)
  94 {
  95         unsigned char mdata[7];
  96
  97         mdata[0] = enable;
  98         *(unsigned short *)(mdata+1) = on_time; /* miliseconds */
  99         *(unsigned short *)(mdata+3) = off_time; /* miliseconds */
 100         mdata[5] = cycles;
 101         mw_send_frame(mw_fd, MW_SET_VIBRATE_MODE, 0, mdata, 6);
 102 }
 103
 104 void mw_configure_watch_mode(int mw_fd, unsigned char mode, unsigned char save, unsigned char timeout, unsigned char invert)
 105 {
 106         unsigned char mdata[3];
 107
 108         mdata[0] = timeout; /* seconds */
 109         mdata[1] = invert; /* 0=normal, 1=invert */
 110         mw_send_frame(mw_fd, MW_CONFIGURE_MODE, (mode & 0x0f) | ((save & 0x01) << 3), mdata, 2);
 111 }
 112
 113 void mw_update_display(int mw_fd, unsigned char mode, unsigned char copy)
 114 {
 115         mw_send_frame(mw_fd, MW_UPDATE_DISPLAY, (mode & 0x0f) | ((copy & 0x01) << 3), NULL, 0);
 116 }
 117
 118 void mw_load_template(int mw_fd, unsigned char mode, unsigned char template_select)
 119 {
 120         mw_send_frame(mw_fd, MW_LOAD_TEMPLATE, (mode & 0x0f), &template_select, 1);
 121 }
 122
 123 /*
 124  * send line for screen-mode mode from *buffer to watch, starting at display row row_offset
 125  */
 126 void mw_write_buffer(int mw_fd,
 127                 unsigned char mode,
 128                 unsigned char numlines,         /* number of lines, 0 or 1 */
 129                 unsigned char row_offset,       /* start at row_offset in display, e.g. lower part in idle @31 */
 130                 unsigned char *buffer, int buflen)
 131 {
 132         unsigned char mdata[32];
 133
 134         buflen = 12 * (buflen / 12);    /* crop to 12 bytes */
 135         if ((numlines == 0 && buflen < 12) || (numlines == 1 && buflen < 24)) {
 136                 fprintf(stderr, "mw_write_buffer: bufferlen does not match number of lines\n");
 137                 return;
 138         };
 139         memset(mdata, 0, 32);
 140         mdata[0] = row_offset;
 141         memcpy((mdata+1), buffer, 12);
 142         if (numlines == 1) {
 143                 mdata[0] = row_offset+1;
 144                 memcpy((mdata+13), (buffer+12), 12);
 145         };
 146         mw_send_frame(mw_fd, MW_WRITE_BUFFER, (mode & 0x0f) | (((numlines & 0x01)<< 3) & 0x10), mdata, numlines ? 13 : 26);
 147 }
 148
 149
 150 /* ------------------------------------------------------------------------ */
 151
 152
 153 /*
 154  * watch responses, events or notifications
 155  */
 156 void mw_get_real_time_clock_response(int mw_fd, unsigned char *rtcrsp, int len)
 157 {
 158         struct tm mtm;
 159         unsigned short year;
 160         unsigned char clk1224, date_fmt;
 161
 162         if (len != 10) {
 163                 fprintf(stderr, "get real time clock response too short %d != 10\n", len);
 164                 return;
 165         }
 166
 167         year = *(unsigned short *)rtcrsp;
 168         mtm.tm_year = year - 1900;
 169         mtm.tm_mon = rtcrsp[2] - 1;
 170         mtm.tm_mday = rtcrsp[3];
 171         mtm.tm_wday = rtcrsp[4];
 172         mtm.tm_hour = rtcrsp[5];
 173         mtm.tm_min = rtcrsp[6];
 174         mtm.tm_sec = rtcrsp[7];
 175         clk1224 = rtcrsp[8];
 176         date_fmt = rtcrsp[9];
 177
 178         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");
 179 }
 180
 181 void mw_get_battery_voltage_response(int mw_fd, unsigned char *batrsp, int len)
 182 {
 183         unsigned short voltage = *(unsigned short *)batrsp;
 184         unsigned char power_good = batrsp[2];
 185         unsigned char bat_charging = batrsp[3];
 186
 187         fprintf(stderr, "battery is at %dV, %s and %s\n", voltage, power_good ? "power is good" : "power fault", bat_charging ? "charging" : "not charging");
 188 }
 189
 190 /* ---------------------------------------------------------------------- */
 191
 192 int decode_frame(int mw_fd, unsigned char *buf, int len)
 193 {
 194         unsigned short crc;
 195         unsigned char msglen;
 196         unsigned char msgtype;
 197         unsigned char msgopt;
 198         unsigned char *msgdata;
 199
 200         /* check frame */
 201         crc = *(unsigned short *)(buf+len-2);
 202         if (crc != crc16ccitt(buf, len-2)) {
 203                 fprintf(stderr, "decode frame CRC error\n");
 204                 return 1;
 205         } else
 206                 fprintf(stderr, "decode frame CRC OK\n");
 207         if (buf[0] != MW_SOF) {
 208                 fprintf(stderr, "decode frame SOF not found\n");
 209                 return 1;
 210         } else
 211         fprintf(stderr, "decode frame found SOF\n");
 212
 213         msglen = buf[1];
 214         msgtype = buf[2];
 215         msgopt = buf[3];
 216         msgdata = (buf+4);
 217
 218         switch (msgtype) {
 219                 case MW_GET_REAL_TIME_CLOCK_RSP:
 220                         mw_get_real_time_clock_response(mw_fd, msgdata, len-4-2);
 221                         break;
 222                 case MW_GET_INFORMATION_STRING_RSP:
 223                         msgdata[len-4-2] = 0;
 224                         fprintf(stderr, "Got info string '%s'\n", (msgdata+4));
 225                         break;
 226                 case MW_READ_BATTERY_VOLTAGE_RSP:
 227                         mw_get_battery_voltage_response(mw_fd, msgdata, len-4-2);
 228                         break;
 229                 case MW_LOW_BATTERY_WARNING_MSG:
 230                         fprintf(stderr, "Watch battery low, please connect charger\n");
 231                         break;
 232                 case MW_LOW_BATTERY_BT_OFF_MSG:
 233                         fprintf(stderr, "Watch battery extremely low - radio will turn off\n");
 234                         break;
 235                 default:
 236                         fprintf(stderr, "Unkown msgtype 0x%02x\n", msgtype);
 237                         break;
 238         };
 239
 240         return 0;
 241 }
 242
 243
 244 void process_cmd(char *cmdline, int clinep, int mw_fd)
 245 {
 246         unsigned char mdata[32];
 247
 248         fprintf(stderr, "command: '%s'\n", cmdline);
 249
 250         if (strncmp(cmdline, "quit", 4) == 0) {
 251                 close(mw_fd);
 252                 exit(0);
 253         }
 254
 255         if (strncmp(cmdline, "srtc", 4) == 0) {
 256                 fprintf(stderr, "Setting RTC from system time...");
 257                 mw_set_rtc(mw_fd, MW_RTC_CLOCK_24HR, MW_RTC_DATE_DDMM);
 258                 fprintf(stderr, "OK\n");
 259         }
 260         if (strncmp(cmdline, "grtc", 4) == 0) {
 261                 mw_send_frame(mw_fd, MW_GET_REAL_TIME_CLOCK, 0, NULL, 0);
 262         }
 263         if (strncmp(cmdline, "gistr", 5) == 0) {
 264                 mdata[0] = 0;
 265                 mw_send_frame(mw_fd, MW_GET_INFORMATION_STRING, 0, mdata, 1);
 266         }
 267         if (strncmp(cmdline, "gdtype", 6) == 0) {
 268                 mw_send_frame(mw_fd, MW_GET_DEVICE_TYPE, 0, NULL, 0);
 269         }
 270         if (strncmp(cmdline, "rvbat", 5) == 0) {
 271                 mw_send_frame(mw_fd, MW_READ_BATTERY_VOLTAGE_MSG, 0, NULL, 0);
 272         }
 273         if (strncmp(cmdline, "modecfg", 6) == 0) {
 274                 mw_configure_watch_mode(mw_fd, MW_SCREEN_MODE_IDLE, 0, 4, 1);
 275                 mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 0);
 276         }
 277         if (strncmp(cmdline, "rbtcfg", 6) == 0) {
 278                 mdata[0] = 0; /* idle screen */
 279                 mdata[1] = 1; /* button index */
 280                 mdata[2] = 2; /* button press type */
 281                 mdata[3] = 3; /* callback message type */
 282                 mdata[4] = 4; /* callback message option */
 283                 mw_send_frame(mw_fd, MW_READ_BUTTON_CONFIG, 0, NULL, 0);
 284         }
 285         if (strncmp(cmdline, "svib", 4) == 0) {
 286                 mw_set_vibrate_mode(mw_fd, 1, 300, 300, 5);
 287         }
 288 }
 289
 290
 291 int menu(int mw_fd)
 292 {
 293         fd_set mfds;
 294         struct termios tconfd;
 295         char cmdline[128];
 296         unsigned char msg_buf[64];
 297         unsigned char clinep = 0;
 298         int rcvd;
 299
 300         tcgetattr(0, &tconfd);
 301         cfmakeraw(&tconfd);
 302         tconfd.c_oflag |= ONLCR | OPOST;
 303         tconfd.c_lflag |= ISIG;
 304         tcsetattr(0, TCSANOW, &tconfd);
 305
 306         FD_ZERO(&mfds);
 307         FD_SET(0, &mfds);
 308         FD_SET(mw_fd, &mfds);
 309
 310         memset(cmdline, 0, 128);
 311
 312         do {
 313                 rcvd = 0;
 314                 if (select(mw_fd+1, &mfds, NULL, NULL, NULL) > 0) {
 315                         if (FD_ISSET(mw_fd, &mfds)) {
 316                                 rcvd = read(mw_fd, msg_buf, 64);
 317                                 fprintf(stderr, "read %d bytes:\n", rcvd);
 318                                 if (rcvd > 0) {
 319                                         dump_frame(msg_buf, rcvd);
 320                                         decode_frame(mw_fd, msg_buf, rcvd);
 321                                 }
 322                         };
 323                         if (FD_ISSET(0, &mfds)) {
 324                                 rcvd = read(0, (cmdline+clinep), 1);
 325                                 if (rcvd > 0) {
 326                                         if (cmdline[clinep] == '\r') {
 327                                                 printf("\n");
 328                                                 cmdline[clinep--] = '\0';
 329                                                 process_cmd(cmdline, clinep, mw_fd);
 330                                                 clinep = 0;
 331                                                 memset(cmdline, 0, 128);
 332                                         } else {
 333                                                 clinep++;
 334                                                 if (clinep > 75)
 335                                                         clinep = 75;
 336                                                 printf("\r> %s", cmdline);
 337                                                 fflush(stdout);
 338                                         }
 339                                 }
 340                         };
 341                 } else
 342                         break;
 343                 FD_ZERO(&mfds);
 344                 FD_SET(0, &mfds);
 345                 FD_SET(mw_fd, &mfds);
 346         } while (rcvd > 0);
 347
 348         return 0;
 349 }
 350
 351 int main(int argc, char **argv)
 352 {
 353         int mw_fd;
 354
 355         if (argc != 2) {
 356                 fprintf(stderr, "Usage:\n\t%s <devicename>\n", argv[0]);
 357                 return 1;
 358         };
 359
 360         crc16ccitt_init();
 361
 362         mw_fd = open(argv[1], O_RDWR);
 363         if (mw_fd < 0) {
 364                 perror("open");
 365                 return 1;
 366         };
 367
 368         menu(mw_fd);
 369
 370         fsync(mw_fd);
 371
 372         close(mw_fd);
 373
 374         return 0;
 375 };
 376