1/* $Id: cmd-respawn-pane.c,v 1.1.1.1 2011/08/17 18:40:04 jmmv Exp $ */
2
3/*
4 * Copyright (c) 2008 Nicholas Marriott <nicm@users.sourceforge.net>
5 * Copyright (c) 2011 Marcel P. Partap <mpartap@gmx.net>
6 *
7 * Permission to use, copy, modify, and distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
10 *
11 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
16 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
17 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 */
19
20#include <sys/types.h>
21
22#include <unistd.h>
23
24#include "tmux.h"
25
26/*
27 * Respawn a pane (restart the command). Kill existing if -k given.
28 */
29
30int	cmd_respawn_pane_exec(struct cmd *, struct cmd_ctx *);
31
32const struct cmd_entry cmd_respawn_pane_entry = {
33	"respawn-pane", "respawnp",
34	"kt:", 0, 1,
35	"[-k] " CMD_TARGET_PANE_USAGE " [command]",
36	0,
37	NULL,
38	NULL,
39	cmd_respawn_pane_exec
40};
41
42int
43cmd_respawn_pane_exec(struct cmd *self, struct cmd_ctx *ctx)
44{
45	struct args		*args = self->args;
46	struct winlink		*wl;
47	struct window		*w;
48	struct window_pane	*wp;
49	struct session		*s;
50	struct environ		 env;
51	const char		*cmd;
52	char		 	*cause;
53
54	if ((wl = cmd_find_pane(ctx, args_get(args, 't'), &s, &wp)) == NULL)
55		return (-1);
56	w = wl->window;
57
58	if (!args_has(self->args, 'k') && wp->fd != -1) {
59		ctx->error(ctx, "pane still active: %s:%u.%u",
60		    s->name, wl->idx, window_pane_index(w, wp));
61		return (-1);
62	}
63
64	environ_init(&env);
65	environ_copy(&global_environ, &env);
66	environ_copy(&s->environ, &env);
67	server_fill_environ(s, &env);
68
69	window_pane_reset_mode(wp);
70	screen_reinit(&wp->base);
71	input_init(wp);
72
73	if (args->argc != 0)
74		cmd = args->argv[0];
75	else
76		cmd = NULL;
77	if (window_pane_spawn(wp, cmd, NULL, NULL, &env, s->tio, &cause) != 0) {
78		ctx->error(ctx, "respawn pane failed: %s", cause);
79		xfree(cause);
80		environ_free(&env);
81		return (-1);
82	}
83	wp->flags |= PANE_REDRAW;
84	server_status_window(w);
85
86	environ_free(&env);
87	return (0);
88}
89