1 | /*
|
---|
2 | * TOPPERS WEBSOCKET Lite Communication Middleware
|
---|
3 | *
|
---|
4 | * Copyright (C) 2017 Cores Co., Ltd. Japan
|
---|
5 | *
|
---|
6 | * ä¸è¨èä½æ¨©è
|
---|
7 | ã¯ï¼ä»¥ä¸ã®(1)ï½(4)ã®æ¡ä»¶ãæºããå ´åã«éãï¼æ¬ã½ããã¦ã§
|
---|
8 | * ã¢ï¼æ¬ã½ããã¦ã§ã¢ãæ¹å¤ãããã®ãå«ãï¼ä»¥ä¸åãï¼ã使ç¨ã»è¤è£½ã»æ¹
|
---|
9 | * å¤ã»åé
|
---|
10 | å¸ï¼ä»¥ä¸ï¼å©ç¨ã¨å¼ã¶ï¼ãããã¨ãç¡åã§è¨±è«¾ããï¼
|
---|
11 | * (1) æ¬ã½ããã¦ã§ã¢ãã½ã¼ã¹ã³ã¼ãã®å½¢ã§å©ç¨ããå ´åã«ã¯ï¼ä¸è¨ã®èä½
|
---|
12 | * 権表示ï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãï¼ãã®ã¾ã¾ã®å½¢ã§ã½ã¼
|
---|
13 | * ã¹ã³ã¼ãä¸ã«å«ã¾ãã¦ãããã¨ï¼
|
---|
14 | * (2) æ¬ã½ããã¦ã§ã¢ãï¼ã©ã¤ãã©ãªå½¢å¼ãªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
|
---|
15 | * ç¨ã§ããå½¢ã§åé
|
---|
16 | å¸ããå ´åã«ã¯ï¼åé
|
---|
17 | å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨
|
---|
18 | * è
|
---|
19 | ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®èä½æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨
|
---|
20 | * ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
|
---|
21 | * (3) æ¬ã½ããã¦ã§ã¢ãï¼æ©å¨ã«çµã¿è¾¼ããªã©ï¼ä»ã®ã½ããã¦ã§ã¢éçºã«ä½¿
|
---|
22 | * ç¨ã§ããªãå½¢ã§åé
|
---|
23 | å¸ããå ´åã«ã¯ï¼æ¬¡ã®ããããã®æ¡ä»¶ãæºããã
|
---|
24 | * ã¨ï¼
|
---|
25 | * (a) åé
|
---|
26 | å¸ã«ä¼´ãããã¥ã¡ã³ãï¼å©ç¨è
|
---|
27 | ããã¥ã¢ã«ãªã©ï¼ã«ï¼ä¸è¨ã®è
|
---|
28 | * ä½æ¨©è¡¨ç¤ºï¼ãã®å©ç¨æ¡ä»¶ããã³ä¸è¨ã®ç¡ä¿è¨¼è¦å®ãæ²è¼ãããã¨ï¼
|
---|
29 | * (b) åé
|
---|
30 | å¸ã®å½¢æ
|
---|
31 | ãï¼å¥ã«å®ããæ¹æ³ã«ãã£ã¦ï¼TOPPERSããã¸ã§ã¯ãã«
|
---|
32 | * å ±åãããã¨ï¼
|
---|
33 | * (4) æ¬ã½ããã¦ã§ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ
|
---|
34 | * 害ãããï¼ä¸è¨èä½æ¨©è
|
---|
35 | ããã³TOPPERSããã¸ã§ã¯ããå
|
---|
36 | 責ãããã¨ï¼
|
---|
37 | * ã¾ãï¼æ¬ã½ããã¦ã§ã¢ã®ã¦ã¼ã¶ã¾ãã¯ã¨ã³ãã¦ã¼ã¶ããã®ãããªãç
|
---|
38 | * ç±ã«åºã¥ãè«æ±ãããï¼ä¸è¨èä½æ¨©è
|
---|
39 | ããã³TOPPERSããã¸ã§ã¯ãã
|
---|
40 | * å
|
---|
41 | 責ãããã¨ï¼
|
---|
42 | *
|
---|
43 | * æ¬ã½ããã¦ã§ã¢ã¯ï¼ç¡ä¿è¨¼ã§æä¾ããã¦ãããã®ã§ããï¼ä¸è¨èä½æ¨©è
|
---|
44 | ã
|
---|
45 | * ãã³TOPPERSããã¸ã§ã¯ãã¯ï¼æ¬ã½ããã¦ã§ã¢ã«é¢ãã¦ï¼ç¹å®ã®ä½¿ç¨ç®ç
|
---|
46 | * ã«å¯¾ããé©åæ§ãå«ãã¦ï¼ãããªãä¿è¨¼ãè¡ããªãï¼ã¾ãï¼æ¬ã½ããã¦ã§
|
---|
47 | * ã¢ã®å©ç¨ã«ããç´æ¥çã¾ãã¯éæ¥çã«çãããããªãæ害ã«é¢ãã¦ãï¼ã
|
---|
48 | * ã®è²¬ä»»ãè² ããªãï¼
|
---|
49 | *
|
---|
50 | * @(#) $Id: websocket_fbs.c 279 2017-04-29 07:33:37Z coas-nagasima $
|
---|
51 | */
|
---|
52 |
|
---|
53 | /*
|
---|
54 | * åºå®é·ãããã¡å¯å¤é·ã¹ããªã¼ã
|
---|
55 | */
|
---|
56 |
|
---|
57 | #include <kernel.h>
|
---|
58 | #include <string.h>
|
---|
59 | #include <t_syslog.h>
|
---|
60 | #include <t_stdlib.h>
|
---|
61 | #include "kernel_cfg.h"
|
---|
62 | #include "websocket_fbs.h"
|
---|
63 |
|
---|
64 | static ER get_message(T_WS_FST_BLK **ppk_msg, int size)
|
---|
65 | {
|
---|
66 | void * blk;
|
---|
67 | ER ret;
|
---|
68 |
|
---|
69 | *ppk_msg = NULL;
|
---|
70 |
|
---|
71 | if ((size <= 0) || (size > DEF_WS_FBS_BUF_MAXLEN))
|
---|
72 | return E_PAR;
|
---|
73 |
|
---|
74 | ret = tget_mpf(ws_mempoolid, &blk, WEBSOCKET_MEMPOOL_GET_TMO);
|
---|
75 | if (ret != E_OK)
|
---|
76 | return ret;
|
---|
77 |
|
---|
78 | memset(blk, 0, WEBSOCKET_MEMPOOL_BLOCK_SIZE);
|
---|
79 | *ppk_msg = (T_WS_FST_BLK *)(blk);
|
---|
80 | (*ppk_msg)->hdr.length = (uint16_t)size;
|
---|
81 |
|
---|
82 | return E_OK;
|
---|
83 | }
|
---|
84 |
|
---|
85 | static ER iget_message(T_WS_FST_BLK **ppk_msg, int size)
|
---|
86 | {
|
---|
87 | void * blk;
|
---|
88 | ER ret;
|
---|
89 |
|
---|
90 | *ppk_msg = NULL;
|
---|
91 |
|
---|
92 | if ((size <= 0) || (size > DEF_WS_FBS_BUF_MAXLEN))
|
---|
93 | return E_PAR;
|
---|
94 |
|
---|
95 | ret = pget_mpf(ws_mempoolid, &blk);
|
---|
96 | if (ret != E_OK)
|
---|
97 | return ret;
|
---|
98 |
|
---|
99 | memset(blk, 0, WEBSOCKET_MEMPOOL_BLOCK_SIZE);
|
---|
100 | *ppk_msg = (T_WS_FST_BLK *)(blk);
|
---|
101 | (*ppk_msg)->hdr.length = (uint16_t)size;
|
---|
102 |
|
---|
103 | return E_OK;
|
---|
104 | }
|
---|
105 |
|
---|
106 | static void *get_block(T_WS_FST_BLK *pk_msg, int pos, bool_t exp, int *size)
|
---|
107 | {
|
---|
108 | ER ret;
|
---|
109 | void * buf;
|
---|
110 | void * blk;
|
---|
111 | int no;
|
---|
112 | T_WS_SUB_BLK *mblk;
|
---|
113 | int temp;
|
---|
114 |
|
---|
115 | if ((pos < 0) || (!exp && (pos >= pk_msg->hdr.length))) {
|
---|
116 | return NULL;
|
---|
117 | }
|
---|
118 |
|
---|
119 | if (pos < DEF_WS_FBS_FST_DAT_LEN) {
|
---|
120 | buf = (void *)&pk_msg->payload[pos];
|
---|
121 | temp = DEF_WS_FBS_FST_DAT_LEN - pos;
|
---|
122 | if (temp < *size) {
|
---|
123 | *size = temp;
|
---|
124 | }
|
---|
125 | }
|
---|
126 | else {
|
---|
127 | pos -= DEF_WS_FBS_FST_DAT_LEN;
|
---|
128 | no = pos / DEF_WS_FBS_SUB_BUF_LEN;
|
---|
129 |
|
---|
130 | mblk = pk_msg->lnk.p_sub[no];
|
---|
131 |
|
---|
132 | pos -= no * DEF_WS_FBS_SUB_BUF_LEN;
|
---|
133 | temp = DEF_WS_FBS_SUB_BUF_LEN - pos;
|
---|
134 | if (temp < *size) {
|
---|
135 | *size = temp;
|
---|
136 | }
|
---|
137 | if (exp) {
|
---|
138 | if (mblk == NULL) {
|
---|
139 | ret = get_mpf(ws_mempoolid, &blk);
|
---|
140 | if (ret != E_OK)
|
---|
141 | return NULL;
|
---|
142 |
|
---|
143 | mblk = (T_WS_SUB_BLK *)(blk);
|
---|
144 |
|
---|
145 | pk_msg->lnk.p_sub[no] = mblk;
|
---|
146 | }
|
---|
147 |
|
---|
148 | temp = pos + *size + no * DEF_WS_FBS_SUB_BUF_LEN + DEF_WS_FBS_FST_DAT_LEN;
|
---|
149 | if (pk_msg->hdr.length < temp) {
|
---|
150 | pk_msg->hdr.length = (uint16_t)temp;
|
---|
151 | }
|
---|
152 | }
|
---|
153 |
|
---|
154 | buf = &mblk->payload[pos];
|
---|
155 | }
|
---|
156 |
|
---|
157 | return buf;
|
---|
158 | }
|
---|
159 |
|
---|
160 | static ER release_message(T_WS_FST_BLK *pk_msg)
|
---|
161 | {
|
---|
162 | ER ret;
|
---|
163 | int i;
|
---|
164 |
|
---|
165 | for (i = 0; i < 32; i++) {
|
---|
166 | void * blk = pk_msg->lnk.p_sub[i];
|
---|
167 | if (blk == NULL)
|
---|
168 | continue;
|
---|
169 |
|
---|
170 | ret = rel_mpf(ws_mempoolid, blk);
|
---|
171 | if (ret != E_OK)
|
---|
172 | return ret;
|
---|
173 | }
|
---|
174 |
|
---|
175 | return rel_mpf(ws_mempoolid, pk_msg);
|
---|
176 | }
|
---|
177 |
|
---|
178 | static int read_message(T_WS_FST_BLK *pk_msg, int pos, void * dst, int size)
|
---|
179 | {
|
---|
180 | int len, rest = size;
|
---|
181 | void * buf;
|
---|
182 |
|
---|
183 | if (size <= 0)
|
---|
184 | return 0;
|
---|
185 |
|
---|
186 | len = rest;
|
---|
187 | buf = get_block(pk_msg, pos, false, &len);
|
---|
188 | if ((buf == NULL) || (len <= 0))
|
---|
189 | return 0;
|
---|
190 |
|
---|
191 | if((pos + len) > pk_msg->hdr.length)
|
---|
192 | len = pk_msg->hdr.length - pos;
|
---|
193 |
|
---|
194 | for (; ; ) {
|
---|
195 | memcpy(dst, buf, len);
|
---|
196 | dst = (void *)((intptr_t)dst + len);
|
---|
197 | rest -= len;
|
---|
198 | pos += len;
|
---|
199 |
|
---|
200 | if (rest <= 0)
|
---|
201 | break;
|
---|
202 |
|
---|
203 | len = rest;
|
---|
204 | buf = get_block(pk_msg, pos, false, &len);
|
---|
205 | if ((buf == NULL) || (len <= 0))
|
---|
206 | return size - rest;
|
---|
207 | }
|
---|
208 |
|
---|
209 | return size;
|
---|
210 | }
|
---|
211 |
|
---|
212 | static int write_message(const void * src, T_WS_FST_BLK *pk_msg, int pos, int size)
|
---|
213 | {
|
---|
214 | int len, rest = size;
|
---|
215 | void * buf;
|
---|
216 |
|
---|
217 | if (size <= 0)
|
---|
218 | return 0;
|
---|
219 |
|
---|
220 | len = rest;
|
---|
221 | buf = get_block(pk_msg, pos, true, &len);
|
---|
222 | if ((buf == NULL) || (len <= 0))
|
---|
223 | return 0;
|
---|
224 |
|
---|
225 | for (; ; ) {
|
---|
226 | memcpy(buf, src, len);
|
---|
227 | src = (void *)((intptr_t)src +len);
|
---|
228 | rest -= len;
|
---|
229 | pos += len;
|
---|
230 |
|
---|
231 | if (rest <= 0)
|
---|
232 | break;
|
---|
233 |
|
---|
234 | len = rest;
|
---|
235 | buf = get_block(pk_msg, pos, true, &len);
|
---|
236 | if ((buf == NULL) || (len <= 0))
|
---|
237 | return size - rest;
|
---|
238 | }
|
---|
239 |
|
---|
240 | if (pk_msg->hdr.length < pos)
|
---|
241 | pk_msg->hdr.length = (uint16_t)pos;
|
---|
242 |
|
---|
243 | return size;
|
---|
244 | }
|
---|
245 |
|
---|
246 | static int copy_message(T_WS_FST_BLK *pk_src, int spos, T_WS_FST_BLK *pk_dst, int dpos, int size)
|
---|
247 | {
|
---|
248 | int dlen, slen, len, rest = size;
|
---|
249 | void * dbuf, *sbuf;
|
---|
250 |
|
---|
251 | if (size <= 0)
|
---|
252 | return 0;
|
---|
253 |
|
---|
254 | dlen = rest;
|
---|
255 | dbuf = get_block(pk_dst, dpos, true, &dlen);
|
---|
256 | if (dbuf == NULL)
|
---|
257 | return 0;
|
---|
258 |
|
---|
259 | slen = rest;
|
---|
260 | sbuf = get_block(pk_src, spos, false, &slen);
|
---|
261 | if (sbuf == NULL)
|
---|
262 | return 0;
|
---|
263 |
|
---|
264 | for (; ; ) {
|
---|
265 | len = (dlen < slen) ? dlen : slen;
|
---|
266 |
|
---|
267 | if (len == 0)
|
---|
268 | return size - rest;
|
---|
269 |
|
---|
270 | memcpy(dbuf, sbuf, len);
|
---|
271 |
|
---|
272 | dpos += len;
|
---|
273 | spos += len;
|
---|
274 | rest -= len;
|
---|
275 |
|
---|
276 | if (rest <= 0)
|
---|
277 | break;
|
---|
278 |
|
---|
279 | dlen = rest;
|
---|
280 | dbuf = get_block(pk_dst, dpos, true, &dlen);
|
---|
281 | if (dbuf == NULL)
|
---|
282 | return size - rest;
|
---|
283 |
|
---|
284 | slen = rest;
|
---|
285 | sbuf = get_block(pk_src, spos, false, &slen);
|
---|
286 | if (sbuf == NULL)
|
---|
287 | return size - rest;
|
---|
288 | }
|
---|
289 |
|
---|
290 | return size;
|
---|
291 | }
|
---|
292 |
|
---|
293 | /* ã¡ã¢ãªãããã¯åå¾ ok:ãã¤ã³ã¿ NG:NULL */
|
---|
294 | void *_ws_fbs_mbx_get(WS_FBS_SIZE_T fa_req_size)
|
---|
295 | {
|
---|
296 | void *result;
|
---|
297 | ER ret;
|
---|
298 |
|
---|
299 | if ((fa_req_size <= 0) || (fa_req_size > WEBSOCKET_MEMPOOL_BLOCK_SIZE))
|
---|
300 | return NULL;
|
---|
301 |
|
---|
302 | ret = get_mpf(ws_mempoolid, &result);
|
---|
303 | if (ret != E_OK)
|
---|
304 | return NULL;
|
---|
305 |
|
---|
306 | memset(result, 0, WEBSOCKET_MEMPOOL_BLOCK_SIZE);
|
---|
307 |
|
---|
308 | return result;
|
---|
309 | }
|
---|
310 |
|
---|
311 | /* ã¡ã¢ãªãããã¯è§£æ¾ */
|
---|
312 | ER _ws_fbs_mbx_rel(void *p)
|
---|
313 | {
|
---|
314 | return rel_mpf(ws_mempoolid, p);
|
---|
315 | }
|
---|
316 |
|
---|
317 | /* é åç¢ºä¿ */
|
---|
318 | ER _ws_fbs_cre(WS_FBS_SIZE_T fa_req_size, WS_FBS_ID *fp_id)
|
---|
319 | {
|
---|
320 | return get_message(&fp_id->ptr, fa_req_size);
|
---|
321 | }
|
---|
322 |
|
---|
323 | /* é åè§£æ¾ */
|
---|
324 | ER _ws_fbs_del(WS_FBS_ID fa_id)
|
---|
325 | {
|
---|
326 | return release_message(fa_id.ptr);
|
---|
327 | }
|
---|
328 |
|
---|
329 | /* ä¿æãã¼ã¿ã®æç¡ */
|
---|
330 | bool_t _ws_fbs_exist_data(WS_FBS_ID fa_id)
|
---|
331 | {
|
---|
332 | return fa_id.ptr->hdr.length > fa_id.ptr->hdr.wr;
|
---|
333 | }
|
---|
334 |
|
---|
335 | /* ä¿æãã¼ã¿é·ã®åå¾ */
|
---|
336 | WS_FBS_SSIZE_T _ws_fbs_get_datalen(WS_FBS_ID fa_id)
|
---|
337 | {
|
---|
338 | return fa_id.ptr->hdr.length;
|
---|
339 | }
|
---|
340 |
|
---|
341 | /* èªã¿åãã«ã¼ã½ã«ã®ä½ç½®åå¾ */
|
---|
342 | WS_FBS_SSIZE_T _ws_fbs_get_rpos(WS_FBS_ID fa_id)
|
---|
343 | {
|
---|
344 | return fa_id.ptr->hdr.rd;
|
---|
345 | }
|
---|
346 |
|
---|
347 | /* èªã¿åãã«ã¼ã½ã«ã®ä½ç½®è¨å® */
|
---|
348 | ER _ws_fbs_set_rpos(WS_FBS_ID fa_id, WS_FBS_SSIZE_T fa_pos)
|
---|
349 | {
|
---|
350 | if (fa_id.ptr->hdr.length <= (unsigned int)fa_pos) /* ä½ç½®æå®ã大ãããã */
|
---|
351 | return E_PAR;
|
---|
352 |
|
---|
353 | fa_id.ptr->hdr.rd = fa_pos;
|
---|
354 |
|
---|
355 | return E_OK;
|
---|
356 | }
|
---|
357 |
|
---|
358 | /* èªã¿åãã«ã¼ã½ã«ã®ä½ç½®ç§»å */
|
---|
359 | ER _ws_fbs_seek_rpos(WS_FBS_ID fa_id, WS_FBS_SSIZE_T fa_seek)
|
---|
360 | {
|
---|
361 | fa_id.ptr->hdr.rd += fa_seek;
|
---|
362 | if (fa_id.ptr->hdr.rd > fa_id.ptr->hdr.length)
|
---|
363 | fa_id.ptr->hdr.rd = fa_id.ptr->hdr.length;
|
---|
364 |
|
---|
365 | return E_OK;
|
---|
366 | }
|
---|
367 |
|
---|
368 | /* ä»»ææå®ä½ç½®ã®1byteèªã¿åã */
|
---|
369 | int _ws_fbs_peek(WS_FBS_ID fa_id, WS_FBS_SSIZE_T fa_seek)
|
---|
370 | {
|
---|
371 | uint8_t result = 0;
|
---|
372 | int ret;
|
---|
373 |
|
---|
374 | ret = read_message(fa_id.ptr, fa_seek, &result, 1);
|
---|
375 |
|
---|
376 | return (ret == 1) ? result : -1;
|
---|
377 | }
|
---|
378 |
|
---|
379 | /* ä»»ææå®ä½ç½®ã®1byteæ¸ã込㿠*/
|
---|
380 | ER _ws_fbs_poke(WS_FBS_ID fa_id, WS_FBS_SSIZE_T fa_seek, int fa_val)
|
---|
381 | {
|
---|
382 | uint8_t result = fa_val;
|
---|
383 | int ret;
|
---|
384 |
|
---|
385 | ret = write_message(&result, fa_id.ptr, fa_seek, 1);
|
---|
386 |
|
---|
387 | return (ret == 1) ? E_OK : E_PAR;
|
---|
388 | }
|
---|
389 |
|
---|
390 | /* ãã¼ã¿è¿½å */
|
---|
391 | ER _ws_fbs_add_data(WS_FBS_ID fa_id, const void *fa_dat, WS_FBS_SSIZE_T fa_len)
|
---|
392 | {
|
---|
393 | if((fa_id.ptr->hdr.wr + fa_len) > fa_id.ptr->hdr.length)
|
---|
394 | return E_PAR;
|
---|
395 |
|
---|
396 | fa_id.ptr->hdr.wr += write_message(fa_dat, fa_id.ptr, fa_id.ptr->hdr.wr, fa_len);
|
---|
397 | return E_OK;
|
---|
398 | }
|
---|
399 |
|
---|
400 | /* ãã¼ã¿è¿½å (é åãèªåçã«æ¡å¼µãã) */
|
---|
401 | ER _ws_fbs_add_data_ex(WS_FBS_ID fa_id, const void *fa_dat, WS_FBS_SSIZE_T fa_len)
|
---|
402 | {
|
---|
403 | fa_id.ptr->hdr.wr += write_message(fa_dat, fa_id.ptr, fa_id.ptr->hdr.wr, fa_len);
|
---|
404 | return E_OK;
|
---|
405 | }
|
---|
406 |
|
---|
407 | /* ãã¼ã¿åå¾ */
|
---|
408 | ER _ws_fbs_get_data(WS_FBS_ID fa_id, void *fa_buf, WS_FBS_SSIZE_T fa_maxlen, WS_FBS_SSIZE_T *p_len)
|
---|
409 | {
|
---|
410 | int ret;
|
---|
411 |
|
---|
412 | ret = read_message(fa_id.ptr, fa_id.ptr->hdr.rd, fa_buf, fa_maxlen);
|
---|
413 | fa_id.ptr->hdr.rd += ret;
|
---|
414 | *p_len = ret;
|
---|
415 |
|
---|
416 | return E_OK;
|
---|
417 | }
|
---|
418 |
|
---|
419 | ER ws_fbs_enqueue(T_WS_FBS_QUEUE *pk_queue, T_WS_FST_BLK *pk_buf)
|
---|
420 | {
|
---|
421 | loc_cpu();
|
---|
422 |
|
---|
423 | *((T_WS_FST_BLK **)pk_buf->_msg) = NULL;
|
---|
424 | if (pk_queue->pk_head != NULL) {
|
---|
425 | *((T_WS_FST_BLK **)pk_queue->pk_last->_msg) = pk_buf;
|
---|
426 | }
|
---|
427 | else {
|
---|
428 | pk_queue->pk_head = pk_buf;
|
---|
429 | }
|
---|
430 | pk_queue->pk_last = pk_buf;
|
---|
431 |
|
---|
432 | unl_cpu();
|
---|
433 |
|
---|
434 | return E_OK;
|
---|
435 | }
|
---|
436 |
|
---|
437 | ER ws_fbs_dequeue(T_WS_FBS_QUEUE *pk_queue, T_WS_FST_BLK **ppk_buf)
|
---|
438 | {
|
---|
439 | ER ercd;
|
---|
440 |
|
---|
441 | loc_cpu();
|
---|
442 |
|
---|
443 | if (pk_queue->pk_head != NULL) {
|
---|
444 | *ppk_buf = pk_queue->pk_head;
|
---|
445 | pk_queue->pk_head = *((T_WS_FST_BLK **)(*ppk_buf)->_msg);
|
---|
446 | ercd = E_OK;
|
---|
447 | }
|
---|
448 | else {
|
---|
449 | ercd = E_TMOUT;
|
---|
450 | }
|
---|
451 |
|
---|
452 | unl_cpu();
|
---|
453 |
|
---|
454 | return ercd;
|
---|
455 | }
|
---|