1 /* $OpenBSD: tmux.c,v 1.135 2015/01/19 09:58:34 nicm Exp $ */ 2 3 /* 4 * Copyright (c) 2007 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 #include <sys/stat.h> 21 22 #include <errno.h> 23 #include <event.h> 24 #include <fcntl.h> 25 #include <getopt.h> 26 #include <locale.h> 27 #include <paths.h> 28 #include <pwd.h> 29 #include <stdlib.h> 30 #include <string.h> 31 #include <unistd.h> 32 33 #include "tmux.h" 34 35 #ifdef DEBUG 36 extern char *malloc_options; 37 #endif 38 39 struct options global_options; /* server options */ 40 struct options global_s_options; /* session options */ 41 struct options global_w_options; /* window options */ 42 struct environ global_environ; 43 44 struct event_base *ev_base; 45 46 char *cfg_file; 47 char *shell_cmd; 48 int debug_level; 49 time_t start_time; 50 char socket_path[PATH_MAX]; 51 int login_shell; 52 char *environ_path; 53 54 __dead void usage(void); 55 char *makesocketpath(const char *); 56 57 __dead void 58 usage(void) 59 { 60 fprintf(stderr, 61 "usage: %s [-2lquv] [-c shell-command] [-f file] [-L socket-name]\n" 62 " [-S socket-path] [command [flags]]\n", 63 __progname); 64 exit(1); 65 } 66 67 void 68 logfile(const char *name) 69 { 70 char *path; 71 72 if (debug_level > 0) { 73 xasprintf(&path, "tmux-%s-%ld.log", name, (long) getpid()); 74 log_open(path); 75 free(path); 76 } 77 } 78 79 const char * 80 getshell(void) 81 { 82 struct passwd *pw; 83 const char *shell; 84 85 shell = getenv("SHELL"); 86 if (checkshell(shell)) 87 return (shell); 88 89 pw = getpwuid(getuid()); 90 if (pw != NULL && checkshell(pw->pw_shell)) 91 return (pw->pw_shell); 92 93 return (_PATH_BSHELL); 94 } 95 96 int 97 checkshell(const char *shell) 98 { 99 if (shell == NULL || *shell == '\0' || *shell != '/') 100 return (0); 101 if (areshell(shell)) 102 return (0); 103 if (access(shell, X_OK) != 0) 104 return (0); 105 return (1); 106 } 107 108 int 109 areshell(const char *shell) 110 { 111 const char *progname, *ptr; 112 113 if ((ptr = strrchr(shell, '/')) != NULL) 114 ptr++; 115 else 116 ptr = shell; 117 progname = __progname; 118 if (*progname == '-') 119 progname++; 120 if (strcmp(ptr, progname) == 0) 121 return (1); 122 return (0); 123 } 124 125 char * 126 makesocketpath(const char *label) 127 { 128 char base[PATH_MAX], realbase[PATH_MAX], *path, *s; 129 struct stat sb; 130 u_int uid; 131 132 uid = getuid(); 133 if ((s = getenv("TMUX_TMPDIR")) != NULL && *s != '\0') 134 xsnprintf(base, sizeof base, "%s/tmux-%u", s, uid); 135 else if ((s = getenv("TMPDIR")) != NULL && *s != '\0') 136 xsnprintf(base, sizeof base, "%s/tmux-%u", s, uid); 137 else 138 xsnprintf(base, sizeof base, "%s/tmux-%u", _PATH_TMP, uid); 139 140 if (mkdir(base, S_IRWXU) != 0 && errno != EEXIST) 141 return (NULL); 142 143 if (lstat(base, &sb) != 0) 144 return (NULL); 145 if (!S_ISDIR(sb.st_mode)) { 146 errno = ENOTDIR; 147 return (NULL); 148 } 149 if (sb.st_uid != uid || (sb.st_mode & S_IRWXO) != 0) { 150 errno = EACCES; 151 return (NULL); 152 } 153 154 if (realpath(base, realbase) == NULL) 155 strlcpy(realbase, base, sizeof realbase); 156 157 xasprintf(&path, "%s/%s", realbase, label); 158 return (path); 159 } 160 161 void 162 setblocking(int fd, int state) 163 { 164 int mode; 165 166 if ((mode = fcntl(fd, F_GETFL)) != -1) { 167 if (!state) 168 mode |= O_NONBLOCK; 169 else 170 mode &= ~O_NONBLOCK; 171 fcntl(fd, F_SETFL, mode); 172 } 173 } 174 175 __dead void 176 shell_exec(const char *shell, const char *shellcmd) 177 { 178 const char *shellname, *ptr; 179 char *argv0; 180 181 ptr = strrchr(shell, '/'); 182 if (ptr != NULL && *(ptr + 1) != '\0') 183 shellname = ptr + 1; 184 else 185 shellname = shell; 186 if (login_shell) 187 xasprintf(&argv0, "-%s", shellname); 188 else 189 xasprintf(&argv0, "%s", shellname); 190 setenv("SHELL", shell, 1); 191 192 setblocking(STDIN_FILENO, 1); 193 setblocking(STDOUT_FILENO, 1); 194 setblocking(STDERR_FILENO, 1); 195 closefrom(STDERR_FILENO + 1); 196 197 execl(shell, argv0, "-c", shellcmd, (char *) NULL); 198 fatal("execl failed"); 199 } 200 201 int 202 main(int argc, char **argv) 203 { 204 struct passwd *pw; 205 char *s, *path, *label, **var, tmp[PATH_MAX]; 206 char in[256]; 207 const char *home; 208 long long pid; 209 int opt, flags, keys, session; 210 211 #ifdef DEBUG 212 malloc_options = (char *) "AFGJPX"; 213 #endif 214 215 setlocale(LC_TIME, ""); 216 217 flags = 0; 218 label = path = NULL; 219 login_shell = (**argv == '-'); 220 while ((opt = getopt(argc, argv, "2c:Cdf:lL:qS:uUv")) != -1) { 221 switch (opt) { 222 case '2': 223 flags |= CLIENT_256COLOURS; 224 break; 225 case 'c': 226 free(shell_cmd); 227 shell_cmd = xstrdup(optarg); 228 break; 229 case 'C': 230 if (flags & CLIENT_CONTROL) 231 flags |= CLIENT_CONTROLCONTROL; 232 else 233 flags |= CLIENT_CONTROL; 234 break; 235 case 'f': 236 free(cfg_file); 237 cfg_file = xstrdup(optarg); 238 break; 239 case 'l': 240 login_shell = 1; 241 break; 242 case 'L': 243 free(label); 244 label = xstrdup(optarg); 245 break; 246 case 'q': 247 break; 248 case 'S': 249 free(path); 250 path = xstrdup(optarg); 251 break; 252 case 'u': 253 flags |= CLIENT_UTF8; 254 break; 255 case 'v': 256 debug_level++; 257 break; 258 default: 259 usage(); 260 } 261 } 262 argc -= optind; 263 argv += optind; 264 265 if (shell_cmd != NULL && argc != 0) 266 usage(); 267 268 if (!(flags & CLIENT_UTF8)) { 269 /* 270 * If the user has set whichever of LC_ALL, LC_CTYPE or LANG 271 * exist (in that order) to contain UTF-8, it is a safe 272 * assumption that either they are using a UTF-8 terminal, or 273 * if not they know that output from UTF-8-capable programs may 274 * be wrong. 275 */ 276 if ((s = getenv("LC_ALL")) == NULL || *s == '\0') { 277 if ((s = getenv("LC_CTYPE")) == NULL || *s == '\0') 278 s = getenv("LANG"); 279 } 280 if (s != NULL && (strcasestr(s, "UTF-8") != NULL || 281 strcasestr(s, "UTF8") != NULL)) 282 flags |= CLIENT_UTF8; 283 } 284 285 environ_init(&global_environ); 286 for (var = environ; *var != NULL; var++) 287 environ_put(&global_environ, *var); 288 if (getcwd(tmp, sizeof tmp) != NULL) 289 environ_set(&global_environ, "PWD", tmp); 290 291 options_init(&global_options, NULL); 292 options_table_populate_tree(server_options_table, &global_options); 293 294 options_init(&global_s_options, NULL); 295 options_table_populate_tree(session_options_table, &global_s_options); 296 options_set_string(&global_s_options, "default-shell", "%s", 297 getshell()); 298 299 options_init(&global_w_options, NULL); 300 options_table_populate_tree(window_options_table, &global_w_options); 301 302 /* Enable UTF-8 if the first client is on UTF-8 terminal. */ 303 if (flags & CLIENT_UTF8) { 304 options_set_number(&global_s_options, "status-utf8", 1); 305 options_set_number(&global_s_options, "mouse-utf8", 1); 306 options_set_number(&global_w_options, "utf8", 1); 307 } 308 309 /* Override keys to vi if VISUAL or EDITOR are set. */ 310 if ((s = getenv("VISUAL")) != NULL || (s = getenv("EDITOR")) != NULL) { 311 if (strrchr(s, '/') != NULL) 312 s = strrchr(s, '/') + 1; 313 if (strstr(s, "vi") != NULL) 314 keys = MODEKEY_VI; 315 else 316 keys = MODEKEY_EMACS; 317 options_set_number(&global_s_options, "status-keys", keys); 318 options_set_number(&global_w_options, "mode-keys", keys); 319 } 320 321 /* Locate the configuration file. */ 322 if (cfg_file == NULL) { 323 home = getenv("HOME"); 324 if (home == NULL || *home == '\0') { 325 pw = getpwuid(getuid()); 326 if (pw != NULL) 327 home = pw->pw_dir; 328 else 329 home = NULL; 330 } 331 if (home != NULL) { 332 xasprintf(&cfg_file, "%s/.tmux.conf", home); 333 if (access(cfg_file, R_OK) != 0 && errno == ENOENT) { 334 free(cfg_file); 335 cfg_file = NULL; 336 } 337 } 338 } 339 340 /* Get path from environment. */ 341 s = getenv("TMUX"); 342 if (s != NULL && sscanf(s, "%255[^,],%lld,%d", in, &pid, &session) == 3) 343 environ_path = xstrdup(in); 344 345 /* 346 * Figure out the socket path. If specified on the command-line with -S 347 * or -L, use it, otherwise try $TMUX or assume -L default. 348 */ 349 if (path == NULL) { 350 /* If no -L, use the environment. */ 351 if (label == NULL) { 352 if (environ_path != NULL) 353 path = xstrdup(environ_path); 354 else 355 label = xstrdup("default"); 356 } 357 358 /* -L or default set. */ 359 if (label != NULL) { 360 if ((path = makesocketpath(label)) == NULL) { 361 fprintf(stderr, "can't create socket: %s\n", 362 strerror(errno)); 363 exit(1); 364 } 365 } 366 } 367 free(label); 368 369 if (strlcpy(socket_path, path, sizeof socket_path) >= sizeof socket_path) { 370 fprintf(stderr, "socket path too long: %s\n", path); 371 exit(1); 372 } 373 free(path); 374 375 /* Set process title. */ 376 setproctitle("%s (%s)", __progname, socket_path); 377 378 /* Pass control to the client. */ 379 ev_base = event_init(); 380 exit(client_main(argc, argv, flags)); 381 } 382