src/doveadm/doveadm-who.c

	doveadm-who.c revision 4865a1ded730cde7ecf0e6d10ed11fad17c2f8d5
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi/* Copyright (c) 2009 Dovecot authors, see the included COPYING file */
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include "lib.h"
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include "array.h"
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include "network.h"
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include "istream.h"
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include "hash.h"
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include "doveadm.h"
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include <stdio.h>
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include <stdlib.h>
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi#include <unistd.h>
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistruct who_line {
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *username;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *service;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    struct ip_addr ip;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    pid_t pid;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    unsigned int refcount;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi};
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistruct who_user {
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *username;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *service;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    ARRAY_DEFINE(ips, struct ip_addr);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    ARRAY_DEFINE(pids, pid_t);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    unsigned int connection_count;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi};
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistruct who_filter {
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *username;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    struct ip_addr net_ip;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    unsigned int net_bits;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi};
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistruct who_context {
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *anvil_path;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    struct who_filter filter;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    pool_t pool;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    struct hash_table *users; /* username -> who_user */
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi};
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomitypedef void who_callback_t(struct who_context *ctx,
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi                const struct who_line *line);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistatic unsigned int who_user_hash(const void *p)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi{
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const struct who_user *user = p;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    return str_hash(user->username) + str_hash(user->service);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi}
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistatic int who_user_cmp(const void *p1, const void *p2)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi{
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const struct who_user *user1 = p1, *user2 = p2;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    if (strcmp(user1->username, user2->username) != 0)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi        return 1;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    if (strcmp(user1->service, user2->service) != 0)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi        return 1;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    return 0;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi}
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistatic bool
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomiwho_user_has_ip(const struct who_user *user, const struct ip_addr *ip)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi{
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const struct ip_addr *ex_ip;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    array_foreach(&user->ips, ex_ip) {
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi        if (net_ip_compare(ex_ip, ip))
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi            return TRUE;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    }
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    return FALSE;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi}
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistatic void who_parse_line(const char *line, struct who_line *line_r)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi{
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *const *args = t_strsplit(line, "\t");
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *ident = args[0];
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *pid_str = args[1];
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *refcount_str = args[2];
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const char *p, *ip_str;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    memset(line_r, 0, sizeof(*line_r));
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    p = strchr(ident, '/');
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    line_r->pid = strtoul(pid_str, NULL, 10);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    line_r->service = t_strdup_until(ident, p++);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    line_r->username = strchr(p, '/');
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    line_r->refcount = atoi(refcount_str);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    ip_str = t_strdup_until(p, line_r->username++);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    (void)net_addr2ip(ip_str, &line_r->ip);
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi}
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomistatic void who_aggregate_line(struct who_context *ctx,
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi                   const struct who_line *line)
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi{
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    struct who_user *user, lookup_user;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    const pid_t *ex_pid;
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi
205f29a013ee4aa95e9be993ebf261a9d9bc251bAki Tuomi    lookup_user.username = line->username;
    lookup_user.service = line->service;

    user = hash_table_lookup(ctx->users, &lookup_user);
    if (user == NULL) {
        user = p_new(ctx->pool, struct who_user, 1);
        user->username = p_strdup(ctx->pool, line->username);
        user->service = p_strdup(ctx->pool, line->service);
        p_array_init(&user->ips, ctx->pool, 3);
        p_array_init(&user->pids, ctx->pool, 8);
        hash_table_insert(ctx->users, user, user);
    }
    user->connection_count += line->refcount;

    if (line->ip.family != 0 && !who_user_has_ip(user, &line->ip))
        array_append(&user->ips, &line->ip, 1);

    array_foreach(&user->pids, ex_pid) {
        if (*ex_pid == line->pid)
            break;
    }
    if (*ex_pid != line->pid)
        array_append(&user->pids, &line->pid, 1);
}

static void who_lookup(struct who_context *ctx, who_callback_t *callback)
{
#define ANVIL_HANDSHAKE "VERSION\tanvil\t1\t0\n"
#define ANVIL_CMD ANVIL_HANDSHAKE"CONNECT-DUMP\n"
    struct istream *input;
    const char *line;
    int fd;

    fd = net_connect_unix(ctx->anvil_path);
    if (fd == -1)
        i_fatal("net_connect_unix(%s) failed: %m", ctx->anvil_path);
    net_set_nonblock(fd, FALSE);

    input = i_stream_create_fd(fd, (size_t)-1, TRUE);
    if (write(fd, ANVIL_CMD, strlen(ANVIL_CMD)) < 0)
        i_fatal("write(%s) failed: %m", ctx->anvil_path);
    while ((line = i_stream_read_next_line(input)) != NULL) {
        if (*line == '\0')
            break;
        T_BEGIN {
            struct who_line who_line;

            who_parse_line(line, &who_line);
            callback(ctx, &who_line);
        } T_END;
    }
    if (input->stream_errno != 0)
        i_fatal("read(%s) failed: %m", ctx->anvil_path);

    i_stream_destroy(&input);
}

