/* $OpenBSD: notify.c,v 1.44 2023/06/30 13:19:32 nicm Exp $ */

/*
 * Copyright (c) 2012 George Nachman <tmux@georgester.com>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <sys/types.h>
#include <sys/queue.h>

#include <stdlib.h>
#include <string.h>

#include "tmux.h"

struct notify_entry {
        const char              *name;
        struct cmd_find_state    fs;
        struct format_tree      *formats;

        struct client           *client;
        struct session          *session;
        struct window           *window;
        int                      pane;
        const char              *pbname;
};

static struct cmdq_item *
notify_insert_one_hook(struct cmdq_item *item, struct notify_entry *ne,
    struct cmd_list *cmdlist, struct cmdq_state *state)
{
        struct cmdq_item        *new_item;
        char                    *s;

        if (cmdlist == NULL)
                return (item);
        if (log_get_level() != 0) {
                s = cmd_list_print(cmdlist, 0);
                log_debug("%s: hook %s is: %s", __func__, ne->name, s);
                free(s);
        }
        new_item = cmdq_get_command(cmdlist, state);
        return (cmdq_insert_after(item, new_item));
}

static void
notify_insert_hook(struct cmdq_item *item, struct notify_entry *ne)
{
        struct cmd_find_state            fs;
        struct options                  *oo;
        struct cmdq_state               *state;
        struct options_entry            *o;
        struct options_array_item       *a;
        struct cmd_list                 *cmdlist;
        const char                      *value;
        struct cmd_parse_result         *pr;

        log_debug("%s: inserting hook %s", __func__, ne->name);

        cmd_find_clear_state(&fs, 0);
        if (cmd_find_empty_state(&ne->fs) || !cmd_find_valid_state(&ne->fs))
                cmd_find_from_nothing(&fs, 0);
        else
                cmd_find_copy_state(&fs, &ne->fs);

        if (fs.s == NULL)
                oo = global_s_options;
        else
                oo = fs.s->options;
        o = options_get(oo, ne->name);
        if (o == NULL && fs.wp != NULL) {
                oo = fs.wp->options;
                o = options_get(oo, ne->name);
        }
        if (o == NULL && fs.wl != NULL) {
                oo = fs.wl->window->options;
                o = options_get(oo, ne->name);
        }
        if (o == NULL) {
                log_debug("%s: hook %s not found", __func__, ne->name);
                return;
        }

        state = cmdq_new_state(&fs, NULL, CMDQ_STATE_NOHOOKS);
        cmdq_add_formats(state, ne->formats);

        if (*ne->name == '@') {
                value = options_get_string(oo, ne->name);
                pr = cmd_parse_from_string(value, NULL);
                switch (pr->status) {
                case CMD_PARSE_ERROR:
                        log_debug("%s: can't parse hook %s: %s", __func__,
                            ne->name, pr->error);
                        free(pr->error);
                        break;
                case CMD_PARSE_SUCCESS:
                        notify_insert_one_hook(item, ne, pr->cmdlist, state);
                        break;
                }
        } else {
                a = options_array_first(o);
                while (a != NULL) {
                        cmdlist = options_array_item_value(a)->cmdlist;
                        item = notify_insert_one_hook(item, ne, cmdlist, state);
                        a = options_array_next(a);
                }
        }

        cmdq_free_state(state);
}

static enum cmd_retval
notify_callback(struct cmdq_item *item, void *data)
{
        struct notify_entry     *ne = data;

        log_debug("%s: %s", __func__, ne->name);

        if (strcmp(ne->name, "pane-mode-changed") == 0)
                control_notify_pane_mode_changed(ne->pane);
        if (strcmp(ne->name, "window-layout-changed") == 0)
                control_notify_window_layout_changed(ne->window);
        if (strcmp(ne->name, "window-pane-changed") == 0)
                control_notify_window_pane_changed(ne->window);
        if (strcmp(ne->name, "window-unlinked") == 0)
                control_notify_window_unlinked(ne->session, ne->window);
        if (strcmp(ne->name, "window-linked") == 0)
                control_notify_window_linked(ne->session, ne->window);
        if (strcmp(ne->name, "window-renamed") == 0)
                control_notify_window_renamed(ne->window);
        if (strcmp(ne->name, "client-session-changed") == 0)
                control_notify_client_session_changed(ne->client);
        if (strcmp(ne->name, "client-detached") == 0)
                control_notify_client_detached(ne->client);
        if (strcmp(ne->name, "session-renamed") == 0)
                control_notify_session_renamed(ne->session);
        if (strcmp(ne->name, "session-created") == 0)
                control_notify_session_created(ne->session);
        if (strcmp(ne->name, "session-closed") == 0)
                control_notify_session_closed(ne->session);
        if (strcmp(ne->name, "session-window-changed") == 0)
                control_notify_session_window_changed(ne->session);
        if (strcmp(ne->name, "paste-buffer-changed") == 0)
                control_notify_paste_buffer_changed(ne->pbname);
        if (strcmp(ne->name, "paste-buffer-deleted") == 0)
                control_notify_paste_buffer_deleted(ne->pbname);

        notify_insert_hook(item, ne);

        if (ne->client != NULL)
                server_client_unref(ne->client);
        if (ne->session != NULL)
                session_remove_ref(ne->session, __func__);
        if (ne->window != NULL)
                window_remove_ref(ne->window, __func__);

        if (ne->fs.s != NULL)
                session_remove_ref(ne->fs.s, __func__);

        format_free(ne->formats);
        free((void *)ne->name);
        free((void *)ne->pbname);
        free(ne);

        return (CMD_RETURN_NORMAL);
}

static void
notify_add(const char *name, struct cmd_find_state *fs, struct client *c,
    struct session *s, struct window *w, struct window_pane *wp,
    const char *pbname)
{
        struct notify_entry     *ne;
        struct cmdq_item        *item;

        item = cmdq_running(NULL);
        if (item != NULL && (cmdq_get_flags(item) & CMDQ_STATE_NOHOOKS))
                return;

        ne = xcalloc(1, sizeof *ne);
        ne->name = xstrdup(name);

        ne->client = c;
        ne->session = s;
        ne->window = w;
        ne->pane = (wp != NULL ? (int)wp->id : -1);
        ne->pbname = (pbname != NULL ? xstrdup(pbname) : NULL);

        ne->formats = format_create(NULL, NULL, 0, FORMAT_NOJOBS);
        format_add(ne->formats, "hook", "%s", name);
        if (c != NULL)
                format_add(ne->formats, "hook_client", "%s", c->name);
        if (s != NULL) {
                format_add(ne->formats, "hook_session", "$%u", s->id);
                format_add(ne->formats, "hook_session_name", "%s", s->name);
        }
        if (w != NULL) {
                format_add(ne->formats, "hook_window", "@%u", w->id);
                format_add(ne->formats, "hook_window_name", "%s", w->name);
        }
        if (wp != NULL)
                format_add(ne->formats, "hook_pane", "%%%d", wp->id);
        format_log_debug(ne->formats, __func__);

        if (c != NULL)
                c->references++;
        if (s != NULL)
                session_add_ref(s, __func__);
        if (w != NULL)
                window_add_ref(w, __func__);

        cmd_find_copy_state(&ne->fs, fs);
        if (ne->fs.s != NULL) /* cmd_find_valid_state needs session */
                session_add_ref(ne->fs.s, __func__);

        cmdq_append(NULL, cmdq_get_callback(notify_callback, ne));
}

