7:33 p.m.
---
src/stkutil.c | 155 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 files changed, 155 insertions(+), 0 deletions(-)
diff --git a/src/stkutil.c b/src/stkutil.c
index 50fa4c1..e51090c 100644
--- a/src/stkutil.c
+++ b/src/stkutil.c
@@ -2343,3 +2343,158 @@ void stk_command_free(struct stk_command *command)
g_free(command);
}
+
+struct stk_tlv_builder {
+ struct comprehension_tlv_builder ctlv;
+ unsigned char *value;
+ int len;
+};
+
+static inline void stk_tlv_builder_init(struct stk_tlv_builder *iter,
+ unsigned char *pdu, unsigned int size)
+{
+ comprehension_tlv_builder_init(&iter->ctlv, pdu, size);
+ iter->value = NULL;
+}
+
+static inline gboolean stk_tlv_open_container(struct stk_tlv_builder *iter,
+ gboolean cr,
+ unsigned char shorttag,
+ gboolean relocatable)
+{
+ comprehension_tlv_builder_set_tag(&iter->ctlv, cr, shorttag);
+ comprehension_tlv_builder_set_length(&iter->ctlv,
+ relocatable ? 0xff : 0x7f);
+ iter->len = 0;
+ iter->value = comprehension_tlv_builder_get_data(&iter->ctlv);
+
+ return TRUE;
+}
+
+static inline gboolean stk_tlv_close_container(struct stk_tlv_builder *iter)
+{
+ return comprehension_tlv_builder_set_length(&iter->ctlv, iter->len)
&&
+ comprehension_tlv_builder_next(&iter->ctlv);
+}
+
+static inline unsigned int stk_tlv_get_length(struct stk_tlv_builder *iter)
+{
+ return iter->ctlv.pos;
+}
+
+static inline void stk_tlv_append_byte(struct stk_tlv_builder *iter,
+ unsigned char num)
+{
+ iter->value[iter->len++] = num;
+}
+
+static inline void stk_tlv_append_short(struct stk_tlv_builder *iter,
+ unsigned short num)
+{
+ iter->value[iter->len++] = num >> 8;
+ iter->value[iter->len++] = num & 0xff;
+}
+
+static inline gboolean stk_tlv_append_text(struct stk_tlv_builder *iter,
+ int dcs, const char *text)
+{
+ unsigned int len;
+ unsigned char *gsm, *ucs2;
+ long written = 0;
+ gsize gwritten;
+
+ if (text == NULL)
+ return TRUE;
+
+ len = strlen(text);
+
+ switch (dcs) {
+ case 0x00:
+ gsm = convert_utf8_to_gsm(text, len, NULL, NULL, 0);
+ if (gsm == NULL && len > 0)
+ return FALSE;
+
+ iter->value[iter->len++] = 0x00;
+
+ pack_7bit_own_buf(gsm, len, 0, FALSE, &written, 0,
+ iter->value + iter->len);
+ g_free(gsm);
+ if (written < 1 && len > 0)
+ return FALSE;
+ iter->len += written;
+
+ return TRUE;
+ case 0x04:
+ gsm = convert_utf8_to_gsm(text, len, NULL, &written, 0);
+ if (gsm == NULL && len > 0)
+ return FALSE;
+
+ iter->value[iter->len++] = 0x04;
+
+ memcpy(iter->value + iter->len, gsm, written);
+ iter->len += written;
+
+ g_free(gsm);
+
+ return TRUE;
+ case 0x08:
+ ucs2 = (unsigned char *) g_convert((const gchar *) text, len,
+ "UCS-2BE", "UTF-8//TRANSLIT",
+ NULL, &gwritten, NULL);
+ if (ucs2 == NULL)
+ return FALSE;
+
+ iter->value[iter->len++] = 0x08;
+
+ memcpy(iter->value + iter->len, ucs2, gwritten);
+ iter->len += gwritten;
+
+ g_free(ucs2);
+
+ return TRUE;
+ case -1:
+ /* Fake DCS to mean unpacked GSM alphabet if possible
+ * to encode the string and UCS2 if not. */
+ gsm = convert_utf8_to_gsm(text, len, NULL, &written, 0);
+
+ if (gsm == NULL && len > 0) {
+ /* Use UCS2. */
+ ucs2 = (unsigned char *) g_convert(
+ (const gchar *) text, len,
+ "UCS-2BE", "UTF-8//TRANSLIT",
+ NULL, &gwritten, NULL);
+ if (ucs2 == NULL)
+ return FALSE;
+
+ iter->value[iter->len++] = 0x08;
+
+ memcpy(iter->value + iter->len, ucs2, gwritten);
+ iter->len += gwritten;
+
+ g_free(ucs2);
+
+ return TRUE;
+ }
+
+ iter->value[iter->len++] = 0x04;
+
+ memcpy(iter->value + iter->len, gsm, written);
+ iter->len += written;
+
+ g_free(gsm);
+
+ return TRUE;
+ }
+
+ return FALSE;
+}
+
+static inline gboolean stk_tlv_append_bytes(struct stk_tlv_builder *iter,
+ const unsigned char *data,
+ unsigned int length)
+{
+ memcpy(iter->value + iter->len, data, length);
+ iter->len += length;
+
+ return TRUE;
+}
--
1.6.1