static bool who_user_filter_match(const struct who_user *user,
                  const struct who_filter *filter)
{
    if (filter->username != NULL) {
        if (strstr(user->username, filter->username) == NULL)
            return FALSE;
    }
    if (filter->net_bits > 0) {
        const struct ip_addr *ip;
        bool ret = FALSE;

        array_foreach(&user->ips, ip) {
            if (net_is_in_network(ip, &filter->net_ip,
                          filter->net_bits)) {
                ret = TRUE;
                break;
            }
        }
        if (!ret)
            return FALSE;
    }
    return TRUE;
}

static void who_print(struct who_context *ctx)
{
    struct hash_iterate_context *iter;
    void *key, *value;

    fprintf(stderr, "%-30s  # proto\t(pids)\t(ips)\n", "username");

    iter = hash_table_iterate_init(ctx->users);
    while (hash_table_iterate(iter, &key, &value)) {
        struct who_user *user = value;
        const struct ip_addr *ip;
        const pid_t *pid;
        bool first = TRUE;

        if (!who_user_filter_match(user, &ctx->filter))
            continue;

        printf("%-30s %2u %-5s ", user->username,
               user->connection_count, user->service);

        printf("(");
        array_foreach(&user->pids, pid) T_BEGIN {
            if (first)
                first = FALSE;
            else
                printf(" ");
            printf("%ld", (long)*pid);
        } T_END;
        printf(") (");
        first = TRUE;
        array_foreach(&user->ips, ip) T_BEGIN {
            if (first)
                first = FALSE;
            else
                printf(" ");
            printf("%s", net_ip2addr(ip));
        } T_END;
        printf(")\n");
    };
    hash_table_iterate_deinit(&iter);
}

static bool who_line_filter_match(const struct who_line *line,
                  const struct who_filter *filter)
{
    if (filter->username != NULL) {
        if (strstr(line->username, filter->username) == NULL)
            return FALSE;
    }
    if (filter->net_bits > 0) {
        if (!net_is_in_network(&line->ip, &filter->net_ip,
                       filter->net_bits))
            return FALSE;
    }
    return TRUE;
}

static void who_print_line(struct who_context *ctx,
               const struct who_line *line)
{
    unsigned int i;

    if (!who_line_filter_match(line, &ctx->filter))
        return;

    for (i = 0; i < line->refcount; i++) T_BEGIN {
        printf("%-30s %-5s\t%ld\t%-15s\n", line->username,
               line->service, (long)line->pid, net_ip2addr(&line->ip));
    } T_END;
}

static void cmd_who(int argc, char *argv[])
{
    struct who_context ctx;
    struct ip_addr net_ip;
    unsigned int net_bits;
    bool separate_connections = FALSE;
    int c;

    memset(&ctx, 0, sizeof(ctx));
    ctx.anvil_path = PKG_RUNDIR"/anvil";
    ctx.pool = pool_alloconly_create("who users", 10240);
    ctx.users = hash_table_create(default_pool, ctx.pool, 0,
                      who_user_hash, who_user_cmp);

    while ((c = getopt(argc, argv, "1a:")) > 0) {
        switch (c) {
        case '1':
            separate_connections = TRUE;
            break;
        case 'a':
            ctx.anvil_path = optarg;
            break;
        default:
            help(&doveadm_cmd_who);
        }
    }

    argv += optind - 1;
    while (argv[1] != NULL) {
        if (net_parse_range(argv[1], &net_ip, &net_bits) == 0) {
            if (ctx.filter.net_bits != 0)
                usage();
            ctx.filter.net_ip = net_ip;
            ctx.filter.net_bits = net_bits;
        } else {
            if (ctx.filter.username != NULL)
                usage();
            ctx.filter.username = argv[1];
        }
        argv++;
    }

    if (!separate_connections) {
        who_lookup(&ctx, who_aggregate_line);
        who_print(&ctx);
    } else {
        fprintf(stderr, "%-30s proto\tpid\t%-15s\n", "username", "ip");
        who_lookup(&ctx, who_print_line);
    }

    hash_table_destroy(&ctx.users);
    pool_unref(&ctx.pool);
}

struct doveadm_cmd doveadm_cmd_who = {
    cmd_who, "who",
    "[-a <anvil socket path>] [-1] [<user>] [<ip/bits>]", NULL
};