1 /* Id */
2
3 /*
4 * Copyright (c) 2009 Nicholas Marriott <nicm@users.sourceforge.net>
5 *
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
9 *
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
15 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
16 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 */
18
19 #include <sys/types.h>
20
21 #include <stdlib.h>
22 #include <string.h>
23
24 #include "tmux.h"
25
26 /*
27 * Show environment.
28 */
29
30 enum cmd_retval cmd_show_environment_exec(struct cmd *, struct cmd_q *);
31
32 const struct cmd_entry cmd_show_environment_entry = {
33 "show-environment", "showenv",
34 "gt:", 0, 1,
35 "[-g] " CMD_TARGET_SESSION_USAGE " [name]",
36 0,
37 NULL,
38 cmd_show_environment_exec
39 };
40
41 enum cmd_retval
cmd_show_environment_exec(struct cmd * self,struct cmd_q * cmdq)42 cmd_show_environment_exec(struct cmd *self, struct cmd_q *cmdq)
43 {
44 struct args *args = self->args;
45 struct session *s;
46 struct environ *env;
47 struct environ_entry *envent;
48
49 if (args_has(self->args, 'g'))
50 env = &global_environ;
51 else {
52 if ((s = cmd_find_session(cmdq, args_get(args, 't'), 0)) == NULL)
53 return (CMD_RETURN_ERROR);
54 env = &s->environ;
55 }
56
57 if (args->argc != 0) {
58 envent = environ_find(env, args->argv[0]);
59 if (envent == NULL) {
60 cmdq_error(cmdq, "unknown variable: %s", args->argv[0]);
61 return (CMD_RETURN_ERROR);
62 }
63 if (envent->value != NULL)
64 cmdq_print(cmdq, "%s=%s", envent->name, envent->value);
65 else
66 cmdq_print(cmdq, "-%s", envent->name);
67 return (CMD_RETURN_NORMAL);
68 }
69
70 RB_FOREACH(envent, environ, env) {
71 if (envent->value != NULL)
72 cmdq_print(cmdq, "%s=%s", envent->name, envent->value);
73 else
74 cmdq_print(cmdq, "-%s", envent->name);
75 }
76
77 return (CMD_RETURN_NORMAL);
78 }
79