210 lines
3.6 KiB
C
210 lines
3.6 KiB
C
#include <config.h>
|
|
#include "utilities.h"
|
|
#include <assert.h>
|
|
|
|
/* Display a NTP packet in hex with leading address offset
|
|
* e.g. offset: value, 0: ff 1: fe ... 255: 00
|
|
*/
|
|
void
|
|
pkt_output (
|
|
struct pkt *dpkg,
|
|
int pkt_length,
|
|
FILE *output
|
|
)
|
|
{
|
|
register int a;
|
|
u_char *pkt;
|
|
|
|
pkt = (u_char *)dpkg;
|
|
|
|
fprintf(output, HLINE);
|
|
|
|
for (a = 0; a < pkt_length; a++) {
|
|
if (a > 0 && a % 8 == 0)
|
|
fprintf(output, "\n");
|
|
|
|
fprintf(output, "%d: %x \t", a, pkt[a]);
|
|
}
|
|
|
|
fprintf(output, "\n");
|
|
fprintf(output, HLINE);
|
|
}
|
|
|
|
/* Output a long floating point value in hex in the style described above
|
|
*/
|
|
void
|
|
l_fp_output(
|
|
l_fp * ts,
|
|
FILE * output
|
|
)
|
|
{
|
|
fprintf(output, "%s\n", prettydate(ts));
|
|
}
|
|
|
|
/* Output a long floating point value in binary in the style described above
|
|
*/
|
|
void
|
|
l_fp_output_bin (
|
|
l_fp *ts,
|
|
FILE *output
|
|
)
|
|
{
|
|
register int a, b;
|
|
|
|
fprintf(output, HLINE);
|
|
|
|
for(a=0; a<8; a++) {
|
|
short tmp = ((unsigned char *) ts)[a];
|
|
tmp++;
|
|
|
|
fprintf(output, "%i: ", a);
|
|
|
|
for(b=7; b>=0; b--) {
|
|
int texp = (int) pow(2, b);
|
|
|
|
if(tmp - texp > 0) {
|
|
fprintf(output, "1");
|
|
tmp -= texp;
|
|
}
|
|
else {
|
|
fprintf(output, "0");
|
|
}
|
|
}
|
|
|
|
fprintf(output, " ");
|
|
}
|
|
|
|
fprintf(output, "\n");
|
|
fprintf(output, HLINE);
|
|
}
|
|
|
|
/* Output a long floating point value in decimal in the style described above
|
|
*/
|
|
void
|
|
l_fp_output_dec (
|
|
l_fp *ts,
|
|
FILE *output
|
|
)
|
|
{
|
|
register int a;
|
|
|
|
fprintf(output, HLINE);
|
|
|
|
for(a=0; a<8; a++)
|
|
fprintf(output, "%i: %i \t", a, ((unsigned char *) ts)[a]);
|
|
|
|
fprintf(output, "\n");
|
|
fprintf(output, HLINE);
|
|
|
|
}
|
|
|
|
/* Convert a struct addrinfo to a string containing the address in style
|
|
* of inet_ntoa
|
|
*/
|
|
char *
|
|
addrinfo_to_str (
|
|
const struct addrinfo *addr
|
|
)
|
|
{
|
|
sockaddr_u s;
|
|
|
|
ZERO(s);
|
|
memcpy(&s, addr->ai_addr, min(sizeof(s), addr->ai_addrlen));
|
|
|
|
return ss_to_str(&s);
|
|
}
|
|
|
|
|
|
/* Convert a sockaddr_u to a string containing the address in
|
|
* style of inet_ntoa
|
|
* Why not switch callers to use stoa from libntp? No free() needed
|
|
* in that case.
|
|
*/
|
|
char *
|
|
ss_to_str(
|
|
sockaddr_u *saddr
|
|
)
|
|
{
|
|
return estrdup(stoa(saddr));
|
|
}
|
|
|
|
|
|
/*
|
|
* Converts a struct tv to a date string
|
|
*/
|
|
char *
|
|
tv_to_str(
|
|
const struct timeval *tv
|
|
)
|
|
{
|
|
const size_t bufsize = 48;
|
|
char *buf;
|
|
time_t gmt_time, local_time;
|
|
struct tm *p_tm_local;
|
|
int hh, mm, lto;
|
|
|
|
/*
|
|
* convert to struct tm in UTC, then intentionally feed
|
|
* that tm to mktime() which expects local time input, to
|
|
* derive the offset from UTC to local time.
|
|
*/
|
|
gmt_time = tv->tv_sec;
|
|
local_time = mktime(gmtime(&gmt_time));
|
|
p_tm_local = localtime(&gmt_time);
|
|
|
|
/* Local timezone offsets should never cause an overflow. Yeah. */
|
|
lto = difftime(local_time, gmt_time);
|
|
lto /= 60;
|
|
hh = lto / 60;
|
|
mm = abs(lto % 60);
|
|
|
|
buf = emalloc(bufsize);
|
|
snprintf(buf, bufsize,
|
|
"%d-%.2d-%.2d %.2d:%.2d:%.2d.%.6d (%+03d%02d)",
|
|
p_tm_local->tm_year + 1900,
|
|
p_tm_local->tm_mon + 1,
|
|
p_tm_local->tm_mday,
|
|
p_tm_local->tm_hour,
|
|
p_tm_local->tm_min,
|
|
p_tm_local->tm_sec,
|
|
(int)tv->tv_usec,
|
|
hh,
|
|
mm);
|
|
|
|
return buf;
|
|
}
|
|
|
|
|
|
/*
|
|
*
|
|
* hostnameaddr()
|
|
*
|
|
* Formats the hostname and resulting numeric IP address into a string,
|
|
* avoiding duplication if the "hostname" was in fact a numeric address.
|
|
*
|
|
*/
|
|
const char *
|
|
hostnameaddr(
|
|
const char * hostname,
|
|
const sockaddr_u * addr
|
|
)
|
|
{
|
|
const char * addrtxt;
|
|
char * result;
|
|
int cnt;
|
|
|
|
addrtxt = stoa(addr);
|
|
LIB_GETBUF(result);
|
|
if (strcmp(hostname, addrtxt))
|
|
cnt = snprintf(result, LIB_BUFLENGTH, "%s %s",
|
|
hostname, addrtxt);
|
|
else
|
|
cnt = snprintf(result, LIB_BUFLENGTH, "%s", addrtxt);
|
|
if (cnt >= LIB_BUFLENGTH)
|
|
snprintf(result, LIB_BUFLENGTH,
|
|
"hostnameaddr ERROR have %d (%d needed)",
|
|
LIB_BUFLENGTH, cnt + 1);
|
|
|
|
return result;
|
|
}
|