void wi_test_set_enumeration(void) {
wi_mutable_set_t *set;
wi_enumerator_t *enumerator;
wi_number_t *number;
wi_uinteger_t i;
set = wi_mutable_set();
for(i = 1; i <= 1000; i++)
wi_mutable_set_add_data(set, WI_INT32(i));
enumerator = wi_set_data_enumerator(set);
i = 0;
while((number = wi_enumerator_next_data(enumerator))) {
WI_TEST_ASSERT_TRUE(wi_number_int32(number) >= 1, "");
WI_TEST_ASSERT_TRUE(wi_number_int32(number) <= 1000, "");
i++;
}
WI_TEST_ASSERT_EQUALS(i, 1000, "");
for(i = 1; i <= 1000; i++)
wi_mutable_set_remove_data(set, WI_INT32(i));
}
wi_boolean_t wi_p7_message_set_number_for_name(wi_p7_message_t *p7_message, wi_number_t *number, wi_string_t *field_name) {
if(!number)
number = wi_number_with_int32(0);
if(wi_number_type(number) == WI_NUMBER_BOOL) {
return wi_p7_message_set_bool_for_name(p7_message, wi_number_bool(number), field_name);
} else {
switch(wi_number_storage_type(number)) {
case WI_NUMBER_STORAGE_INT32:
return wi_p7_message_set_int32_for_name(p7_message, wi_number_int32(number), field_name);
break;
case WI_NUMBER_STORAGE_INT64:
return wi_p7_message_set_int64_for_name(p7_message, wi_number_int64(number), field_name);
break;
case WI_NUMBER_STORAGE_FLOAT:
return wi_p7_message_set_double_for_name(p7_message, wi_number_float(number), field_name);
break;
case WI_NUMBER_STORAGE_DOUBLE:
return wi_p7_message_set_double_for_name(p7_message, wi_number_double(number), field_name);
break;
}
}
return false;
}
wi_integer_t wi_number_integer(wi_number_t *number) {
#if WI_32
return wi_number_int32(number);
#else
return wi_number_int64(number);
#endif
}
uint32_t wi_config_gid_for_name(wi_config_t *config, wi_string_t *name) {
wi_number_t *value;
wi_lock_lock(config->lock);
value = wi_autorelease(wi_retain(wi_dictionary_data_for_key(config->values, name)));
wi_lock_unlock(config->lock);
return value ? wi_number_int32(value) : 0;
}
void wi_test_number(void) {
WI_TEST_ASSERT_TRUE(wi_number_bool(wi_number_with_bool(true)), "");
WI_TEST_ASSERT_FALSE(wi_number_bool(wi_number_with_bool(false)), "");
WI_TEST_ASSERT_EQUALS(wi_number_int32(wi_number_with_int32(2147483647)), 2147483647, "");
WI_TEST_ASSERT_EQUALS((uint32_t) wi_number_int32(wi_number_with_int32(4294967295U)), 4294967295U, "");
WI_TEST_ASSERT_EQUALS(wi_number_int64(wi_number_with_int64(9223372036854775807LL)), 9223372036854775807LL, "");
WI_TEST_ASSERT_EQUALS((uint64_t) wi_number_int64(wi_number_with_int64(18446744073709551615ULL)), 18446744073709551615ULL, "");
#ifdef WI_32
WI_TEST_ASSERT_EQUALS(wi_number_integer(wi_number_with_integer(2147483647)), 2147483647, "");
WI_TEST_ASSERT_EQUALS((wi_uinteger_t) wi_number_integer(wi_number_with_integer(4294967295U)), 4294967295U, "");
#else
WI_TEST_ASSERT_EQUALS(wi_number_integer(wi_number_with_integer(9223372036854775807LL)), 9223372036854775807LL, "");
WI_TEST_ASSERT_EQUALS((wi_uinteger_t) wi_number_integer(wi_number_with_integer(18446744073709551615ULL)), 18446744073709551615ULL, "");
#endif
WI_TEST_ASSERT_EQUALS_WITH_ACCURACY(wi_number_float(wi_number_with_float(3.40282346e38)), 3.40282346e38F, 0.0001, "");
WI_TEST_ASSERT_EQUALS_WITH_ACCURACY(wi_number_double(wi_number_with_double(1.7976931348623155e308)), 1.7976931348623155e308, 0.0001, "");
}
wi_boolean_t wi_p7_message_set_number_for_name(wi_p7_message_t *p7_message, wi_number_t *number, wi_string_t *field_name) {
wi_p7_spec_field_t *field;
wi_p7_spec_type_t *type;
if(!number)
number = wi_number_with_int32(0);
field = wi_p7_spec_field_with_name(p7_message->spec, field_name);
if(!field) {
wi_error_set_libwired_error_with_format(WI_ERROR_P7_UNKNOWNFIELD,
WI_STR("No id found for field \"%@\""), field_name);
return false;
}
type = wi_p7_spec_field_type(field);
if(!type) {
wi_error_set_libwired_error_with_format(WI_ERROR_P7_UNKNOWNFIELD,
WI_STR("No type found for field \"%@\""), field_name);
return false;
}
switch(wi_p7_spec_type_id(type)) {
case WI_P7_BOOL:
return wi_p7_message_set_bool_for_name(p7_message, wi_number_bool(number), field_name);
break;
case WI_P7_ENUM:
return wi_p7_message_set_enum_for_name(p7_message, wi_number_int32(number), field_name);
break;
case WI_P7_INT32:
return wi_p7_message_set_int32_for_name(p7_message, wi_number_int32(number), field_name);
break;
case WI_P7_UINT32:
return wi_p7_message_set_uint32_for_name(p7_message, wi_number_int32(number), field_name);
break;
case WI_P7_INT64:
return wi_p7_message_set_int64_for_name(p7_message, wi_number_int64(number), field_name);
break;
case WI_P7_UINT64:
return wi_p7_message_set_uint64_for_name(p7_message, wi_number_int64(number), field_name);
break;
case WI_P7_DOUBLE:
return wi_p7_message_set_double_for_name(p7_message, wi_number_double(number), field_name);
break;
default:
wi_error_set_libwired_error_with_format(WI_ERROR_P7_INVALIDARGUMENT,
WI_STR("Field \"%@\" is not a number"), field_name);
break;
}
return false;
}
static wi_boolean_t _wi_config_write_setting_to_file(wi_config_t *config, wi_string_t *name, wi_file_t *file) {
wi_runtime_instance_t *value;
wi_config_type_t type;
struct passwd *user;
struct group *group;
wi_uinteger_t i, count;
if(!wi_dictionary_contains_key(config->types, name)) {
wi_error_set_libwired_error(WI_ERROR_SETTINGS_UNKNOWNSETTING);
return false;
}
type = wi_number_int32(wi_dictionary_data_for_key(config->types, name));
value = wi_dictionary_data_for_key(config->values, name);
if(!value)
return false;
switch(type) {
case WI_CONFIG_INTEGER:
wi_file_write_format(file, WI_STR("%@ = %d\n"), name, wi_number_integer(value));
break;
case WI_CONFIG_BOOL:
wi_file_write_format(file, WI_STR("%@ = %@\n"), name, wi_number_bool(value) ? WI_STR("yes") : WI_STR("no"));
break;
case WI_CONFIG_STRING:
wi_file_write_format(file, WI_STR("%@ = %@\n"), name, value);
break;
case WI_CONFIG_STRINGLIST:
count = wi_array_count(value);
for(i = 0; i < count; i++)
wi_file_write_format(file, WI_STR("%@ = %@\n"), name, WI_ARRAY(value, i));
break;
case WI_CONFIG_PATH:
wi_file_write_format(file, WI_STR("%@ = %@\n"), name, value);
break;
case WI_CONFIG_USER:
user = getpwuid(wi_number_int32(value));
if(user)
wi_file_write_format(file, WI_STR("%@ = %s\n"), name, user->pw_name);
else
wi_file_write_format(file, WI_STR("%@ = %d\n"), name, wi_number_int32(value));
break;
case WI_CONFIG_GROUP:
group = getgrgid(wi_number_int32(value));
if(group)
wi_file_write_format(file, WI_STR("%@ = %s\n"), name, group->gr_name);
else
wi_file_write_format(file, WI_STR("%@ = %d\n"), name, wi_number_int32(value));
break;
case WI_CONFIG_PORT:
wi_file_write_format(file, WI_STR("%@ = %d\n"), name, wi_number_int32(value));
break;
case WI_CONFIG_REGEXP:
wi_file_write_format(file, WI_STR("%@ = %@\n"), name, wi_regexp_string(value));
break;
case WI_CONFIG_TIME_INTERVAL:
wi_file_write_format(file, WI_STR("%@ = %.2f\n"), name, wi_number_double(value));
break;
}
return true;
}
static wi_runtime_instance_t * _wi_config_instance_for_setting(wi_config_t *config, wi_string_t *name, wi_string_t *value, wi_config_type_t *type) {
struct passwd *user;
struct group *group;
struct servent *servent;
wi_uinteger_t port;
uint32_t uid, gid;
if(!wi_dictionary_contains_key(config->types, name)) {
wi_error_set_libwired_error(WI_ERROR_SETTINGS_UNKNOWNSETTING);
return NULL;
}
*type = wi_number_int32(wi_dictionary_data_for_key(config->types, name));
switch(*type) {
case WI_CONFIG_INTEGER:
return wi_number_with_integer(wi_string_integer(value));
break;
case WI_CONFIG_BOOL:
return wi_number_with_bool(wi_string_bool(value));
break;
case WI_CONFIG_STRING:
case WI_CONFIG_STRINGLIST:
case WI_CONFIG_PATH:
return value;
break;
case WI_CONFIG_USER:
user = getpwnam(wi_string_cstring(value));
if(!user) {
uid = wi_string_uint32(value);
if(uid != 0 || wi_is_equal(value, WI_STR("0")))
user = getpwuid(uid);
}
if(!user) {
wi_error_set_libwired_error(WI_ERROR_SETTINGS_NOSUCHUSER);
return NULL;
}
return wi_number_with_int32(user->pw_uid);
break;
case WI_CONFIG_GROUP:
group = getgrnam(wi_string_cstring(value));
if(!group) {
gid = wi_string_uint32(value);
if(gid != 0 || wi_is_equal(value, WI_STR("0")))
group = getgrgid(gid);
}
if(!group) {
wi_error_set_libwired_error(WI_ERROR_SETTINGS_NOSUCHGROUP);
return NULL;
}
return wi_number_with_int32(group->gr_gid);
break;
case WI_CONFIG_PORT:
port = wi_string_uinteger(value);
if(port > 65535) {
wi_error_set_libwired_error(WI_ERROR_SETTINGS_INVALIDPORT);
return NULL;
}
if(port == 0) {
servent = getservbyname(wi_string_cstring(value), "tcp");
if(!servent) {
wi_error_set_libwired_error(WI_ERROR_SETTINGS_NOSUCHSERVICE);
return NULL;
}
port = servent->s_port;
}
return wi_number_with_int32(port);
break;
case WI_CONFIG_REGEXP:
return wi_autorelease(wi_regexp_init_with_string(wi_regexp_alloc(), value));
break;
case WI_CONFIG_TIME_INTERVAL:
return wi_number_with_double(wi_string_double(value));
break;
}
return NULL;
}
