int log_print(char *mesh_iface, int argc, char **argv)
{
int optchar, res, read_opt = USE_BAT_HOSTS | LOG_MODE;
char full_path[MAX_PATH+1];
char *debugfs_mnt;
while ((optchar = getopt(argc, argv, "hn")) != -1) {
switch (optchar) {
case 'h':
log_usage();
return EXIT_SUCCESS;
case 'n':
read_opt &= ~USE_BAT_HOSTS;
break;
default:
log_usage();
return EXIT_FAILURE;
}
}
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt) {
fprintf(stderr, "Error - can't mount or find debugfs\n");
return EXIT_FAILURE;
}
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/", mesh_iface, full_path, sizeof(full_path));
res = read_file(full_path, DEBUG_LOG, read_opt, 0, 0, 0);
return res;
}
int print_vis_info(char *mesh_iface)
{
char full_path[MAX_PATH+1];
char *debugfs_mnt;
FILE *fp;
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt) {
fprintf(stderr, "Error - can't mount or find debugfs\n");
return -1;
}
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/vis_data", mesh_iface, full_path, sizeof(full_path));
fp = fopen(full_path, "r");
if (fp) {
fclose(fp);
fprintf(stderr, "Error - batctl version is newer than kernel module - the kernel module still supports\n"
"vis, but later versions will not. The vis functionality has been moved to the userspace\n"
"daemon ''alfred''. Please either downgrade to an older (compatible) batctl version or use alfred.\n");
} else {
fprintf(stderr, "Error - The installed batctl version and kernel module don't have vis support. The vis functionality\n"
"has been moved to the userspace daemon ''alfred''.\n");
}
return 0;
}
static const char *find_debugfs(void)
{
const char *path = debugfs_mount(NULL);
if (!path)
die("Your kernel not support debugfs filesystem");
return path;
}
/* mini /proc/mounts parser: searching for "^blah /mount/point debugfs" */
static void get_debugfs_mntpt(void)
{
const char *path = debugfs_mount(NULL);
if (path)
strncpy(debugfs_mntpt, path, sizeof(debugfs_mntpt));
else
debugfs_mntpt[0] = '\0';
}
const char *perf_debugfs_mount(const char *mountpoint)
{
const char *mnt;
mnt = debugfs_mount(mountpoint);
if (!mnt)
return NULL;
set_tracing_events_path(mnt);
return mnt;
}
int batadv_interface_check(const char *mesh_iface)
{
char *debugfs_mnt;
char full_path[MAX_PATH + 1];
FILE *f;
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt) {
fprintf(stderr, "Could not find debugfs path\n");
return -1;
}
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/" DEBUG_TRANSTABLE_GLOBAL,
mesh_iface, full_path, sizeof(full_path));
f = fopen(full_path, "r");
if (!f) {
fprintf(stderr,
"Could not find %s for interface %s. Make sure it is a valid batman-adv soft-interface\n",
DEBUG_TRANSTABLE_GLOBAL, mesh_iface);
return -1;
}
fclose(f);
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/" DEBUG_ORIGINATORS,
mesh_iface, full_path, sizeof(full_path));
f = fopen(full_path, "r");
if (!f) {
fprintf(stderr,
"Could not find %s for interface %s. Make sure it is a valid batman-adv soft-interface\n",
DEBUG_ORIGINATORS, mesh_iface);
return -1;
}
fclose(f);
return 0;
}
int main(int argc, const char **argv)
{
const char *cmd;
cmd = perf_extract_argv0_path(argv[0]);
if (!cmd)
cmd = "perf-help";
debugfs_mount(NULL);
if (!prefixcmp(cmd, "perf-")) {
cmd += 5;
argv[0] = cmd;
handle_internal_command(argc, argv);
die("cannot handle %s internally", cmd);
}
argv++;
argc--;
handle_options(&argv, &argc, NULL);
commit_pager_choice();
set_buildid_dir();
if (argc > 0) {
if (!prefixcmp(argv[0], "--"))
argv[0] += 2;
} else {
printf("\n usage: %s\n\n", perf_usage_string);
list_common_cmds_help();
printf("\n %s\n\n", perf_more_info_string);
exit(1);
}
cmd = argv[0];
setup_path();
pthread__block_sigwinch();
while (1) {
static int done_help;
static int was_alias;
was_alias = run_argv(&argc, &argv);
if (errno != ENOENT)
break;
if (was_alias) {
fprintf(stderr, "Expansion of alias '%s' failed; "
"'%s' is not a perf-command\n",
cmd, argv[0]);
exit(1);
}
if (!done_help) {
cmd = argv[0] = help_unknown_cmd(cmd);
done_help = 1;
} else
break;
}
fprintf(stderr, "Failed to run command '%s': %s\n",
cmd, strerror(errno));
return 1;
}
int main(int argc, const char **argv)
{
const char *cmd;
cmd = perf_extract_argv0_path(argv[0]);
if (!cmd)
cmd = "perf-help";
if(adj_oom_score())
die("Cannot adjust my oom_adj, pls make sure you are root \
or have CAP_SYS_RESOURCE");
/* get debugfs mount point from /proc/mounts */
debugfs_mount(NULL);
/*
* "perf-xxxx" is the same as "perf xxxx", but we obviously:
*
* - cannot take flags in between the "perf" and the "xxxx".
* - cannot execute it externally (since it would just do
* the same thing over again)
*
* So we just directly call the internal command handler, and
* die if that one cannot handle it.
*/
if (!prefixcmp(cmd, "perf-")) {
cmd += 5;
argv[0] = cmd;
handle_internal_command(argc, argv);
die("cannot handle %s internally", cmd);
}
/* Look for flags.. */
argv++;
argc--;
handle_options(&argv, &argc, NULL);
commit_pager_choice();
set_buildid_dir();
if (argc > 0) {
if (!prefixcmp(argv[0], "--"))
argv[0] += 2;
} else {
/* The user didn't specify a command; give them help */
printf("\n usage: %s\n\n", perf_usage_string);
list_common_cmds_help();
printf("\n %s\n\n", perf_more_info_string);
exit(1);
}
cmd = argv[0];
/*
* We use PATH to find perf commands, but we prepend some higher
* precedence paths: the "--exec-path" option, the PERF_EXEC_PATH
* environment, and the $(perfexecdir) from the Makefile at build
* time.
*/
setup_path();
/*
* Block SIGWINCH notifications so that the thread that wants it can
* unblock and get syscalls like select interrupted instead of waiting
* forever while the signal goes to some other non interested thread.
*/
pthread__block_sigwinch();
while (1) {
static int done_help;
static int was_alias;
was_alias = run_argv(&argc, &argv);
if (errno != ENOENT)
break;
if (was_alias) {
fprintf(stderr, "Expansion of alias '%s' failed; "
"'%s' is not a perf-command\n",
cmd, argv[0]);
exit(1);
}
if (!done_help) {
cmd = argv[0] = help_unknown_cmd(cmd);
done_help = 1;
} else
break;
}
fprintf(stderr, "Failed to run command '%s': %s\n",
cmd, strerror(errno));
return 1;
}
int ping(char *mesh_iface, int argc, char **argv)
{
struct icmp_packet_rr icmp_packet_out, icmp_packet_in;
struct timeval tv;
struct ether_addr *dst_mac = NULL, *rr_mac = NULL;
struct bat_host *bat_host, *rr_host;
ssize_t read_len;
fd_set read_socket;
int ret = EXIT_FAILURE, ping_fd = 0, res, optchar, found_args = 1;
int loop_count = -1, loop_interval = 0, timeout = 1, rr = 0, i;
unsigned int seq_counter = 0, packets_out = 0, packets_in = 0, packets_loss;
char *dst_string, *mac_string, *rr_string;
double time_delta;
float min = 0.0, max = 0.0, avg = 0.0, mdev = 0.0;
uint8_t last_rr_cur = 0, last_rr[BAT_RR_LEN][ETH_ALEN];
size_t packet_len;
char *debugfs_mnt;
char icmp_socket[MAX_PATH+1];
while ((optchar = getopt(argc, argv, "hc:i:t:R")) != -1) {
switch (optchar) {
case 'c':
loop_count = strtol(optarg, NULL , 10);
if (loop_count < 1)
loop_count = -1;
found_args += ((*((char*)(optarg - 1)) == optchar ) ? 1 : 2);
break;
case 'h':
ping_usage();
return EXIT_SUCCESS;
case 'i':
loop_interval = strtol(optarg, NULL , 10);
if (loop_interval < 1)
loop_interval = 1;
found_args += ((*((char*)(optarg - 1)) == optchar ) ? 1 : 2);
break;
case 't':
timeout = strtol(optarg, NULL , 10);
if (timeout < 1)
timeout = 1;
found_args += ((*((char*)(optarg - 1)) == optchar ) ? 1 : 2);
break;
case 'R':
rr = 1;
found_args++;
break;
default:
ping_usage();
return EXIT_FAILURE;
}
}
if (argc <= found_args) {
printf("Error - target mac address or bat-host name not specified\n");
ping_usage();
return EXIT_FAILURE;
}
dst_string = argv[found_args];
bat_hosts_init(0);
bat_host = bat_hosts_find_by_name(dst_string);
if (bat_host)
dst_mac = &bat_host->mac_addr;
if (!dst_mac) {
dst_mac = ether_aton(dst_string);
if (!dst_mac) {
printf("Error - the ping destination is not a mac address or bat-host name: %s\n", dst_string);
goto out;
}
}
mac_string = ether_ntoa_long(dst_mac);
signal(SIGINT, sig_handler);
signal(SIGTERM, sig_handler);
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt) {
printf("Error - can't mount or find debugfs\n");
goto out;
}
debugfs_make_path(SOCKET_PATH_FMT, mesh_iface, icmp_socket, sizeof(icmp_socket));
ping_fd = open(icmp_socket, O_RDWR);
if (ping_fd < 0) {
printf("Error - can't open a connection to the batman adv kernel module via the socket '%s': %s\n",
icmp_socket, strerror(errno));
printf("Check whether the module is loaded and active.\n");
goto out;
}
packet_len = sizeof(struct icmp_packet);
memcpy(&icmp_packet_out.dst, dst_mac, ETH_ALEN);
icmp_packet_out.packet_type = BAT_ICMP;
icmp_packet_out.version = COMPAT_VERSION;
icmp_packet_out.msg_type = ECHO_REQUEST;
icmp_packet_out.ttl = 50;
icmp_packet_out.seqno = 0;
if (rr) {
packet_len = sizeof(struct icmp_packet_rr);
icmp_packet_out.rr_cur = 1;
memset(&icmp_packet_out.rr, 0, BAT_RR_LEN * ETH_ALEN);
memset(last_rr, 0, BAT_RR_LEN * ETH_ALEN);
}
printf("PING %s (%s) %zu(%zu) bytes of data\n", dst_string, mac_string,
packet_len, packet_len + 28);
while (!is_aborted) {
tv.tv_sec = timeout;
tv.tv_usec = 0;
if (loop_count == 0)
break;
if (loop_count > 0)
loop_count--;
icmp_packet_out.seqno = htons(++seq_counter);
if (write(ping_fd, (char *)&icmp_packet_out, packet_len) < 0) {
printf("Error - can't write to batman adv kernel file '%s': %s\n", icmp_socket, strerror(errno));
goto sleep;
}
start_timer();
FD_ZERO(&read_socket);
FD_SET(ping_fd, &read_socket);
res = select(ping_fd + 1, &read_socket, NULL, NULL, &tv);
if (is_aborted)
break;
packets_out++;
if (res == 0) {
printf("Reply from host %s timed out\n", dst_string);
goto sleep;
}
if (res < 0)
goto sleep;
read_len = read(ping_fd, (char *)&icmp_packet_in, packet_len);
if (read_len < 0) {
printf("Error - can't read from batman adv kernel file '%s': %s\n", icmp_socket, strerror(errno));
goto sleep;
}
if ((size_t)read_len < packet_len) {
printf("Warning - dropping received packet as it is smaller than expected (%zu): %zd\n",
packet_len, read_len);
goto sleep;
}
switch (icmp_packet_in.msg_type) {
case ECHO_REPLY:
time_delta = end_timer();
printf("%zd bytes from %s icmp_seq=%hu ttl=%d time=%.2f ms",
read_len, dst_string, ntohs(icmp_packet_in.seqno),
icmp_packet_in.ttl, time_delta);
if (read_len == sizeof(struct icmp_packet_rr)) {
if (last_rr_cur == icmp_packet_in.rr_cur
&& !memcmp(last_rr, icmp_packet_in.rr, BAT_RR_LEN * ETH_ALEN)) {
printf("\t(same route)");
} else {
printf("\nRR: ");
for (i = 0; i < BAT_RR_LEN
&& i < icmp_packet_in.rr_cur; i++) {
rr_mac = (struct ether_addr *)&icmp_packet_in.rr[i];
rr_host = bat_hosts_find_by_mac((char *)rr_mac);
if (rr_host)
rr_string = rr_host->name;
else
rr_string = ether_ntoa_long(rr_mac);
printf("\t%s\n", rr_string);
if (memcmp(rr_mac, dst_mac, ETH_ALEN) == 0)
printf("\t%s\n", rr_string);
}
last_rr_cur = icmp_packet_in.rr_cur;
memcpy(last_rr, icmp_packet_in.rr, BAT_RR_LEN * ETH_ALEN);
}
}
printf("\n");
if ((time_delta < min) || (min == 0.0))
min = time_delta;
if (time_delta > max)
max = time_delta;
avg += time_delta;
mdev += time_delta * time_delta;
packets_in++;
break;
case DESTINATION_UNREACHABLE:
printf("From %s: Destination Host Unreachable (icmp_seq %hu)\n", dst_string, ntohs(icmp_packet_in.seqno));
break;
case TTL_EXCEEDED:
printf("From %s: Time to live exceeded (icmp_seq %hu)\n", dst_string, ntohs(icmp_packet_in.seqno));
break;
case PARAMETER_PROBLEM:
printf("Error - the batman adv kernel module version (%d) differs from ours (%d)\n",
icmp_packet_in.ttl, COMPAT_VERSION);
printf("Please make sure to compatible versions!\n");
goto out;
default:
printf("Unknown message type %d len %zd received\n", icmp_packet_in.msg_type, read_len);
break;
}
sleep:
if (loop_interval > 0)
sleep(loop_interval);
else if ((tv.tv_sec != 0) || (tv.tv_usec != 0))
select(0, NULL, NULL, NULL, &tv);
}
if (packets_out == 0)
packets_loss = 0;
else
packets_loss = ((packets_out - packets_in) * 100) / packets_out;
if (packets_in) {
avg /= packets_in;
mdev /= packets_in;
mdev = mdev - avg * avg;
if (mdev > 0.0)
mdev = sqrt(mdev);
else
mdev = 0.0;
} else {
avg = 0.0;
mdev = 0.0;
}
printf("--- %s ping statistics ---\n", dst_string);
printf("%u packets transmitted, %u received, %u%% packet loss\n",
packets_out, packets_in, packets_loss);
printf("rtt min/avg/max/mdev = %.3f/%.3f/%.3f/%.3f ms\n",
min, avg, max, mdev);
ret = EXIT_SUCCESS;
out:
bat_hosts_free();
if (ping_fd)
close(ping_fd);
return ret;
}
uint8_t get_tq(const char *mesh_iface, struct ether_addr *mac)
{
enum {
orig_mac,
orig_lastseen,
orig_tqstart,
orig_tqvalue,
} pos;
char full_path[MAX_PATH + 1];
char *debugfs_mnt;
static struct ether_addr in_mac;
struct ether_addr *mac_tmp;
FILE *f = NULL;
size_t len = 0;
char *line = NULL;
char *input, *saveptr, *token;
int line_invalid;
uint8_t tq = 0;
memcpy(&in_mac, mac, sizeof(in_mac));
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt)
goto out;
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/" DEBUG_ORIGINATORS,
mesh_iface, full_path, sizeof(full_path));
f = fopen(full_path, "r");
if (!f)
goto out;
while (getline(&line, &len, f) != -1) {
line_invalid = 0;
pos = orig_mac;
input = line;
while ((token = strtok_r(input, " \t", &saveptr))) {
input = NULL;
switch (pos) {
case orig_mac:
mac_tmp = ether_aton(token);
if (!mac_tmp || memcmp(mac_tmp, &in_mac,
sizeof(in_mac)) != 0)
line_invalid = 1;
else
pos = orig_lastseen;
break;
case orig_lastseen:
pos = orig_tqstart;
break;
case orig_tqstart:
if (strlen(token) == 0) {
line_invalid = 1;
break;
} else if (token[0] != '(') {
line_invalid = 1;
break;
} else if (strlen(token) == 1) {
pos = orig_tqvalue;
break;
}
token++;
/* fall through */
case orig_tqvalue:
if (token[strlen(token) - 1] != ')') {
line_invalid = 1;
} else {
token[strlen(token) - 1] = '\0';
tq = strtol(token, NULL, 10);
goto out;
}
break;
}
if (line_invalid)
break;
}
}
out:
if (f)
fclose(f);
free(line);
return tq;
}
struct ether_addr *translate_mac(const char *mesh_iface, struct ether_addr *mac)
{
enum {
tg_start,
tg_mac,
tg_via,
tg_originator,
} pos;
char full_path[MAX_PATH + 1];
char *debugfs_mnt;
static struct ether_addr in_mac;
struct ether_addr *mac_result, *mac_tmp;
FILE *f = NULL;
size_t len = 0;
char *line = NULL;
char *input, *saveptr, *token;
int line_invalid;
memcpy(&in_mac, mac, sizeof(in_mac));
mac_result = &in_mac;
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt)
goto out;
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/" DEBUG_TRANSTABLE_GLOBAL,
mesh_iface, full_path, sizeof(full_path));
f = fopen(full_path, "r");
if (!f)
goto out;
while (getline(&line, &len, f) != -1) {
line_invalid = 0;
pos = tg_start;
input = line;
while ((token = strtok_r(input, " \t", &saveptr))) {
input = NULL;
switch (pos) {
case tg_start:
if (strcmp(token, "*") != 0)
line_invalid = 1;
else
pos = tg_mac;
break;
case tg_mac:
mac_tmp = ether_aton(token);
if (!mac_tmp || memcmp(mac_tmp, &in_mac,
sizeof(in_mac)) != 0)
line_invalid = 1;
else
pos = tg_via;
break;
case tg_via:
if (strcmp(token, "via") == 0)
pos = tg_originator;
break;
case tg_originator:
mac_tmp = ether_aton(token);
if (!mac_tmp) {
line_invalid = 1;
} else {
mac_result = mac_tmp;
goto out;
}
break;
}
if (line_invalid)
break;
}
}
out:
if (f)
fclose(f);
free(line);
return mac_result;
}
int handle_debug_table(char *mesh_iface, int debug_table, int argc, char **argv)
{
int optchar, read_opt = USE_BAT_HOSTS;
char full_path[MAX_PATH+1];
char *debugfs_mnt;
float orig_timeout;
float watch_interval = 1;
opterr = 0;
while ((optchar = getopt(argc, argv, "hnw:t:H")) != -1) {
switch (optchar) {
case 'h':
debug_table_usage(debug_table);
return EXIT_SUCCESS;
case 'n':
read_opt &= ~USE_BAT_HOSTS;
break;
case 'w':
read_opt |= CLR_CONT_READ;
if (optarg[0] == '-') {
optind--;
break;
}
if (!sscanf(optarg, "%f", &watch_interval)) {
fprintf(stderr, "Error - provided argument of '-%c' is not a number\n", optchar);
return EXIT_FAILURE;
}
break;
case 't':
if (debug_table != BATCTL_TABLE_ORIGINATORS) {
fprintf(stderr, "Error - unrecognised option '-%c'\n", optchar);
debug_table_usage(debug_table);
return EXIT_FAILURE;
}
read_opt |= NO_OLD_ORIGS;
if (!sscanf(optarg, "%f", &orig_timeout)) {
fprintf(stderr, "Error - provided argument of '-%c' is not a number\n", optchar);
return EXIT_FAILURE;
}
break;
case 'H':
read_opt |= SKIP_HEADER;
break;
case '?':
if (optopt == 't')
fprintf(stderr, "Error - option '-t' needs a number as argument\n");
else if (optopt == 'w') {
read_opt |= CLR_CONT_READ;
break;
}
else
fprintf(stderr, "Error - unrecognised option: '-%c'\n", optopt);
return EXIT_FAILURE;
default:
debug_table_usage(debug_table);
return EXIT_FAILURE;
}
}
debugfs_mnt = debugfs_mount(NULL);
if (!debugfs_mnt) {
fprintf(stderr, "Error - can't mount or find debugfs\n");
return EXIT_FAILURE;
}
debugfs_make_path(DEBUG_BATIF_PATH_FMT "/", mesh_iface, full_path, sizeof(full_path));
return read_file(full_path, (char *)batctl_debug_tables[debug_table].debugfs_name,
read_opt, orig_timeout, watch_interval,
batctl_debug_tables[debug_table].header_lines);
}
