luat_lv_img.c 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432
  1. #include "luat_base.h"
  2. #include "lvgl.h"
  3. #include "luat_lvgl.h"
  4. // lv_img_dsc_t* lv_img_buf_alloc(lv_coord_t w, lv_coord_t h, lv_img_cf_t cf)
  5. int luat_lv_img_buf_alloc(lua_State *L) {
  6. LV_DEBUG("CALL lv_img_buf_alloc");
  7. lv_coord_t w = (lv_coord_t)luaL_checkinteger(L, 1);
  8. lv_coord_t h = (lv_coord_t)luaL_checkinteger(L, 2);
  9. lv_img_cf_t cf = (lv_img_cf_t)luaL_checkinteger(L, 3);
  10. lv_img_dsc_t* ret = NULL;
  11. ret = lv_img_buf_alloc(w ,h ,cf);
  12. lua_pushlightuserdata(L, ret);
  13. return 1;
  14. }
  15. // lv_color_t lv_img_buf_get_px_color(lv_img_dsc_t* dsc, lv_coord_t x, lv_coord_t y, lv_color_t color)
  16. int luat_lv_img_buf_get_px_color(lua_State *L) {
  17. LV_DEBUG("CALL lv_img_buf_get_px_color");
  18. lv_img_dsc_t* dsc = (lv_img_dsc_t*)lua_touserdata(L, 1);
  19. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 2);
  20. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 3);
  21. lv_color_t color = {0};
  22. color.full = luaL_checkinteger(L, 4);
  23. lv_color_t ret;
  24. ret = lv_img_buf_get_px_color(dsc ,x ,y ,color);
  25. lua_pushinteger(L, ret.full);
  26. return 1;
  27. }
  28. // lv_opa_t lv_img_buf_get_px_alpha(lv_img_dsc_t* dsc, lv_coord_t x, lv_coord_t y)
  29. int luat_lv_img_buf_get_px_alpha(lua_State *L) {
  30. LV_DEBUG("CALL lv_img_buf_get_px_alpha");
  31. lv_img_dsc_t* dsc = (lv_img_dsc_t*)lua_touserdata(L, 1);
  32. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 2);
  33. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 3);
  34. lv_opa_t ret;
  35. ret = lv_img_buf_get_px_alpha(dsc ,x ,y);
  36. lua_pushinteger(L, ret);
  37. return 1;
  38. }
  39. // void lv_img_buf_set_px_color(lv_img_dsc_t* dsc, lv_coord_t x, lv_coord_t y, lv_color_t c)
  40. int luat_lv_img_buf_set_px_color(lua_State *L) {
  41. LV_DEBUG("CALL lv_img_buf_set_px_color");
  42. lv_img_dsc_t* dsc = (lv_img_dsc_t*)lua_touserdata(L, 1);
  43. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 2);
  44. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 3);
  45. lv_color_t c = {0};
  46. c.full = luaL_checkinteger(L, 4);
  47. lv_img_buf_set_px_color(dsc ,x ,y ,c);
  48. return 0;
  49. }
  50. // void lv_img_buf_set_px_alpha(lv_img_dsc_t* dsc, lv_coord_t x, lv_coord_t y, lv_opa_t opa)
  51. int luat_lv_img_buf_set_px_alpha(lua_State *L) {
  52. LV_DEBUG("CALL lv_img_buf_set_px_alpha");
  53. lv_img_dsc_t* dsc = (lv_img_dsc_t*)lua_touserdata(L, 1);
  54. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 2);
  55. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 3);
  56. lv_opa_t opa = (lv_opa_t)luaL_checkinteger(L, 4);
  57. lv_img_buf_set_px_alpha(dsc ,x ,y ,opa);
  58. return 0;
  59. }
  60. // void lv_img_buf_set_palette(lv_img_dsc_t* dsc, uint8_t id, lv_color_t c)
  61. int luat_lv_img_buf_set_palette(lua_State *L) {
  62. LV_DEBUG("CALL lv_img_buf_set_palette");
  63. lv_img_dsc_t* dsc = (lv_img_dsc_t*)lua_touserdata(L, 1);
  64. uint8_t id = (uint8_t)luaL_checkinteger(L, 2);
  65. lv_color_t c = {0};
  66. c.full = luaL_checkinteger(L, 3);
  67. lv_img_buf_set_palette(dsc ,id ,c);
  68. return 0;
  69. }
  70. // void lv_img_buf_free(lv_img_dsc_t* dsc)
  71. int luat_lv_img_buf_free(lua_State *L) {
  72. LV_DEBUG("CALL lv_img_buf_free");
  73. lv_img_dsc_t* dsc = (lv_img_dsc_t*)lua_touserdata(L, 1);
  74. lv_img_buf_free(dsc);
  75. return 0;
  76. }
  77. // uint32_t lv_img_buf_get_img_size(lv_coord_t w, lv_coord_t h, lv_img_cf_t cf)
  78. int luat_lv_img_buf_get_img_size(lua_State *L) {
  79. LV_DEBUG("CALL lv_img_buf_get_img_size");
  80. lv_coord_t w = (lv_coord_t)luaL_checkinteger(L, 1);
  81. lv_coord_t h = (lv_coord_t)luaL_checkinteger(L, 2);
  82. lv_img_cf_t cf = (lv_img_cf_t)luaL_checkinteger(L, 3);
  83. uint32_t ret;
  84. ret = lv_img_buf_get_img_size(w ,h ,cf);
  85. lua_pushinteger(L, ret);
  86. return 1;
  87. }
  88. // lv_res_t lv_img_decoder_get_info(char* src, lv_img_header_t* header)
  89. int luat_lv_img_decoder_get_info(lua_State *L) {
  90. LV_DEBUG("CALL lv_img_decoder_get_info");
  91. char* src = (char*)luaL_checkstring(L, 1);
  92. lv_img_header_t* header = (lv_img_header_t*)lua_touserdata(L, 2);
  93. lv_res_t ret;
  94. ret = lv_img_decoder_get_info(src ,header);
  95. lua_pushboolean(L, ret == LV_RES_OK ? 1 : 0);
  96. lua_pushinteger(L, ret);
  97. return 2;
  98. }
  99. // lv_res_t lv_img_decoder_open(lv_img_decoder_dsc_t* dsc, void* src, lv_color_t color)
  100. int luat_lv_img_decoder_open(lua_State *L) {
  101. LV_DEBUG("CALL lv_img_decoder_open");
  102. lv_img_decoder_dsc_t* dsc = (lv_img_decoder_dsc_t*)lua_touserdata(L, 1);
  103. void* src = (void*)lua_touserdata(L, 2);
  104. lv_color_t color = {0};
  105. color.full = luaL_checkinteger(L, 3);
  106. lv_res_t ret;
  107. ret = lv_img_decoder_open(dsc ,src ,color);
  108. lua_pushboolean(L, ret == LV_RES_OK ? 1 : 0);
  109. lua_pushinteger(L, ret);
  110. return 2;
  111. }
  112. // lv_res_t lv_img_decoder_read_line(lv_img_decoder_dsc_t* dsc, lv_coord_t x, lv_coord_t y, lv_coord_t len, uint8_t* buf)
  113. int luat_lv_img_decoder_read_line(lua_State *L) {
  114. LV_DEBUG("CALL lv_img_decoder_read_line");
  115. lv_img_decoder_dsc_t* dsc = (lv_img_decoder_dsc_t*)lua_touserdata(L, 1);
  116. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 2);
  117. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 3);
  118. lv_coord_t len = (lv_coord_t)luaL_checkinteger(L, 4);
  119. uint8_t* buf = (uint8_t*)lua_touserdata(L, 5);
  120. lv_res_t ret;
  121. ret = lv_img_decoder_read_line(dsc ,x ,y ,len ,buf);
  122. lua_pushboolean(L, ret == LV_RES_OK ? 1 : 0);
  123. lua_pushinteger(L, ret);
  124. return 2;
  125. }
  126. // void lv_img_decoder_close(lv_img_decoder_dsc_t* dsc)
  127. int luat_lv_img_decoder_close(lua_State *L) {
  128. LV_DEBUG("CALL lv_img_decoder_close");
  129. lv_img_decoder_dsc_t* dsc = (lv_img_decoder_dsc_t*)lua_touserdata(L, 1);
  130. lv_img_decoder_close(dsc);
  131. return 0;
  132. }
  133. // lv_img_decoder_t* lv_img_decoder_create()
  134. int luat_lv_img_decoder_create(lua_State *L) {
  135. LV_DEBUG("CALL lv_img_decoder_create");
  136. lv_img_decoder_t* ret = NULL;
  137. ret = lv_img_decoder_create();
  138. lua_pushlightuserdata(L, ret);
  139. return 1;
  140. }
  141. // void lv_img_decoder_delete(lv_img_decoder_t* decoder)
  142. int luat_lv_img_decoder_delete(lua_State *L) {
  143. LV_DEBUG("CALL lv_img_decoder_delete");
  144. lv_img_decoder_t* decoder = (lv_img_decoder_t*)lua_touserdata(L, 1);
  145. lv_img_decoder_delete(decoder);
  146. return 0;
  147. }
  148. // lv_res_t lv_img_decoder_built_in_info(lv_img_decoder_t* decoder, void* src, lv_img_header_t* header)
  149. int luat_lv_img_decoder_built_in_info(lua_State *L) {
  150. LV_DEBUG("CALL lv_img_decoder_built_in_info");
  151. lv_img_decoder_t* decoder = (lv_img_decoder_t*)lua_touserdata(L, 1);
  152. void* src = (void*)lua_touserdata(L, 2);
  153. lv_img_header_t* header = (lv_img_header_t*)lua_touserdata(L, 3);
  154. lv_res_t ret;
  155. ret = lv_img_decoder_built_in_info(decoder ,src ,header);
  156. lua_pushboolean(L, ret == LV_RES_OK ? 1 : 0);
  157. lua_pushinteger(L, ret);
  158. return 2;
  159. }
  160. // lv_res_t lv_img_decoder_built_in_open(lv_img_decoder_t* decoder, lv_img_decoder_dsc_t* dsc)
  161. int luat_lv_img_decoder_built_in_open(lua_State *L) {
  162. LV_DEBUG("CALL lv_img_decoder_built_in_open");
  163. lv_img_decoder_t* decoder = (lv_img_decoder_t*)lua_touserdata(L, 1);
  164. lv_img_decoder_dsc_t* dsc = (lv_img_decoder_dsc_t*)lua_touserdata(L, 2);
  165. lv_res_t ret;
  166. ret = lv_img_decoder_built_in_open(decoder ,dsc);
  167. lua_pushboolean(L, ret == LV_RES_OK ? 1 : 0);
  168. lua_pushinteger(L, ret);
  169. return 2;
  170. }
  171. // lv_res_t lv_img_decoder_built_in_read_line(lv_img_decoder_t* decoder, lv_img_decoder_dsc_t* dsc, lv_coord_t x, lv_coord_t y, lv_coord_t len, uint8_t* buf)
  172. int luat_lv_img_decoder_built_in_read_line(lua_State *L) {
  173. LV_DEBUG("CALL lv_img_decoder_built_in_read_line");
  174. lv_img_decoder_t* decoder = (lv_img_decoder_t*)lua_touserdata(L, 1);
  175. lv_img_decoder_dsc_t* dsc = (lv_img_decoder_dsc_t*)lua_touserdata(L, 2);
  176. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 3);
  177. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 4);
  178. lv_coord_t len = (lv_coord_t)luaL_checkinteger(L, 5);
  179. uint8_t* buf = (uint8_t*)lua_touserdata(L, 6);
  180. lv_res_t ret;
  181. ret = lv_img_decoder_built_in_read_line(decoder ,dsc ,x ,y ,len ,buf);
  182. lua_pushboolean(L, ret == LV_RES_OK ? 1 : 0);
  183. lua_pushinteger(L, ret);
  184. return 2;
  185. }
  186. // void lv_img_decoder_built_in_close(lv_img_decoder_t* decoder, lv_img_decoder_dsc_t* dsc)
  187. int luat_lv_img_decoder_built_in_close(lua_State *L) {
  188. LV_DEBUG("CALL lv_img_decoder_built_in_close");
  189. lv_img_decoder_t* decoder = (lv_img_decoder_t*)lua_touserdata(L, 1);
  190. lv_img_decoder_dsc_t* dsc = (lv_img_decoder_dsc_t*)lua_touserdata(L, 2);
  191. lv_img_decoder_built_in_close(decoder ,dsc);
  192. return 0;
  193. }
  194. // lv_img_src_t lv_img_src_get_type(void* src)
  195. int luat_lv_img_src_get_type(lua_State *L) {
  196. LV_DEBUG("CALL lv_img_src_get_type");
  197. void* src = (void*)lua_touserdata(L, 1);
  198. lv_img_src_t ret;
  199. ret = lv_img_src_get_type(src);
  200. lua_pushinteger(L, ret);
  201. return 1;
  202. }
  203. // uint8_t lv_img_cf_get_px_size(lv_img_cf_t cf)
  204. int luat_lv_img_cf_get_px_size(lua_State *L) {
  205. LV_DEBUG("CALL lv_img_cf_get_px_size");
  206. lv_img_cf_t cf = (lv_img_cf_t)luaL_checkinteger(L, 1);
  207. uint8_t ret;
  208. ret = lv_img_cf_get_px_size(cf);
  209. lua_pushinteger(L, ret);
  210. return 1;
  211. }
  212. // bool lv_img_cf_is_chroma_keyed(lv_img_cf_t cf)
  213. int luat_lv_img_cf_is_chroma_keyed(lua_State *L) {
  214. LV_DEBUG("CALL lv_img_cf_is_chroma_keyed");
  215. lv_img_cf_t cf = (lv_img_cf_t)luaL_checkinteger(L, 1);
  216. bool ret;
  217. ret = lv_img_cf_is_chroma_keyed(cf);
  218. lua_pushboolean(L, ret);
  219. return 1;
  220. }
  221. // bool lv_img_cf_has_alpha(lv_img_cf_t cf)
  222. int luat_lv_img_cf_has_alpha(lua_State *L) {
  223. LV_DEBUG("CALL lv_img_cf_has_alpha");
  224. lv_img_cf_t cf = (lv_img_cf_t)luaL_checkinteger(L, 1);
  225. bool ret;
  226. ret = lv_img_cf_has_alpha(cf);
  227. lua_pushboolean(L, ret);
  228. return 1;
  229. }
  230. // lv_obj_t* lv_img_create(lv_obj_t* par, lv_obj_t* copy)
  231. int luat_lv_img_create(lua_State *L) {
  232. LV_DEBUG("CALL lv_img_create");
  233. lv_obj_t* par = (lv_obj_t*)lua_touserdata(L, 1);
  234. lv_obj_t* copy = (lv_obj_t*)lua_touserdata(L, 2);
  235. lv_obj_t* ret = NULL;
  236. ret = lv_img_create(par ,copy);
  237. lua_pushlightuserdata(L, ret);
  238. return 1;
  239. }
  240. // void lv_img_set_src(lv_obj_t* img, void* src_img)
  241. int luat_lv_img_set_src(lua_State *L) {
  242. LV_DEBUG("CALL lv_img_set_src");
  243. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  244. void* src_img = (void*)lua_touserdata(L, 2);
  245. lv_img_set_src(img ,src_img);
  246. return 0;
  247. }
  248. // void lv_img_set_auto_size(lv_obj_t* img, bool autosize_en)
  249. int luat_lv_img_set_auto_size(lua_State *L) {
  250. LV_DEBUG("CALL lv_img_set_auto_size");
  251. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  252. bool autosize_en = (bool)lua_toboolean(L, 2);
  253. lv_img_set_auto_size(img ,autosize_en);
  254. return 0;
  255. }
  256. // void lv_img_set_offset_x(lv_obj_t* img, lv_coord_t x)
  257. int luat_lv_img_set_offset_x(lua_State *L) {
  258. LV_DEBUG("CALL lv_img_set_offset_x");
  259. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  260. lv_coord_t x = (lv_coord_t)luaL_checkinteger(L, 2);
  261. lv_img_set_offset_x(img ,x);
  262. return 0;
  263. }
  264. // void lv_img_set_offset_y(lv_obj_t* img, lv_coord_t y)
  265. int luat_lv_img_set_offset_y(lua_State *L) {
  266. LV_DEBUG("CALL lv_img_set_offset_y");
  267. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  268. lv_coord_t y = (lv_coord_t)luaL_checkinteger(L, 2);
  269. lv_img_set_offset_y(img ,y);
  270. return 0;
  271. }
  272. // void lv_img_set_pivot(lv_obj_t* img, lv_coord_t pivot_x, lv_coord_t pivot_y)
  273. int luat_lv_img_set_pivot(lua_State *L) {
  274. LV_DEBUG("CALL lv_img_set_pivot");
  275. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  276. lv_coord_t pivot_x = (lv_coord_t)luaL_checkinteger(L, 2);
  277. lv_coord_t pivot_y = (lv_coord_t)luaL_checkinteger(L, 3);
  278. lv_img_set_pivot(img ,pivot_x ,pivot_y);
  279. return 0;
  280. }
  281. // void lv_img_set_angle(lv_obj_t* img, int16_t angle)
  282. int luat_lv_img_set_angle(lua_State *L) {
  283. LV_DEBUG("CALL lv_img_set_angle");
  284. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  285. int16_t angle = (int16_t)luaL_checkinteger(L, 2);
  286. lv_img_set_angle(img ,angle);
  287. return 0;
  288. }
  289. // void lv_img_set_zoom(lv_obj_t* img, uint16_t zoom)
  290. int luat_lv_img_set_zoom(lua_State *L) {
  291. LV_DEBUG("CALL lv_img_set_zoom");
  292. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  293. uint16_t zoom = (uint16_t)luaL_checkinteger(L, 2);
  294. lv_img_set_zoom(img ,zoom);
  295. return 0;
  296. }
  297. // void lv_img_set_antialias(lv_obj_t* img, bool antialias)
  298. int luat_lv_img_set_antialias(lua_State *L) {
  299. LV_DEBUG("CALL lv_img_set_antialias");
  300. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  301. bool antialias = (bool)lua_toboolean(L, 2);
  302. lv_img_set_antialias(img ,antialias);
  303. return 0;
  304. }
  305. // void* lv_img_get_src(lv_obj_t* img)
  306. int luat_lv_img_get_src(lua_State *L) {
  307. LV_DEBUG("CALL lv_img_get_src");
  308. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  309. void* ret = NULL;
  310. ret = lv_img_get_src(img);
  311. lua_pushlightuserdata(L, ret);
  312. return 1;
  313. }
  314. // char* lv_img_get_file_name(lv_obj_t* img)
  315. int luat_lv_img_get_file_name(lua_State *L) {
  316. LV_DEBUG("CALL lv_img_get_file_name");
  317. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  318. char* ret = NULL;
  319. ret = lv_img_get_file_name(img);
  320. lua_pushstring(L, ret);
  321. return 1;
  322. }
  323. // bool lv_img_get_auto_size(lv_obj_t* img)
  324. int luat_lv_img_get_auto_size(lua_State *L) {
  325. LV_DEBUG("CALL lv_img_get_auto_size");
  326. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  327. bool ret;
  328. ret = lv_img_get_auto_size(img);
  329. lua_pushboolean(L, ret);
  330. return 1;
  331. }
  332. // lv_coord_t lv_img_get_offset_x(lv_obj_t* img)
  333. int luat_lv_img_get_offset_x(lua_State *L) {
  334. LV_DEBUG("CALL lv_img_get_offset_x");
  335. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  336. lv_coord_t ret;
  337. ret = lv_img_get_offset_x(img);
  338. lua_pushinteger(L, ret);
  339. return 1;
  340. }
  341. // lv_coord_t lv_img_get_offset_y(lv_obj_t* img)
  342. int luat_lv_img_get_offset_y(lua_State *L) {
  343. LV_DEBUG("CALL lv_img_get_offset_y");
  344. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  345. lv_coord_t ret;
  346. ret = lv_img_get_offset_y(img);
  347. lua_pushinteger(L, ret);
  348. return 1;
  349. }
  350. // uint16_t lv_img_get_angle(lv_obj_t* img)
  351. int luat_lv_img_get_angle(lua_State *L) {
  352. LV_DEBUG("CALL lv_img_get_angle");
  353. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  354. uint16_t ret;
  355. ret = lv_img_get_angle(img);
  356. lua_pushinteger(L, ret);
  357. return 1;
  358. }
  359. // void lv_img_get_pivot(lv_obj_t* img, lv_point_t* center)
  360. int luat_lv_img_get_pivot(lua_State *L) {
  361. LV_DEBUG("CALL lv_img_get_pivot");
  362. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  363. lua_pushvalue(L, 2);
  364. lv_point_t center = {0};
  365. lua_geti(L, -1, 1); center.x = luaL_checkinteger(L, -1); lua_pop(L, 1);
  366. lua_geti(L, -1, 2); center.y = luaL_checkinteger(L, -1); lua_pop(L, 1);
  367. lua_pop(L, 1);
  368. lv_img_get_pivot(img ,&center);
  369. return 0;
  370. }
  371. // uint16_t lv_img_get_zoom(lv_obj_t* img)
  372. int luat_lv_img_get_zoom(lua_State *L) {
  373. LV_DEBUG("CALL lv_img_get_zoom");
  374. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  375. uint16_t ret;
  376. ret = lv_img_get_zoom(img);
  377. lua_pushinteger(L, ret);
  378. return 1;
  379. }
  380. // bool lv_img_get_antialias(lv_obj_t* img)
  381. int luat_lv_img_get_antialias(lua_State *L) {
  382. LV_DEBUG("CALL lv_img_get_antialias");
  383. lv_obj_t* img = (lv_obj_t*)lua_touserdata(L, 1);
  384. bool ret;
  385. ret = lv_img_get_antialias(img);
  386. lua_pushboolean(L, ret);
  387. return 1;
  388. }