xref: /openbsd-src/usr.bin/tmux/cmd-show-environment.c (revision 43003dfe3ad45d1698bed8a37f2b0f5b14f20d4f)
1 /* $OpenBSD: cmd-show-environment.c,v 1.1 2009/08/08 21:52:43 nicm Exp $ */
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 int	cmd_show_environment_exec(struct cmd *, struct cmd_ctx *);
31 
32 const struct cmd_entry cmd_show_environment_entry = {
33 	"show-environment", "showenv",
34 	"[-g] " CMD_TARGET_SESSION_USAGE,
35 	0, CMD_CHFLAG('g'),
36 	cmd_target_init,
37 	cmd_target_parse,
38 	cmd_show_environment_exec,
39 	cmd_target_free,
40 	cmd_target_print
41 };
42 
43 int
44 cmd_show_environment_exec(struct cmd *self, struct cmd_ctx *ctx)
45 {
46 	struct cmd_target_data		*data = self->data;
47 	struct session			*s;
48 	struct environ			*env;
49 	struct environ_entry		*envent;
50 
51 	if (data->chflags & CMD_CHFLAG('g'))
52 		env = &global_environ;
53 	else {
54 		if ((s = cmd_find_session(ctx, data->target)) == NULL)
55 			return (-1);
56 		env = &s->environ;
57 	}
58 
59 	RB_FOREACH(envent, environ, env) {
60 		if (envent->value != NULL)
61 			ctx->print(ctx, "%s=%s", envent->name, envent->value);
62 		else
63 			ctx->print(ctx, "-%s", envent->name);
64 	}
65 
66 	return (0);
67 }
68