1 #include "qmi-message.h"
3 #define MIN(a,b) (((a)<(b))?(a):(b))
4 #define CEILDIV(x,y) (((x) + (y) - 1) / (y))
6 static void cmd_wms_list_messages_cb(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg)
8 struct qmi_wms_list_messages_response res;
12 qmi_parse_wms_list_messages_response(msg, &res);
13 c = blobmsg_open_array(&status, NULL);
14 for (i = 0; i < res.data.message_list_n; i++)
15 blobmsg_add_u32(&status, NULL, res.data.message_list[i].memory_index);
17 blobmsg_close_array(&status, c);
20 static enum qmi_cmd_result
21 cmd_wms_list_messages_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
23 static struct qmi_wms_list_messages_request mreq = {
24 QMI_INIT(storage_type, QMI_WMS_STORAGE_TYPE_UIM),
25 QMI_INIT(message_tag, QMI_WMS_MESSAGE_TAG_TYPE_MT_NOT_READ),
28 qmi_set_wms_list_messages_request(msg, &mreq);
30 return QMI_CMD_REQUEST;
34 put_unicode_char(char *dest, uint16_t c)
39 } else if (c < 0x800) {
40 *(dest++) = 0xc0 | ((c >> 6) & 0x1f);
41 *dest = 0x80 | (c & 0x3f);
44 *(dest++) = 0xe0 | ((c >> 12) & 0xf);
45 *(dest++) = 0x80 | ((c >> 6) & 0x3f);
46 *dest = 0x80 | (c & 0x3f);
53 pdu_decode_7bit_char(char *dest, int len, unsigned char c, bool *escape)
55 uint16_t conv_0x20[] = {
56 0x0040, 0x00A3, 0x0024, 0x00A5, 0x00E8, 0x00E9, 0x00F9, 0x00EC,
57 0x00F2, 0x00E7, 0x000A, 0x00D8, 0x00F8, 0x000D, 0x00C5, 0x00E5,
58 0x0394, 0x005F, 0x03A6, 0x0393, 0x039B, 0x03A9, 0x03A0, 0x03A8,
59 0x03A3, 0x0398, 0x039E, 0x00A0, 0x00C6, 0x00E6, 0x00DF, 0x00C9,
61 uint16_t conv_0x5b[] = {
62 0x00C4, 0x00D6, 0x00D1, 0x00DC, 0x00A7, 0x00BF,
64 uint16_t conv_0x7b[] = {
65 0x00E4, 0x00F6, 0x00F1, 0x00FC, 0x00E0
70 fprintf(stderr, " %02x", c);
108 *(dest++) = conv_0x20[0x1B];
121 outc = conv_0x20[(int) c];
124 else if (c >= 0x5b && c <= 0x60)
125 outc = conv_0x5b[c - 0x5b];
126 else if (c >= 0x7b && c <= 0x7f)
127 outc = conv_0x7b[c - 0x7b];
132 return cur_len + put_unicode_char(dest, outc);
136 pdu_decode_7bit_str(char *dest, const unsigned char *data, int data_len, int bit_offset)
142 fprintf(stderr, "Raw text:");
143 for (i = 0; i < data_len; i++) {
144 int pos = (i + bit_offset) % 7;
147 len += pdu_decode_7bit_char(dest, len, data[i] & 0x7f, &escape);
150 len += pdu_decode_7bit_char(dest, len,
151 (data[i - 1] >> (7 + 1 - pos)) |
152 ((data[i] << pos) & 0x7f), &escape);
155 len += pdu_decode_7bit_char(dest, len, (data[i] >> 1) & 0x7f,
160 fprintf(stderr, "\n");
164 static int decode_udh(const unsigned char *data)
166 const unsigned char *end;
167 unsigned int type, len, udh_len;
170 end = data + udh_len;
172 const unsigned char *val;
183 blobmsg_add_u32(&status, "concat_ref", (uint32_t) val[0]);
184 blobmsg_add_u32(&status, "concat_part", (uint32_t) val[2]);
185 blobmsg_add_u32(&status, "concat_parts", (uint32_t) val[1]);
188 blobmsg_add_u32(&status, "concat_ref", (uint32_t) (val[0] << 8 | val[1]));
189 blobmsg_add_u32(&status, "concat_part", (uint32_t) val[3]);
190 blobmsg_add_u32(&status, "concat_parts", (uint32_t) val[2]);
200 static void decode_7bit_field(char *name, const unsigned char *data, int data_len, int bit_offset)
202 char *dest = blobmsg_alloc_string_buffer(&status, name, 3 * data_len + 2);
203 pdu_decode_7bit_str(dest, data, CEILDIV(data_len * 7, 8), bit_offset);
205 blobmsg_add_string_buffer(&status);
208 static char *pdu_add_semioctet(char *str, char val)
210 *str = '0' + (val & 0xf);
214 *str = '0' + ((val >> 4) & 0xf);
222 pdu_decode_address(char *str, unsigned char *data, int len)
227 switch (toa & 0x70) {
229 pdu_decode_7bit_str(str, data, len, 0);
236 str = pdu_add_semioctet(str, *data);
244 static void wms_decode_address(char *name, unsigned char *data, int len)
246 char *str = blobmsg_alloc_string_buffer(&status, name, len * 2 + 2);
247 pdu_decode_address(str, data, len);
248 blobmsg_add_string_buffer(&status);
251 static void blobmsg_add_hex(struct blob_buf *buf, const char *name, unsigned const char *data, int len)
253 char* str = blobmsg_alloc_string_buffer(buf, name, len * 2 + 1);
254 for (int i = 0; i < len; i++) {
255 str += sprintf(str, "%02x", data[i]);
257 blobmsg_add_string_buffer(buf);
260 #define cmd_wms_delete_message_cb no_cb
261 static enum qmi_cmd_result
262 cmd_wms_delete_message_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
267 id = strtoul(arg, &err, 10);
269 uqmi_add_error("Invalid message ID");
273 static struct qmi_wms_delete_request mreq = {
274 QMI_INIT(memory_storage, QMI_WMS_STORAGE_TYPE_UIM),
275 QMI_INIT(message_mode, QMI_WMS_MESSAGE_MODE_GSM_WCDMA),
278 mreq.set.memory_index = 1;
279 mreq.data.memory_index = id;
281 qmi_set_wms_delete_request(msg, &mreq);
283 return QMI_CMD_REQUEST;
287 static void cmd_wms_get_message_cb(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg)
289 struct qmi_wms_raw_read_response res;
290 unsigned char *data, *end;
294 unsigned char first, dcs;
297 qmi_parse_wms_raw_read_response(msg, &res);
298 c = blobmsg_open_table(&status, NULL);
299 data = (unsigned char *) res.data.raw_message_data.raw_data;
300 end = data + res.data.raw_message_data.raw_data_n;
303 if (data + cur_len >= end)
307 wms_decode_address("smsc", data, cur_len - 1);
315 sent = (first & 0x3) == 1;
320 if (data + cur_len >= end)
324 cur_len = (cur_len + 1) / 2;
325 wms_decode_address(sent ? "receiver" : "sender", data, cur_len);
340 blobmsg_add_u32(&status, "class", (dcs & 3));
343 /* Message validity */
349 str = blobmsg_alloc_string_buffer(&status, "timestamp", 32);
354 str = pdu_add_semioctet(str, data[0]);
357 str = pdu_add_semioctet(str, data[1]);
360 str = pdu_add_semioctet(str, data[2]);
364 str = pdu_add_semioctet(str, data[3]);
367 str = pdu_add_semioctet(str, data[4]);
370 str = pdu_add_semioctet(str, data[5]);
373 blobmsg_add_string_buffer(&status);
378 int message_len = *(data++);
382 /* User Data Header */
384 udh_len = decode_udh(data);
386 bit_offset = udh_len % 7;
394 /* 7 bit GSM alphabet */
395 message_len = message_len - CEILDIV(udh_len * 8, 7);
396 message_len = MIN(message_len, CEILDIV((end - data) * 8, 7));
397 decode_7bit_field("text", data, message_len, bit_offset);
401 message_len = MIN(message_len - udh_len, end - data);
402 blobmsg_add_hex(&status, "data", data, message_len);
405 /* 16 bit UCS-2 string */
406 message_len = MIN(message_len - udh_len, end - data);
407 blobmsg_add_hex(&status, "ucs-2", data, message_len);
413 blobmsg_close_table(&status, c);
417 blobmsg_close_table(&status, c);
418 fprintf(stderr, "There was an error reading message.\n");
421 static enum qmi_cmd_result
422 cmd_wms_get_message_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
424 static struct qmi_wms_raw_read_request mreq = {
425 QMI_INIT_SEQUENCE(message_memory_storage_id,
426 .storage_type = QMI_WMS_STORAGE_TYPE_UIM,
428 QMI_INIT(message_mode, QMI_WMS_MESSAGE_MODE_GSM_WCDMA),
433 id = strtoul(arg, &err, 10);
435 uqmi_add_error("Invalid message ID");
439 mreq.data.message_memory_storage_id.memory_index = id;
440 qmi_set_wms_raw_read_request(msg, &mreq);
442 return QMI_CMD_REQUEST;
446 static void cmd_wms_get_raw_message_cb(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg)
448 struct qmi_wms_raw_read_response res;
453 qmi_parse_wms_raw_read_response(msg, &res);
454 data = (unsigned char *) res.data.raw_message_data.raw_data;
455 str = blobmsg_alloc_string_buffer(&status, NULL, res.data.raw_message_data.raw_data_n * 3);
456 for (i = 0; i < res.data.raw_message_data.raw_data_n; i++) {
457 str += sprintf(str, &" %02x"[i ? 0 : 1], data[i]);
459 blobmsg_add_string_buffer(&status);
462 #define cmd_wms_get_raw_message_prepare cmd_wms_get_message_prepare
472 #define cmd_wms_send_message_smsc_cb no_cb
473 static enum qmi_cmd_result
474 cmd_wms_send_message_smsc_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
480 #define cmd_wms_send_message_target_cb no_cb
481 static enum qmi_cmd_result
482 cmd_wms_send_message_target_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
488 #define cmd_wms_send_message_flash_cb no_cb
489 static enum qmi_cmd_result
490 cmd_wms_send_message_flash_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
497 pdu_encode_semioctet(unsigned char *dest, const char *str)
503 char digit = *str - '0';
506 dest[len] = 0xf0 | digit;
508 dest[len++] &= (digit << 4) | 0xf;
518 pdu_encode_7bit_str(unsigned char *data, const char *str)
534 data[len++] |= c << (8 - ofs);
535 data[len] = c >> ofs;
546 pdu_encode_number(unsigned char *dest, const char *str, bool smsc)
548 unsigned char format;
561 for (i = 0; str[i]; i++) {
562 if (str[i] >= '0' || str[i] <= '9')
572 dest[len++] = format;
574 len += pdu_encode_semioctet(&dest[len], str);
576 len += pdu_encode_7bit_str(&dest[len], str);
581 dest[0] = strlen(str);
587 pdu_encode_data(unsigned char *dest, const char *str)
592 len += pdu_encode_7bit_str(&dest[len], str);
598 #define cmd_wms_send_message_cb no_cb
599 static enum qmi_cmd_result
600 cmd_wms_send_message_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
602 static unsigned char buf[512];
603 static struct qmi_wms_raw_send_request mreq = {
604 QMI_INIT_SEQUENCE(raw_message_data,
605 .format = QMI_WMS_MESSAGE_FORMAT_GSM_WCDMA_POINT_TO_POINT,
609 unsigned char *cur = buf;
610 unsigned char first_octet = 0x11;
611 unsigned char protocol_id = 0x00;
612 unsigned char dcs = 0x00;
614 if (!_send.smsc || !*_send.smsc || !_send.target || !*_send.target) {
615 uqmi_add_error("Missing argument");
619 if (strlen(_send.smsc) > 16 || strlen(_send.target) > 16 || strlen(arg) > 160) {
620 uqmi_add_error("Argument too long");
627 cur += pdu_encode_number(cur, _send.smsc, true);
628 *(cur++) = first_octet;
629 *(cur++) = 0; /* reference */
631 cur += pdu_encode_number(cur, _send.target, false);
632 *(cur++) = protocol_id;
635 *(cur++) = 0xff; /* validity */
636 cur += pdu_encode_data(cur, arg);
638 mreq.data.raw_message_data.raw_data_n = cur - buf;
639 qmi_set_wms_raw_send_request(msg, &mreq);
641 return QMI_CMD_REQUEST;