mw_main.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 <errno.h>
  19
  20 #include <bluetooth/bluetooth.h>
  21 #include <bluetooth/rfcomm.h>
  22
  23 /*
  24 #include <bluetooth/sdp.h>
  25 #include <bluetooth/sdp_lib.h>
  26 */
  27
  28 #include "metawatch.h"
  29 #include "crc16ccitt.h"
  30 #include "mw_utility.h"
  31
  32
  33 void bitmap_test(int mw_fd)
  34 {
  35         /* a nice checker-board pattern */
  36         unsigned char checkbuf[24] = {
  37                 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
  38                 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
  39                 0x55, 0x55, 0x55, 0x55, 0x55, 0x55,
  40                 0x55, 0x55, 0x55, 0x55, 0x55, 0x55,
  41         };
  42         mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 31, checkbuf, 24);
  43         mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 33, checkbuf, 24);
  44         mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 35, checkbuf, 24);
  45         mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 37, checkbuf, 24);
  46
  47         mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
  48 }
  49
  50 void bitmap_test2(int mw_fd)
  51 {
  52         mw_buffer *mwbuf1, *mwbuf2;
  53         unsigned char *bbuf;
  54         int len, x;
  55
  56         mwbuf1 = mw_alloc_pbuffer(96, 66, 1);
  57         mwbuf2 = mw_alloc_pbuffer(96, 66, 1);
  58
  59         mw_buf_clear(mwbuf1, MW_BLACK);
  60         mw_buf_clear(mwbuf2, MW_WHITE);
  61
  62         for (x=0; x<66; x++) {
  63                 //mw_buf_clear(mwbuf1, MW_BLACK);
  64                 mw_buf_draw_pixel(mwbuf1, x, x, MW_WHITE);
  65                 mw_dump_mw_buffer(mwbuf1);
  66                 bbuf = mw_make_mw_buffer(mwbuf1, &len);
  67                 mw_send_bitmap(mw_fd, MW_SCREEN_MODE_IDLE, 96, 65, 31, bbuf, len);
  68                 mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
  69                 getchar();
  70         };
  71
  72         mw_free_pbuffer(mwbuf1);
  73         mw_free_pbuffer(mwbuf2);
  74 }
  75
  76 void text_test(int mw_fd)
  77 {
  78         mw_buffer *mwbuf;
  79         unsigned char *bbuf;
  80         int len;
  81
  82         mwbuf = mw_alloc_pbuffer(96, 66, 1);
  83         mw_buf_clear(mwbuf, MW_BLACK);
  84
  85         mw_buf_print(mwbuf, 1, 10, "Font 0", 0, MW_WHITE, MW_BLACK);
  86         mw_buf_print(mwbuf, 1, 20, "Font 1", 1, MW_WHITE, MW_BLACK);
  87         mw_buf_print(mwbuf, 1, 30, "Font 2", 2, MW_WHITE, MW_BLACK);
  88         mw_buf_print(mwbuf, 1, 45, "Big Fat Clipping", 2, MW_BLACK, MW_WHITE);
  89
  90         bbuf = mw_make_mw_buffer(mwbuf, &len);
  91         mw_send_bitmap(mw_fd, MW_SCREEN_MODE_IDLE, 96, 65, 31, bbuf, len);
  92         mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
  93         mw_free_pbuffer(mwbuf);
  94 }
  95
  96 void line_test(int mw_fd)
  97 {
  98         mw_buffer *mwbuf;
  99         unsigned char *bbuf;
 100         int len, p;
 101
 102         mwbuf = mw_alloc_pbuffer(96, 66, 1);
 103         mw_buf_clear(mwbuf, MW_BLACK);
 104
 105         for (p=0; p<=96; p+=8)
 106                 mw_buf_draw_line_bresenham(mwbuf, p, 0, 95-p, 65, MW_WHITE);
 107
 108         bbuf = mw_make_mw_buffer(mwbuf, &len);
 109         mw_send_bitmap(mw_fd, MW_SCREEN_MODE_IDLE, 96, 65, 31, bbuf, len);
 110         mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
 111         mw_free_pbuffer(mwbuf);
 112 }
 113
 114 void bitmap_read(int mw_fd)
 115 {
 116         int ffd, ret;
 117         char rbuf[256];
 118         unsigned int width, height, i;
 119 #ifdef DEBUG
 120         unsigned int x, y;
 121 #endif
 122         unsigned int rowlength;
 123         unsigned char *bmapbuf;
 124         // unsigned char mw_buf[24];
 125
 126         ffd = open("test.pbm", O_RDONLY);
 127         if (ffd < 0) {
 128                 perror("open");
 129                 return;
 130         };
 131         ret = read(ffd, rbuf, 3);
 132         if (rbuf[0] != 'P' || rbuf[1] != '4') {
 133                 fprintf(stderr, "not a PBM file\n");
 134                 return;
 135         }
 136         memset(rbuf, 0, 256);
 137         i = 0;
 138         do {
 139                 ret = read(ffd, (rbuf+i), 1);
 140         } while (!isspace(rbuf[i++]));
 141         width = atoi(rbuf);
 142
 143         memset(rbuf, 0, 256);
 144         i = 0;
 145         do {
 146                 ret = read(ffd, (rbuf+i), 1);
 147         } while (!isspace(rbuf[i++]));
 148         height = atoi(rbuf);
 149
 150         rowlength = ((width / 8) + 1);
 151
 152         bmapbuf = malloc(rowlength * height);
 153
 154         ret = read(ffd, bmapbuf, rowlength * height);
 155         close(ffd);
 156
 157 #ifdef DEBUG
 158         fprintf(stderr, "row length = %d bytes\n", rowlength);
 159         fprintf(stderr, "bitmap resolution is %d x %d\n", width, height);
 160         fprintf(stderr, "read %d of %d bytes\n", ret, rowlength * height);
 161         fprintf(stderr, "\n");
 162         for (y=0; y<height; y++) {
 163                 for (x=0; x<rowlength; x++) {
 164                         for (i=0; i<8; i++)
 165                                 fprintf(stderr, "%c", (bmapbuf[(y*rowlength)+x] & (1<<(7-i))) ? '.' : ' ');
 166                 }
 167                 fprintf(stderr, "\n");
 168         }
 169         fprintf(stderr, "\n");
 170 #endif
 171
 172         /* reverse bits and invert the bmap */
 173         bmap_buffer_flipinvert(1, 1, bmapbuf, rowlength * height);
 174         /* send the buffer to the watch */
 175         mw_send_bitmap(mw_fd, MW_SCREEN_MODE_IDLE, width, height, 31, bmapbuf, rowlength * height);
 176         /* update the display */
 177         mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
 178
 179         free(bmapbuf);
 180 }
 181
 182 void test_notification(int mw_fd)
 183 {
 184         mw_buffer *mwbuf;
 185         unsigned char *bbuf;
 186         int len;
 187
 188         mwbuf = mw_alloc_pbuffer(96, 96, 1);
 189         mw_buf_clear(mwbuf, MW_BLACK);
 190
 191         mw_buf_draw_line_bresenham(mwbuf, 2, 0, 93, 0, MW_WHITE);
 192         mw_buf_draw_line_bresenham(mwbuf, 0, 1, 95, 1, MW_WHITE);
 193         mw_buf_draw_line_bresenham(mwbuf, 0, 94, 95, 94, MW_WHITE);
 194         mw_buf_draw_line_bresenham(mwbuf, 2, 95, 93, 95, MW_WHITE);
 195
 196         mw_buf_draw_line_bresenham(mwbuf, 0, 2, 0, 93, MW_WHITE);
 197         mw_buf_draw_line_bresenham(mwbuf, 1, 0, 1, 95, MW_WHITE);
 198         mw_buf_draw_line_bresenham(mwbuf, 95, 2, 95, 93, MW_WHITE);
 199         mw_buf_draw_line_bresenham(mwbuf, 94, 0, 94, 95, MW_WHITE);
 200
 201         mw_buf_print(mwbuf, 4,  4, "012345678901234", 0, MW_WHITE, MW_BLACK);
 202         mw_buf_print(mwbuf, 4, 13, "012345678901234", 0, MW_WHITE, MW_BLACK);
 203         mw_buf_print(mwbuf, 4, 22, "0123456789g1234", 0, MW_WHITE, MW_BLACK);
 204         mw_buf_print(mwbuf, 4, 31, "012345678901234", 0, MW_WHITE, MW_BLACK);
 205         mw_buf_print(mwbuf, 4, 40, "012345678901234", 0, MW_WHITE, MW_BLACK);
 206         mw_buf_print(mwbuf, 4, 49, "012345678901234", 0, MW_WHITE, MW_BLACK);
 207         mw_buf_print(mwbuf, 4, 58, "0123456789g1234", 0, MW_WHITE, MW_BLACK);
 208         mw_buf_print(mwbuf, 4, 67, "012345678901234", 0, MW_WHITE, MW_BLACK);
 209         mw_buf_print(mwbuf, 4, 76, "012345678901234", 0, MW_WHITE, MW_BLACK);
 210         mw_buf_print(mwbuf, 4, 85, "012345678901234", 0, MW_WHITE, MW_BLACK);
 211
 212         bbuf = mw_make_mw_buffer(mwbuf, &len);
 213         mw_send_bitmap(mw_fd, MW_SCREEN_MODE_NOTIFICATION, 96, 96, 0, bbuf, len);
 214         mw_update_display(mw_fd, MW_SCREEN_MODE_NOTIFICATION, 1);
 215         mw_free_pbuffer(mwbuf);
 216
 217         mw_set_vibrate_mode(mw_fd, 1, 300, 300, 3);
 218 }
 219
 220 void test_application(int mw_fd)
 221 {
 222         mw_buffer *mwbuf;
 223         unsigned char *bbuf;
 224         int len;
 225
 226         mw_enable_button(mw_fd, MW_SCREEN_MODE_APPLICATION, MW_BUTTON_A, MW_BUTTON_IMMEDIATE, MW_BUTTON_EVENT_MESSAGE, MW_BUTTON_A);
 227         mw_configure_watch_mode(mw_fd, MW_SCREEN_MODE_APPLICATION, 0, 30, 0);
 228
 229         mwbuf = mw_alloc_pbuffer(96, 96, 1);
 230         mw_buf_clear(mwbuf, MW_BLACK);
 231
 232         mw_buf_print(mwbuf, 0,  0, "  Application   ", 0, MW_BLACK, MW_WHITE);
 233         mw_buf_print(mwbuf, 0,  9, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 234         mw_buf_print(mwbuf, 0, 18, "0123456789g12345", 0, MW_WHITE, MW_BLACK);
 235         mw_buf_print(mwbuf, 0, 27, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 236         mw_buf_print(mwbuf, 0, 36, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 237         mw_buf_print(mwbuf, 0, 45, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 238         mw_buf_print(mwbuf, 0, 54, "0123456789g12345", 0, MW_WHITE, MW_BLACK);
 239         mw_buf_print(mwbuf, 0, 63, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 240         mw_buf_print(mwbuf, 0, 72, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 241         mw_buf_print(mwbuf, 0, 81, "0123456789012345", 0, MW_WHITE, MW_BLACK);
 242
 243         bbuf = mw_make_mw_buffer(mwbuf, &len);
 244         mw_send_bitmap(mw_fd, MW_SCREEN_MODE_APPLICATION, 96, 96, 0, bbuf, len);
 245         mw_update_display(mw_fd, MW_SCREEN_MODE_APPLICATION, 1);
 246         mw_free_pbuffer(mwbuf);
 247 }
 248
 249 void print_help(void)
 250 {
 251 }
 252
 253 void process_cmd(char *cmdline, int clinep, int mw_fd)
 254 {
 255         unsigned char mdata[32];
 256         unsigned int intopt;
 257
 258         fprintf(stderr, "command: '%s'\n", cmdline);
 259
 260         if (strncmp(cmdline, "quit", 4) == 0) {
 261                 close(mw_fd);
 262                 exit(0);
 263         }
 264         if (strncmp(cmdline, "help", 4) == 0) {
 265                 print_help();
 266         }
 267         if (strncmp(cmdline, "srtc", 4) == 0) {
 268                 fprintf(stderr, "Setting RTC from system time...");
 269                 mw_set_rtc(mw_fd, MW_RTC_CLOCK_24HR, MW_RTC_DATE_DDMM);
 270                 fprintf(stderr, "OK\n");
 271         }
 272         if (strncmp(cmdline, "grtc", 4) == 0) {
 273                 mw_send_frame(mw_fd, MW_GET_REAL_TIME_CLOCK, 0, NULL, 0);
 274         }
 275         if (strncmp(cmdline, "gistr", 5) == 0) {
 276                 intopt = cmdline[6]-0x30;
 277                 if (intopt>=0 && intopt <=3)
 278                         mdata[0] = intopt;
 279                 else
 280                         mdata[0] = 0;
 281                 mw_send_frame(mw_fd, MW_GET_INFORMATION_STRING, 0, mdata, 1);
 282         }
 283         if (strncmp(cmdline, "gdtype", 6) == 0) {
 284                 mw_send_frame(mw_fd, MW_GET_DEVICE_TYPE, 0, NULL, 0);
 285         }
 286         if (strncmp(cmdline, "rvbat", 5) == 0) {
 287                 mw_send_frame(mw_fd, MW_READ_BATTERY_VOLTAGE_MSG, 0, NULL, 0);
 288         }
 289         if (strncmp(cmdline, "rlight", 6) == 0) {
 290                 mw_send_frame(mw_fd, MW_READ_LIGHT_SENSOR_MSG, 0, NULL, 0);
 291         }
 292         if (strncmp(cmdline, "modecfg", 6) == 0) {
 293                 mw_configure_watch_mode(mw_fd, MW_SCREEN_MODE_IDLE, 0, 4, 1);
 294                 mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 0);
 295         }
 296         if (strncmp(cmdline, "rbtcfg", 6) == 0) {
 297                 intopt = cmdline[7]-0x30;
 298                 mdata[0] = 0; /* idle screen */
 299                 mdata[1] = intopt; /* button index */
 300                 /* for reading the config those are unnecessary */
 301                 mdata[2] = 0; /* button press type */
 302                 mdata[3] = 0; /* callback message type */
 303                 mdata[4] = 0; /* callback message option */
 304                 mw_send_frame(mw_fd, MW_READ_BUTTON_CONFIG, 0, mdata, 5);
 305         }
 306         if (strncmp(cmdline, "svib", 4) == 0) {
 307                 mw_set_vibrate_mode(mw_fd, 1, 300, 300, 5);
 308         }
 309         if (strncmp(cmdline, "tbmp", 4) == 0) {
 310                 bitmap_test(mw_fd);
 311         }
 312         if (strncmp(cmdline, "t2bmp", 5) == 0) {
 313                 bitmap_test2(mw_fd);
 314         }
 315         if (strncmp(cmdline, "text", 4) == 0) {
 316                 text_test(mw_fd);
 317         }
 318         if (strncmp(cmdline, "tline", 5) == 0) {
 319                 line_test(mw_fd);
 320         }
 321         if (strncmp(cmdline, "rbmp", 4) == 0) {
 322                 bitmap_read(mw_fd);
 323         }
 324         if (strncmp(cmdline, "tnote", 5) == 0) {
 325                 test_notification(mw_fd);
 326         }
 327         if (strncmp(cmdline, "tapp", 4) == 0) {
 328                 test_application(mw_fd);
 329         }
 330 }
 331
 332
 333 int menu(int mw_fd)
 334 {
 335         fd_set mfds;
 336         struct termios tconfd, tmwfd;
 337         char cmdline[128];
 338         unsigned char msg_buf[64];
 339         unsigned char clinep = 0;
 340         int rcvd;
 341
 342         tcgetattr(0, &tconfd);
 343         cfmakeraw(&tconfd);
 344         tconfd.c_oflag |= ONLCR | OPOST;
 345         tconfd.c_lflag |= ISIG;
 346         tcsetattr(0, TCSANOW, &tconfd);
 347
 348         tcgetattr(mw_fd, &tmwfd);
 349         cfmakeraw(&tmwfd);
 350         tmwfd.c_oflag |= ONLCR | OPOST;
 351         tmwfd.c_lflag |= ISIG;
 352         tcsetattr(mw_fd, TCSANOW, &tmwfd);
 353
 354         FD_ZERO(&mfds);
 355         FD_SET(0, &mfds);
 356         FD_SET(mw_fd, &mfds);
 357
 358         memset(cmdline, 0, 128);
 359
 360         do {
 361                 rcvd = 0;
 362                 if (select(mw_fd+1, &mfds, NULL, NULL, NULL) > 0) {
 363                         if (FD_ISSET(mw_fd, &mfds)) {
 364                                 rcvd = read(mw_fd, msg_buf, 64);
 365 #ifdef DEBUG
 366                                 fprintf(stderr, "read %d bytes:\n", rcvd);
 367 #endif
 368                                 if (rcvd > 0) {
 369 #ifdef DEBUG
 370                                         dump_frame(msg_buf, rcvd);
 371 #endif
 372                                         decode_frame(mw_fd, msg_buf, rcvd);
 373                                 }
 374                         };
 375                         if (FD_ISSET(0, &mfds)) {
 376                                 rcvd = read(0, (cmdline+clinep), 1);
 377                                 if (rcvd > 0) {
 378                                         if (cmdline[clinep] == '\r') {
 379                                                 printf("\n");
 380                                                 cmdline[clinep--] = '\0';
 381                                                 process_cmd(cmdline, clinep, mw_fd);
 382                                                 clinep = 0;
 383                                                 memset(cmdline, 0, 128);
 384                                         } else {
 385                                                 clinep++;
 386                                                 if (clinep > 75)
 387                                                         clinep = 75;
 388                                                 printf("\r> %s", cmdline);
 389                                                 fflush(stdout);
 390                                         }
 391                                 }
 392                         };
 393                 } else
 394                         break;
 395                 FD_ZERO(&mfds);
 396                 FD_SET(0, &mfds);
 397                 FD_SET(mw_fd, &mfds);
 398         } while (rcvd > 0);
 399
 400         return 0;
 401 }
 402
 403 int open_socket(bdaddr_t *bdaddr, uint8_t channel)
 404 {
 405         struct sockaddr_rc addr;
 406         int sk, opt;
 407         //int f;
 408
 409         sk = socket(PF_BLUETOOTH, SOCK_STREAM, BTPROTO_RFCOMM);
 410         if (sk < 0) {
 411                 fprintf(stderr, "Can't create socket: %s (%d)\n",
 412                         strerror(errno), errno);
 413                 return -1;
 414         }
 415
 416 /*
 417         f = 1;
 418         if (setsockopt(sk, SOL_BLUETOOTH, BT_FLUSHABLE, &f, sizeof(f)) < 0) {
 419                 fprintf(stderr, "Can't set flushable: %s (%d)\n",
 420                         strerror(errno), errno);
 421                 return -1;
 422         }
 423 */
 424         memset(&addr, 0, sizeof(addr));
 425         addr.rc_family = AF_BLUETOOTH;
 426         bacpy(&addr.rc_bdaddr, BDADDR_ANY);
 427
 428         if (bind(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
 429                 fprintf(stderr, "Can't bind socket: %s (%d)\n",
 430                                                         strerror(errno), errno);
 431                 close(sk);
 432                 return -1;
 433         }
 434
 435        /* Set link mode */
 436         opt = 0;
 437         opt |= RFCOMM_LM_MASTER;
 438         opt |= RFCOMM_LM_AUTH;
 439 /*
 440         opt |= RFCOMM_LM_ENCRYPT;
 441         opt |= RFCOMM_LM_SECURE;
 442 */
 443         if (opt && setsockopt(sk, SOL_RFCOMM, RFCOMM_LM, &opt, sizeof(opt)) < 0) {
 444                 fprintf(stderr, "Can't set RFCOMM link mode: %s (%d)",
 445                                                         strerror(errno), errno);
 446                 close(sk);
 447                 return -1;
 448         }
 449
 450         memset(&addr, 0, sizeof(addr));
 451         addr.rc_family = AF_BLUETOOTH;
 452         bacpy(&addr.rc_bdaddr, bdaddr);
 453         addr.rc_channel = channel;
 454
 455         if (connect(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
 456                 fprintf(stderr, "Can't connect: %s (%d)\n",
 457                                                         strerror(errno), errno);
 458                 close(sk);
 459                 return -1;
 460         }
 461
 462         return sk;
 463 }
 464
 465 void baswap(bdaddr_t *dst, const bdaddr_t *src)
 466 {
 467         register unsigned char *d = (unsigned char *) dst;
 468         register const unsigned char *s = (const unsigned char *) src;
 469         register int i;
 470
 471         for (i = 0; i < 6; i++)
 472                 d[i] = s[5-i];
 473 }
 474 int bachk(const char *str)
 475 {
 476         if (!str)
 477                 return -1;
 478
 479         if (strlen(str) != 17)
 480                 return -1;
 481
 482         while (*str) {
 483                 if (!isxdigit(*str++))
 484                         return -1;
 485
 486                 if (!isxdigit(*str++))
 487                         return -1;
 488
 489                 if (*str == 0)
 490                         break;
 491
 492                 if (*str++ != ':')
 493                         return -1;
 494         }
 495
 496         return 0;
 497 }
 498
 499 int str2ba(const char *str, bdaddr_t *ba)
 500 {
 501         bdaddr_t b;
 502         int i;
 503
 504         if (bachk(str) < 0) {
 505                 memset(ba, 0, sizeof(*ba));
 506                 return -1;
 507         }
 508
 509         for (i = 0; i < 6; i++, str += 3)
 510                 b.b[i] = strtol(str, NULL, 16);
 511
 512         baswap(ba, &b);
 513
 514         return 0;
 515 }
 516
 517 int main(int argc, char **argv)
 518 {
 519         int mw_fd;
 520         bdaddr_t btaddr;
 521
 522         if (argc != 2) {
 523                 fprintf(stderr, "Usage:\n\t%s <devicename>\n", argv[0]);
 524                 return 1;
 525         };
 526
 527         crc16ccitt_init();
 528
 529 #if USE_RFCOMM_FILE
 530         mw_fd = open(argv[1], O_RDWR);
 531         if (mw_fd < 0) {
 532                 perror("open");
 533                 return 1;
 534         };
 535 #else
 536         if (str2ba(argv[1], &btaddr))
 537                 return 1;
 538         mw_fd = open_socket(&btaddr, 1);
 539         if (mw_fd < 0) {
 540                 return 1;
 541         } else {
 542                 fprintf(stderr, "connected to %s\n", argv[1]);
 543         };
 544 #endif
 545
 546         menu(mw_fd);
 547
 548         fsync(mw_fd);
 549
 550         close(mw_fd);
 551
 552         return 0;
 553 };
 554