jerry_buffer.c 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884
  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. free(enc);
  260. return jerry_create_string_sz_from_utf8((jerry_char_t *)buf->buffer,
  261. buf->bufsize);
  262. }
  263. else if (strequal(encoding, "ascii"))
  264. {
  265. char *str = malloc(buf->bufsize);
  266. if (!str)
  267. {
  268. free(enc);
  269. return jerry_create_undefined();
  270. }
  271. int index;
  272. for (index = start; index < end; ++index)
  273. {
  274. // strip off high bit if present
  275. str[index - start] = buf->buffer[index] & 0x7f;
  276. if (!str[index - start])
  277. break;
  278. }
  279. jerry_value_t jstr;
  280. jstr = jerry_create_string_sz_from_utf8((jerry_char_t *)str, end - start);
  281. free(str);
  282. free(enc);
  283. return jstr;
  284. }
  285. else if (strequal(encoding, "hex"))
  286. {
  287. if (buf && end - start > 0)
  288. {
  289. int size = (end - start);
  290. char *hexbuf = malloc(size * 2 + 1);
  291. if (hexbuf)
  292. {
  293. jerry_value_t ret;
  294. for (int i = 0; i < size; i++)
  295. {
  296. int high = (0xf0 & buf->buffer[i + start]) >> 4;
  297. int low = 0xf & buf->buffer[i + start];
  298. hexbuf[2 * i] = jerry_int_to_hex(high);
  299. hexbuf[2 * i + 1] = jerry_int_to_hex(low);
  300. }
  301. hexbuf[size * 2] = '\0';
  302. free(enc);
  303. ret = jerry_create_string((jerry_char_t *)hexbuf);
  304. free(hexbuf);
  305. return ret;
  306. }
  307. else
  308. {
  309. free(enc);
  310. return jerry_create_undefined();
  311. }
  312. }
  313. }
  314. else
  315. {
  316. free(enc);
  317. return jerry_create_undefined();
  318. }
  319. free(enc);
  320. return jerry_create_undefined();
  321. }
  322. DECLARE_HANDLER(concat)
  323. {
  324. if (args_cnt == 1)
  325. {
  326. uint8_t *ptr;
  327. js_buffer_t *source = jerry_buffer_find(this_value);
  328. js_buffer_t *target = jerry_buffer_find(args[0]);
  329. if (!source || !target)
  330. {
  331. return jerry_create_undefined();
  332. }
  333. if (target->bufsize == 0 || source->bufsize < 0) return this_value;
  334. ptr = realloc(source->buffer, source->bufsize + target->bufsize);
  335. if (ptr)
  336. {
  337. source->buffer = ptr;
  338. memcpy(&source->buffer[source->bufsize], target->buffer, target->bufsize);
  339. source->bufsize += target->bufsize;
  340. js_set_property(this_value, "length", jerry_create_number(source->bufsize));
  341. }
  342. }
  343. return jerry_create_undefined();
  344. }
  345. DECLARE_HANDLER(copy)
  346. {
  347. // requires: this must be a JS buffer object and args[0] a target buffer
  348. // object
  349. // effects: copies buffer contents w/ optional offsets considered to the
  350. // target buffer (following Node v8.9.4 API)
  351. // args: target, [targetStart], [sourceStart], [sourceEnd]
  352. // ZJS_VALIDATE_ARGS_OPTCOUNT(optcount, Z_BUFFER,
  353. // Z_OPTIONAL Z_NUMBER Z_UNDEFINED,
  354. // Z_OPTIONAL Z_NUMBER Z_UNDEFINED,
  355. // Z_OPTIONAL Z_NUMBER Z_UNDEFINED);
  356. int optcount = args_cnt;
  357. if (optcount <= 0)
  358. return jerry_create_undefined();
  359. js_buffer_t *source = jerry_buffer_find(this_value);
  360. js_buffer_t *target = jerry_buffer_find(args[0]);
  361. if (!source || !target)
  362. {
  363. return jerry_create_undefined();
  364. }
  365. int targetStart = 0;
  366. int sourceStart = 0;
  367. int sourceEnd = -1;
  368. if (optcount > 1 && !jerry_value_is_undefined(args[1]))
  369. {
  370. targetStart = (int)jerry_get_number_value(args[1]);
  371. }
  372. if (optcount > 2 && !jerry_value_is_undefined(args[2]))
  373. {
  374. sourceStart = (int)jerry_get_number_value(args[2]);
  375. }
  376. if (optcount > 3 && !jerry_value_is_undefined(args[3]))
  377. {
  378. sourceEnd = (int)jerry_get_number_value(args[3]);
  379. }
  380. if (sourceEnd == -1)
  381. {
  382. sourceEnd = source->bufsize;
  383. }
  384. if (targetStart < 0 || targetStart >= target->bufsize ||
  385. sourceStart < 0 || sourceStart >= source->bufsize ||
  386. sourceEnd < 0 || sourceEnd <= sourceStart ||
  387. sourceEnd > source->bufsize)
  388. {
  389. return jerry_create_undefined();
  390. }
  391. if (sourceEnd - sourceStart > target->bufsize - targetStart)
  392. {
  393. return jerry_create_undefined();
  394. }
  395. int len = sourceEnd - sourceStart;
  396. memcpy(target->buffer + targetStart, source->buffer + sourceStart, len);
  397. return jerry_create_number(len);
  398. }
  399. DECLARE_HANDLER(write)
  400. {
  401. // requires: string - what will be written to buf
  402. // offset - where to start writing (Default: 0)
  403. // length - how many bytes to write (Default: buf.length -offset)
  404. // encoding - the character encoding of string. Currently only
  405. // supports the default of utf8
  406. // effects: writes string to buf at offset according to the character
  407. // encoding in encoding.
  408. // args: data[, offset[, length[, encoding]]]
  409. // ZJS_VALIDATE_ARGS(Z_STRING, Z_OPTIONAL Z_NUMBER, Z_OPTIONAL Z_NUMBER,
  410. // Z_OPTIONAL Z_STRING);
  411. js_buffer_t *buf = jerry_buffer_find(this_value);
  412. if (!buf)
  413. {
  414. return jerry_create_undefined();
  415. }
  416. // Check if the encoding string is anything other than utf8
  417. if (args_cnt > 3)
  418. {
  419. char *encoding = js_value_to_string(args[3]);
  420. if (!encoding)
  421. {
  422. return jerry_create_undefined();
  423. }
  424. // ask for one more char than needed to make sure not just prefix match
  425. const char *utf8_encoding = "utf8";
  426. int utf8_len = strlen(utf8_encoding);
  427. int rval = strncmp(encoding, utf8_encoding, utf8_len + 1);
  428. free(encoding);
  429. if (rval != 0)
  430. {
  431. return jerry_create_undefined();
  432. }
  433. }
  434. char *str = js_value_to_string(args[0]);
  435. if (!str)
  436. {
  437. return jerry_create_undefined();
  438. }
  439. jerry_size_t size = strlen(str);
  440. uint32_t offset = 0;
  441. if (args_cnt > 1)
  442. offset = (uint32_t)jerry_get_number_value(args[1]);
  443. uint32_t length = buf->bufsize - offset;
  444. if (args_cnt > 2)
  445. length = (uint32_t)jerry_get_number_value(args[2]);
  446. if (length > size)
  447. {
  448. free(str);
  449. return jerry_create_undefined();
  450. }
  451. if (offset + length > buf->bufsize)
  452. {
  453. free(str);
  454. return jerry_create_undefined();
  455. }
  456. memcpy(buf->buffer + offset, str, length);
  457. free(str);
  458. return jerry_create_number(length);
  459. }
  460. DECLARE_HANDLER(fill)
  461. {
  462. // requires: value - what will be written to buf
  463. // offset - where to start writing (Default: 0)
  464. // end - offset at which to stop writing (Default: buf.length)
  465. // encoding - the character encoding of value. Currently only
  466. // supports the default of utf8
  467. // effects: writes string to buf at offset according to the character
  468. // encoding in encoding.
  469. // args: data[, offset[, length[, encoding]]]
  470. // ZJS_VALIDATE_ARGS(Z_STRING Z_NUMBER Z_BUFFER, Z_OPTIONAL Z_NUMBER,
  471. // Z_OPTIONAL Z_NUMBER, Z_OPTIONAL Z_STRING);
  472. // TODO: support encodings other than 'utf8'
  473. uint32_t num;
  474. char *source = NULL;
  475. char *str = NULL;
  476. uint32_t srclen = 0;
  477. if (jerry_value_is_number(args[0]))
  478. {
  479. uint32_t srcnum = (uint32_t)jerry_get_number_value(args[0]);
  480. // convert in case of endian difference
  481. source = (char *)&num;
  482. source[0] = (0xff000000 & srcnum) >> 24;
  483. source[1] = (0x00ff0000 & srcnum) >> 16;
  484. source[2] = (0x0000ff00 & srcnum) >> 8;
  485. source[3] = 0x000000ff & srcnum;
  486. srclen = sizeof(uint32_t);
  487. }
  488. else if (jerry_value_is_buffer(args[0]))
  489. {
  490. js_buffer_t *srcbuf = jerry_buffer_find(args[0]);
  491. source = (char *)srcbuf->buffer;
  492. srclen = srcbuf->bufsize;
  493. }
  494. js_buffer_t *buf = jerry_buffer_find(this_value);
  495. if (!buf)
  496. {
  497. return jerry_create_undefined();
  498. }
  499. // Check if the encoding string is anything other than utf8
  500. if (args_cnt > 3)
  501. {
  502. char *encoding = js_value_to_string(args[3]);
  503. if (!encoding)
  504. {
  505. return jerry_create_undefined();
  506. }
  507. // ask for one more char than needed to make sure not just prefix match
  508. const char *utf8_encoding = "utf8";
  509. int utf8_len = strlen(utf8_encoding);
  510. int rval = strncmp(encoding, utf8_encoding, utf8_len + 1);
  511. free(encoding);
  512. if (rval != 0)
  513. {
  514. return jerry_create_undefined();
  515. }
  516. }
  517. uint32_t offset = 0;
  518. if (args_cnt > 1)
  519. offset = (uint32_t)jerry_get_number_value(args[1]);
  520. uint32_t end = buf->bufsize;
  521. if (args_cnt > 2)
  522. {
  523. end = (uint32_t)jerry_get_number_value(args[2]);
  524. if (end > buf->bufsize)
  525. {
  526. end = buf->bufsize;
  527. }
  528. }
  529. if (offset >= end)
  530. {
  531. // nothing to do
  532. return jerry_acquire_value(this_value);
  533. }
  534. if (jerry_value_is_string(args[0]))
  535. {
  536. char *str = js_value_to_string(args[0]);
  537. if (!str)
  538. {
  539. return jerry_create_undefined();
  540. }
  541. source = str;
  542. srclen = strlen(str);
  543. }
  544. uint32_t bytes_left = end - offset;
  545. while (bytes_left > 0)
  546. {
  547. uint32_t bytes = srclen;
  548. if (bytes > bytes_left)
  549. {
  550. bytes = bytes_left;
  551. }
  552. memcpy(buf->buffer + offset, source, bytes);
  553. offset += bytes;
  554. bytes_left -= bytes;
  555. }
  556. free(str);
  557. return jerry_acquire_value(this_value);
  558. }
  559. jerry_value_t jerry_buffer_create(uint32_t size, js_buffer_t **ret_buf)
  560. {
  561. // follow Node's Buffer.kMaxLength limits though we don't expose that
  562. uint32_t maxLength = (1UL << 31) - 1;
  563. if (sizeof(size_t) == 4)
  564. {
  565. // detected 32-bit architecture
  566. maxLength = (1 << 30) - 1;
  567. }
  568. if (size > maxLength)
  569. {
  570. printf("size: %d\n", (int)size);
  571. return jerry_create_undefined();
  572. }
  573. void *buf = malloc(size);
  574. js_buffer_t *buf_item = (js_buffer_t *)malloc(sizeof(js_buffer_t));
  575. if (!buf || !buf_item)
  576. {
  577. free(buf);
  578. free(buf_item);
  579. if (ret_buf)
  580. {
  581. *ret_buf = NULL;
  582. }
  583. return jerry_create_undefined();
  584. }
  585. jerry_value_t buf_obj = jerry_create_object();
  586. buf_item->buffer = buf;
  587. buf_item->bufsize = size;
  588. jerry_set_prototype(buf_obj, jerry_buffer_prototype);
  589. js_set_property(buf_obj, "length", jerry_create_number(size));
  590. // watch for the object getting garbage collected, and clean up
  591. jerry_set_object_native_pointer(buf_obj, buf_item, &buffer_type_info);
  592. if (ret_buf)
  593. {
  594. *ret_buf = buf_item;
  595. }
  596. return buf_obj;
  597. }
  598. #define ENCODING_UTF8 0
  599. #define ENCODING_ASCII 1
  600. #define ENCODING_HEX 2
  601. #define ENCODING_BASE64 3
  602. int buffer_encoding_type(const char* encoding)
  603. {
  604. int ret = ENCODING_UTF8;
  605. if (strequal(encoding, "hex")) ret = ENCODING_HEX;
  606. else if (strequal(encoding, "ascii")) ret = ENCODING_ASCII;
  607. else if (strequal(encoding, "utf8")) ret = ENCODING_UTF8;
  608. else if (strequal(encoding, "base64")) ret = ENCODING_BASE64;
  609. return ret;
  610. }
  611. /*
  612. * Buffer(number);
  613. * Buffer(array);
  614. * Buffer(string, encoding[opt]);
  615. */
  616. DECLARE_HANDLER(Buffer)
  617. {
  618. int encoding_type = ENCODING_UTF8;
  619. if (args_cnt > 1)
  620. {
  621. char *encoding = js_value_to_string(args[1]);
  622. if (encoding)
  623. {
  624. encoding_type = buffer_encoding_type(encoding);
  625. free(encoding);
  626. }
  627. }
  628. if (jerry_value_is_number(args[0]))
  629. {
  630. double dnum = jerry_get_number_value(args[0]);
  631. uint32_t unum;
  632. if (dnum < 0)
  633. {
  634. unum = 0;
  635. }
  636. else if (dnum > 0xffffffff)
  637. {
  638. unum = 0xffffffff;
  639. }
  640. else
  641. {
  642. // round to the nearest integer
  643. unum = (uint32_t)(dnum + 0.5);
  644. }
  645. // treat a number argument as a length
  646. return jerry_buffer_create(unum, NULL);
  647. }
  648. else if (jerry_value_is_array(args[0]))
  649. {
  650. // treat array argument as byte initializers
  651. jerry_value_t array = args[0];
  652. uint32_t len = jerry_get_array_length(array);
  653. js_buffer_t *buf;
  654. jerry_value_t new_buf = jerry_buffer_create(len, &buf);
  655. if (buf)
  656. {
  657. for (int i = 0; i < len; i++)
  658. {
  659. jerry_value_t item = jerry_get_property_by_index(array, i);
  660. if (jerry_value_is_number(item))
  661. {
  662. buf->buffer[i] = (uint8_t)jerry_get_number_value(item);
  663. }
  664. else
  665. {
  666. printf("non-numeric value in array, treating as 0\n");
  667. buf->buffer[i] = 0;
  668. }
  669. }
  670. }
  671. return new_buf;
  672. }
  673. else if (jerry_value_is_string(args[0]))
  674. {
  675. uint8_t *data = NULL;
  676. char *str = js_value_to_string(args[0]);
  677. if (!str)
  678. {
  679. return jerry_create_undefined();
  680. }
  681. js_buffer_t *buf;
  682. jerry_size_t size = strlen(str);
  683. if (encoding_type == ENCODING_HEX)
  684. {
  685. data = malloc(size/2);
  686. if (data)
  687. {
  688. int index;
  689. for (index = 0; index < size/2; index ++)
  690. {
  691. data[index] = hex2int(&str[index * 2]);
  692. }
  693. }
  694. size = size / 2;
  695. }
  696. else
  697. {
  698. data = (uint8_t *)str;
  699. }
  700. jerry_value_t new_buf = jerry_buffer_create(size, &buf);
  701. if (buf)
  702. {
  703. memcpy(buf->buffer, data, size);
  704. }
  705. if ((char*)data != str) free(data);
  706. free(str);
  707. return new_buf;
  708. }
  709. return jerry_create_undefined();
  710. }
  711. int js_buffer_cleanup(void)
  712. {
  713. jerry_release_value(jerry_buffer_prototype);
  714. return 0;
  715. }
  716. int js_buffer_init(void)
  717. {
  718. REGISTER_HANDLER(Buffer);
  719. jerry_buffer_prototype = jerry_create_object();
  720. REGISTER_METHOD(jerry_buffer_prototype, readUInt8);
  721. REGISTER_METHOD(jerry_buffer_prototype, readInt8);
  722. REGISTER_METHOD(jerry_buffer_prototype, writeUInt8);
  723. REGISTER_METHOD(jerry_buffer_prototype, readUInt16BE);
  724. REGISTER_METHOD(jerry_buffer_prototype, readInt16BE);
  725. REGISTER_METHOD(jerry_buffer_prototype, writeUInt16BE);
  726. REGISTER_METHOD(jerry_buffer_prototype, readUInt16LE);
  727. REGISTER_METHOD(jerry_buffer_prototype, readInt16LE);
  728. REGISTER_METHOD(jerry_buffer_prototype, writeUInt16LE);
  729. REGISTER_METHOD(jerry_buffer_prototype, readUInt32BE);
  730. REGISTER_METHOD(jerry_buffer_prototype, readInt32BE);
  731. REGISTER_METHOD(jerry_buffer_prototype, writeUInt32BE);
  732. REGISTER_METHOD(jerry_buffer_prototype, readUInt32LE);
  733. REGISTER_METHOD(jerry_buffer_prototype, readInt32LE);
  734. REGISTER_METHOD(jerry_buffer_prototype, writeUInt32LE);
  735. REGISTER_METHOD(jerry_buffer_prototype, readFloatBE);
  736. REGISTER_METHOD(jerry_buffer_prototype, readDoubleBE);
  737. REGISTER_METHOD(jerry_buffer_prototype, copy);
  738. REGISTER_METHOD(jerry_buffer_prototype, fill);
  739. REGISTER_METHOD(jerry_buffer_prototype, toString);
  740. REGISTER_METHOD(jerry_buffer_prototype, write);
  741. REGISTER_METHOD(jerry_buffer_prototype, concat);
  742. return 0;
  743. }