static void flush_bg_queue(struct fuse_conn *fc)
{
while (fc->active_background < fc->max_background &&
!list_empty(&fc->bg_queue)) {
struct fuse_req *req;
req = list_entry(fc->bg_queue.next, struct fuse_req, list);
list_del(&req->list);
fc->active_background++;
req->in.h.unique = fuse_get_unique(fc);
queue_request(fc, req);
}
}
static void queue_detail_request (ResolveClosure *closure,
GrlTmdbRequestDetail detail)
{
GrlTmdbRequest *request;
GRL_DEBUG ("Requesting %s for movie #%" G_GUINT64_FORMAT "...",
grl_tmdb_request_detail_to_string (detail), closure->id);
request = grl_tmdb_request_new_details (closure->self->priv->api_key,
detail, closure->id);
queue_request (closure, request, on_request_ready);
}
static void resolve_slow_details (ResolveClosure *closure)
{
GList *details = NULL;
GrlTmdbRequest *request;
if (SHOULD_RESOLVE (GRL_TMDB_METADATA_KEY_BACKDROP) ||
SHOULD_RESOLVE (GRL_TMDB_METADATA_KEY_POSTER))
details = g_list_prepend (details, GUINT_TO_POINTER (GRL_TMDB_REQUEST_DETAIL_MOVIE_IMAGES));
if (SHOULD_RESOLVE (GRL_METADATA_KEY_RATING) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_ORIGINAL_TITLE) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_TITLE) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_GENRE) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_STUDIO) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_SITE) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_DESCRIPTION) ||
SHOULD_RESOLVE (GRL_TMDB_METADATA_KEY_IMDB_ID))
details = g_list_prepend (details, GUINT_TO_POINTER (GRL_TMDB_REQUEST_DETAIL_MOVIE));
if (SHOULD_RESOLVE (GRL_METADATA_KEY_KEYWORD))
details = g_list_prepend (details, GUINT_TO_POINTER (GRL_TMDB_REQUEST_DETAIL_MOVIE_KEYWORDS));
if (SHOULD_RESOLVE (GRL_METADATA_KEY_PERFORMER) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_PRODUCER) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_DIRECTOR) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_AUTHOR))
details = g_list_prepend (details, GUINT_TO_POINTER (GRL_TMDB_REQUEST_DETAIL_MOVIE_CAST));
if (SHOULD_RESOLVE (GRL_METADATA_KEY_REGION) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_CERTIFICATE) ||
SHOULD_RESOLVE (GRL_METADATA_KEY_PUBLICATION_DATE))
details = g_list_prepend (details, GUINT_TO_POINTER (GRL_TMDB_REQUEST_DETAIL_MOVIE_RELEASE_INFO));
if (details == NULL)
return;
if (g_list_length (details) == 1) {
queue_detail_request (closure, GPOINTER_TO_UINT (details->data));
return;
}
GRL_DEBUG ("Requesting aggregated info for movie #%" G_GUINT64_FORMAT "...",
closure->id);
request = grl_tmdb_request_new_details_list (closure->self->priv->api_key,
details, closure->id);
g_list_free (details);
queue_request (closure, request, on_request_ready);
}
static void request_send_nowait(struct fuse_conn *fc, struct fuse_req *req)
{
spin_lock(&fc->lock);
if (fc->connected) {
req->background = 1;
fc->num_background++;
if (fc->num_background == FUSE_MAX_BACKGROUND)
fc->blocked = 1;
queue_request(fc, req);
spin_unlock(&fc->lock);
} else {
req->out.h.error = -ENOTCONN;
request_end(fc, req);
}
}
void request_send(struct fuse_conn *fc, struct fuse_req *req)
{
req->isreply = 1;
spin_lock(&fc->lock);
if (!fc->connected)
req->out.h.error = -ENOTCONN;
else if (fc->conn_error)
req->out.h.error = -ECONNREFUSED;
else {
queue_request(fc, req);
/* acquire extra reference, since request is still needed
after request_end() */
__fuse_get_request(req);
request_wait_answer(fc, req);
}
spin_unlock(&fc->lock);
}
/**
* Tell the VPN that forwarding to the Internet via some exit node is
* requested. Note that both UDP and TCP traffic will be forwarded,
* but possibly to different exit nodes. The VPN is to reserve a
* particular IP for the redirection and return it. The VPN will
* begin the redirection as soon as possible and maintain it as long
* as it is actively used and keeping it is feasible. Given resource
* limitations, the longest inactive mappings will be destroyed.
*
* @param vh VPN handle
* @param result_af desired address family for the returned allocation
* @param addr_af address family for 'addr', AF_INET or AF_INET6
* @param addr destination IP address on the Internet; destination
* port is to be taken from the VPN packet itself
* @param nac GNUNET_YES to notify via callback only after completion of
* the MESH-level connection,
* GNUNET_NO to notify as soon as the IP has been reserved
* @param expiration_time at what time should the redirection expire?
* (this should not impact connections that are active at that time)
* @param cb function to call with the IP
* @param cb_cls closure for cb
* @return handle to cancel the request (means the callback won't be
* invoked anymore; the mapping may or may not be established
* anyway)
*/
struct GNUNET_VPN_RedirectionRequest *
GNUNET_VPN_redirect_to_ip (struct GNUNET_VPN_Handle *vh,
int result_af,
int addr_af,
const void *addr,
int nac,
struct GNUNET_TIME_Absolute expiration_time,
GNUNET_VPN_AllocationCallback cb,
void *cb_cls)
{
struct GNUNET_VPN_RedirectionRequest *rr;
size_t alen;
switch (addr_af)
{
case AF_INET:
alen = sizeof (struct in_addr);
break;
case AF_INET6:
alen = sizeof (struct in6_addr);
break;
default:
GNUNET_break (0);
return NULL;
}
rr = GNUNET_malloc (sizeof (struct GNUNET_VPN_RedirectionRequest) + alen);
rr->vh = vh;
rr->addr = &rr[1];
rr->cb = cb;
rr->cb_cls = cb_cls;
rr->expiration_time = expiration_time;
rr->result_af = result_af;
rr->addr_af = addr_af;
rr->nac = nac;
memcpy (&rr[1], addr, alen);
queue_request (rr);
return rr;
}
void do_request(ident_request *id_req)
{
int dummy;
int ret;
struct sockaddr_in sa;
#if defined(DEBUG_IDENT_TOO)
fprintf(stderr, "Server: Doing request %d\n",
id_req->ident_id);
#endif /* DEBUG_IDENT_TOO */
if (0 > (id_req->fd = socket(PF_INET, SOCK_STREAM, 0)))
{
#if defined(DEBUG_IDENT_TOO)
log("ident", "Couldn't get new fd for request\n");
#endif /* DEBUG_IDENT_TOO */
/* Erk, put on pending queue */
queue_request(id_req->ident_id, id_req->local_port,
&(id_req->sock_addr));
id_req->local_port = 0;
return;
}
#ifdef DONT_USE_IOCTL
if(fcntl(id_req->fd, F_GETFL, &dummy) < 0) {
#if defined( DEBUG_IDENT_TOO )
log("ident","Can't get id_req->id flags.(%d)\n", errno);
#endif /* DEBUG_IDENT_TOO */
}
else
{
if(fcntl(id_req->fd, F_SETFL, (dummy|O_NONBLOCK)) < 0) {
#if defined( DEBUG_IDENT_TOO )
log("ident", "Can't set non-blocking on request sock\n");
#endif /* DEBUG_IDENT_TOO */
}
}
#else /* DONT_USE_IOCTL */
#ifdef OSF
if (ioctl(id_req->fd, (int) FIONBIO, (caddr_t)&dummy) < 0)
#else
if (ioctl(id_req->fd, FIONBIO, (caddr_t)&dummy) < 0)
#endif
{
#if defined(DEBUG_IDENT_TOO)
log("ident", "Can't set non-blocking on request sock\n");
#endif /* DEBUG_IDENT_TOO */
/* Do without? */
}
#endif /* DONT_USE_IOCTL */
id_req->request_time = time(NULL);
sa.sin_family = id_req->sock_addr.sin_family;
sa.sin_addr.s_addr = id_req->sock_addr.sin_addr.s_addr;
sa.sin_port = htons(IDENT_PORT);
ret = connect(id_req->fd, (struct sockaddr *) &sa, sizeof(sa));
if(ret!=0
#if defined(EINPROGRESS)
&& errno!=EINPROGRESS
#endif
)
{
if (errno == ECONNREFUSED)
{
#if defined(DEBUG_IDENT_TOO)
fprintf(stderr, "ID %d, CONNREFUSED\n", id_req->ident_id);
#endif /* DEBUG_IDENT_TOO */
id_req->flags |= IDENT_CONNREFUSED;
} else
{
#if defined(DEBUG_IDENT_TOO)
log("ident", "Error on connect, NOT CONNREFUSED, errno = %d\n",
errno);
#endif /* DEBUG_IDENT_TOO */
}
#if defined(EINPROGRESS)
} else if (errno!=EINPROGRESS)
#else /* !EINPROGRESS */
} else
int main(void)
{
uint8_t aes_key_nr;
uint8_t loop = 0;
uint8_t loop2 = 0;
// delay 1s to avoid further communication with uart or RFM12 when my programmer resets the MC after 500ms...
_delay_ms(1000);
util_init();
check_eeprom_compatibility(DEVICETYPE_BASESTATION);
request_queue_init();
// read packetcounter, increase by cycle and write back
packetcounter = e2p_generic_get_packetcounter() + PACKET_COUNTER_WRITE_CYCLE;
e2p_generic_set_packetcounter(packetcounter);
// read device specific config
aes_key_count = e2p_basestation_get_aeskeycount();
device_id = e2p_generic_get_deviceid();
uart_init();
UART_PUTS("\r\n");
UART_PUTF4("smarthomatic Base Station v%u.%u.%u (%08lx)\r\n", VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, VERSION_HASH);
UART_PUTS("(c) 2012..2014 Uwe Freese, www.smarthomatic.org\r\n");
UART_PUTF("Device ID: %u\r\n", device_id);
UART_PUTF("Packet counter: %lu\r\n", packetcounter);
UART_PUTF("AES key count: %u\r\n", aes_key_count);
UART_PUTS("Waiting for incoming data. Press h for help.\r\n\r\n");
led_blink(500, 500, 3);
rfm12_init();
sei();
// ENCODE TEST (Move to unit test some day...)
/*
uint8_t testlen = 32;
uint8_t aes_key_num = 0;
memset(&bufx[0], 0, sizeof(bufx));
bufx[0] = 0xff;
bufx[1] = 0xb0;
bufx[2] = 0xa0;
bufx[3] = 0x3f;
bufx[4] = 0x01;
bufx[5] = 0x70;
bufx[6] = 0x00;
bufx[7] = 0x0c;
bufx[8] = 0xa8;
bufx[9] = 0x00;
bufx[10] = 0x20;
bufx[20] = 0x20;
eeprom_read_block (aes_key, (uint8_t *)(EEPROM_AESKEYS_BYTE + aes_key_num * 32), 32);
UART_PUTS("Using AES key ");
print_bytearray((uint8_t *)aes_key, 32);
UART_PUTS("Before encryption: ");
print_bytearray(bufx, testlen);
uint8_t aes_byte_count = aes256_encrypt_cbc(bufx, testlen);
UART_PUTF("byte count = %u\r\n", aes_byte_count);
UART_PUTS("After encryption: ");
print_bytearray(bufx, aes_byte_count);
aes256_decrypt_cbc(bufx, aes_byte_count);
UART_PUTS("After decryption: ");
print_bytearray(bufx, testlen);
while(1);
*/
while (42)
{
if (rfm12_rx_status() == STATUS_COMPLETE)
{
uint8_t len = rfm12_rx_len();
if ((len == 0) || (len % 16 != 0))
{
UART_PUTF("Received garbage (%u bytes not multiple of 16): ", len);
print_bytearray(bufx, len);
}
else // try to decrypt with all keys stored in EEPROM
{
bool crcok = false;
for (aes_key_nr = 0; aes_key_nr < aes_key_count ; aes_key_nr++)
{
memcpy(bufx, rfm12_rx_buffer(), len);
/*if (aes_key_nr == 0)
{
UART_PUTS("Before decryption: ");
print_bytearray(bufx, len);
}*/
e2p_basestation_get_aeskey(aes_key_nr, aes_key);
//UART_PUTS("Trying AES key 2 ");
//print_bytearray((uint8_t *)aes_key, 32);
aes256_decrypt_cbc(bufx, len);
//UART_PUTS("Decrypted bytes: ");
//print_bytearray(bufx, len);
crcok = pkg_header_check_crc32(len);
if (crcok)
{
//UART_PUTS("CRC correct, AES key found!\r\n");
UART_PUTF("Received (AES key %u): ", aes_key_nr);
print_bytearray(bufx, len);
decode_data(len);
break;
}
}
if (!crcok)
{
UART_PUTS("Received garbage (CRC wrong after decryption): ");
memcpy(bufx, rfm12_rx_buffer(), len);
print_bytearray(bufx, len);
}
UART_PUTS("\r\n");
}
//uart_hexdump((char *)bufcontents, rfm12_rx_len());
//UART_PUTS("\r\n");
// tell the implementation that the buffer can be reused for the next data.
rfm12_rx_clear();
}
// send data, if waiting in send buffer
if (send_data_avail)
{
uint8_t i;
// set AES key nr
aes_key_nr = hex_to_uint8((uint8_t *)cmdbuf, 1);
//UART_PUTF("AES KEY = %u\r\n", aes_key_nr);
// init packet buffer
memset(&bufx[0], 0, sizeof(bufx));
// set message type
uint8_t message_type = hex_to_uint8((uint8_t *)cmdbuf, 3);
pkg_header_set_messagetype(message_type);
pkg_header_adjust_offset();
//UART_PUTF("MessageType = %u\r\n", message_type);
uint8_t string_offset_data = 0;
/*
UART_PUTS("sKK00RRRRGGMM.............Get\r\n");
UART_PUTS("sKK01RRRRGGMMDD...........Set\r\n");
UART_PUTS("sKK02RRRRGGMMDD...........SetGet\r\n");
UART_PUTS("sKK08GGMMDD...............Status\r\n");
UART_PUTS("sKK09SSSSPPPPPPEE.........Ack\r\n");
UART_PUTS("sKK0ASSSSPPPPPPEEGGMMDD...AckStatus\r\n");
*/
// set header extension fields to the values given as hex string in the user input
switch (message_type)
{
case MESSAGETYPE_GET:
case MESSAGETYPE_SET:
case MESSAGETYPE_SETGET:
pkg_headerext_common_set_receiverid(hex_to_uint16((uint8_t *)cmdbuf, 5));
pkg_headerext_common_set_messagegroupid(hex_to_uint8((uint8_t *)cmdbuf, 9));
pkg_headerext_common_set_messageid(hex_to_uint8((uint8_t *)cmdbuf, 11));
string_offset_data = 12;
break;
case MESSAGETYPE_STATUS:
pkg_headerext_common_set_messagegroupid(hex_to_uint8((uint8_t *)cmdbuf, 5));
pkg_headerext_common_set_messageid(hex_to_uint8((uint8_t *)cmdbuf, 7));
string_offset_data = 8;
break;
case MESSAGETYPE_ACK:
pkg_headerext_common_set_acksenderid(hex_to_uint16((uint8_t *)cmdbuf, 5));
pkg_headerext_common_set_ackpacketcounter(hex_to_uint24((uint8_t *)cmdbuf, 9));
pkg_headerext_common_set_error(hex_to_uint8((uint8_t *)cmdbuf, 15));
// fallthrough!
case MESSAGETYPE_ACKSTATUS:
pkg_headerext_common_set_messagegroupid(hex_to_uint8((uint8_t *)cmdbuf, 17));
pkg_headerext_common_set_messageid(hex_to_uint8((uint8_t *)cmdbuf, 19));
string_offset_data = 20;
break;
}
uint8_t data_len_raw = 0;
// copy message data, which exists in all packets except in Get and Ack packets
if ((message_type != MESSAGETYPE_GET) && (message_type != MESSAGETYPE_ACK))
{
uint8_t data_len_raw = (strlen(cmdbuf) - 1 - string_offset_data) / 2;
//UART_PUTF("Data bytes = %u\r\n", data_len_raw);
uint8_t start = __HEADEROFFSETBITS / 8;
uint8_t shift = __HEADEROFFSETBITS % 8;
// copy message data, using __HEADEROFFSETBITS value and string_offset_data
for (i = 0; i < data_len_raw; i++)
{
uint8_t val = hex_to_uint8((uint8_t *)cmdbuf, string_offset_data + 2 * i + 1);
array_write_UIntValue(start + i, shift, 8, val, bufx);
}
}
// round packet length to x * 16 bytes
uint8_t packet_len = ((uint16_t)__HEADEROFFSETBITS + (uint16_t)data_len_raw * 8) / 8;
packet_len = ((packet_len - 1) / 16 + 1) * 16;
// send packet which doesn't require an acknowledge immediately
if ((message_type != MESSAGETYPE_GET) && (message_type != MESSAGETYPE_SET) && (message_type != MESSAGETYPE_SETGET))
{
send_packet(aes_key_nr, packet_len);
}
else // enqueue request (don't send immediately)
{
// header size = 9 bytes!
if (queue_request(pkg_headerext_common_get_receiverid(), message_type, aes_key_nr, bufx + 9, packet_len - 9))
{
UART_PUTF("Request added to queue (%u bytes packet).\r\n", packet_len);
}
else
{
UART_PUTS("Warning! Request queue full. Packet will not be sent.\r\n");
}
print_request_queue();
}
// clear cmdbuf to receive more input from UART
send_data_avail = false;
rfm12_tick();
led_blink(200, 0, 1);
}
// flash LED every second to show the device is alive
if (loop == 50)
{
led_blink(10, 10, 1);
loop = 0;
request_t* request = find_request_to_repeat(packetcounter + 1);
if (request != 0) // if request to repeat was found in queue
{
UART_PUTS("Repeating request.\r\n");
send_packet((*request).aes_key, (*request).data_bytes + 9); // header size = 9 bytes!
print_request_queue();
}
// Auto-send something for debugging purposes...
if (loop2 == 50)
{
//strcpy(cmdbuf, "s000102828300");
//send_data_avail = true;
loop2 = 0;
}
else
{
loop2++;
}
}
else
{
_delay_ms(20);
}
rfm12_tick();
loop++;
process_rxbuf();
if (uart_timeout > 0)
{
uart_timeout--;
if (uart_timeout == 0)
{
UART_PUTS("*** UART user timeout. Input was ignored. ***\r\n");
}
}
}
// never called
// aes256_done(&aes_ctx);
}
int main ( void )
{
uint8_t aes_key_nr;
uint8_t loop = 0;
uint8_t loop2 = 0;
uint8_t data[22];
sbi(LED_DDR, LED_PIN);
// delay 1s to avoid further communication with uart or RFM12 when my programmer resets the MC after 500ms...
_delay_ms(1000);
request_queue_init();
// read packetcounter, increase by cycle and write back
packetcounter = eeprom_read_dword((uint32_t*)EEPROM_POS_PACKET_COUNTER) + PACKET_COUNTER_WRITE_CYCLE;
eeprom_write_dword((uint32_t*)0, packetcounter);
uart_init(true);
UART_PUTS ("\r\n");
UART_PUTS ("Open Home Control Base Station V1.0\r\n");
UART_PUTS ("(c) 2012 Uwe Freese, www.open-home-control.com\r\n");
UART_PUTF ("Packet counter: %lu\r\n", packetcounter);
UART_PUTS ("Waiting for incoming data. Press h for help.\r\n");
rfm12_init();
sei();
// ENCODE TEST
/*
uint8_t testlen = 64;
eeprom_read_block (aes_key, (uint8_t *)EEPROM_POS_AES_KEY, 32);
UART_PUTS("Using AES key ");
printbytearray((uint8_t *)aes_key, 32);
UART_PUTS("Before encryption: ");
printbytearray(bufx, testlen);
unsigned long crc = crc32(bufx, testlen);
UART_PUTF("CRC32 is %lx (added as last 4 bytes)\r\n", crc);
UART_PUTS("1\r\n");
crc = crc32(bufx, testlen - 4);
UART_PUTS("2\r\n");
setBuf32(testlen - 4, crc);
UART_PUTS("Before encryption (CRC added): ");
printbytearray(bufx, testlen);
UART_PUTS("1\r\n");
uint8_t aes_byte_count = aes256_encrypt_cbc(bufx, testlen);
UART_PUTS("2\r\n");
UART_PUTS("After encryption: ");
printbytearray(bufx, aes_byte_count);
UART_PUTF("String len = %u\r\n", aes_byte_count);
UART_PUTS("1\r\n");
aes256_decrypt_cbc(bufx, aes_byte_count);
UART_PUTS("2\r\n");
UART_PUTS("After decryption: ");
printbytearray(bufx, testlen);
crc = getBuf32(testlen - 4);
UART_PUTF("CRC32 is %lx (last 4 bytes from decrypted message)\r\n", crc);
printbytearray(bufx, testlen);
UART_PUTS("After decryption (CRC removed): ");
printbytearray(bufx, testlen);
UART_PUTF("String len = %u\r\n", testlen);
while(1);
*/
while (42)
{
if (rfm12_rx_status() == STATUS_COMPLETE)
{
uint8_t len = rfm12_rx_len();
if ((len == 0) || (len % 16 != 0))
{
UART_PUTF("Received garbage (%u bytes not multiple of 16): ", len);
printbytearray(bufx, len);
}
else // try to decrypt with all keys stored in EEPROM
{
uint32_t assumed_crc;
uint32_t actual_crc;
for(aes_key_nr = 0; aes_key_nr < AES_KEY_EEPROM_COUNT ; aes_key_nr++)
{
//strncpy((char *)bufx, (char *)rfm12_rx_buffer(), len);
memcpy(bufx, rfm12_rx_buffer(), len);
/*if (aes_key_nr == 0)
{
UART_PUTS("Before decryption: ");
printbytearray(bufx, len);
}*/
eeprom_read_block (aes_key, (uint8_t *)(EEPROM_POS_AES_KEY + aes_key_nr * 32), 32);
//UART_PUTS("Trying AES key ");
//printbytearray((uint8_t *)aes_key, 32);
aes256_decrypt_cbc(bufx, len);
//UART_PUTS("Decrypted bytes: ");
//printbytearray(bufx, len);
assumed_crc = getBuf32(len - 4);
actual_crc = crc32(bufx, len - 4);
//UART_PUTF("Received CRC32 would be %lx\r\n", assumed_crc);
//UART_PUTF("Re-calculated CRC32 is %lx\r\n", actual_crc);
if (assumed_crc == actual_crc)
{
//UART_PUTS("CRC correct, AES key found!\r\n");
UART_PUTF("Received (AES key %u): ", aes_key_nr);
printbytearray(bufx, len - 4);
decode_data(len - 4);
break;
}
}
if (assumed_crc != actual_crc)
{
UART_PUTS("Received garbage (CRC wrong after decryption).\r\n");
}
UART_PUTS("\r\n");
}
//uart_hexdump((char *)bufcontents, rfm12_rx_len());
//UART_PUTS("\r\n");
// tell the implementation that the buffer can be reused for the next data.
rfm12_rx_clear();
}
// send data, if waiting in send buffer
if (send_data_avail)
{
uint8_t i;
uint8_t data_len_raw = strlen(sendbuf) / 2 - 2;
// round data length to 6 + 16 bytes (including padding bytes)
uint8_t data_len = (((data_len_raw + 9) / 16) + 1) * 16 - 10;
// set aes key nr
aes_key_nr = hex_to_uint8((uint8_t *)sendbuf, 0);
//UART_PUTF("AES KEY = %u\r\n", aes_key_nr);
// set command id
uint8_t command_id = hex_to_uint8((uint8_t *)sendbuf, 2);
// set data
for (i = 0; i < data_len_raw; i++)
{
data[i] = hex_to_uint8((uint8_t *)sendbuf, 4 + 2 * i);
}
// set padding bytes
for (i = data_len_raw; i < data_len; i++)
{
data[i] = 0;
}
// send status packet immediately (command IDs are less than 128)
if (command_id < 128)
{
// set command id
bufx[5] = command_id;
// set data
memcpy(bufx + 6, data, data_len);
send_packet(aes_key_nr, data_len);
}
else // enqueue request (don't send immediately)
{
if (queue_request(data[0], command_id, aes_key_nr, data + 1))
{
UART_PUTS("Adding request to queue.\r\n");
}
else
{
UART_PUTS("Warning! Request queue full. Packet will not be sent.\r\n");
}
print_request_queue();
}
// clear send text buffer
send_data_avail = false;
rfm12_tick();
led_blink(200, 0, 1);
}
// flash LED every second to show the device is alive
if (loop == 50)
{
led_blink(10, 10, 1);
loop = 0;
if (set_repeat_request(packetcounter + 1)) // if request to repeat was found in queue
{
UART_PUTS("Repeating request.\r\n");
send_packet(0, 6);
print_request_queue();
}
// Auto-send something for debugging purposes...
if (loop2 == 50)
{
//strcpy(sendbuf, "008c0001003d");
//send_data_avail = true;
loop2 = 0;
}
else
{
loop2++;
}
}
else
{
_delay_ms(20);
}
rfm12_tick();
loop++;
process_rxbuf();
if (uart_timeout > 0)
{
uart_timeout--;
if (uart_timeout == 0)
{
UART_PUTS("*** UART user timeout. Input was ignored. ***\r\n");
}
}
}
// never called
// aes256_done(&aes_ctx);
}
static void
grl_tmdb_source_resolve (GrlSource *source,
GrlSourceResolveSpec *rs)
{
ResolveClosure *closure;
GrlTmdbRequest *request;
const char *title = NULL;
const char *str_movie_id;
GrlTmdbSource *self = GRL_TMDB_SOURCE (source);
guint64 movie_id = 0;
GList *it;
if (!grl_media_is_video (rs->media)) {
/* We only entertain videos */
rs->callback (source, rs->operation_id, rs->media, rs->user_data, NULL);
return;
}
/* If the media is a TV show, don't handle it */
if (grl_media_get_show (rs->media) != NULL) {
rs->callback (source, rs->operation_id, rs->media, rs->user_data, NULL);
return;
}
/* Prefer resolving by movie-id: This is more reliable and saves the search query. */
str_movie_id = grl_data_get_string (GRL_DATA (rs->media),
GRL_TMDB_METADATA_KEY_TMDB_ID);
if (str_movie_id)
movie_id = strtoull (str_movie_id, NULL, 10);
/* Try title if no movie-id could be found. */
if (movie_id == 0)
title = grl_media_get_title (rs->media);
if (movie_id == 0 && title == NULL) {
/* Can't search for anything without a title or the movie-id ... */
rs->callback (source, rs->operation_id, rs->media, rs->user_data, NULL);
return;
}
GRL_DEBUG ("grl_tmdb_source_resolve");
closure = g_slice_new0 (ResolveClosure);
closure->self = g_object_ref (self);
closure->rs = rs;
closure->pending_requests = g_queue_new ();
closure->keys = g_hash_table_new (g_direct_hash, g_direct_equal);
closure->slow = FALSE;
closure->id = movie_id;
it = rs->keys;
/* Copy keys to list for faster lookup */
while (it) {
g_hash_table_add (closure->keys, it->data);
/* Enable slow resolution if slow keys are requested */
closure->slow |= g_hash_table_contains (self->priv->slow_keys,
it->data);
it = it->next;
}
/* Disable slow resolution if slow keys where requested, but the operation
* options explicitly ask for fast resolving only. */
if (grl_operation_options_get_resolution_flags (rs->options) & GRL_RESOLVE_FAST_ONLY)
closure->slow = FALSE;
/* We did not receive the config yet, queue request. Config callback will
* take care of flushing the queue when ready.
*/
if (self->priv->configuration == NULL && self->priv->config_pending) {
g_queue_push_tail (self->priv->pending_resolves, closure);
return;
}
if (self->priv->configuration == NULL) {
GRL_DEBUG ("Fetching TMDb configuration...");
/* We need to fetch TMDb's configuration for the image paths */
request = grl_tmdb_request_new_configuration (closure->self->priv->api_key);
g_assert (g_queue_is_empty (closure->pending_requests));
queue_request (closure, request, on_configuration_ready);
self->priv->config_pending = TRUE;
}
if (title) {
GRL_DEBUG ("Running initial search for title \"%s\"...", title);
request = grl_tmdb_request_new_search (closure->self->priv->api_key, title);
queue_request (closure, request, on_search_ready);
run_pending_requests (closure, 1);
} else {
GRL_DEBUG ("Running %s lookup for movie #%" G_GUINT64_FORMAT "...",
closure->slow ? "slow" : "fast", movie_id);
if (closure->slow) {
resolve_slow_details (closure);
} else {
queue_detail_request (closure, GRL_TMDB_REQUEST_DETAIL_MOVIE);
}
run_pending_requests (closure, G_MAXINT);
}
}
