get rid of unused variables
[project/uqmi.git] / commands-wms.c
index 16c2a3b..62199ab 100644 (file)
@@ -28,34 +28,14 @@ cmd_wms_list_messages_prepare(struct qmi_dev *qmi, struct qmi_request *req, stru
        return QMI_CMD_REQUEST;
 }
 
-static void decode_7bit(char *name, const unsigned char *data, int data_len)
+static int
+pdu_decode_7bit_str(char *dest, const unsigned char *data, int data_len, int bit_offset)
 {
-       bool multipart = false;
-       char *dest;
-       int part = 0, n_parts = 0;
-       int len, pos_offset = 0;
+       char *orig_dest = dest;
        int i;
 
-       if (data[0] == 5 && data[1] == 0 && data[2] == 3) {
-               multipart = true;
-               n_parts = data[4];
-               part = data[5];
-       } else if (data[0] == 6 && data[1] == 8 && data[2] == 4) {
-               multipart = true;
-               n_parts = data[5];
-               part = data[6];
-       }
-
-       if (multipart) {
-               len = data[0] + 1;
-               data += len;
-               data_len -= len;
-               pos_offset = 6;
-       }
-
-       dest = blobmsg_alloc_string_buffer(&status, name, data_len * 8 / 7 + 2);
        for (i = 0; i < data_len; i++) {
-               int pos = (i + pos_offset) % 7;
+               int pos = (i + bit_offset) % 7;
 
                if (pos == 0) {
                        *(dest++) = data[i] & 0x7f;
@@ -69,15 +49,62 @@ static void decode_7bit(char *name, const unsigned char *data, int data_len)
                }
        }
        *dest = 0;
-       blobmsg_add_string_buffer(&status);
+       return dest - orig_dest;
+}
+
+static void decode_udh(const unsigned char *data)
+{
+       const unsigned char *end;
+       unsigned int type, len;
+
+       len = *(data++);
+       end = data + len;
+       while (data < end) {
+               const unsigned char *val;
+
+               type = data[0];
+               len = data[1];
+               val = &data[2];
+               data += 2 + len;
+               if (data > end)
+                       break;
 
-       if (multipart) {
-               blobmsg_add_u32(&status, "part", part + 1);
-               blobmsg_add_u32(&status, "parts", n_parts);
+               switch (type) {
+               case 0:
+                       blobmsg_add_u32(&status, "concat_ref", (uint32_t) val[0]);
+                       blobmsg_add_u32(&status, "concat_part", (uint32_t) val[2] + 1);
+                       blobmsg_add_u32(&status, "concat_parts", (uint32_t) val[1]);
+                       break;
+               default:
+                       break;
+               }
        }
 }
 
-static char *add_semioctet(char *str, char val)
+static void decode_7bit_field(char *name, const unsigned char *data, int data_len, bool udh)
+{
+       const unsigned char *udh_start;
+       char *dest;
+       int pos_offset = 0;
+
+       if (udh) {
+               int len = data[0] + 1;
+
+               udh_start = data;
+               data += len;
+               data_len -= len;
+               pos_offset = len % 7;
+       }
+
+       dest = blobmsg_alloc_string_buffer(&status, name, data_len * 8 / 7 + 2);
+       pdu_decode_7bit_str(dest, data, data_len, pos_offset);
+       blobmsg_add_string_buffer(&status);
+
+       if (udh)
+               decode_udh(udh_start);
+}
+
+static char *pdu_add_semioctet(char *str, char val)
 {
        *str = '0' + (val & 0xf);
        if (*str <= '9')
@@ -90,25 +117,34 @@ static char *add_semioctet(char *str, char val)
        return str;
 }
 
-static unsigned char *
-decode_semioctet_number(char *str, char *name, unsigned char *data, int len)
+static void
+pdu_decode_address(char *str, unsigned char *data, int len)
 {
-       str = blobmsg_alloc_string_buffer(&status, name, len * 2 + 2);
-       if (*data == 0x91) {
-               len--;
+       unsigned char toa;
+
+       toa = *(data++);
+       switch (toa & 0x70) {
+       case 0x50:
+               pdu_decode_7bit_str(str, data, len, 0);
+               return;
+       case 0x10:
                *(str++) = '+';
-       }
-       data++;
-       while (len) {
-               str = add_semioctet(str, *data);
-               data++;
-               len--;
+               /* fall through */
+       default:
+               while (len--) {
+                       str = pdu_add_semioctet(str, *data);
+                       data++;
+               }
        }
 
        *str = 0;
-       blobmsg_add_string_buffer(&status);
+}
 
-       return data;
+static void wms_decode_address(char *str, char *name, unsigned char *data, int len)
+{
+       str = blobmsg_alloc_string_buffer(&status, name, len * 2 + 2);
+       pdu_decode_address(str, data, len);
+       blobmsg_add_string_buffer(&status);
 }
 
 static void cmd_wms_get_message_cb(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg)
@@ -116,86 +152,96 @@ static void cmd_wms_get_message_cb(struct qmi_dev *qmi, struct qmi_request *req,
        struct qmi_wms_raw_read_response res;
        unsigned char *data, *end;
        char *str;
-       int i, cur_len;
+       int cur_len;
        bool sent;
+       unsigned char first, dcs;
 
        qmi_parse_wms_raw_read_response(msg, &res);
        data = (unsigned char *) res.data.raw_message_data.raw_data;
        end = data + res.data.raw_message_data.raw_data_n;
 
-       do {
-               cur_len = *(data++);
-               if (data + cur_len >= end)
-                       break;
+       cur_len = *(data++);
+       if (data + cur_len >= end)
+               return;
 
-               if (cur_len)
-                       data = decode_semioctet_number(str, "smsc", data, cur_len);
+       if (cur_len) {
+               wms_decode_address(str, "smsc", data, cur_len - 1);
+               data += cur_len;
+       }
 
-               if (data + 3 >= end)
-                       break;
+       if (data + 3 >= end)
+               return;
 
-               sent = (*data & 0x3) == 1;
+       first = *(data++);
+       sent = (first & 0x3) == 1;
+       if (sent)
                data++;
-               if (sent)
-                       data++;
 
-               cur_len = *(data++);
-               if (data + cur_len >= end)
-                       break;
+       cur_len = *(data++);
+       if (data + cur_len >= end)
+               return;
 
-               if (cur_len)
-                       data = decode_semioctet_number(str, sent ? "receiver" : "sender", data, (cur_len + 1) / 2);
+       if (cur_len) {
+               cur_len = (cur_len + 1) / 2;
+               wms_decode_address(str, sent ? "receiver" : "sender", data, cur_len);
+               data += cur_len + 1;
+       }
 
-               if (data + 3 >= end)
-                       break;
+       if (data + 3 >= end)
+               return;
 
-               /* Protocol ID */
-               if (*(data++) != 0)
-                       break;
+       /* Protocol ID */
+       if (*(data++) != 0)
+               return;
 
-               /* Data Encoding */
-               if (*(data++) != 0)
-                       break;
+       /* Data Encoding */
+       dcs = *(data++);
 
-               if (sent) {
-                       /* Message validity */
-                       data++;
-               } else {
-                       if (data + 6 >= end)
-                               break;
-
-                       str = blobmsg_alloc_string_buffer(&status, "timestamp", 32);
-
-                       /* year */
-                       *(str++) = '2';
-                       *(str++) = '0';
-                       str = add_semioctet(str, data[0]);
-                       /* month */
-                       *(str++) = '-';
-                       str = add_semioctet(str, data[1]);
-                       /* day */
-                       *(str++) = '-';
-                       str = add_semioctet(str, data[2]);
-
-                       /* hour */
-                       *(str++) = ' ';
-                       str = add_semioctet(str, data[3]);
-                       /* minute */
-                       *(str++) = ':';
-                       str = add_semioctet(str, data[4]);
-                       /* second */
-                       *(str++) = ':';
-                       str = add_semioctet(str, data[5]);
-                       *str = 0;
-
-                       blobmsg_add_string_buffer(&status);
-
-                       data += 7;
-               }
+       /* only 7-bit encoding supported for now */
+       if (dcs & 0x0c)
+               return;
+
+       if (dcs & 0x10)
+               blobmsg_add_u32(&status, "class", (dcs & 3));
+
+       if (sent) {
+               /* Message validity */
+               data++;
+       } else {
+               if (data + 6 >= end)
+                       return;
+
+               str = blobmsg_alloc_string_buffer(&status, "timestamp", 32);
+
+               /* year */
+               *(str++) = '2';
+               *(str++) = '0';
+               str = pdu_add_semioctet(str, data[0]);
+               /* month */
+               *(str++) = '-';
+               str = pdu_add_semioctet(str, data[1]);
+               /* day */
+               *(str++) = '-';
+               str = pdu_add_semioctet(str, data[2]);
+
+               /* hour */
+               *(str++) = ' ';
+               str = pdu_add_semioctet(str, data[3]);
+               /* minute */
+               *(str++) = ':';
+               str = pdu_add_semioctet(str, data[4]);
+               /* second */
+               *(str++) = ':';
+               str = pdu_add_semioctet(str, data[5]);
+               *str = 0;
+
+               blobmsg_add_string_buffer(&status);
+
+               data += 7;
+       }
 
-               cur_len = *(data++);
-               decode_7bit("text", data, end - data);
-       } while (0);
+       cur_len = *(data++);
+       decode_7bit_field("text", data, end - data, !!(first & 0x40));
 }
 
 static enum qmi_cmd_result
@@ -227,8 +273,8 @@ static void cmd_wms_get_raw_message_cb(struct qmi_dev *qmi, struct qmi_request *
 {
        struct qmi_wms_raw_read_response res;
        unsigned char *data;
-       int i, len = 0;
        char *str;
+       int i;
 
        qmi_parse_wms_raw_read_response(msg, &res);
        data = (unsigned char *) res.data.raw_message_data.raw_data;
@@ -240,3 +286,183 @@ static void cmd_wms_get_raw_message_cb(struct qmi_dev *qmi, struct qmi_request *
 }
 
 #define cmd_wms_get_raw_message_prepare cmd_wms_get_message_prepare
+
+
+static struct {
+       const char *smsc;
+       const char *target;
+       bool flash;
+} send;
+
+
+#define cmd_wms_send_message_smsc_cb no_cb
+static enum qmi_cmd_result
+cmd_wms_send_message_smsc_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
+{
+       send.smsc = arg;
+       return QMI_CMD_DONE;
+}
+
+#define cmd_wms_send_message_target_cb no_cb
+static enum qmi_cmd_result
+cmd_wms_send_message_target_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
+{
+       send.target = arg;
+       return QMI_CMD_DONE;
+}
+
+#define cmd_wms_send_message_flash_cb no_cb
+static enum qmi_cmd_result
+cmd_wms_send_message_flash_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
+{
+       send.flash = true;
+       return QMI_CMD_DONE;
+}
+
+static int
+pdu_encode_semioctet(unsigned char *dest, const char *str)
+{
+       int len = 0;
+       bool lower = true;
+
+       while (*str) {
+               char digit = *str - '0';
+
+               if (lower)
+                       dest[len] = 0xf0 | digit;
+               else
+                       dest[len++] &= (digit << 4) | 0xf;
+
+               lower = !lower;
+               str++;
+       }
+
+       return len;
+}
+
+static int
+pdu_encode_7bit_str(unsigned char *data, const char *str)
+{
+       unsigned char c;
+       int len = 0;
+       int ofs = 0;
+
+       while(1) {
+               c = *(str++) & 0x7f;
+               if (!c)
+                       break;
+
+               switch(ofs) {
+               case 0:
+                       data[len] = c;
+                       break;
+               default:
+                       data[len++] |= c << (8 - ofs);
+                       data[len] = c >> ofs;
+                       break;
+               }
+
+               ofs = (ofs + 1) % 7;
+       }
+
+       return len + 1;
+}
+
+static int
+pdu_encode_number(unsigned char *dest, const char *str, bool smsc)
+{
+       unsigned char format;
+       bool ascii = false;
+       int len = 0;
+       int i;
+
+       dest[len++] = 0;
+       if (*str == '+') {
+               str++;
+               format = 0x91;
+       } else {
+               format = 0x81;
+       }
+
+       for (i = 0; str[i]; i++) {
+               if (str[i] >= '0' || str[i] <= '9')
+                       continue;
+
+               ascii = true;
+               break;
+       }
+
+       if (ascii)
+               format |= 0x40;
+
+       dest[len++] = format;
+       if (!ascii)
+               len += pdu_encode_semioctet(&dest[len], str);
+       else
+               len += pdu_encode_7bit_str(&dest[len], str);
+
+       if (smsc)
+               dest[0] = len - 1;
+       else
+               dest[0] = strlen(str);
+
+       return len;
+}
+
+static int
+pdu_encode_data(unsigned char *dest, const char *str)
+{
+       int len = 0;
+
+       dest[len++] = 0;
+       len += pdu_encode_7bit_str(&dest[len], str);
+       dest[0] = len - 1;
+
+       return len;
+}
+
+#define cmd_wms_send_message_cb no_cb
+static enum qmi_cmd_result
+cmd_wms_send_message_prepare(struct qmi_dev *qmi, struct qmi_request *req, struct qmi_msg *msg, char *arg)
+{
+       static unsigned char buf[512];
+       static struct qmi_wms_raw_send_request mreq = {
+               QMI_INIT_SEQUENCE(raw_message_data,
+                       .format = QMI_WMS_MESSAGE_FORMAT_GSM_WCDMA_POINT_TO_POINT,
+                       .raw_data = buf,
+               ),
+       };
+       unsigned char *cur = buf;
+       unsigned char first_octet = 0x11;
+       unsigned char protocol_id = 0x00;
+       unsigned char dcs = 0x00;
+
+       if (!send.smsc || !*send.smsc || !send.target || !*send.target) {
+               blobmsg_add_string(&status, "error", "Missing argument");
+               return QMI_CMD_EXIT;
+       }
+
+       if (strlen(send.smsc) > 16 || strlen(send.target) > 16 || strlen(arg) > 160) {
+               blobmsg_add_string(&status, "error", "Argument too long");
+               return QMI_CMD_EXIT;
+       }
+
+       if (send.flash)
+               dcs |= 0x10;
+
+       cur += pdu_encode_number(cur, send.smsc, true);
+       *(cur++) = first_octet;
+       *(cur++) = 0; /* reference */
+
+       cur += pdu_encode_number(cur, send.target, false);
+       *(cur++) = protocol_id;
+       *(cur++) = dcs;
+
+       *(cur++) = 0xff; /* validity */
+       cur += pdu_encode_data(cur, arg);
+
+       mreq.data.raw_message_data.raw_data_n = cur - buf;
+       qmi_set_wms_raw_send_request(msg, &mreq);
+
+       return QMI_CMD_REQUEST;
+}