static void
parse_answer_section(ns_msg *msg) {
int rrnum, rrmax;
ns_rr rr;
uint16_t prio, weight, port, len;
const unsigned char *rdata;
char *tname;
rrmax = ns_msg_count(*msg, ns_s_an);
for (rrnum = 0; rrnum < rrmax; rrnum++) {
if (ns_parserr(msg, ns_s_an, rrnum, &rr)) {
perror("ns_parserr");
exit(EXIT_FAILURE);
}
if (ns_rr_type(rr) == ns_t_srv) {
len = ns_rr_rdlen(rr);
rdata = ns_rr_rdata(rr);
if (len > 3U * NS_INT16SZ) {
NS_GET16(prio, rdata);
NS_GET16(weight, rdata);
NS_GET16(port, rdata);
len -= 3U * NS_INT16SZ;
tname = target_name(rdata);
insert_tuple(tname, prio, weight, port);
}
}
}
}
void
test_long_set()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s%s%s",
1, "first", "", "third");
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test set big value in empty field\n");
struct tnt_stream *stream = tnt_buf(NULL);
update_set_str(stream, 2, long_string);
update(1, stream);
tnt_stream_free(stream);
printf("# test replace long value to short\n");
stream = tnt_buf(NULL);
update_set_str(stream, 2, "short string");
update(1, stream);
tnt_stream_free(stream);
footer();
}
void
test_boundary_args()
{
header();
const int max_update_op_cnt = 4000;
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%d", 0, 1);
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test: try to do update w/o operations\n");
struct tnt_stream *stream = tnt_buf(NULL);
update(0, stream);
tnt_stream_free(stream);
printf("# test: update w/ maximal allowed opearions count\n");
stream = tnt_buf(NULL);
for (int i = 0; i < max_update_op_cnt; ++i)
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
update(0, stream);
tnt_stream_free(stream);
printf("# test: update w/ grater than maximal allowed opearions count\n");
stream = tnt_buf(NULL);
for (int i = 0; i < max_update_op_cnt + 1; ++i)
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
update(0, stream);
tnt_stream_free(stream);
footer();
}
void
test_splice()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s%s%s", 1, "first", "hi, this is a test string!", "third");
insert_tuple(tuple);
tnt_tuple_free(tuple);
struct tnt_stream *stream = tnt_buf(NULL);
printf("# test cut from begin\n");
update_splice_str(stream, 2, 0, 4, "");
update(1, stream);
tnt_stream_free(stream);
printf("# test cut from middle\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, 9, -8, "");
update(1, stream);
tnt_stream_free(stream);
printf("# test cut from end\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, -1, 1, "");
update(1, stream);
tnt_stream_free(stream);
printf("# test insert before begin\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, 0, 0, "Bonjour, ");
update(1, stream);
tnt_stream_free(stream);
printf("# test insert after end\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, 10000, 0, " o_O!?");
update(1, stream);
tnt_stream_free(stream);
printf("# test replace in begin\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, 0, 7, "Hello");
update(1, stream);
tnt_stream_free(stream);
printf("# test replace in middle\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, 17, -6, "field");
update(1, stream);
tnt_stream_free(stream);
printf("# test replace in end\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 2, -6, 4, "! Is this Sparta");
update(1, stream);
tnt_stream_free(stream);
footer();
}
void
test_simple_set()
{
header();
/* insert tuple */
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%d%d%s", 1, 2, 0, "");
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test simple set field\n");
struct tnt_stream *stream = tnt_buf(NULL);
update_set_str(stream, 1, "new field value");
update_set_str(stream, 2, "");
update_set_str(stream, 3, "fLaC");
update(1, stream);
tnt_stream_free(stream);
printf("# set field\n");
stream = tnt_buf(NULL);
update_set_str(stream, 1, "value?");
update_set_str(stream, 1, "very very very very very long field value?");
update_set_str(stream, 1, "field's new value");
update(1, stream);
tnt_stream_free(stream);
stream = tnt_buf(NULL);
printf("# test set primary key\n");
update_set_i32(stream, 0, 2);
update(1, stream);
tnt_stream_free(stream);
footer();
}
void
test_append()
{
header();
/* insert tuple */
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s", 1, "first");
insert_tuple(tuple);
tnt_tuple_free(tuple);
/* test append field */
struct tnt_stream *stream = tnt_buf(NULL);
printf("# test append field\n");
update_set_str(stream, 2, "second");
update(1, stream);
tnt_stream_free(stream);
/* test multi append field */
stream = tnt_buf(NULL);
printf("# test multi append\n");
update_set_str(stream, 3, "3");
update_set_str(stream, 3, "new field value");
update_set_str(stream, 3, "other new field value");
update_set_str(stream, 3, "third");
update(1, stream);
tnt_stream_free(stream);
/* test append many field */
stream = tnt_buf(NULL);
printf("# test append many fields\n");
update_set_str(stream, 4, "fourth");
update_set_str(stream, 5, "fifth");
update_set_str(stream, 6, "sixth");
update_set_str(stream, 7, "seventh");
update_set_str(stream, 8, long_string);
update(1, stream);
tnt_stream_free(stream);
/* test append and change field */
stream = tnt_buf(NULL);
printf("# test append and change field\n");
update_set_str(stream, 9, long_string);
update_splice_str(stream, 9, 1, 544, "ac");
tnt_update_arith_i32(stream, 9, TNT_UPDATE_XOR, 0x3ffffff);
tnt_update_arith_i32(stream, 9, TNT_UPDATE_ADD, 1024);
update(1, stream);
tnt_stream_free(stream);
/* test set to not an exist field */
stream = tnt_buf(NULL);
printf("# test set to not an exist field\n");
update_set_str(stream, 0xDEADBEEF, "invalid!");
update(1, stream);
tnt_stream_free(stream);
footer();
}
/** update fields test case: 64-bit arithmetics operations test */
void
test_arith_i64()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%ll%ll%ll", 1, 2, 0, 0, 0);
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test add\n");
struct tnt_stream *stream = tnt_buf(NULL);
tnt_update_arith_i64(stream, 1, TNT_UPDATE_ADD, 16);
update(1, stream);
tnt_stream_free(stream);
printf("# test overflow add\n");
stream = tnt_buf(NULL);
tnt_update_arith_i64(stream, 1, TNT_UPDATE_ADD, INT64_MAX);
update(1, stream);
tnt_stream_free(stream);
printf("# test underflow add\n");
stream = tnt_buf(NULL);
tnt_update_arith_i64(stream, 1, TNT_UPDATE_ADD, INT64_MIN);
update(1, stream);
tnt_stream_free(stream);
printf("# test or\n");
stream = tnt_buf(NULL);
tnt_update_arith_i64(stream, 2, TNT_UPDATE_OR, 0xbacfbacfbacfbacf);
tnt_update_arith_i64(stream, 3, TNT_UPDATE_OR, 0xfabcfabcfabcfabc);
update(1, stream);
tnt_stream_free(stream);
printf("# test xor\n");
stream = tnt_buf(NULL);
tnt_update_arith_i64(stream, 2, TNT_UPDATE_XOR, 0xffffffffffffffff);
tnt_update_arith_i64(stream, 3, TNT_UPDATE_XOR, 0xffffffffffffffff);
update(1, stream);
tnt_stream_free(stream);
printf("# test and\n");
stream = tnt_buf(NULL);
tnt_update_arith_i64(stream, 2, TNT_UPDATE_AND, 0xf0f0f0f0f0f0f0f0);
tnt_update_arith_i64(stream, 3, TNT_UPDATE_AND, 0x0f0f0f0f0f0f0f0f);
update(1, stream);
tnt_stream_free(stream);
printf("# test casting 32-bit operand to 64-bit\n");
stream = tnt_buf(NULL);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 16);
update(1, stream);
tnt_stream_free(stream);
footer();
}
void
test_multi_arith()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s%d%s", 1, "first", 128, "third");
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test simple and\n");
struct tnt_stream *stream = tnt_buf(NULL);
update_set_i32(stream, 2, 0);
update_set_str(stream, 1, "first field new value");
tnt_update_arith_i32(stream, 2, TNT_UPDATE_XOR, 0xF00F);
update_set_str(stream, 3, "third field new value");
tnt_update_arith_i32(stream, 2, TNT_UPDATE_OR, 0xF00F);
update(1, stream);
tnt_stream_free(stream);
footer();
}
void
test_set_and_splice()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s%s%s", 1,
"first",
"hi, this is a test string!",
"third");
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test set long string and splice to short\n");
struct tnt_stream *stream = tnt_buf(NULL);
update_set_str(stream, 2, long_string);
update_splice_str(stream, 2, 45, 500, " away away away");
update(1, stream);
tnt_stream_free(stream);
printf("# test set short value and splice to long\n");
stream = tnt_buf(NULL);
update_set_str(stream, 2, "test");
update_splice_str(stream, 2, -4, 4, long_string);
update(1, stream);
tnt_stream_free(stream);
printf("# test splice to long and set to short\n");
stream = tnt_buf(NULL);
update_splice_str(stream, 3, -5, 5, long_string);
update_set_str(stream, 2, "short name");
update(1, stream);
tnt_stream_free(stream);
footer();
}
ldc_info_t * videocard_module () {
hd_data_t * hd_data;
hd_t * hd;
ldc_info_t * head = NULL;
int primary_display = -1;
hd_data = new_hd_data_t();
hd = hd_list(hd_data, hw_display, 1, NULL);
primary_display = hd_display_adapter(hd_data);
for (; hd; hd = hd->next) {
if (primary_display != -1 && primary_display == hd->idx){
ldc_info_t * current = new_ldc_info_t("videocard");
driver_info_t * di;
str_list_t * tmp_sl;
char buffer[100];
if (hd->vendor.name != NULL){
set_vendor (current, "vendor", hd->vendor.name, hd->vendor.id, "Vendor");
} else {
set_vendor (current, "vendor", "Unknown", -1, "Vendor");
}
if (hd->model != NULL){
set_model (current, "device", hd->model, hd->device.id, "Model");
} else {
set_model (current, "device", "Unknown", -1, "Model");
}
if (hd->driver_info) {
di = hd->driver_info;
for (; di; di = di->next) {
if (di->any.type == di_x11){
// XFree86 Server Module
insert_tuple(current, "xf86_module_name", di->x11.server, -1, "XFree86 Server Module");
//
// 3D Support
insert_tuple(current, "xf86_module_3d", NULL, di->x11.x3d, "XFree86 Server Module 3D Support");
//
// Extensions
if (di->x11.extensions) {
buffer[0] = '\0';
for (tmp_sl = di->x11.extensions; tmp_sl; tmp_sl = tmp_sl->next) {
sprintf (buffer, "%s%s|", buffer, tmp_sl->str);
}
}
insert_tuple(current, "xf86_module_ext", buffer, -1, "XFree86 Server Module Extensions");
} else {
add_info_tuple(current, "xf86_module_name", "Unknown", -1, "XFree86 Server Module");
add_info_tuple(current, "xf86_module_3d", NULL, -1, "XFree86 Server Module 3D Support");
add_info_tuple(current, "xf86_module_ext", "Unknown", -1, "XFree86 Server Module Extensions");
}
}
} else {
add_info_tuple(current, "xf86_module_name", "Unknown", -1, "XFree86 Server Module");
add_info_tuple(current, "xf86_module_3d", NULL, -1, "XFree86 Server Module 3D Support");
add_info_tuple(current, "xf86_module_ext", "Unknown", -1, "XFree86 Server Module Extensions");
}
current->return_status = 1;
head = enqueue_ldc_info_t(head, current);
}
}
free_hd_structs (hd_data, hd);
return head;
}
void
test_insert_field()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s", 9, "eleven");
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# insert new field before primary key\n");
struct tnt_stream *stream = tnt_buf(NULL);
update_insert_i32(stream, 0, 7);
update_insert_i32(stream, 0, 8);
update(9, stream);
tnt_stream_free(stream);
printf("# insert a new field before last field\n");
stream = tnt_buf(NULL);
update_insert_i32(stream, 3, 10);
update(7, stream);
tnt_stream_free(stream);
printf("# double insert at the end\n");
stream = tnt_buf(NULL);
update_set_i32(stream, 5, 14);
update_insert_i32(stream, 6, 12);
update_insert_i32(stream, 5, 13);
update(7, stream);
tnt_stream_free(stream);
printf("# multi insert \n");
stream = tnt_buf(NULL);
update_insert_i32(stream, 5, 15);
update_insert_i32(stream, 5, 14);
update_insert_i32(stream, 5, 13);
update_insert_i32(stream, 5, 12);
update(7, stream);
tnt_stream_free(stream);
printf("# insert before next to last field\n");
stream = tnt_buf(NULL);
update_insert_i32(stream, 8, 15);
update(7, stream);
tnt_stream_free(stream);
printf("# insert before next to last field\n");
stream = tnt_buf(NULL);
update_set_i32(stream, 9, 17);
update_insert_i32(stream, 9, 16);
update_set_i32(stream, 10, 19);
update_insert_i32(stream, 10, 18);
update(7, stream);
tnt_stream_free(stream);
printf("# insert second tuple\n");
tuple = tnt_tuple(NULL, "%d%s%d", 0, "one", 11);
insert_tuple(tuple);
tnt_tuple_free(tuple);
stream = tnt_buf(NULL);
printf("# multi insert\n");
update_set_i32(stream, 1, -11);
tnt_update_arith(stream, 1, TNT_UPDATE_ADD, 1);
update_insert_i32(stream, 1, 1);
tnt_update_arith(stream, 1, TNT_UPDATE_ADD, 2);
update_insert_i32(stream, 1, 2);
update_insert_i32(stream, 1, 3);
tnt_update_arith(stream, 1, TNT_UPDATE_ADD, 3);
tnt_update_arith(stream, 1, TNT_UPDATE_ADD, 4);
tnt_update_arith(stream, 1, TNT_UPDATE_ADD, 5);
update_insert_i32(stream, 1, 4);
update_insert_i32(stream, 1, 5);
tnt_update_arith(stream, 1, TNT_UPDATE_ADD, 6);
update_insert_i32(stream, 1, 6);
update_insert_i32(stream, 1, 7);
update_insert_i32(stream, 1, 8);
update_insert_i32(stream, 1, 9);
update(0, stream);
tnt_stream_free(stream);
printf("# insert before invalid field number\n");
stream = tnt_buf(NULL);
update_insert_str(stream, 100000, "ooppps!");
update(7, stream);
tnt_stream_free(stream);
footer();
}
void
test_delete_field()
{
header();
printf("# insert tuple\n");
struct tnt_tuple *tuple = tnt_tuple(NULL, "%d%s%s%s%d%d%d%d%d%d%d%d%d%d",
1,
"first",
"hi, this is a test string!",
"third",
1, 2, 3, 4, 5, 6, 7, 8, 9, 10);
insert_tuple(tuple);
tnt_tuple_free(tuple);
printf("# test simple delete fields\n");
struct tnt_stream *stream = tnt_buf(NULL);
update_delete_field(stream, 2);
update(1, stream);
tnt_stream_free(stream);
printf("# test useless operations with delete fields\n");
stream = tnt_buf(NULL);
update_set_i32(stream, 1, 0);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
update_delete_field(stream, 1);
update(1, stream);
tnt_stream_free(stream);
printf("# test multi delete fields\n");
stream = tnt_buf(NULL);
update_delete_field(stream, 2);
update_delete_field(stream, 3);
update_delete_field(stream, 4);
update_delete_field(stream, 5);
update_delete_field(stream, 6);
update_delete_field(stream, 7);
update_delete_field(stream, 8);
update_delete_field(stream, 9);
update_delete_field(stream, 10);
update(1, stream);
tnt_stream_free(stream);
printf("# test multi delete fields\n");
stream = tnt_buf(NULL);
update_delete_field(stream, 1);
update_set_i32(stream, 1, 3);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
tnt_update_arith_i32(stream, 1, TNT_UPDATE_ADD, 1);
update(1, stream);
tnt_stream_free(stream);
printf("# test append and delete\n");
stream = tnt_buf(NULL);
update_set_str(stream, 3, "second");
update_delete_field(stream, 3);
update_set_str(stream, 3, "third");
update_set_str(stream, 4, "third");
update_delete_field(stream, 4);
update_set_str(stream, 4, "third");
update_set_str(stream, 4, "fourth");
update_set_str(stream, 5, "fifth");
update_set_str(stream, 6, "sixth");
update_set_str(stream, 7, "seventh");
update_set_str(stream, 8, "eighth");
update_set_str(stream, 9, "ninth");
update_delete_field(stream, 7);
update_delete_field(stream, 6);
update(1, stream);
tnt_stream_free(stream);
printf("# test double delete\n");
stream = tnt_buf(NULL);
update_delete_field(stream, 3);
update_delete_field(stream, 3);
update(1, stream);
tnt_stream_free(stream);
select_tuple(1);
printf("# test delete not an exist field\n");
stream = tnt_buf(NULL);
update_delete_field(stream, 0xDEADBEEF);
update(1, stream);
tnt_stream_free(stream);
select_tuple(1);
footer();
}
void start_insert(void*) {
#if APP_DATABASE_DEBUG
debug_->debug("SI");
#endif
block_data_t *e = rdf_buffer_;
#if APP_DATABASE_FIND || MODE_FIND || MODE_ERASE
RandomChoice choice(NTUPLES);
bool chosen = false;
#endif
char *s = 0;
char *p = 0;
char *o = 0;
while(*e) {
if(*(e + 2) == 0 || *(e + 3) == 0) {
// e does not point at a tuple but at the two-byte
// checksum at the end of all tuples which is followed by
// two 0-bytes ==> ergo, we are done.
break;
}
s = (char*)e;
p = s + strlen(s) + 1;
o = p + strlen(p) + 1;
e = (block_data_t*)o + strlen(o) + 1;
insert_tuple(s, p, o);
tuples++;
#if APP_DATABASE_FIND || MODE_FIND || MODE_ERASE
if(choice.choose() && !chosen) {
//debug_->debug("chose: (%s,%s,%s)", s, p, o);
strncpy((char*)find_s_, s, MAX_ELEMENT_LENGTH);
strncpy((char*)find_p_, p, MAX_ELEMENT_LENGTH);
strncpy((char*)find_o_, o, MAX_ELEMENT_LENGTH);
//debug_->debug("after cp: (%s,%s,%s)", find_s_, find_p_, find_o_);
chosen = true;
}
++choice;
#endif
}
#if APP_DATABASE_FIND || MODE_FIND || MODE_ERASE
if(!chosen && s) {
//debug_->debug("Xchose: (%s,%s,%s)", s, p, o);
strncpy((char*)find_s_, s, MAX_ELEMENT_LENGTH);
strncpy((char*)find_p_, p, MAX_ELEMENT_LENGTH);
strncpy((char*)find_o_, o, MAX_ELEMENT_LENGTH);
//debug_->debug("Xafter cp: (%s,%s,%s)", find_s_, find_p_, find_o_);
chosen = true;
}
#endif
#if APP_DATABASE_FIND || MODE_FIND
timer_->set_timer<App, &App::start_find>(START_FIND_INTERVAL, this, 0);
#elif MODE_ERASE
if(tuples >= NTUPLES) {
#if APP_DATABASE_DEBUG
debug_->debug("?e %d>=%d",
(int)tuples, (int)NTUPLES);
#endif
timer_->set_timer<App, &App::start_prepare_erase>(START_ERASE_INTERVAL, this, 0);
}
else {
#if APP_DATABASE_DEBUG
debug_->debug("?e %d<%d",
(int)tuples, (int)NTUPLES);
#endif
timer_->set_timer<App, &App::enable_radio>(ENABLE_RADIO_INTERVAL, this, 0);
}
#else
timer_->set_timer<App, &App::enable_radio>(ENABLE_RADIO_INTERVAL, this, 0);
#endif
#if APP_DATABASE_DEBUG
debug_->debug("/SI");
#endif
}
