static tb_bool_t xm_semver_select_from_branches(lua_State* lua, tb_int_t fromidx, tb_char_t const* range_str, tb_size_t range_len) { lua_Integer i = 0; luaL_checktype(lua, fromidx, LUA_TTABLE); for (i = lua_objlen(lua, fromidx); i > 0; --i) { lua_pushinteger(lua, i); lua_gettable(lua, fromidx); tb_char_t const* source_str = luaL_checkstring(lua, -1); tb_check_continue(source_str); tb_size_t source_len = tb_strlen(source_str); if (source_len == range_len && tb_memcmp(source_str, range_str, source_len) == 0) { lua_createtable(lua, 0, 2); lua_pushlstring(lua, source_str, source_len); lua_setfield(lua, -2, "version"); lua_pushstring(lua, "branches"); lua_setfield(lua, -2, "source"); // ok return tb_true; } } // no matches return tb_false; }
static tb_long_t tb_iterator_mem_comp(tb_iterator_ref_t iterator, tb_cpointer_t litem, tb_cpointer_t ritem) { // check tb_assert(litem && ritem); // compare it return tb_memcmp(litem, ritem, iterator->step); }
tb_bool_t tb_hwaddr_is_equal(tb_hwaddr_ref_t hwaddr, tb_hwaddr_ref_t other) { // check tb_assert_and_check_return_val(hwaddr && other, tb_false); // is equal? return !tb_memcmp(hwaddr->u8, other->u8, sizeof(hwaddr->u8)); }
static tb_long_t tb_iterator_init_mem_comp(tb_iterator_ref_t iterator, tb_cpointer_t ltem, tb_cpointer_t rtem) { // check tb_assert_return_val(ltem && rtem, 0); // compare it return tb_memcmp(ltem, rtem, iterator->step); }
// satisfies wrapper tb_int_t xm_semver_select(lua_State* lua) { semver_t semver = {0}; semvers_t matches = {0}; semver_range_t range = {0}; lua_Integer i; size_t range_len = 0, source_len; tb_char_t const* source_str; tb_char_t const* source; tb_bool_t is_range; lua_settop(lua, 4); // check tb_assert_and_check_return_val(lua, 0); // get the version string tb_char_t const* range_str = luaL_checkstring(lua, 1); tb_check_return_val(range_str, 0); range_len = tb_strlen(range_str); is_range = semver_rangen(&range, range_str, range_len) == 0; if (is_range) { source = "versions"; luaL_checktype(lua, 2, LUA_TTABLE); for (i = lua_objlen(lua, 2); i > 0; --i) { lua_pushinteger(lua, i); lua_gettable(lua, 2); source_str = luaL_checkstring(lua, -1); tb_check_return_val(source_str, 0); if (semver_tryn(&semver, source_str, tb_strlen(source_str)) == 0) { if (semver_range_match(semver, range)) { semvers_push(matches, semver); } else { semver_dtor(&semver); } } } if (matches.length) { goto match; } semvers_clear(matches); source = "tags"; luaL_checktype(lua, 3, LUA_TTABLE); for (i = lua_objlen(lua, 3); i > 0; --i) { lua_pushinteger(lua, i); lua_gettable(lua, 3); source_str = luaL_checkstring(lua, -1); tb_check_return_val(source_str, 0); if (semver_tryn(&semver, source_str, tb_strlen(source_str)) == 0) { if (semver_range_match(semver, range)) { semvers_push(matches, semver); } else { semver_dtor(&semver); } } } if (matches.length) { goto match; } semvers_dtor(matches); semver_range_dtor(&range); } source = "branches"; luaL_checktype(lua, 4, LUA_TTABLE); for (i = lua_objlen(lua, 4); i > 0; --i) { lua_pushinteger(lua, i); lua_gettable(lua, 4); source_str = luaL_checkstring(lua, -1); tb_check_return_val(source_str, 0); source_len = tb_strlen(source_str); if (source_len == range_len && tb_memcmp(source_str, range_str, source_len) == 0) { lua_createtable(lua, 0, 2); lua_pushlstring(lua, source_str, source_len); lua_setfield(lua, -2, "version"); lua_pushstring(lua, source); lua_setfield(lua, -2, "source"); return 1; } } if (!is_range) { lua_pushnil(lua); lua_pushfstring(lua, "Unable to parse semver range '%s'", range_str); return 2; } lua_pushnil(lua); lua_pushfstring(lua, "Unable to select version for range '%s'", range_str); return 2; match: semvers_sort(matches); semver = semvers_pop(matches); lua_createtable(lua, 0, 2); lua_pushstring(lua, semver.raw); lua_setfield(lua, -2, "version"); lua_pushstring(lua, source); lua_setfield(lua, -2, "source"); semvers_dtor(matches); semver_dtor(&semver); semver_range_dtor(&range); return 1; }