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
;