jerry_buffer.c 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886
  1. /*
  2. * Licensed under the Apache License, Version 2.0 (the "License")
  3. * Copyright (c) 2016-2018, Intel Corporation.
  4. *
  5. * ported from zephyr.js
  6. * COPYRIGHT (C) 2018, RT-Thread Development Team
  7. */
  8. #include <string.h>
  9. #include <stdlib.h>
  10. #include <stdio.h>
  11. #include <jerry_util.h>
  12. #include "jerry_buffer.h"
  13. #define strequal(a, b) !strcmp(a, b)
  14. #define DECL_FUNC_ARGS(name, ...) \
  15. jerry_value_t name(const jerry_value_t function_obj, \
  16. const jerry_value_t this, const jerry_value_t argv[], \
  17. const jerry_length_t args_cnt, __VA_ARGS__)
  18. static jerry_value_t jerry_buffer_prototype;
  19. js_buffer_t *jerry_buffer_find(const jerry_value_t obj);
  20. static void jerry_buffer_callback_free(void *handle)
  21. {
  22. js_buffer_t *item = (js_buffer_t *)handle;
  23. free(item->buffer);
  24. free(item);
  25. }
  26. static const jerry_object_native_info_t buffer_type_info =
  27. {
  28. .free_cb = jerry_buffer_callback_free
  29. };
  30. bool jerry_value_is_buffer(const jerry_value_t value)
  31. {
  32. if (jerry_value_is_object(value) && jerry_buffer_find(value))
  33. {
  34. return true;
  35. }
  36. return false;
  37. }
  38. js_buffer_t *jerry_buffer_find(const jerry_value_t obj)
  39. {
  40. // requires: obj should be the JS object associated with a buffer, created
  41. // in jerry_buffer
  42. // effects: looks up obj in our list of known buffer objects and returns
  43. // the associated list item struct, or NULL if not found
  44. js_buffer_t *handle;
  45. const jerry_object_native_info_t *tmp;
  46. if (jerry_get_object_native_pointer(obj, (void **)&handle, &tmp))
  47. {
  48. if (tmp == &buffer_type_info)
  49. {
  50. return handle;
  51. }
  52. }
  53. return NULL;
  54. }
  55. static DECL_FUNC_ARGS(jerry_buffer_read_bytes, int bytes, bool big_endian, bool sign)
  56. {
  57. // requires: this is a JS buffer object created with jerry_buffer_create,
  58. // argv[0] should be an offset into the buffer, but will treat
  59. // offset as 0 if not given, as node.js seems to
  60. // bytes is the number of bytes to read (expects 1, 2, or 4)
  61. // big_endian true reads the bytes in big endian order, false in
  62. // little endian order
  63. // effects: reads bytes from the buffer associated with this JS object, if
  64. // found, at the given offset, if within the bounds of the
  65. // buffer; otherwise returns an error
  66. // args: offset
  67. // ZJS_VALIDATE_ARGS(Z_OPTIONAL Z_NUMBER);
  68. uint32_t offset = 0;
  69. if (args_cnt >= 1)
  70. offset = (uint32_t)jerry_get_number_value(argv[0]);
  71. js_buffer_t *buf = jerry_buffer_find(this);
  72. if (!buf)
  73. return jerry_create_undefined();
  74. if (offset + bytes > buf->bufsize)
  75. return jerry_create_undefined();
  76. int dir = big_endian ? 1 : -1;
  77. if (!big_endian)
  78. offset += bytes - 1; // start on the big end
  79. uint32_t value = 0;
  80. for (int i = 0; i < bytes; i++)
  81. {
  82. value <<= 8;
  83. value |= buf->buffer[offset];
  84. offset += dir;
  85. }
  86. if (sign)
  87. {
  88. if (bytes == 1)
  89. return jerry_create_number((int8_t)value);
  90. else if (bytes == 2)
  91. return jerry_create_number((int16_t)value);
  92. else if (bytes == 4)
  93. return jerry_create_number((int32_t)value);
  94. }
  95. return jerry_create_number(value);
  96. }
  97. static DECL_FUNC_ARGS(jerry_buffer_write_bytes, int bytes, bool big_endian)
  98. {
  99. // requires: this is a JS buffer object created with jerry_buffer_create,
  100. // argv[0] must be the value to be written, argv[1] should be
  101. // an offset into the buffer, but will treat offset as 0 if not
  102. // given, as node.js seems to
  103. // bytes is the number of bytes to write (expects 1, 2, or 4)
  104. // big_endian true writes the bytes in big endian order, false in
  105. // little endian order
  106. // effects: writes bytes into the buffer associated with this JS object, if
  107. // found, at the given offset, if within the bounds of the
  108. // buffer and returns the offset just beyond what was written;
  109. // otherwise returns an error
  110. // args: value[, offset]
  111. // ZJS_VALIDATE_ARGS(Z_NUMBER, Z_OPTIONAL Z_NUMBER);
  112. // technically negatives aren't supported but this makes them behave better
  113. double dval = jerry_get_number_value(argv[0]);
  114. uint32_t value = (uint32_t)(dval < 0 ? (int32_t)dval : dval);
  115. uint32_t offset = 0;
  116. if (args_cnt > 1)
  117. {
  118. offset = (uint32_t)jerry_get_number_value(argv[1]);
  119. }
  120. js_buffer_t *buf = jerry_buffer_find(this);
  121. if (!buf)
  122. {
  123. return jerry_create_undefined();
  124. }
  125. uint32_t beyond = offset + bytes;
  126. if (beyond > buf->bufsize)
  127. {
  128. printf("bufsize %d, write attempted from %d to %d\n", (int)buf->bufsize, (int)offset, (int)beyond);
  129. return jerry_create_undefined();
  130. }
  131. int dir = big_endian ? -1 : 1;
  132. if (big_endian)
  133. offset += bytes - 1; // start on the little end
  134. for (int i = 0; i < bytes; i++)
  135. {
  136. buf->buffer[offset] = value & 0xff;
  137. value >>= 8;
  138. offset += dir;
  139. }
  140. return jerry_create_number(beyond);
  141. }
  142. DECLARE_HANDLER(readUInt8)
  143. {
  144. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 1, true, false);
  145. }
  146. DECLARE_HANDLER(readInt8)
  147. {
  148. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 1, true, true);
  149. }
  150. DECLARE_HANDLER(readUInt16BE)
  151. {
  152. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 2, true, false);
  153. }
  154. DECLARE_HANDLER(readInt16BE)
  155. {
  156. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 2, true, true);
  157. }
  158. DECLARE_HANDLER(readUInt16LE)
  159. {
  160. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 2, false, false);
  161. }
  162. DECLARE_HANDLER(readInt16LE)
  163. {
  164. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 2, false, true);
  165. }
  166. DECLARE_HANDLER(readUInt32BE)
  167. {
  168. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 4, true, false);
  169. }
  170. DECLARE_HANDLER(readInt32BE)
  171. {
  172. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 4, true, true);
  173. }
  174. DECLARE_HANDLER(readUInt32LE)
  175. {
  176. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 4, false, false);
  177. }
  178. DECLARE_HANDLER(readInt32LE)
  179. {
  180. return jerry_buffer_read_bytes(func_value, this_value, args, args_cnt, 4, false, true);
  181. }
  182. DECLARE_HANDLER(writeUInt8)
  183. {
  184. return jerry_buffer_write_bytes(func_value, this_value, args, args_cnt, 1, true);
  185. }
  186. DECLARE_HANDLER(writeUInt16BE)
  187. {
  188. return jerry_buffer_write_bytes(func_value, this_value, args, args_cnt, 2, true);
  189. }
  190. DECLARE_HANDLER(writeUInt16LE)
  191. {
  192. return jerry_buffer_write_bytes(func_value, this_value, args, args_cnt, 2, false);
  193. }
  194. DECLARE_HANDLER(writeUInt32BE)
  195. {
  196. return jerry_buffer_write_bytes(func_value, this_value, args, args_cnt, 4, true);
  197. }
  198. DECLARE_HANDLER(writeUInt32LE)
  199. {
  200. return jerry_buffer_write_bytes(func_value, this_value, args, args_cnt, 4, false);
  201. }
  202. DECLARE_HANDLER(readFloatBE)
  203. {
  204. return jerry_create_undefined();
  205. }
  206. DECLARE_HANDLER(readDoubleBE)
  207. {
  208. return jerry_create_undefined();
  209. }
  210. char jerry_int_to_hex(int value)
  211. {
  212. if (value < 10)
  213. return '0' + value;
  214. return 'A' + value - 10;
  215. }
  216. static int hex2int(const char *str)
  217. {
  218. int i = 0;
  219. int r = 0;
  220. for (i = 0; i < 2; i++)
  221. {
  222. if (str[i] >= '0' && str[i] <= '9') r += str[i] - '0';
  223. else if (str[i] >= 'a' && str[i] <= 'f') r += str[i] - 'a' + 10;
  224. else if (str[i] >= 'A' && str[i] <= 'F') r += str[i] - 'A' + 10;
  225. if (!i) r *= 16;
  226. }
  227. return r;
  228. }
  229. /*
  230. * toString(encoding[opt], start[opt], end[opt])
  231. */
  232. DECLARE_HANDLER(toString)
  233. {
  234. int start, end;
  235. int optcount = args_cnt;
  236. if (args_cnt < 1 || !jerry_value_is_string(args[0])) return jerry_create_undefined();
  237. js_buffer_t *buf = jerry_buffer_find(this_value);
  238. if (!buf) return jerry_create_undefined();
  239. if (args_cnt > 1) start = jerry_get_number_value(args[1]);
  240. else start = 0;
  241. if (args_cnt > 2) end = jerry_get_number_value(args[2]);
  242. else end = buf->bufsize;
  243. int size;
  244. char *enc;
  245. const char *encoding = "utf8";
  246. if (optcount)
  247. {
  248. enc = js_value_to_string(args[0]);
  249. size = strlen(enc);
  250. if (!size)
  251. {
  252. free(enc);
  253. return jerry_create_undefined();
  254. }
  255. encoding = enc;
  256. }
  257. if (strequal(encoding, "utf8"))
  258. {
  259. jerry_char_t *str = (jerry_char_t *)buf->buffer;
  260. str += start;
  261. rt_free(enc);
  262. return jerry_create_string_sz_from_utf8(str, end - start);
  263. }
  264. else if (strequal(encoding, "ascii"))
  265. {
  266. char *str = malloc(buf->bufsize);
  267. if (!str)
  268. {
  269. free(enc);
  270. return jerry_create_undefined();
  271. }
  272. int index;
  273. for (index = start; index < end; ++index)
  274. {
  275. // strip off high bit if present
  276. str[index - start] = buf->buffer[index] & 0x7f;
  277. if (!str[index - start])
  278. break;
  279. }
  280. jerry_value_t jstr;
  281. jstr = jerry_create_string_sz_from_utf8((jerry_char_t *)str, index - start);
  282. free(str);
  283. free(enc);
  284. return jstr;
  285. }
  286. else if (strequal(encoding, "hex"))
  287. {
  288. if (buf && end - start > 0)
  289. {
  290. int size = (end - start);
  291. char *hexbuf = malloc(size * 2 + 1);
  292. if (hexbuf)
  293. {
  294. jerry_value_t ret;
  295. for (int i = 0; i < size; i++)
  296. {
  297. int high = (0xf0 & buf->buffer[i + start]) >> 4;
  298. int low = 0xf & buf->buffer[i + start];
  299. hexbuf[2 * i] = jerry_int_to_hex(high);
  300. hexbuf[2 * i + 1] = jerry_int_to_hex(low);
  301. }
  302. hexbuf[size * 2] = '\0';
  303. free(enc);
  304. ret = jerry_create_string((jerry_char_t *)hexbuf);
  305. free(hexbuf);
  306. return ret;
  307. }
  308. else
  309. {
  310. free(enc);
  311. return jerry_create_undefined();
  312. }
  313. }
  314. }
  315. else
  316. {
  317. free(enc);
  318. return jerry_create_undefined();
  319. }
  320. free(enc);
  321. return jerry_create_undefined();
  322. }
  323. DECLARE_HANDLER(concat)
  324. {
  325. if (args_cnt == 1)
  326. {
  327. uint8_t *ptr;
  328. js_buffer_t *source = jerry_buffer_find(this_value);
  329. js_buffer_t *target = jerry_buffer_find(args[0]);
  330. if (!source || !target)
  331. {
  332. return jerry_create_undefined();
  333. }
  334. if (target->bufsize == 0 || source->bufsize < 0) return this_value;
  335. ptr = realloc(source->buffer, source->bufsize + target->bufsize);
  336. if (ptr)
  337. {
  338. source->buffer = ptr;
  339. memcpy(&source->buffer[source->bufsize], target->buffer, target->bufsize);
  340. source->bufsize += target->bufsize;
  341. js_set_property(this_value, "length", jerry_create_number(source->bufsize));
  342. }
  343. }
  344. return jerry_create_undefined();
  345. }
  346. DECLARE_HANDLER(copy)
  347. {
  348. // requires: this must be a JS buffer object and args[0] a target buffer
  349. // object
  350. // effects: copies buffer contents w/ optional offsets considered to the
  351. // target buffer (following Node v8.9.4 API)
  352. // args: target, [targetStart], [sourceStart], [sourceEnd]
  353. // ZJS_VALIDATE_ARGS_OPTCOUNT(optcount, Z_BUFFER,
  354. // Z_OPTIONAL Z_NUMBER Z_UNDEFINED,
  355. // Z_OPTIONAL Z_NUMBER Z_UNDEFINED,
  356. // Z_OPTIONAL Z_NUMBER Z_UNDEFINED);
  357. int optcount = args_cnt;
  358. if (optcount <= 0)
  359. return jerry_create_undefined();
  360. js_buffer_t *source = jerry_buffer_find(this_value);
  361. js_buffer_t *target = jerry_buffer_find(args[0]);
  362. if (!source || !target)
  363. {
  364. return jerry_create_undefined();
  365. }
  366. int targetStart = 0;
  367. int sourceStart = 0;
  368. int sourceEnd = -1;
  369. if (optcount > 1 && !jerry_value_is_undefined(args[1]))
  370. {
  371. targetStart = (int)jerry_get_number_value(args[1]);
  372. }
  373. if (optcount > 2 && !jerry_value_is_undefined(args[2]))
  374. {
  375. sourceStart = (int)jerry_get_number_value(args[2]);
  376. }
  377. if (optcount > 3 && !jerry_value_is_undefined(args[3]))
  378. {
  379. sourceEnd = (int)jerry_get_number_value(args[3]);
  380. }
  381. if (sourceEnd == -1)
  382. {
  383. sourceEnd = source->bufsize;
  384. }
  385. if (targetStart < 0 || targetStart >= target->bufsize ||
  386. sourceStart < 0 || sourceStart >= source->bufsize ||
  387. sourceEnd < 0 || sourceEnd <= sourceStart ||
  388. sourceEnd > source->bufsize)
  389. {
  390. return jerry_create_undefined();
  391. }
  392. if (sourceEnd - sourceStart > target->bufsize - targetStart)
  393. {
  394. return jerry_create_undefined();
  395. }
  396. int len = sourceEnd - sourceStart;
  397. memcpy(target->buffer + targetStart, source->buffer + sourceStart, len);
  398. return jerry_create_number(len);
  399. }
  400. DECLARE_HANDLER(write)
  401. {
  402. // requires: string - what will be written to buf
  403. // offset - where to start writing (Default: 0)
  404. // length - how many bytes to write (Default: buf.length -offset)
  405. // encoding - the character encoding of string. Currently only
  406. // supports the default of utf8
  407. // effects: writes string to buf at offset according to the character
  408. // encoding in encoding.
  409. // args: data[, offset[, length[, encoding]]]
  410. // ZJS_VALIDATE_ARGS(Z_STRING, Z_OPTIONAL Z_NUMBER, Z_OPTIONAL Z_NUMBER,
  411. // Z_OPTIONAL Z_STRING);
  412. js_buffer_t *buf = jerry_buffer_find(this_value);
  413. if (!buf)
  414. {
  415. return jerry_create_undefined();
  416. }
  417. // Check if the encoding string is anything other than utf8
  418. if (args_cnt > 3)
  419. {
  420. char *encoding = js_value_to_string(args[3]);
  421. if (!encoding)
  422. {
  423. return jerry_create_undefined();
  424. }
  425. // ask for one more char than needed to make sure not just prefix match
  426. const char *utf8_encoding = "utf8";
  427. int utf8_len = strlen(utf8_encoding);
  428. int rval = strncmp(encoding, utf8_encoding, utf8_len + 1);
  429. free(encoding);
  430. if (rval != 0)
  431. {
  432. return jerry_create_undefined();
  433. }
  434. }
  435. char *str = js_value_to_string(args[0]);
  436. if (!str)
  437. {
  438. return jerry_create_undefined();
  439. }
  440. jerry_size_t size = strlen(str);
  441. uint32_t offset = 0;
  442. if (args_cnt > 1)
  443. offset = (uint32_t)jerry_get_number_value(args[1]);
  444. uint32_t length = buf->bufsize - offset;
  445. if (args_cnt > 2)
  446. length = (uint32_t)jerry_get_number_value(args[2]);
  447. if (length > size)
  448. {
  449. free(str);
  450. return jerry_create_undefined();
  451. }
  452. if (offset + length > buf->bufsize)
  453. {
  454. free(str);
  455. return jerry_create_undefined();
  456. }
  457. memcpy(buf->buffer + offset, str, length);
  458. free(str);
  459. return jerry_create_number(length);
  460. }
  461. DECLARE_HANDLER(fill)
  462. {
  463. // requires: value - what will be written to buf
  464. // offset - where to start writing (Default: 0)
  465. // end - offset at which to stop writing (Default: buf.length)
  466. // encoding - the character encoding of value. Currently only
  467. // supports the default of utf8
  468. // effects: writes string to buf at offset according to the character
  469. // encoding in encoding.
  470. // args: data[, offset[, length[, encoding]]]
  471. // ZJS_VALIDATE_ARGS(Z_STRING Z_NUMBER Z_BUFFER, Z_OPTIONAL Z_NUMBER,
  472. // Z_OPTIONAL Z_NUMBER, Z_OPTIONAL Z_STRING);
  473. // TODO: support encodings other than 'utf8'
  474. uint32_t num;
  475. char *source = NULL;
  476. char *str = NULL;
  477. uint32_t srclen = 0;
  478. if (jerry_value_is_number(args[0]))
  479. {
  480. uint32_t srcnum = (uint32_t)jerry_get_number_value(args[0]);
  481. // convert in case of endian difference
  482. source = (char *)&num;
  483. source[0] = (0xff000000 & srcnum) >> 24;
  484. source[1] = (0x00ff0000 & srcnum) >> 16;
  485. source[2] = (0x0000ff00 & srcnum) >> 8;
  486. source[3] = 0x000000ff & srcnum;
  487. srclen = sizeof(uint32_t);
  488. }
  489. else if (jerry_value_is_buffer(args[0]))
  490. {
  491. js_buffer_t *srcbuf = jerry_buffer_find(args[0]);
  492. source = (char *)srcbuf->buffer;
  493. srclen = srcbuf->bufsize;
  494. }
  495. js_buffer_t *buf = jerry_buffer_find(this_value);
  496. if (!buf)
  497. {
  498. return jerry_create_undefined();
  499. }
  500. // Check if the encoding string is anything other than utf8
  501. if (args_cnt > 3)
  502. {
  503. char *encoding = js_value_to_string(args[3]);
  504. if (!encoding)
  505. {
  506. return jerry_create_undefined();
  507. }
  508. // ask for one more char than needed to make sure not just prefix match
  509. const char *utf8_encoding = "utf8";
  510. int utf8_len = strlen(utf8_encoding);
  511. int rval = strncmp(encoding, utf8_encoding, utf8_len + 1);
  512. free(encoding);
  513. if (rval != 0)
  514. {
  515. return jerry_create_undefined();
  516. }
  517. }
  518. uint32_t offset = 0;
  519. if (args_cnt > 1)
  520. offset = (uint32_t)jerry_get_number_value(args[1]);
  521. uint32_t end = buf->bufsize;
  522. if (args_cnt > 2)
  523. {
  524. end = (uint32_t)jerry_get_number_value(args[2]);
  525. if (end > buf->bufsize)
  526. {
  527. end = buf->bufsize;
  528. }
  529. }
  530. if (offset >= end)
  531. {
  532. // nothing to do
  533. return jerry_acquire_value(this_value);
  534. }
  535. if (jerry_value_is_string(args[0]))
  536. {
  537. char *str = js_value_to_string(args[0]);
  538. if (!str)
  539. {
  540. return jerry_create_undefined();
  541. }
  542. source = str;
  543. srclen = strlen(str);
  544. }
  545. uint32_t bytes_left = end - offset;
  546. while (bytes_left > 0)
  547. {
  548. uint32_t bytes = srclen;
  549. if (bytes > bytes_left)
  550. {
  551. bytes = bytes_left;
  552. }
  553. memcpy(buf->buffer + offset, source, bytes);
  554. offset += bytes;
  555. bytes_left -= bytes;
  556. }
  557. free(str);
  558. return jerry_acquire_value(this_value);
  559. }
  560. jerry_value_t jerry_buffer_create(uint32_t size, js_buffer_t **ret_buf)
  561. {
  562. // follow Node's Buffer.kMaxLength limits though we don't expose that
  563. uint32_t maxLength = (1UL << 31) - 1;
  564. if (sizeof(size_t) == 4)
  565. {
  566. // detected 32-bit architecture
  567. maxLength = (1 << 30) - 1;
  568. }
  569. if (size > maxLength)
  570. {
  571. printf("size: %d\n", (int)size);
  572. return jerry_create_undefined();
  573. }
  574. void *buf = malloc(size);
  575. js_buffer_t *buf_item = (js_buffer_t *)malloc(sizeof(js_buffer_t));
  576. if (!buf || !buf_item)
  577. {
  578. free(buf);
  579. free(buf_item);
  580. if (ret_buf)
  581. {
  582. *ret_buf = NULL;
  583. }
  584. return jerry_create_undefined();
  585. }
  586. jerry_value_t buf_obj = jerry_create_object();
  587. buf_item->buffer = buf;
  588. buf_item->bufsize = size;
  589. jerry_set_prototype(buf_obj, jerry_buffer_prototype);
  590. js_set_property(buf_obj, "length", jerry_create_number(size));
  591. // watch for the object getting garbage collected, and clean up
  592. jerry_set_object_native_pointer(buf_obj, buf_item, &buffer_type_info);
  593. if (ret_buf)
  594. {
  595. *ret_buf = buf_item;
  596. }
  597. return buf_obj;
  598. }
  599. #define ENCODING_UTF8 0
  600. #define ENCODING_ASCII 1
  601. #define ENCODING_HEX 2
  602. #define ENCODING_BASE64 3
  603. int buffer_encoding_type(const char* encoding)
  604. {
  605. int ret = ENCODING_UTF8;
  606. if (strequal(encoding, "hex")) ret = ENCODING_HEX;
  607. else if (strequal(encoding, "ascii")) ret = ENCODING_ASCII;
  608. else if (strequal(encoding, "utf8")) ret = ENCODING_UTF8;
  609. else if (strequal(encoding, "base64")) ret = ENCODING_BASE64;
  610. return ret;
  611. }
  612. /*
  613. * Buffer(number);
  614. * Buffer(array);
  615. * Buffer(string, encoding[opt]);
  616. */
  617. DECLARE_HANDLER(Buffer)
  618. {
  619. int encoding_type = ENCODING_UTF8;
  620. if (args_cnt > 1)
  621. {
  622. char *encoding = js_value_to_string(args[1]);
  623. if (encoding)
  624. {
  625. encoding_type = buffer_encoding_type(encoding);
  626. free(encoding);
  627. }
  628. }
  629. if (jerry_value_is_number(args[0]))
  630. {
  631. double dnum = jerry_get_number_value(args[0]);
  632. uint32_t unum;
  633. if (dnum < 0)
  634. {
  635. unum = 0;
  636. }
  637. else if (dnum > 0xffffffff)
  638. {
  639. unum = 0xffffffff;
  640. }
  641. else
  642. {
  643. // round to the nearest integer
  644. unum = (uint32_t)(dnum + 0.5);
  645. }
  646. // treat a number argument as a length
  647. return jerry_buffer_create(unum, NULL);
  648. }
  649. else if (jerry_value_is_array(args[0]))
  650. {
  651. // treat array argument as byte initializers
  652. jerry_value_t array = args[0];
  653. uint32_t len = jerry_get_array_length(array);
  654. js_buffer_t *buf;
  655. jerry_value_t new_buf = jerry_buffer_create(len, &buf);
  656. if (buf)
  657. {
  658. for (int i = 0; i < len; i++)
  659. {
  660. jerry_value_t item = jerry_get_property_by_index(array, i);
  661. if (jerry_value_is_number(item))
  662. {
  663. buf->buffer[i] = (uint8_t)jerry_get_number_value(item);
  664. }
  665. else
  666. {
  667. printf("non-numeric value in array, treating as 0\n");
  668. buf->buffer[i] = 0;
  669. }
  670. }
  671. }
  672. return new_buf;
  673. }
  674. else if (jerry_value_is_string(args[0]))
  675. {
  676. uint8_t *data = NULL;
  677. char *str = js_value_to_string(args[0]);
  678. if (!str)
  679. {
  680. return jerry_create_undefined();
  681. }
  682. js_buffer_t *buf;
  683. jerry_size_t size = strlen(str);
  684. if (encoding_type == ENCODING_HEX)
  685. {
  686. data = malloc(size/2);
  687. if (data)
  688. {
  689. int index;
  690. for (index = 0; index < size/2; index ++)
  691. {
  692. data[index] = hex2int(&str[index * 2]);
  693. }
  694. }
  695. size = size / 2;
  696. }
  697. else
  698. {
  699. data = (uint8_t *)str;
  700. }
  701. jerry_value_t new_buf = jerry_buffer_create(size, &buf);
  702. if (buf)
  703. {
  704. memcpy(buf->buffer, data, size);
  705. }
  706. if ((char*)data != str) free(data);
  707. free(str);
  708. return new_buf;
  709. }
  710. return jerry_create_undefined();
  711. }
  712. int js_buffer_cleanup(void)
  713. {
  714. jerry_release_value(jerry_buffer_prototype);
  715. return 0;
  716. }
  717. int js_buffer_init(void)
  718. {
  719. REGISTER_HANDLER(Buffer);
  720. jerry_buffer_prototype = jerry_create_object();
  721. REGISTER_METHOD(jerry_buffer_prototype, readUInt8);
  722. REGISTER_METHOD(jerry_buffer_prototype, readInt8);
  723. REGISTER_METHOD(jerry_buffer_prototype, writeUInt8);
  724. REGISTER_METHOD(jerry_buffer_prototype, readUInt16BE);
  725. REGISTER_METHOD(jerry_buffer_prototype, readInt16BE);
  726. REGISTER_METHOD(jerry_buffer_prototype, writeUInt16BE);
  727. REGISTER_METHOD(jerry_buffer_prototype, readUInt16LE);
  728. REGISTER_METHOD(jerry_buffer_prototype, readInt16LE);
  729. REGISTER_METHOD(jerry_buffer_prototype, writeUInt16LE);
  730. REGISTER_METHOD(jerry_buffer_prototype, readUInt32BE);
  731. REGISTER_METHOD(jerry_buffer_prototype, readInt32BE);
  732. REGISTER_METHOD(jerry_buffer_prototype, writeUInt32BE);
  733. REGISTER_METHOD(jerry_buffer_prototype, readUInt32LE);
  734. REGISTER_METHOD(jerry_buffer_prototype, readInt32LE);
  735. REGISTER_METHOD(jerry_buffer_prototype, writeUInt32LE);
  736. REGISTER_METHOD(jerry_buffer_prototype, readFloatBE);
  737. REGISTER_METHOD(jerry_buffer_prototype, readDoubleBE);
  738. REGISTER_METHOD(jerry_buffer_prototype, copy);
  739. REGISTER_METHOD(jerry_buffer_prototype, fill);
  740. REGISTER_METHOD(jerry_buffer_prototype, toString);
  741. REGISTER_METHOD(jerry_buffer_prototype, write);
  742. REGISTER_METHOD(jerry_buffer_prototype, concat);
  743. return 0;
  744. }