cmd-set-environment.c

   1 /* $OpenBSD$ */
   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  * Set an environment variable.
  28  */
  29
  30 enum cmd_retval  cmd_set_environment_exec(struct cmd *, struct cmd_q *);
  31
  32 const struct cmd_entry cmd_set_environment_entry = {
  33         "set-environment", "setenv",
  34         "grt:u", 1, 2,
  35         "[-gru] " CMD_TARGET_SESSION_USAGE " name [value]",
  36         0,
  37         NULL,
  38         NULL,
  39         cmd_set_environment_exec
  40 };
  41
  42 enum cmd_retval
  43 cmd_set_environment_exec(struct cmd *self, struct cmd_q *cmdq)
  44 {
  45         struct args     *args = self->args;
  46         struct session  *s;
  47         struct environ  *env;
  48         const char      *name, *value;
  49
  50         name = args->argv[0];
  51         if (*name == '\0') {
  52                 cmdq_error(cmdq, "empty variable name");
  53                 return (CMD_RETURN_ERROR);
  54         }
  55         if (strchr(name, '=') != NULL) {
  56                 cmdq_error(cmdq, "variable name contains =");
  57                 return (CMD_RETURN_ERROR);
  58         }
  59
  60         if (args->argc < 2)
  61                 value = NULL;
  62         else
  63                 value = args->argv[1];
  64
  65         if (args_has(self->args, 'g'))
  66                 env = &global_environ;
  67         else {
  68                 if ((s = cmd_find_session(cmdq, args_get(args, 't'), 0)) == NULL)
  69                         return (CMD_RETURN_ERROR);
  70                 env = &s->environ;
  71         }
  72
  73         if (args_has(self->args, 'u')) {
  74                 if (value != NULL) {
  75                         cmdq_error(cmdq, "can't specify a value with -u");
  76                         return (CMD_RETURN_ERROR);
  77                 }
  78                 environ_unset(env, name);
  79         } else if (args_has(self->args, 'r')) {
  80                 if (value != NULL) {
  81                         cmdq_error(cmdq, "can't specify a value with -r");
  82                         return (CMD_RETURN_ERROR);
  83                 }
  84                 environ_set(env, name, NULL);
  85         } else {
  86                 if (value == NULL) {
  87                         cmdq_error(cmdq, "no value specified");
  88                         return (CMD_RETURN_ERROR);
  89                 }
  90                 environ_set(env, name, value);
  91         }
  92
  93         return (CMD_RETURN_NORMAL);
  94 }