static void
message_viewer_wire_end(message_viewer *mv, long time_duration)
{
output_stream *os = mv->os;
time_t timep;
time(&timep);
osformat(os, ";; Query time: %ld msec\n", time_duration);
/** @todo 20150716 gve -- still need to implemented the server viewable line */
// osformat(os, ";; SERVER: %{hostaddr}(%{hostaddr})\n", config->server, config->server);
osformat(os, ";; WHEN: %s", ctime(&timep));
if(mv->view_mode_with & VM_WITH_XFR)
{
osformatln(os, ";; XFR size: %lu records (messages %lu, bytes %lu)", mv->resource_records_total[1], mv->messages, mv->bytes);
}
else
{
osformatln(os, ";; MSG SIZE rcvd: %ld", mv->bytes);
}
osformat(os, "\n");
}
static void
message_viewer_wire_question_record(message_viewer *mv, u8 *record_wire, u16 rclass, u16 rtype)
{
if(mv->view_mode_with & VM_WITH_XFR)
{
return;
}
output_stream *os_ = mv->os;
/*
* There is no padding support for formats on complex types (padding is ignored)
* Doing it would be relatively expensive for it's best doing it manually when needed (afaik: only here)
*/
counter_output_stream_data counters;
output_stream cos;
counter_output_stream_init(os_, &cos, &counters);
output_stream *os = &cos;
u64 next = counters.write_count + 24 + 8;
/* write NAME + alignment for next item */
osformat(os, ";%{dnsname}", record_wire, ' ');
while(counters.write_count < next)
{
output_stream_write_u8(os, (u8) ' ');
}
output_stream_write_u8(os, (u8) ' ');
next = counters.write_count + 7;
/* write CLASS + alignment for next item */
osformat(os, "%7{dnsclass}", &rclass);
while(counters.write_count < next)
{
output_stream_write_u8(os, (u8) ' ');
}
output_stream_write_u8(os, (u8) ' ');
// next = counters.write_count + 7;
/* write TYPE */
osformatln(os, "%7{dnstype}", &rtype);
}
static void
message_viewer_wire_section_header(message_viewer *mv, u32 section_idx, u16 count)
{
if(mv->view_mode_with & VM_WITH_XFR)
{
return;
}
// u16 view_mode_with = mv->view_mode_with;
output_stream *os = mv->os;
const char *section_name = mv->section_name[section_idx];
// if ((view_mode_with & message_print_view_with_mode[section_idx]) && count)
{
osformat(os, ";; %s:\n", section_name);
}
}
void
print_version(int level)
{
switch(level)
{
case 1:
osformatln(termout, "%s %s (%s)", PROGRAM_NAME, PROGRAM_VERSION, RELEASEDATE);
break;
case 2:
osformatln(termout, "%s %s (released %s, compiled %s)", PROGRAM_NAME, PROGRAM_VERSION, RELEASEDATE, COMPILEDATE);
break;
case 3:
osformatln(termout, "%s %s (released %s, compiled %s)", PROGRAM_NAME, PROGRAM_VERSION, RELEASEDATE, COMPILEDATE);
show_authors();
break;
default:
osformat(termout, "\nYou want to know too much!\n\n");
break;
}
}
void
log_memdump_ex(logger_handle* hndl, u32 level, const void* data_pointer_, size_t size_, size_t line_size, bool hex, bool text, bool address)
{
if((hndl == NULL) || (level >= MSG_LEVEL_COUNT) || (hndl->channels[level].offset < 0))
{
return;
}
output_stream os;
char buffer[4096];
bytearray_output_stream_init((u8*)buffer, sizeof (buffer), &os);
u8* data_pointer = (u8*)data_pointer_;
s32 size = size_;
int dump_size;
int i;
do
{
dump_size = MIN(line_size, size);
u8* data;
if(address)
{
osformat(&os, "%p ", data_pointer);
}
if(hex)
{
data = data_pointer;
for(i = 0; i < dump_size; i++)
{
osformat(&os, "%02x", *data++);
if((i & 3) == 3)
{
output_stream_write_u8(&os, (u8)' ');
}
}
for(; i < line_size; i++)
{
osprint(&os, " ");
if((i & 3) == 0)
{
osprint(&os, " ");
}
}
}
if(hex & text)
{
output_stream_write(&os, (u8*)" | ", 3);
}
if(text)
{
data = data_pointer;
for(i = 0; i < dump_size; i++)
{
char c = *data++;
if(c < ' ')
{
c = '.';
}
else if(c == '%')
{
output_stream_write_u8(&os, '%');
}
output_stream_write_u8(&os, (u8)c);
}
}
data_pointer += dump_size;
size -= dump_size;
if(size != 0)
{
output_stream_write_u8(&os, 0);
logger_handle_msg(hndl, level, "%s", bytearray_output_stream_buffer(&os));
bytearray_output_stream_reset(&os);
}
}
while(size > 0);
//if(size_ > line_size)
if(bytearray_output_stream_size(&os) > 0)
{
output_stream_write_u8(&os, 0);
logger_handle_msg(hndl, level, "%s", bytearray_output_stream_buffer(&os));
}
output_stream_close(&os);
}
static void
message_viewer_wire_section_record(message_viewer *mv, u8 *record_wire, u8 view_mode_with)
{
if(!(mv->view_mode_with & view_mode_with))
{
return;
}
/*
* there is no padding support for formats on complex types (padding is ignored)
* doing it would be relatively expensive for it's best doing it manually when needed (afaik: only here)
*/
counter_output_stream_data counters;
output_stream cos;
output_stream *os_ = mv->os;
counter_output_stream_init(os_, &cos, &counters);
output_stream *os = &cos; /* final output stream */
/* ------------------------------------------------------------ */
/* 1. get the needed parameters: FQDN, TYPE, CLASS, TTL, RDATA size */
u8 *rname = record_wire;
u8 *rdata = rname + dnsname_len(rname);
u16 rtype = GET_U16_AT(rdata[0]);
u16 rclass = GET_U16_AT(rdata[2]);
u32 rttl = ntohl(GET_U32_AT(rdata[4]));
u16 rdata_size = ntohs(GET_U16_AT(rdata[8]));
/** @todo 20150716 gve -- test that rdata_size matches the record size */
/* move pointer to RDATA information in the record_wire */
rdata += 10;
/* 2. write the retrieved info into the stream:
* FQDN TTL CLASS TYPE RDATA
*
* e.g.
* somedomain.eu. 86400 IN NS ns1.somedomain.eu.
*/
/* A. write FQDN + alignment for next item */
u64 next = counters.write_count + 24;
osformat(os, "%{dnsname}", rname);
while(counters.write_count < next)
{
output_stream_write_u8(os, (u8)' ');
}
output_stream_write_u8(os, (u8)' ');
/* B. write TTL + alignment for next item */
osformat(os, "%7d", rttl);
output_stream_write_u8(os, (u8)' ');
/* C. write CLASS + alignment for next item */
next = counters.write_count + 7;
osformat(os, "%7{dnsclass}", &rclass);
while(counters.write_count < next)
{
output_stream_write_u8(os, (u8) ' ');
}
output_stream_write_u8(os, (u8)' ');
/* D. write TYPE + alignment for next item */
next = counters.write_count + 7;
osformat(os, "%7{dnstype} ", &rtype);
while(counters.write_count < next)
{
output_stream_write_u8(os, (u8)' ');
}
output_stream_write_u8(os, (u8)' ');
/* E. write RDATA */
osprint_rdata(os, rtype, rdata, rdata_size);
osprintln(os, "");
flushout();
}
static void
message_viewer_wire_header(message_viewer *mv, const u8 *buffer)
{
/* 1. get the output stream */
output_stream *os = mv->os;
/* 2. get values of the different sections: QUESTION, ANSWER, AUTHORITY and ADDITIONAL */
u16 count[4];
count[0] = ntohs(MESSAGE_QD(buffer));
count[1] = ntohs(MESSAGE_AN(buffer));
count[2] = ntohs(MESSAGE_NS(buffer));
count[3] = ntohs(MESSAGE_AR(buffer));
/* 3. add the amount of section resource records into a total */
message_viewer_resource_record_total_update(mv, count);
/* 4. get message id */
u16 id = MESSAGE_ID(buffer);
/* 5. get opcode and rcode.
* opcode is needed for for knowing the difference between a regular message and a update message
*/
u8 opcode = MESSAGE_OP(buffer);
opcode >>= OPCODE_SHIFT;
u8 rcode = MESSAGE_RCODE(buffer);
const char *opcode_txt = get_opcode(opcode);
const char *status_txt = get_rcode(rcode);
mv->section_name = (opcode != OPCODE_UPDATE)? message_section_names : message_section_update_names;
/* if no view with header then inmediately return,
* wire axfr has no header information so --> return
*/
if(mv->view_mode_with & VM_WITH_XFR)
{
return;
}
/* 6. we have all the information, fill the stream */
osformat(os, ";; Got answer:\n");
osformat(os, ";; ->>HEADER<<- opcode: %s, status: %s, id: %hd\n", opcode_txt, status_txt, id);
osformat(os, ";; flags: ");
if(MESSAGE_QR(buffer) != 0) osprint(os, "qr ");
if(MESSAGE_AA(buffer) != 0) osprint(os, "aa ");
if(MESSAGE_TC(buffer) != 0) osprint(os, "tc ");
if(MESSAGE_RD(buffer) != 0) osprint(os, "rd ");
if(MESSAGE_RA(buffer) != 0) osprint(os, "ra ");
if(MESSAGE_ZF(buffer) != 0) osprint(os, "zf ");
if(MESSAGE_AD(buffer) != 0) osprint(os, "ad ");
if(MESSAGE_CD(buffer) != 0) osprint(os, "cd ");
/* 3. get the names for the presentation */
char **count_name;
count_name = (opcode != OPCODE_UPDATE)? message_count_names : message_count_update_names;
osformat(os, "%s: %hd, %s: %hd, %s: %hd, %s: %hd\n",
count_name[0], count[0],
count_name[1], count[1],
count_name[2], count[2],
count_name[3], count[3]
);
}