void
notify_hook(struct cmdq_item *item, const char *name)
{
        struct cmd_find_state   *target = cmdq_get_target(item);
        struct notify_entry      ne;

        memset(&ne, 0, sizeof ne);

        ne.name = name;
        cmd_find_copy_state(&ne.fs, target);

        ne.client = cmdq_get_client(item);
        ne.session = target->s;
        ne.window = target->w;
        ne.pane = (target->wp != NULL ? (int)target->wp->id : -1);

        ne.formats = format_create(NULL, NULL, 0, FORMAT_NOJOBS);
        format_add(ne.formats, "hook", "%s", name);
        format_log_debug(ne.formats, __func__);

        notify_insert_hook(item, &ne);
        format_free(ne.formats);
}

void
notify_client(const char *name, struct client *c)
{
        struct cmd_find_state   fs;

        cmd_find_from_client(&fs, c, 0);
        notify_add(name, &fs, c, NULL, NULL, NULL, NULL);
}

void
notify_session(const char *name, struct session *s)
{
        struct cmd_find_state   fs;

        if (session_alive(s))
                cmd_find_from_session(&fs, s, 0);
        else
                cmd_find_from_nothing(&fs, 0);
        notify_add(name, &fs, NULL, s, NULL, NULL, NULL);
}

void
notify_winlink(const char *name, struct winlink *wl)
{
        struct cmd_find_state   fs;

        cmd_find_from_winlink(&fs, wl, 0);
        notify_add(name, &fs, NULL, wl->session, wl->window, NULL, NULL);
}

void
notify_session_window(const char *name, struct session *s, struct window *w)
{
        struct cmd_find_state   fs;

        cmd_find_from_session_window(&fs, s, w, 0);
        notify_add(name, &fs, NULL, s, w, NULL, NULL);
}

void
notify_window(const char *name, struct window *w)
{
        struct cmd_find_state   fs;

        cmd_find_from_window(&fs, w, 0);
        notify_add(name, &fs, NULL, NULL, w, NULL, NULL);
}

void
notify_pane(const char *name, struct window_pane *wp)
{
        struct cmd_find_state   fs;

        cmd_find_from_pane(&fs, wp, 0);
        notify_add(name, &fs, NULL, NULL, NULL, wp, NULL);
}

void
notify_paste_buffer(const char *pbname, int deleted)
{
        struct cmd_find_state   fs;

        cmd_find_clear_state(&fs, 0);
        if (deleted) {
                notify_add("paste-buffer-deleted", &fs, NULL, NULL, NULL, NULL,
                    pbname);
        } else {
                notify_add("paste-buffer-changed", &fs, NULL, NULL, NULL, NULL,
                    pbname);
        }
}