WizziLab / modem_ref

Exportable version of WizziLab's modem driver.

Dependents:   modem_ref_helper

modem_ref.cpp@14:a9c324663732, 2017-09-20 (annotated)

Committer:
Jeej
Date:
Wed Sep 20 08:48:05 2017 +0000
Revision:
14:a9c324663732
Parent:
13:10589aaf8853
Child:
17:b4ea2a912fd3
Get ACKS istats

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