nica/metawatch
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
metawatch/mw_main.c
Nils Faerber 8f684d091f Fixes and enhancements
2011-07-30 17:22:05 +02:00

400 lines
9 KiB
C
Raw Blame History

/*
* (c) 2011 Siegen, Germany by Nils Faerber <nils.faerber@kernelconcepts.de>
*
* license LGPL
*/
#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <termios.h>
#include <ctype.h>
#include <errno.h>
#include <bluetooth/bluetooth.h>
#include <bluetooth/rfcomm.h>
/*
#include <bluetooth/sdp.h>
#include <bluetooth/sdp_lib.h>
*/
#include "metawatch.h"
#include "crc16ccitt.h"
void bitmap_test(int mw_fd)
{
/* a nice checker-board pattern */
unsigned char checkbuf[24] = {
0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
0x55, 0x55, 0x55, 0x55, 0x55, 0x55,
0x55, 0x55, 0x55, 0x55, 0x55, 0x55,
};
mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 31, checkbuf, 24);
mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 33, checkbuf, 24);
mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 35, checkbuf, 24);
mw_write_buffer(mw_fd, MW_SCREEN_MODE_IDLE, 0, 37, checkbuf, 24);
mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
}
void bitmap_read(int mw_fd)
{
int ffd, ret;
char rbuf[256];
unsigned int width, height, i;
#ifdef DEBUG
unsigned int x, y;
#endif
unsigned int rowlength;
unsigned char *bmapbuf;
// unsigned char mw_buf[24];
ffd = open("test.pbm", O_RDONLY);
if (ffd < 0) {
perror("open");
return;
};
ret = read(ffd, rbuf, 3);
if (rbuf[0] != 'P' || rbuf[1] != '4') {
fprintf(stderr, "not a PBM file\n");
return;
}
memset(rbuf, 0, 256);
i = 0;
do {
ret = read(ffd, (rbuf+i), 1);
} while (!isspace(rbuf[i++]));
width = atoi(rbuf);
memset(rbuf, 0, 256);
i = 0;
do {
ret = read(ffd, (rbuf+i), 1);
} while (!isspace(rbuf[i++]));
height = atoi(rbuf);
rowlength = ((width / 8) + 1);
bmapbuf = malloc(rowlength * height);
ret = read(ffd, bmapbuf, rowlength * height);
close(ffd);
#ifdef DEBUG
fprintf(stderr, "row length = %d bytes\n", rowlength);
fprintf(stderr, "bitmap resolution is %d x %d\n", width, height);
fprintf(stderr, "read %d of %d bytes\n", ret, rowlength * height);
fprintf(stderr, "\n");
for (y=0; y<height; y++) {
for (x=0; x<rowlength; x++) {
for (i=0; i<8; i++)
fprintf(stderr, "%c", (bmapbuf[(y*rowlength)+x] & (1<<(7-i))) ? '.' : ' ');
}
fprintf(stderr, "\n");
}
fprintf(stderr, "\n");
#endif
/* reverse bits and invert the bmap */
bmap_buffer_flipinvert(1, 1, bmapbuf, rowlength * height);
/* send the buffer to the watch */
mw_send_bitmap(mw_fd, MW_SCREEN_MODE_IDLE, width, height, 31, bmapbuf, rowlength * height);
/* update the display */
mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 1);
free(bmapbuf);
}
void print_help(void)
{
}
void process_cmd(char *cmdline, int clinep, int mw_fd)
{
unsigned char mdata[32];
fprintf(stderr, "command: '%s'\n", cmdline);
if (strncmp(cmdline, "quit", 4) == 0) {
close(mw_fd);
exit(0);
}
if (strncmp(cmdline, "help", 4) == 0) {
print_help();
}
if (strncmp(cmdline, "srtc", 4) == 0) {
fprintf(stderr, "Setting RTC from system time...");
mw_set_rtc(mw_fd, MW_RTC_CLOCK_24HR, MW_RTC_DATE_DDMM);
fprintf(stderr, "OK\n");
}
if (strncmp(cmdline, "grtc", 4) == 0) {
mw_send_frame(mw_fd, MW_GET_REAL_TIME_CLOCK, 0, NULL, 0);
}
if (strncmp(cmdline, "gistr", 5) == 0) {
mw_send_frame(mw_fd, MW_GET_INFORMATION_STRING, 0, NULL, 0);
}
if (strncmp(cmdline, "gdtype", 6) == 0) {
mw_send_frame(mw_fd, MW_GET_DEVICE_TYPE, 0, NULL, 0);
}
if (strncmp(cmdline, "rvbat", 5) == 0) {
mw_send_frame(mw_fd, MW_READ_BATTERY_VOLTAGE_MSG, 0, NULL, 0);
}
if (strncmp(cmdline, "rlight", 6) == 0) {
mw_send_frame(mw_fd, MW_READ_LIGHT_SENSOR_MSG, 0, NULL, 0);
}
if (strncmp(cmdline, "modecfg", 6) == 0) {
mw_configure_watch_mode(mw_fd, MW_SCREEN_MODE_IDLE, 0, 4, 1);
mw_update_display(mw_fd, MW_SCREEN_MODE_IDLE, 0);
}
if (strncmp(cmdline, "rbtcfg", 6) == 0) {
mdata[0] = 0; /* idle screen */
mdata[1] = 1; /* button index */
mdata[2] = 2; /* button press type */
mdata[3] = 3; /* callback message type */
mdata[4] = 4; /* callback message option */
mw_send_frame(mw_fd, MW_READ_BUTTON_CONFIG, 0, NULL, 0);
}
if (strncmp(cmdline, "svib", 4) == 0) {
mw_set_vibrate_mode(mw_fd, 1, 300, 300, 5);
}
if (strncmp(cmdline, "tbmp", 4) == 0) {
bitmap_test(mw_fd);
}
if (strncmp(cmdline, "rbmp", 4) == 0) {
bitmap_read(mw_fd);
}
}
int menu(int mw_fd)
{
fd_set mfds;
struct termios tconfd, tmwfd;
char cmdline[128];
unsigned char msg_buf[64];
unsigned char clinep = 0;
int rcvd;
tcgetattr(0, &tconfd);
cfmakeraw(&tconfd);
tconfd.c_oflag |= ONLCR | OPOST;
tconfd.c_lflag |= ISIG;
tcsetattr(0, TCSANOW, &tconfd);
tcgetattr(mw_fd, &tmwfd);
cfmakeraw(&tmwfd);
tmwfd.c_oflag |= ONLCR | OPOST;
tmwfd.c_lflag |= ISIG;
tcsetattr(mw_fd, TCSANOW, &tmwfd);
FD_ZERO(&mfds);
FD_SET(0, &mfds);
FD_SET(mw_fd, &mfds);
memset(cmdline, 0, 128);
do {
rcvd = 0;
if (select(mw_fd+1, &mfds, NULL, NULL, NULL) > 0) {
if (FD_ISSET(mw_fd, &mfds)) {
rcvd = read(mw_fd, msg_buf, 64);
#ifdef DEBUG
fprintf(stderr, "read %d bytes:\n", rcvd);
#endif
if (rcvd > 0) {
#ifdef DEBUG
dump_frame(msg_buf, rcvd);
#endif
decode_frame(mw_fd, msg_buf, rcvd);
}
};
if (FD_ISSET(0, &mfds)) {
rcvd = read(0, (cmdline+clinep), 1);
if (rcvd > 0) {
if (cmdline[clinep] == '\r') {
printf("\n");
cmdline[clinep--] = '\0';
process_cmd(cmdline, clinep, mw_fd);
clinep = 0;
memset(cmdline, 0, 128);
} else {
clinep++;
if (clinep > 75)
clinep = 75;
printf("\r> %s", cmdline);
fflush(stdout);
}
}
};
} else
break;
FD_ZERO(&mfds);
FD_SET(0, &mfds);
FD_SET(mw_fd, &mfds);
} while (rcvd > 0);
return 0;
}
int open_socket(bdaddr_t *bdaddr, uint8_t channel)
{
struct sockaddr_rc addr;
int sk, opt;
//int f;
sk = socket(PF_BLUETOOTH, SOCK_STREAM, BTPROTO_RFCOMM);
if (sk < 0) {
fprintf(stderr, "Can't create socket: %s (%d)\n",
strerror(errno), errno);
return -1;
}
/*
f = 1;
if (setsockopt(sk, SOL_BLUETOOTH, BT_FLUSHABLE, &f, sizeof(f)) < 0) {
fprintf(stderr, "Can't set flushable: %s (%d)\n",
strerror(errno), errno);
return -1;
}
*/
memset(&addr, 0, sizeof(addr));
addr.rc_family = AF_BLUETOOTH;
bacpy(&addr.rc_bdaddr, BDADDR_ANY);
if (bind(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
fprintf(stderr, "Can't bind socket: %s (%d)\n",
strerror(errno), errno);
close(sk);
return -1;
}
/* Set link mode */
opt = 0;
opt |= RFCOMM_LM_MASTER;
opt |= RFCOMM_LM_AUTH;
/*
opt |= RFCOMM_LM_ENCRYPT;
opt |= RFCOMM_LM_SECURE;
*/
if (opt && setsockopt(sk, SOL_RFCOMM, RFCOMM_LM, &opt, sizeof(opt)) < 0) {
fprintf(stderr, "Can't set RFCOMM link mode: %s (%d)",
strerror(errno), errno);
close(sk);
return -1;
}
memset(&addr, 0, sizeof(addr));
addr.rc_family = AF_BLUETOOTH;
bacpy(&addr.rc_bdaddr, bdaddr);
addr.rc_channel = channel;
if (connect(sk, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
fprintf(stderr, "Can't connect: %s (%d)\n",
strerror(errno), errno);
close(sk);
return -1;
}
return sk;
}
void baswap(bdaddr_t *dst, const bdaddr_t *src)
{
register unsigned char *d = (unsigned char *) dst;
register const unsigned char *s = (const unsigned char *) src;
register int i;
for (i = 0; i < 6; i++)
d[i] = s[5-i];
}
int bachk(const char *str)
{
if (!str)
return -1;
if (strlen(str) != 17)
return -1;
while (*str) {
if (!isxdigit(*str++))
return -1;
if (!isxdigit(*str++))
return -1;
if (*str == 0)
break;
if (*str++ != ':')
return -1;
}
return 0;
}
int str2ba(const char *str, bdaddr_t *ba)
{
bdaddr_t b;
int i;
if (bachk(str) < 0) {
memset(ba, 0, sizeof(*ba));
return -1;
}
for (i = 0; i < 6; i++, str += 3)
b.b[i] = strtol(str, NULL, 16);
baswap(ba, &b);
return 0;
}
int main(int argc, char **argv)
{
int mw_fd;
bdaddr_t btaddr;
if (argc != 2) {
fprintf(stderr, "Usage:\n\t%s <devicename>\n", argv[0]);
return 1;
};
crc16ccitt_init();
#if USE_RFCOMM_FILE
mw_fd = open(argv[1], O_RDWR);
if (mw_fd < 0) {
perror("open");
return 1;
};
#else
if (str2ba(argv[1], &btaddr))
return 1;
mw_fd = open_socket(&btaddr, 1);
if (mw_fd < 0) {
return 1;
} else {
fprintf(stderr, "connected to %s\n", argv[1]);
};
#endif
menu(mw_fd);
fsync(mw_fd);
close(mw_fd);
return 0;
};
Reference in a new issue View git blame Copy permalink