WizziLab / modem_ref

Exportable version of WizziLab's modem driver.

Dependents:   modem_ref_helper

src/modem_ref.cpp@23:5553f9541759, 2018-01-31 (annotated)

Committer:
Jeej
Date:
Wed Jan 31 11:34:16 2018 +0000
Revision:
23:5553f9541759
Parent:
21:d5018a680915
Child:
24:3d8dd1d6e3de
Added cup file.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Jeej 1:40ead20ecb14 1 #include "mbed.h"
Jeej 1:40ead20ecb14 2 #include "WizziDebug.h"
Jeej 1:40ead20ecb14 3
Jeej 0:027760f45e2c 4 #include "modem_ref.h"
Jeej 13:10589aaf8853 5 #include "kal_crypto.h"
Jeej 0:027760f45e2c 6
Jeej 5:32ccddf80952 7 #if 0
Jeej 4:8f031be3ff7d 8 #define REF_PRINT(...) PRINT(__VA_ARGS__)
Jeej 13:10589aaf8853 9 #define URC_PRINT(...) PRINT(__VA_ARGS__)
Jeej 4:8f031be3ff7d 10 #else
Jeej 4:8f031be3ff7d 11 #define REF_PRINT(...);
Jeej 13:10589aaf8853 12 #define URC_PRINT(...);
Jeej 4:8f031be3ff7d 13 #endif
Jeej 4:8f031be3ff7d 14
Jeej 0:027760f45e2c 15 typedef struct {
Jeej 0:027760f45e2c 16 action_callback_t* cb;
Jeej 0:027760f45e2c 17 u8* data;
Jeej 1:40ead20ecb14 18 u8* istatus;
Jeej 0:027760f45e2c 19 } modem_user_t;
Jeej 0:027760f45e2c 20
Jeej 0:027760f45e2c 21 typedef struct {
Jeej 8:97875739f11a 22 u8* data;
Jeej 8:97875739f11a 23 u8 type;
Jeej 8:97875739f11a 24 u8 length;
Jeej 8:97875739f11a 25 } modem_istatus_t;
Jeej 8:97875739f11a 26
Jeej 8:97875739f11a 27 typedef struct {
Jeej 0:027760f45e2c 28 fx_serial_send_t* send;
Jeej 0:027760f45e2c 29 modem_callbacks_t* cb;
Jeej 0:027760f45e2c 30 modem_user_t user[MAX_USER_NB];
Jeej 8:97875739f11a 31 modem_istatus_t istatus;
Jeej 0:027760f45e2c 32 u8 state;
Jeej 0:027760f45e2c 33 u8 tx_sequ;
Jeej 0:027760f45e2c 34 } modem_ctx_t;
Jeej 0:027760f45e2c 35 static modem_ctx_t g_modem;
Jeej 0:027760f45e2c 36
Jeej 0:027760f45e2c 37 #define STATE_OPEN 0xab
Jeej 0:027760f45e2c 38 #define STATE_CLOSED 0
Jeej 0:027760f45e2c 39
Jeej 13:10589aaf8853 40 #define ROOT_KEY_SIZE 16
Jeej 13:10589aaf8853 41
Jeej 0:027760f45e2c 42 #define SERIAL_SEND(_flow,_data,_size) do { \
Jeej 21:d5018a680915 43 ASSERT(_size<256, "SERIAL_SEND too big for serial protocol (%d/%dmax)", _size, 255);\
Jeej 0:027760f45e2c 44 u8 wch[WC_HEADER_SIZE] = {WC_SYNC_BYTE_0,WC_SYNC_BYTE_1,_size,g_modem.tx_sequ++,_flow};\
Jeej 0:027760f45e2c 45 g_modem.send(wch,WC_HEADER_SIZE,_data,_size);\
Jeej 0:027760f45e2c 46 }while(0)
Jeej 0:027760f45e2c 47
Jeej 0:027760f45e2c 48 // Flows
Jeej 0:027760f45e2c 49 #define WC_FLOWID_CMD 0x10
Jeej 0:027760f45e2c 50 #define WC_FLOWID_ALP 0x20
Jeej 0:027760f45e2c 51 #define WC_FLOWID_SYS 0x30
Jeej 0:027760f45e2c 52
Jeej 0:027760f45e2c 53 // Sub-Flows
Jeej 0:027760f45e2c 54 #define WC_FLOW_ALP_CMD 0x20
Jeej 0:027760f45e2c 55 #define WC_FLOW_ALP_RESP 0x21
Jeej 0:027760f45e2c 56 #define WC_FLOW_ALP_UNS 0x22
Jeej 0:027760f45e2c 57 #define WC_FLOW_SYS_RST 0x30
Jeej 0:027760f45e2c 58 #define WC_FLOW_SYS_PING 0x34
Jeej 0:027760f45e2c 59 #define WC_FLOW_SYS_PONG 0x35
Jeej 0:027760f45e2c 60 #define WC_FLOW_SYS_CFG 0x36
Jeej 0:027760f45e2c 61 #define WC_FLOW_SYS_XON 0x39
Jeej 0:027760f45e2c 62 #define WC_FLOW_SYS_XOFF 0x3a
Jeej 0:027760f45e2c 63 #define WC_FLOW_SYS_XACK 0x3b
Jeej 0:027760f45e2c 64
Jeej 0:027760f45e2c 65 // Misc CMD...
Jeej 0:027760f45e2c 66 #define WM_BOOT 0x81
Jeej 0:027760f45e2c 67
Jeej 0:027760f45e2c 68
Jeej 0:027760f45e2c 69 protected void modem_input(u8 flowid,u8* payload,u8 size)
Jeej 0:027760f45e2c 70 {
Jeej 0:027760f45e2c 71 int rem =size;
Jeej 0:027760f45e2c 72 u8* p = payload;
Jeej 0:027760f45e2c 73 alp_parsed_chunk_t r;
Jeej 0:027760f45e2c 74 int id = -1;
Jeej 0:027760f45e2c 75 s8 err = ALP_ERR_NONE;
Jeej 1:40ead20ecb14 76 u8 eop;
Jeej 23:5553f9541759 77 REF_PRINT("input 0x%x/%d Bytes\n",flowid,size);
Jeej 0:027760f45e2c 78 switch (flowid)
Jeej 0:027760f45e2c 79 {
Jeej 0:027760f45e2c 80 case WC_FLOW_ALP_UNS:
Jeej 0:027760f45e2c 81 case WC_FLOW_ALP_CMD:
Jeej 0:027760f45e2c 82 rem -= alp_parse_chunk(&p, &r);
Jeej 23:5553f9541759 83 PRINT_DATA("", "%02X", p, rem, "\n");
Jeej 0:027760f45e2c 84 // This should always be a TAG'ed request in case of FS access...
Jeej 0:027760f45e2c 85 if (r.type == ALP_OPCODE_TAG)
Jeej 0:027760f45e2c 86 {
Jeej 0:027760f45e2c 87 id = r.meta.tag.id;
Jeej 8:97875739f11a 88 while(rem>0)
Jeej 0:027760f45e2c 89 {
Jeej 8:97875739f11a 90 // Parse File Operation
Jeej 23:5553f9541759 91 rem -= alp_parse_chunk(&p, &r);;
Jeej 23:5553f9541759 92 REF_PRINT("ALP OP[%d] rem %d\n", r.type, rem);
Jeej 8:97875739f11a 93 switch (r.type)
Jeej 8:97875739f11a 94 {
Jeej 8:97875739f11a 95 case ALP_OPCODE_F_RD_DATA:
Jeej 21:d5018a680915 96 ASSERT((ALP_ACTION_RSP_TAG_SIZE + ALP_ACTION_RSP_F_DATA_SIZE_MAX(r.meta.f_data.length)) < 256,
Jeej 21:d5018a680915 97 "F_RD_DATA too big for serial protocol (%d/%dmax)", r.meta.f_data.length, 255 - (ALP_ACTION_RSP_TAG_SIZE + ALP_ACTION_RSP_F_DATA_SIZE_MAX(0)));
Jeej 8:97875739f11a 98 g_modem.cb->read(r.meta.f_data.fid,r.meta.f_data.offset,r.meta.f_data.length,id);
Jeej 8:97875739f11a 99 break;
Jeej 8:97875739f11a 100 case ALP_OPCODE_F_WR_DATA:
Jeej 23:5553f9541759 101 REF_PRINT("ALP_OPCODE_F_WR_DATA[%d] %d %d %d\n", id, r.meta.f_data.fid, r.meta.f_data.offset, r.meta.f_data.length);
Jeej 23:5553f9541759 102 g_modem.cb->write(r.meta.f_data.fid, r.data, r.meta.f_data.offset, r.meta.f_data.length, id);
Jeej 8:97875739f11a 103 break;
Jeej 8:97875739f11a 104 case ALP_OPCODE_F_RD_PROP:
Jeej 8:97875739f11a 105 g_modem.cb->read_fprop(r.meta.f_data.fid,id);
Jeej 8:97875739f11a 106 break;
Jeej 8:97875739f11a 107 case ALP_OPCODE_F_DELETE:
Jeej 8:97875739f11a 108 g_modem.cb->remove(r.meta.f_data.fid,id);
Jeej 8:97875739f11a 109 break;
Jeej 8:97875739f11a 110 case ALP_OPCODE_F_FLUSH:
Jeej 8:97875739f11a 111 g_modem.cb->flush(r.meta.f_data.fid,id);
Jeej 8:97875739f11a 112 break;
Jeej 8:97875739f11a 113 default:
Jeej 8:97875739f11a 114 ASSERT(false,"ASSERT: Unsupported ALP File Operation: %d\n",r.type);
Jeej 8:97875739f11a 115 break;
Jeej 8:97875739f11a 116 }
Jeej 23:5553f9541759 117 REF_PRINT("ALP Parsing done. rem %d\n", rem);
Jeej 0:027760f45e2c 118 }
Jeej 23:5553f9541759 119 REF_PRINT("ALP Packet done.\n");
Jeej 0:027760f45e2c 120 }
Jeej 0:027760f45e2c 121 else
Jeej 0:027760f45e2c 122 {
Jeej 0:027760f45e2c 123 // ... or a 'real' URC (or ISTATUS if enabled on modem)
Jeej 8:97875739f11a 124 g_modem.istatus = (modem_istatus_t){0};
Jeej 9:2f921fe9c519 125 do
Jeej 0:027760f45e2c 126 {
Jeej 8:97875739f11a 127 switch (r.type)
Jeej 8:97875739f11a 128 {
Jeej 8:97875739f11a 129 case ALP_OPCODE_RSP_ISTATUS:
Jeej 8:97875739f11a 130 // ISTATUS can come either alone or together with ALP_OPCODE_RSP_F_DATA
Jeej 8:97875739f11a 131 // but there should be only one per payload, moreover it will come first
Jeej 13:10589aaf8853 132 URC_PRINT("Got ISTATUS[%x] %d Bytes\n",r.meta.itf.type,r.meta.itf.length);
Jeej 8:97875739f11a 133 g_modem.istatus.type = r.meta.itf.type;
Jeej 8:97875739f11a 134 g_modem.istatus.length = r.meta.itf.length;
Jeej 8:97875739f11a 135 g_modem.istatus.data = r.data;
Jeej 8:97875739f11a 136 if (0)// (!rem) // TODO : do we really want this ?
Jeej 8:97875739f11a 137 {
Jeej 8:97875739f11a 138 g_modem.cb->udata( 0, NULL, 0, 0,
Jeej 8:97875739f11a 139 g_modem.istatus.type,
Jeej 8:97875739f11a 140 g_modem.istatus.length,
Jeej 8:97875739f11a 141 g_modem.istatus.data);
Jeej 8:97875739f11a 142 }
Jeej 8:97875739f11a 143 break;
Jeej 8:97875739f11a 144 case ALP_OPCODE_RSP_F_DATA:
Jeej 8:97875739f11a 145 // RSP_F_DATA can come either alone or together with ISTATUS
Jeej 8:97875739f11a 146 g_modem.cb->udata( r.meta.f_data.fid,
Jeej 8:97875739f11a 147 r.data,
Jeej 8:97875739f11a 148 r.meta.f_data.offset,
Jeej 8:97875739f11a 149 r.meta.f_data.length,
Jeej 8:97875739f11a 150 g_modem.istatus.type,
Jeej 8:97875739f11a 151 g_modem.istatus.length,
Jeej 8:97875739f11a 152 g_modem.istatus.data);
Jeej 9:2f921fe9c519 153 break;
Jeej 8:97875739f11a 154 case ALP_OPCODE_RSP_URC:
Jeej 8:97875739f11a 155 if (r.meta.urc.type == ALP_URC_TYPE_LQUAL)
Jeej 8:97875739f11a 156 g_modem.cb->lqual(r.meta.urc.ifid,r.meta.urc.per);
Jeej 8:97875739f11a 157 else if (r.meta.urc.type == ALP_URC_TYPE_LQUAL)
Jeej 8:97875739f11a 158 g_modem.cb->ldown(r.meta.urc.ifid);
Jeej 8:97875739f11a 159 else
Jeej 8:97875739f11a 160 ASSERT(false,"ASSERT: Unsupported ALP URC: %d\n",r.meta.urc.type);
Jeej 8:97875739f11a 161 break;
Jeej 8:97875739f11a 162 default:
Jeej 8:97875739f11a 163 ASSERT(false,"ASSERT: Unsupported ALP URC: %d\n",r.type);
Jeej 8:97875739f11a 164 break;
Jeej 8:97875739f11a 165 }
Jeej 13:10589aaf8853 166
Jeej 9:2f921fe9c519 167 int tem = alp_parse_chunk(&p, &r);
Jeej 9:2f921fe9c519 168 if (!tem)
Jeej 9:2f921fe9c519 169 {
Jeej 9:2f921fe9c519 170 break;
Jeej 9:2f921fe9c519 171 }
Jeej 9:2f921fe9c519 172 rem -= tem;
Jeej 9:2f921fe9c519 173 } while (rem>=0);
Jeej 0:027760f45e2c 174 }
Jeej 0:027760f45e2c 175 break;
Jeej 0:027760f45e2c 176 case WC_FLOW_ALP_RESP:
Jeej 0:027760f45e2c 177 // This should always be a TAG'ed response as we tag our requests
Jeej 0:027760f45e2c 178 rem -= alp_parse_chunk(&p, &r);
Jeej 0:027760f45e2c 179 ASSERT((r.type == ALP_OPCODE_RSP_TAG),"ASSERT: expecting RESP_TAG got %d\n",r.type);
Jeej 1:40ead20ecb14 180 id = r.meta.tag.id;
Jeej 1:40ead20ecb14 181 eop = r.meta.tag.eop;
Jeej 0:027760f45e2c 182 ASSERT(g_modem.user[id].cb != NULL,"ASSERT: NULL Callback for ID %d\n",id);
Jeej 0:027760f45e2c 183 // Empty response
Jeej 0:027760f45e2c 184 if (rem <= 0)
Jeej 0:027760f45e2c 185 {
Jeej 0:027760f45e2c 186 // TODO: still no info on error...
Jeej 20:17852941b19e 187 REF_PRINT("ERROR\n");
Jeej 0:027760f45e2c 188 err = r.meta.tag.err ? ALP_ERR_UNKNOWN : ALP_ERR_NONE;
Jeej 1:40ead20ecb14 189 g_modem.user[id].cb(eop,err,id);
Jeej 0:027760f45e2c 190 return;
Jeej 0:027760f45e2c 191 }
Jeej 0:027760f45e2c 192
Jeej 1:40ead20ecb14 193 // Actual response(s)
Jeej 1:40ead20ecb14 194 while(rem>0)
Jeej 0:027760f45e2c 195 {
Jeej 1:40ead20ecb14 196 rem -= alp_parse_chunk(&p, &r);
Jeej 1:40ead20ecb14 197 switch (r.type)
Jeej 1:40ead20ecb14 198 {
Jeej 14:a9c324663732 199 case ALP_OPCODE_RSP_TAG:
Jeej 20:17852941b19e 200 REF_PRINT("RSP_TAG[%d]\n", r.meta.tag.id);
Jeej 14:a9c324663732 201 break;
Jeej 1:40ead20ecb14 202 case ALP_OPCODE_RSP_F_DATA:
Jeej 20:17852941b19e 203 REF_PRINT("RSP_F_DATA[%d]\n", r.meta.f_data.length);
Jeej 20:17852941b19e 204 ASSERT(g_modem.user[id].data != NULL,"ASSERT: NULL Data Buffer for RD on ID %d\n",id);
Jeej 20:17852941b19e 205 memcpy(g_modem.user[id].data,r.data,r.meta.f_data.length);
Jeej 20:17852941b19e 206 break;
Jeej 6:581caeee80e8 207 case ALP_OPCODE_RSP_F_PROP:
Jeej 20:17852941b19e 208 REF_PRINT("RSP_F_PROP[%d]\n", r.meta.f_data.length);
Jeej 1:40ead20ecb14 209 ASSERT(g_modem.user[id].data != NULL,"ASSERT: NULL Data Buffer for RD on ID %d\n",id);
Jeej 1:40ead20ecb14 210 memcpy(g_modem.user[id].data,r.data,r.meta.f_data.length);
Jeej 1:40ead20ecb14 211 break;
Jeej 1:40ead20ecb14 212 case ALP_OPCODE_RSP_STATUS:
Jeej 20:17852941b19e 213 REF_PRINT("RSP_STATUS[%d]\n", r.meta.status.code);
Jeej 1:40ead20ecb14 214 err = r.meta.status.code;
Jeej 1:40ead20ecb14 215 break;
Jeej 1:40ead20ecb14 216 case ALP_OPCODE_RSP_ISTATUS:
Jeej 20:17852941b19e 217 REF_PRINT("RSP_ISTATUS[%d]\n", r.meta.itf.length);
Jeej 1:40ead20ecb14 218 ASSERT(g_modem.user[id].istatus != NULL,"ASSERT: NULL ISTAT Buffer for RD on ID %d\n",id);
Jeej 1:40ead20ecb14 219 memcpy(g_modem.user[id].istatus,r.data,r.meta.itf.length);
Jeej 1:40ead20ecb14 220 break;
Jeej 1:40ead20ecb14 221 default:
Jeej 1:40ead20ecb14 222 ASSERT(false,"ASSERT: Unsupported ALP Response: %d\n",r.type);
Jeej 1:40ead20ecb14 223 break;
Jeej 1:40ead20ecb14 224 }
Jeej 0:027760f45e2c 225 }
Jeej 1:40ead20ecb14 226 if(eop)
Jeej 1:40ead20ecb14 227 { // This is mainly for debug, catch old pointers
Jeej 2:bcf269540633 228 //g_modem.user[id].data = NULL;
Jeej 2:bcf269540633 229 //g_modem.user[id].istatus= NULL;
Jeej 20:17852941b19e 230 REF_PRINT("EOP\n");
Jeej 1:40ead20ecb14 231 }
Jeej 6:581caeee80e8 232 // User Callback
Jeej 6:581caeee80e8 233 g_modem.user[id].cb(eop,err,id);
Jeej 0:027760f45e2c 234 break;
Jeej 0:027760f45e2c 235 case WC_FLOW_SYS_RST:
Jeej 0:027760f45e2c 236 // 'Software' reset request
Jeej 0:027760f45e2c 237 g_modem.cb->reset();
Jeej 0:027760f45e2c 238 break;
Jeej 0:027760f45e2c 239 case WC_FLOWID_CMD:
Jeej 0:027760f45e2c 240 if (*p == WM_BOOT)
Jeej 0:027760f45e2c 241 {
Jeej 0:027760f45e2c 242 u16 nb_boot;
Jeej 0:027760f45e2c 243 u8 cause;
Jeej 0:027760f45e2c 244 p++;
Jeej 0:027760f45e2c 245 cause = p[0];
Jeej 0:027760f45e2c 246 nb_boot = HAL_TO_U16(p[3],p[2]);
Jeej 0:027760f45e2c 247 g_modem.cb->boot(cause,nb_boot);
Jeej 0:027760f45e2c 248 }
Jeej 0:027760f45e2c 249 else
Jeej 0:027760f45e2c 250 {
Jeej 4:8f031be3ff7d 251 REF_PRINT("Unsupported CMD :0x%x\n",*p);
Jeej 0:027760f45e2c 252 }
Jeej 0:027760f45e2c 253 break;
Jeej 0:027760f45e2c 254 default:
Jeej 4:8f031be3ff7d 255 REF_PRINT("Unsupported WC Flowid:0x%x / %d Bytes\n",flowid,size);
Jeej 0:027760f45e2c 256 break;
Jeej 0:027760f45e2c 257 }
Jeej 0:027760f45e2c 258 }
Jeej 0:027760f45e2c 259
Jeej 13:10589aaf8853 260 private u32 modem_add_root_permission(u8* p, u8* root_key, u8* action, u32 action_size)
Jeej 13:10589aaf8853 261 {
Jeej 13:10589aaf8853 262 u8 hash[32];
Jeej 13:10589aaf8853 263
Jeej 13:10589aaf8853 264 // Calculate hash on action
Jeej 13:10589aaf8853 265 kal_sha256_init();
Jeej 13:10589aaf8853 266 kal_sha256_update(action, action_size);
Jeej 13:10589aaf8853 267 kal_sha256_update(root_key, ROOT_KEY_SIZE);
Jeej 13:10589aaf8853 268 kal_sha256_final(hash);
Jeej 13:10589aaf8853 269 // Prepend Permission-request...
Jeej 13:10589aaf8853 270 ALP_ACTION_PERM_REQ(p, false, ALP_PERM_REQ_ROOT);
Jeej 13:10589aaf8853 271 // ... and hash
Jeej 13:10589aaf8853 272 memcpy(p, hash, ALP_WIZZILAB_AUTH_PROTOCOL_TOKEN_SIZE);
Jeej 13:10589aaf8853 273
Jeej 13:10589aaf8853 274 return ALP_ACTION_PERM_REQ_OFFSET;
Jeej 13:10589aaf8853 275 }
Jeej 13:10589aaf8853 276
Jeej 0:027760f45e2c 277 public int modem_get_id(action_callback_t* cb)
Jeej 0:027760f45e2c 278 {
Jeej 0:027760f45e2c 279 int i;
Jeej 0:027760f45e2c 280 for(i=0;i<MAX_USER_NB;i++)
Jeej 0:027760f45e2c 281 {
Jeej 0:027760f45e2c 282 if (g_modem.user[i].cb == NULL)
Jeej 0:027760f45e2c 283 {
Jeej 0:027760f45e2c 284 g_modem.user[i].cb = cb;
Jeej 13:10589aaf8853 285 //REF_PRINT("Get ID:%d/0x%08x\n",i,cb);
Jeej 0:027760f45e2c 286 return i;
Jeej 0:027760f45e2c 287 }
Jeej 0:027760f45e2c 288 }
Jeej 0:027760f45e2c 289 ASSERT(i < MAX_USER_NB,"ASSERT: out of users\n");
Jeej 0:027760f45e2c 290 return -1;
Jeej 0:027760f45e2c 291 }
Jeej 0:027760f45e2c 292
Jeej 0:027760f45e2c 293 public int modem_free_id(u8 id)
Jeej 0:027760f45e2c 294 {
Jeej 0:027760f45e2c 295 if (id < MAX_USER_NB)
Jeej 0:027760f45e2c 296 {
Jeej 0:027760f45e2c 297 g_modem.user[id].cb = NULL;
Jeej 0:027760f45e2c 298 g_modem.user[id].data = NULL;
Jeej 1:40ead20ecb14 299 g_modem.user[id].istatus= NULL;
Jeej 13:10589aaf8853 300 //REF_PRINT("Free ID:%d\n",id);
Jeej 0:027760f45e2c 301 return id;
Jeej 0:027760f45e2c 302 }
Jeej 0:027760f45e2c 303 return -1;
Jeej 0:027760f45e2c 304 }
Jeej 0:027760f45e2c 305
Jeej 0:027760f45e2c 306 public void modem_open(fx_serial_send_t* send,modem_callbacks_t* callbacks)
Jeej 0:027760f45e2c 307 {
Jeej 0:027760f45e2c 308 if (g_modem.state != STATE_OPEN)
Jeej 0:027760f45e2c 309 {
Jeej 0:027760f45e2c 310 g_modem.send= send;
Jeej 0:027760f45e2c 311 g_modem.cb = callbacks;
Jeej 0:027760f45e2c 312 memset(g_modem.user,0,(MAX_USER_NB * sizeof(modem_user_t)));
Jeej 0:027760f45e2c 313
Jeej 4:8f031be3ff7d 314 REF_PRINT("Open Modem - Max users:%d\n",MAX_USER_NB);
Jeej 0:027760f45e2c 315
Jeej 0:027760f45e2c 316 g_modem.state = STATE_OPEN;
Jeej 0:027760f45e2c 317 }
Jeej 0:027760f45e2c 318 }
Jeej 0:027760f45e2c 319
Jeej 0:027760f45e2c 320 public void modem_close(void)
Jeej 0:027760f45e2c 321 {
Jeej 0:027760f45e2c 322 if (g_modem.state == STATE_OPEN)
Jeej 0:027760f45e2c 323 {
Jeej 0:027760f45e2c 324 g_modem.state = STATE_CLOSED;
Jeej 0:027760f45e2c 325 }
Jeej 0:027760f45e2c 326 }
Jeej 0:027760f45e2c 327
Jeej 0:027760f45e2c 328 public void modem_reset(void)
Jeej 0:027760f45e2c 329 {
Jeej 0:027760f45e2c 330 SERIAL_SEND(WC_FLOW_SYS_RST,NULL,0);
Jeej 0:027760f45e2c 331 }
Jeej 0:027760f45e2c 332
Jeej 13:10589aaf8853 333 public void modem_read_file(u8 fid, void *data, u32 offset, u32 length, u8 id)
Jeej 0:027760f45e2c 334 {
Jeej 0:027760f45e2c 335 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_RD_DATA_SIZE_MAX];
Jeej 0:027760f45e2c 336 u8* p = tmp;
Jeej 4:8f031be3ff7d 337 REF_PRINT("RD[%d]@%d %d Bytes\n",fid,offset,length);
Jeej 0:027760f45e2c 338 g_modem.user[id].data = (u8*)data;
Jeej 0:027760f45e2c 339 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 340 ALP_ACTION_F_RD_DATA(p,true,fid,offset,length);
Jeej 0:027760f45e2c 341 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 342 }
Jeej 0:027760f45e2c 343
Jeej 6:581caeee80e8 344 public void modem_read_fprop(u8 fid, alp_file_header_t* data, u8 id)
Jeej 6:581caeee80e8 345 {
Jeej 6:581caeee80e8 346 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_RD_PROP_SIZE];
Jeej 6:581caeee80e8 347 u8* p = tmp;
Jeej 11:a077da5fe68f 348 REF_PRINT("RD PROPS[%d]\n",fid);
Jeej 6:581caeee80e8 349 g_modem.user[id].data = (u8*)data;
Jeej 6:581caeee80e8 350 ALP_ACTION_TAG(p,id,true);
Jeej 6:581caeee80e8 351 ALP_ACTION_F_RD_PROP(p,true,fid);
Jeej 6:581caeee80e8 352 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 6:581caeee80e8 353 }
Jeej 6:581caeee80e8 354
Jeej 13:10589aaf8853 355 public void modem_read_fprop_root(u8 fid, alp_file_header_t* data, u8* root_key, u8 id)
Jeej 13:10589aaf8853 356 {
Jeej 13:10589aaf8853 357 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_SIZE(ALP_ACTION_F_RD_PROP_SIZE)];
Jeej 13:10589aaf8853 358 u8* p = tmp;
Jeej 13:10589aaf8853 359 u8* lastp;
Jeej 13:10589aaf8853 360 REF_PRINT("RD PROPS (ROOT)[%d]\n",fid);
Jeej 13:10589aaf8853 361 ASSERT(root_key != NULL, "Missing ROOT KEY\n");
Jeej 13:10589aaf8853 362 g_modem.user[id].data = (u8*)data;
Jeej 13:10589aaf8853 363 ALP_ACTION_TAG(p, id, true);
Jeej 13:10589aaf8853 364 // Actual Operation will take place after PERM_REQ
Jeej 13:10589aaf8853 365 p = &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET];
Jeej 13:10589aaf8853 366 ALP_ACTION_F_RD_PROP(p,true,fid);
Jeej 13:10589aaf8853 367 lastp = p;
Jeej 13:10589aaf8853 368 modem_add_root_permission(&tmp[ALP_ACTION_TAG_SIZE], root_key,
Jeej 13:10589aaf8853 369 &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET],
Jeej 13:10589aaf8853 370 ALP_ACTION_F_RD_PROP_SIZE);
Jeej 13:10589aaf8853 371 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(lastp-tmp));
Jeej 13:10589aaf8853 372 }
Jeej 13:10589aaf8853 373
Jeej 13:10589aaf8853 374 public void modem_write_fprop(u8 fid, alp_file_header_t* data, u8 id)
Jeej 13:10589aaf8853 375 {
Jeej 13:10589aaf8853 376 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_WR_PROP_SIZE_MAX];
Jeej 13:10589aaf8853 377 u8* p = tmp;
Jeej 13:10589aaf8853 378 DPRINT(L_API, "WR PROPS[%d]\n",fid);
Jeej 13:10589aaf8853 379 ALP_ACTION_TAG(p,id,true);
Jeej 13:10589aaf8853 380 ALP_ACTION_F_WR_PROP(p,true,fid,0,sizeof(alp_file_header_t),data);
Jeej 13:10589aaf8853 381 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 13:10589aaf8853 382 }
Jeej 13:10589aaf8853 383
Jeej 13:10589aaf8853 384 public void modem_write_fprop_root(u8 fid, alp_file_header_t* data, u8* root_key, u8 id)
Jeej 13:10589aaf8853 385 {
Jeej 13:10589aaf8853 386 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_SIZE(ALP_ACTION_F_WR_PROP_SIZE_MAX)];
Jeej 13:10589aaf8853 387 u8* p = tmp;
Jeej 13:10589aaf8853 388 u8* lastp;
Jeej 13:10589aaf8853 389 DPRINT(L_API, "WR PROPS (ROOT)[%d]\n",fid);
Jeej 13:10589aaf8853 390 ASSERT(root_key != NULL, "Missing ROOT KEY\n");
Jeej 13:10589aaf8853 391 ALP_ACTION_TAG(p, id, true);
Jeej 13:10589aaf8853 392 // Actual Operation will take place after PERM_REQ
Jeej 13:10589aaf8853 393 p = &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET];
Jeej 13:10589aaf8853 394 ALP_ACTION_F_WR_PROP(p,true,fid,0,sizeof(alp_file_header_t),data);
Jeej 13:10589aaf8853 395 lastp = p;
Jeej 13:10589aaf8853 396 modem_add_root_permission(&tmp[ALP_ACTION_TAG_SIZE], root_key,
Jeej 13:10589aaf8853 397 &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET],
Jeej 13:10589aaf8853 398 ALP_ACTION_F_WR_PROP_SIZE_MAX);
Jeej 13:10589aaf8853 399 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(lastp-tmp));
Jeej 13:10589aaf8853 400 }
Jeej 13:10589aaf8853 401
Jeej 14:a9c324663732 402 public void modem_write_file(u8 fid, void *data, u32 offset, u32 length, u8 id)
Jeej 0:027760f45e2c 403 {
Jeej 0:027760f45e2c 404 ALLOC_BUFFER(u8,tmp,(ALP_ACTION_TAG_SIZE + ALP_ACTION_F_WR_DATA_SIZE_MAX(length)));
Jeej 0:027760f45e2c 405
Jeej 0:027760f45e2c 406 u8* p = tmp;
Jeej 4:8f031be3ff7d 407 REF_PRINT("WR[%d]@%d %d Bytes\n",fid,offset,length);
Jeej 0:027760f45e2c 408 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 409 ALP_ACTION_F_WR_DATA(p,true,fid,offset,length,data);
Jeej 0:027760f45e2c 410 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 411 DEALLOC_BUFFER(tmp);
Jeej 0:027760f45e2c 412 }
Jeej 0:027760f45e2c 413
Jeej 14:a9c324663732 414 public void modem_write_file_root(u8 fid, void *data, u32 offset, u32 length, u8* root_key, u8 id)
Jeej 13:10589aaf8853 415 {
Jeej 13:10589aaf8853 416 ALLOC_BUFFER(u8,tmp,(ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_SIZE(ALP_ACTION_F_WR_DATA_SIZE_MAX(length))));
Jeej 13:10589aaf8853 417
Jeej 13:10589aaf8853 418 u8* p = tmp;
Jeej 13:10589aaf8853 419 u8* lastp;
Jeej 13:10589aaf8853 420 REF_PRINT("WR (ROOT)[%d]@%d %d Bytes\n",fid,offset,length);
Jeej 13:10589aaf8853 421 ASSERT(root_key != NULL, "Missing ROOT KEY\n");
Jeej 13:10589aaf8853 422 ALP_ACTION_TAG(p, id, true);
Jeej 13:10589aaf8853 423 // Actual Operation will take place after PERM_REQ
Jeej 13:10589aaf8853 424 p = &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET];
Jeej 13:10589aaf8853 425 ALP_ACTION_F_WR_DATA(p,true,fid,offset,length,data);
Jeej 13:10589aaf8853 426 lastp = p;
Jeej 13:10589aaf8853 427 modem_add_root_permission(&tmp[ALP_ACTION_TAG_SIZE], root_key,
Jeej 13:10589aaf8853 428 &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET],
Jeej 13:10589aaf8853 429 ALP_ACTION_F_WR_DATA_SIZE(offset,length));
Jeej 13:10589aaf8853 430 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(lastp-tmp));
Jeej 13:10589aaf8853 431 DEALLOC_BUFFER(tmp);
Jeej 13:10589aaf8853 432 }
Jeej 13:10589aaf8853 433
Jeej 13:10589aaf8853 434 public void modem_flush_file(u8 fid, u8 id)
Jeej 13:10589aaf8853 435 {
Jeej 13:10589aaf8853 436 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_FLUSH_SIZE];
Jeej 13:10589aaf8853 437 u8* p = tmp;
Jeej 13:10589aaf8853 438 REF_PRINT("FLUSH[%d]\n",fid);
Jeej 13:10589aaf8853 439 ALP_ACTION_TAG(p,id,true);
Jeej 13:10589aaf8853 440 ALP_ACTION_F_FLUSH(p,true,fid);
Jeej 13:10589aaf8853 441 SERIAL_SEND(WC_FLOW_ALP_UNS, tmp, (u8)(p-tmp));
Jeej 13:10589aaf8853 442 }
Jeej 13:10589aaf8853 443
Jeej 13:10589aaf8853 444 public void modem_flush_file_root(u8 fid, u8* root_key, u8 id)
Jeej 13:10589aaf8853 445 {
Jeej 13:10589aaf8853 446 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_SIZE(ALP_ACTION_F_FLUSH_SIZE)];
Jeej 13:10589aaf8853 447 u8* p = tmp;
Jeej 13:10589aaf8853 448 u8* lastp;
Jeej 13:10589aaf8853 449 REF_PRINT("FLUSH (ROOT)[%d]\n",fid);
Jeej 13:10589aaf8853 450 ASSERT(root_key != NULL, "Missing ROOT KEY\n");
Jeej 13:10589aaf8853 451 ALP_ACTION_TAG(p, id, true);
Jeej 13:10589aaf8853 452 // Actual Operation will take place after PERM_REQ
Jeej 13:10589aaf8853 453 p = &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET];
Jeej 13:10589aaf8853 454 ALP_ACTION_F_FLUSH(p,true,fid);
Jeej 13:10589aaf8853 455 lastp = p;
Jeej 13:10589aaf8853 456 modem_add_root_permission(&tmp[ALP_ACTION_TAG_SIZE], root_key,
Jeej 13:10589aaf8853 457 &tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_PERM_REQ_OFFSET],
Jeej 13:10589aaf8853 458 ALP_ACTION_F_FLUSH_SIZE);
Jeej 13:10589aaf8853 459 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(lastp-tmp));
Jeej 13:10589aaf8853 460 }
Jeej 13:10589aaf8853 461
Jeej 11:a077da5fe68f 462 public void modem_declare_file(u8 fid, alp_file_header_t* hdr, u8 local, u8 id)
Jeej 0:027760f45e2c 463 {
Jeej 0:027760f45e2c 464 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_DECLARE_SIZE];
Jeej 0:027760f45e2c 465 u8* p = tmp;
Jeej 0:027760f45e2c 466
Jeej 4:8f031be3ff7d 467 REF_PRINT("DECLARE[%d]\n",fid);
Jeej 0:027760f45e2c 468 ALP_ACTION_TAG(p,id,true);
Jeej 11:a077da5fe68f 469 ALP_ACTION_F_DECLARE(p,true,fid,hdr,local);
Jeej 0:027760f45e2c 470 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 471 }
Jeej 0:027760f45e2c 472
Jeej 0:027760f45e2c 473 public void modem_create_file(u8 fid, alp_file_header_t* hdr, u8 id)
Jeej 0:027760f45e2c 474 {
Jeej 0:027760f45e2c 475 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_CREATE_SIZE];
Jeej 0:027760f45e2c 476 u8* p = tmp;
Jeej 0:027760f45e2c 477
Jeej 4:8f031be3ff7d 478 REF_PRINT("CREATE[%d]\n",fid);
Jeej 0:027760f45e2c 479 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 480 ALP_ACTION_F_CREATE(p,true,fid,hdr);
Jeej 0:027760f45e2c 481 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 482 }
Jeej 0:027760f45e2c 483
Jeej 14:a9c324663732 484 public void modem_notify_file(u8 fid, u32 offset, u32 length, u8 id)
Jeej 0:027760f45e2c 485 {
Jeej 0:027760f45e2c 486 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_TOUCH_SIZE_MAX];
Jeej 0:027760f45e2c 487 u8* p = tmp;
Jeej 0:027760f45e2c 488
Jeej 4:8f031be3ff7d 489 REF_PRINT("NOTIFY[%d]@%d %d Bytes\n",fid,offset,length);
Jeej 0:027760f45e2c 490 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 491 ALP_ACTION_F_TOUCH(p,true,fid,offset,length);
Jeej 0:027760f45e2c 492 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 493 }
Jeej 0:027760f45e2c 494
Jeej 14:a9c324663732 495 public void modem_delete_file(u8 fid, u8 id)
Jeej 0:027760f45e2c 496 {
Jeej 0:027760f45e2c 497 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_F_DELETE_SIZE];
Jeej 0:027760f45e2c 498 u8* p = tmp;
Jeej 0:027760f45e2c 499
Jeej 4:8f031be3ff7d 500 REF_PRINT("DELETE[%d]\n",fid);
Jeej 0:027760f45e2c 501 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 502 ALP_ACTION_F_DELETE(p,true,fid);
Jeej 0:027760f45e2c 503 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 504 }
Jeej 0:027760f45e2c 505
Jeej 0:027760f45e2c 506 public void modem_send_raw_alp(u8* payload, u32 length, u8 id)
Jeej 0:027760f45e2c 507 {
Jeej 0:027760f45e2c 508 ALLOC_BUFFER(u8,tmp,ALP_ACTION_TAG_SIZE + length);
Jeej 0:027760f45e2c 509 u8* p = tmp;
Jeej 0:027760f45e2c 510
Jeej 4:8f031be3ff7d 511 REF_PRINT("ALP RAW %d Bytes\n",length);
Jeej 0:027760f45e2c 512 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 513 // User Payload
Jeej 0:027760f45e2c 514 memcpy(p,payload,length);p+=length;
Jeej 0:027760f45e2c 515 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 516 DEALLOC_BUFFER(tmp);
Jeej 0:027760f45e2c 517 }
Jeej 0:027760f45e2c 518
Jeej 14:a9c324663732 519 public void modem_send_file_content(u8* itf, u8 itf_length, void *istatus, u8 fid, void *data, u32 offset, u32 length, u8 id)
Jeej 0:027760f45e2c 520 {
Jeej 0:027760f45e2c 521 ALLOC_BUFFER(u8,tmp,ALP_ACTION_TAG_SIZE + ALP_ACTION_FORWARD_SIZE(itf_length) + ALP_ACTION_RSP_F_DATA_SIZE_MAX(length));
Jeej 0:027760f45e2c 522 u8* p = tmp;
Jeej 6:581caeee80e8 523 g_modem.user[id].istatus= (u8*)istatus;
Jeej 0:027760f45e2c 524
Jeej 4:8f031be3ff7d 525 REF_PRINT("SEND FILE[%d] CONTENTS @%d %d Bytes (itf %d Bytes)\n",fid,offset,length,itf_length);
Jeej 0:027760f45e2c 526 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 527 ALP_ACTION_FORWARD(p,itf,itf_length);
Jeej 17:b4ea2a912fd3 528 if (istatus)
Jeej 17:b4ea2a912fd3 529 {
Jeej 17:b4ea2a912fd3 530 // NOP action to get istats on ACKs
Jeej 17:b4ea2a912fd3 531 ALP_ACTION_NOP(p,true);
Jeej 17:b4ea2a912fd3 532 }
Jeej 0:027760f45e2c 533 ALP_ACTION_RSP_F_DATA(p,fid,offset,length,data);
Jeej 0:027760f45e2c 534 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 535 DEALLOC_BUFFER(tmp);
Jeej 0:027760f45e2c 536 }
Jeej 0:027760f45e2c 537
Jeej 18:a11302a76e96 538 public void modem_remote_read_file(u8* itf, u8 itf_length, void *istatus , u8 fid, void *data, u32 offset, u32 length, u8 id)
Jeej 1:40ead20ecb14 539 {
Jeej 1:40ead20ecb14 540 ALLOC_BUFFER(u8,tmp,ALP_ACTION_TAG_SIZE + ALP_ACTION_FORWARD_SIZE(itf_length) + ALP_ACTION_F_RD_DATA_SIZE_MAX);
Jeej 1:40ead20ecb14 541 u8* p = tmp;
Jeej 18:a11302a76e96 542 g_modem.user[id].data = (u8*)data;
Jeej 18:a11302a76e96 543 g_modem.user[id].istatus = (u8*)istatus;
Jeej 1:40ead20ecb14 544
Jeej 4:8f031be3ff7d 545 REF_PRINT("RMT RD FILE[%d]@%d %d Bytes (itf %d Bytes)\n",fid,offset,length,itf_length);
Jeej 1:40ead20ecb14 546 ALP_ACTION_TAG(p,id,true);
Jeej 1:40ead20ecb14 547 ALP_ACTION_FORWARD(p,itf,itf_length);
Jeej 1:40ead20ecb14 548 ALP_ACTION_F_RD_DATA(p,true,fid,offset,length);
Jeej 1:40ead20ecb14 549 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 1:40ead20ecb14 550 DEALLOC_BUFFER(tmp);
Jeej 1:40ead20ecb14 551 }
Jeej 1:40ead20ecb14 552
Jeej 18:a11302a76e96 553 public void modem_remote_write_file(u8* itf, u8 itf_length, void *istatus , u8 fid, void *data, u32 offset, u32 length, u8 id)
Jeej 18:a11302a76e96 554 {
Jeej 18:a11302a76e96 555 ALLOC_BUFFER(u8,tmp,ALP_ACTION_TAG_SIZE + ALP_ACTION_FORWARD_SIZE(itf_length) + ALP_ACTION_F_WR_DATA_SIZE_MAX(length));
Jeej 18:a11302a76e96 556 u8* p = tmp;
Jeej 18:a11302a76e96 557 g_modem.user[id].istatus = (u8*)istatus;
Jeej 18:a11302a76e96 558
Jeej 18:a11302a76e96 559 REF_PRINT("RMT WR FILE[%d]@%d %d Bytes (itf %d Bytes)\n",fid,offset,length,itf_length);
Jeej 18:a11302a76e96 560 ALP_ACTION_TAG(p,id,true);
Jeej 18:a11302a76e96 561 ALP_ACTION_FORWARD(p,itf,itf_length);
Jeej 18:a11302a76e96 562 ALP_ACTION_F_WR_DATA(p,true,fid,offset,length,data);
Jeej 18:a11302a76e96 563 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 18:a11302a76e96 564 DEALLOC_BUFFER(tmp);
Jeej 18:a11302a76e96 565 }
Jeej 18:a11302a76e96 566
Jeej 0:027760f45e2c 567 public void modem_enable_urc(u8 type, u8 ifid, u8 val, u8 enable, u8 id)
Jeej 0:027760f45e2c 568 {
Jeej 0:027760f45e2c 569 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_URCC_SIZE(ALP_URC_TYPE_LQUAL)];
Jeej 0:027760f45e2c 570 u8* p = tmp;
Jeej 4:8f031be3ff7d 571 REF_PRINT("URC[%d] Type %d ifid %d\n",enable,type,ifid);
Jeej 0:027760f45e2c 572
Jeej 0:027760f45e2c 573 ALP_ACTION_TAG(p,id,true);
Jeej 0:027760f45e2c 574 // Actual Operation
Jeej 0:027760f45e2c 575 if (enable)
Jeej 0:027760f45e2c 576 {
Jeej 0:027760f45e2c 577 ALP_ACTION_URCC_EN(p,true,type,ifid,val);
Jeej 0:027760f45e2c 578 }
Jeej 0:027760f45e2c 579 else
Jeej 0:027760f45e2c 580 {
Jeej 0:027760f45e2c 581 ALP_ACTION_URCC_DIS(p,true,type,ifid,val);
Jeej 0:027760f45e2c 582 }
Jeej 0:027760f45e2c 583 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 584 }
Jeej 0:027760f45e2c 585
Jeej 1:40ead20ecb14 586 public void modem_activate_itf(u8 type, u8 nb_dev, u8 ifid, u8 flags, u8 enable, u8 id)
Jeej 1:40ead20ecb14 587 {
Jeej 1:40ead20ecb14 588 u8 tmp[ALP_ACTION_TAG_SIZE + ALP_ACTION_ACTIVATE_ITF_SIZE];
Jeej 1:40ead20ecb14 589 u8* p = tmp;
Jeej 1:40ead20ecb14 590
Jeej 4:8f031be3ff7d 591 REF_PRINT("ACTIVATE ITFTYPE[%x]:%d\n",type,enable);
Jeej 1:40ead20ecb14 592 ALP_ACTION_TAG(p,id,true);
Jeej 11:a077da5fe68f 593 ALP_ACTION_ACTIVATE_ITF(p,true,enable,type,nb_dev,ifid,flags);
Jeej 1:40ead20ecb14 594 SERIAL_SEND(WC_FLOW_ALP_UNS,tmp, (u8)(p-tmp));
Jeej 1:40ead20ecb14 595 }
Jeej 1:40ead20ecb14 596
Jeej 0:027760f45e2c 597 public void modem_respond(u8 action, s8 status, int id)
Jeej 0:027760f45e2c 598 {
Jeej 0:027760f45e2c 599 u8 tmp[ALP_ACTION_RSP_TAG_SIZE + ALP_ACTION_RSP_STATUS_SIZE];
Jeej 0:027760f45e2c 600 u8* p = tmp;
Jeej 4:8f031be3ff7d 601 REF_PRINT("RESP[%d]:%d\n",action,status);
Jeej 0:027760f45e2c 602
Jeej 0:027760f45e2c 603 if (id>=0) { ALP_ACTION_RSP_TAG(p,id,true,(status<0)?true:false); }
Jeej 0:027760f45e2c 604 ALP_ACTION_RSP_STATUS(p,action,status);
Jeej 0:027760f45e2c 605 SERIAL_SEND(WC_FLOW_ALP_RESP,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 606 }
Jeej 0:027760f45e2c 607
Jeej 0:027760f45e2c 608 public void modem_respond_fprop(u8 fid, u8* hdr, int id)
Jeej 0:027760f45e2c 609 {
Jeej 0:027760f45e2c 610 u8 tmp[ALP_ACTION_RSP_TAG_SIZE + ALP_ACTION_RSP_F_PROP_SIZE];
Jeej 0:027760f45e2c 611 u8* p = tmp;
Jeej 4:8f031be3ff7d 612 REF_PRINT("RESP FPROP[%d]\n",fid);
Jeej 0:027760f45e2c 613
Jeej 0:027760f45e2c 614 if (id>=0) { ALP_ACTION_RSP_TAG(p,id,true,false); }
Jeej 0:027760f45e2c 615 ALP_ACTION_RSP_F_PROP(p,fid,hdr);
Jeej 0:027760f45e2c 616 SERIAL_SEND(WC_FLOW_ALP_RESP,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 617 }
Jeej 0:027760f45e2c 618
Jeej 14:a9c324663732 619 public void modem_respond_read(u8 fid,void *data, u32 offset, u32 length, int id)
Jeej 0:027760f45e2c 620 {
Jeej 0:027760f45e2c 621 ALLOC_BUFFER(u8,tmp,ALP_ACTION_RSP_TAG_SIZE + ALP_ACTION_RSP_F_DATA_SIZE_MAX(length));
Jeej 0:027760f45e2c 622 u8* p = tmp;
Jeej 4:8f031be3ff7d 623 REF_PRINT("F_DATA[%d]@%d %d Bytes\n",fid,offset,length);
Jeej 0:027760f45e2c 624 if (id>=0) { ALP_ACTION_RSP_TAG(p,id,true,false); }
Jeej 0:027760f45e2c 625 ALP_ACTION_RSP_F_DATA(p,fid,offset,length,data);
Jeej 0:027760f45e2c 626 SERIAL_SEND(WC_FLOW_ALP_RESP,tmp, (u8)(p-tmp));
Jeej 0:027760f45e2c 627 DEALLOC_BUFFER(tmp);
Jeej 13:10589aaf8853 628 }