* Berry change internal storage of parent class for methods * Fix compilation of zigbee * Patch solidify for berry_custom
143 lines
5.0 KiB
C
143 lines
5.0 KiB
C
/********************************************************************
|
|
* Zigbee
|
|
*
|
|
*******************************************************************/
|
|
#ifdef USE_ZIGBEE
|
|
|
|
#include "be_constobj.h"
|
|
#include "be_mapping.h"
|
|
#include "be_ctypes.h"
|
|
|
|
#ifndef ARRAY_SIZE
|
|
#define ARRAY_SIZE(x) (sizeof(x) / sizeof((x)[0]))
|
|
#endif
|
|
|
|
extern const void * zd_init(void* d); BE_FUNC_CTYPE_DECLARE(zd_init, "+_p", "c")
|
|
|
|
extern int32_t zd_shortaddr(void* d); BE_VAR_CTYPE_DECLARE(zd_shortaddr, "i");
|
|
extern const void* zd_longaddr(void* d, size_t *size, void* p2); BE_VAR_CTYPE_DECLARE(zd_longaddr, "&");
|
|
extern const char* zd_manufacturer(void* d); BE_VAR_CTYPE_DECLARE(zd_manufacturer, "s");
|
|
extern const char* zd_model(void* d); BE_VAR_CTYPE_DECLARE(zd_model, "s");
|
|
extern const char* zd_name(void* d); BE_VAR_CTYPE_DECLARE(zd_name, "s");
|
|
extern bbool zd_router(void* d); BE_VAR_CTYPE_DECLARE(zd_router, "b");
|
|
extern bbool zd_hidden(void* d); BE_VAR_CTYPE_DECLARE(zd_hidden, "b");
|
|
extern bbool zd_reachable(void* d); BE_VAR_CTYPE_DECLARE(zd_reachable, "b");
|
|
extern int32_t zd_lastseen(void* d); BE_VAR_CTYPE_DECLARE(zd_lastseen, "i");
|
|
extern int32_t zd_lqi(void* d); BE_VAR_CTYPE_DECLARE(zd_lqi, "i");
|
|
extern int32_t zd_battery(void* d); BE_VAR_CTYPE_DECLARE(zd_battery, "i");
|
|
extern int32_t zd_battery_lastseen(void* d); BE_VAR_CTYPE_DECLARE(zd_battery_lastseen, "i");
|
|
|
|
// moved to constants array
|
|
// MUST BE STORED IN SORTED LIST
|
|
const be_const_member_t zd_members[] = {
|
|
{ ">battery", be_ctype(zd_battery) },
|
|
{ ">battery_lastseen", be_ctype(zd_battery_lastseen) },
|
|
{ ">hidden", be_ctype(zd_hidden) },
|
|
{ ">lastseen", be_ctype(zd_lastseen) },
|
|
{ ">longaddr", be_ctype(zd_longaddr) },
|
|
{ ">lqi", be_ctype(zd_lqi) },
|
|
{ ">manufacturer", be_ctype(zd_manufacturer) },
|
|
{ ">model", be_ctype(zd_model) },
|
|
{ ">name", be_ctype(zd_name) },
|
|
{ ">reachable", be_ctype(zd_reachable) },
|
|
{ ">router", be_ctype(zd_router) },
|
|
{ ">shortaddr", be_ctype(zd_shortaddr) },
|
|
};
|
|
|
|
static int zd_member(bvm *vm) {
|
|
be_const_class_member_raise(vm, zd_members, ARRAY_SIZE(zd_members));
|
|
be_return(vm);
|
|
}
|
|
|
|
extern int zc_info(struct bvm *vm);
|
|
extern int zc_item(struct bvm *vm);
|
|
extern int32_t zc_size(void* d); BE_FUNC_CTYPE_DECLARE(zc_size, "i", ".");
|
|
extern int zc_iter(bvm *vm);
|
|
extern void zc_abort(void); BE_FUNC_CTYPE_DECLARE(zc_abort, "", ".");
|
|
|
|
extern int zigbee_test_attr(struct bvm *vm);
|
|
extern int zigbee_test_msg(struct bvm *vm);
|
|
|
|
extern const bclass be_class_ctypes_bytes;
|
|
extern const be_ctypes_structure_t be_zigbee_zcl_frame_struct;
|
|
extern const bclass be_class_zcl_frame;
|
|
extern const bclass be_class_zcl_attribute_list_ntv;
|
|
extern const bclass be_class_zcl_attribute_ntv;
|
|
extern const bclass be_class_zcl_attribute;
|
|
extern const bclass be_class_zcl_attribute_list;
|
|
|
|
#include "solidify/solidified_zigbee.h"
|
|
|
|
// Module Zigbee
|
|
extern const bclass be_class_zb_coord;
|
|
static int zigbee_init(bvm *vm) {
|
|
be_pushntvclass(vm, &be_class_zb_coord);
|
|
be_call(vm, 0);
|
|
be_return(vm);
|
|
}
|
|
|
|
/*******************************************************************/
|
|
|
|
extern void* zfn_get_bytes(void* sbuf_ptr, size_t *len_bytes);
|
|
BE_FUNC_CTYPE_DECLARE(zfn_get_bytes, "&", "-c");
|
|
|
|
extern void zfn_set_bytes(void* sbuf_ptr, const uint8_t* bytes, size_t len_bytes);
|
|
BE_FUNC_CTYPE_DECLARE(zfn_set_bytes, "", "-c(bytes)~");
|
|
|
|
/*******************************************************************/
|
|
|
|
#include "be_fixed_be_class_zb_device.h"
|
|
#include "be_fixed_be_class_zb_coord_ntv.h"
|
|
#include "be_fixed_be_class_zcl_frame_ntv.h"
|
|
#include "be_fixed_zigbee.h"
|
|
|
|
/* @const_object_info_begin
|
|
class be_class_zb_device (scope: global, name: zb_device, strings: weak) {
|
|
_p, var
|
|
init, ctype_func(zd_init)
|
|
|
|
member, func(zd_member)
|
|
|
|
tostring, closure(class_zb_device_tostring_closure)
|
|
}
|
|
@const_object_info_end */
|
|
|
|
/* @const_object_info_begin
|
|
class be_class_zb_coord_ntv (scope: global, name: zb_coord_ntv, strings: weak) {
|
|
zcl_frame, class(be_class_zcl_frame)
|
|
zcl_attribute_list_ntv, class(be_class_zcl_attribute_list_ntv)
|
|
zcl_attribute_ntv, class(be_class_zcl_attribute_ntv)
|
|
zcl_attribute, class(be_class_zcl_attribute)
|
|
zcl_attribute_list, class(be_class_zcl_attribute_list)
|
|
zb_device, class(be_class_zb_device)
|
|
|
|
info, func(zc_info)
|
|
item, func(zc_item)
|
|
size, ctype_func(zc_size)
|
|
iter, func(zc_iter)
|
|
|
|
abort, ctype_func(zc_abort)
|
|
|
|
test_attr, func(zigbee_test_attr)
|
|
test_msg, func(zigbee_test_msg)
|
|
}
|
|
@const_object_info_end */
|
|
|
|
|
|
/* @const_object_info_begin
|
|
class be_class_zcl_frame_ntv (scope: global, name: zcl_frame_ntv, super: be_class_ctypes_bytes, strings: weak) {
|
|
_def, comptr(&be_zigbee_zcl_frame_struct)
|
|
|
|
_get_bytes, ctype_func(zfn_get_bytes)
|
|
_set_bytes, ctype_func(zfn_set_bytes)
|
|
}
|
|
@const_object_info_end */
|
|
|
|
/* @const_object_info_begin
|
|
module zigbee (scope: global, strings: weak) {
|
|
init, func(zigbee_init)
|
|
}
|
|
@const_object_info_end */
|
|
|
|
#endif // USE_LIGHT
|