xref: /minix3/external/bsd/tmux/dist/cmd-save-buffer.c (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
1 /* Id */
2 
3 /*
4  * Copyright (c) 2009 Tiago Cunha <me@tiagocunha.org>
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 <fcntl.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <unistd.h>
27 
28 #include "tmux.h"
29 
30 /*
31  * Saves a paste buffer to a file.
32  */
33 
34 enum cmd_retval	 cmd_save_buffer_exec(struct cmd *, struct cmd_q *);
35 
36 const struct cmd_entry cmd_save_buffer_entry = {
37 	"save-buffer", "saveb",
38 	"ab:", 1, 1,
39 	"[-a] " CMD_BUFFER_USAGE " path",
40 	0,
41 	NULL,
42 	cmd_save_buffer_exec
43 };
44 
45 const struct cmd_entry cmd_show_buffer_entry = {
46 	"show-buffer", "showb",
47 	"b:", 0, 0,
48 	CMD_BUFFER_USAGE,
49 	0,
50 	NULL,
51 	cmd_save_buffer_exec
52 };
53 
54 enum cmd_retval
cmd_save_buffer_exec(struct cmd * self,struct cmd_q * cmdq)55 cmd_save_buffer_exec(struct cmd *self, struct cmd_q *cmdq)
56 {
57 	struct args		*args = self->args;
58 	struct client		*c = cmdq->client;
59 	struct session          *s;
60 	struct paste_buffer	*pb;
61 	const char		*path;
62 	char			*cause, *start, *end, *msg;
63 	size_t			 size, used, msglen;
64 	int			 cwd, fd, buffer;
65 	FILE			*f;
66 
67 	if (!args_has(args, 'b')) {
68 		if ((pb = paste_get_top(&global_buffers)) == NULL) {
69 			cmdq_error(cmdq, "no buffers");
70 			return (CMD_RETURN_ERROR);
71 		}
72 	} else {
73 		buffer = args_strtonum(args, 'b', 0, INT_MAX, &cause);
74 		if (cause != NULL) {
75 			cmdq_error(cmdq, "buffer %s", cause);
76 			free(cause);
77 			return (CMD_RETURN_ERROR);
78 		}
79 
80 		pb = paste_get_index(&global_buffers, buffer);
81 		if (pb == NULL) {
82 			cmdq_error(cmdq, "no buffer %d", buffer);
83 			return (CMD_RETURN_ERROR);
84 		}
85 	}
86 
87 	if (self->entry == &cmd_show_buffer_entry)
88 		path = "-";
89 	else
90 		path = args->argv[0];
91 	if (strcmp(path, "-") == 0) {
92 		if (c == NULL) {
93 			cmdq_error(cmdq, "can't write to stdout");
94 			return (CMD_RETURN_ERROR);
95 		}
96 		if (c->session == NULL || (c->flags & CLIENT_CONTROL))
97 			goto do_stdout;
98 		goto do_print;
99 	}
100 
101 	if (c != NULL && c->session == NULL)
102 		cwd = c->cwd;
103 	else if ((s = cmd_current_session(cmdq, 0)) != NULL)
104 		cwd = s->cwd;
105 	else
106 		cwd = AT_FDCWD;
107 
108 	f = NULL;
109 	if (args_has(self->args, 'a')) {
110 		fd = openat(cwd, path, O_CREAT|O_RDWR|O_APPEND, 0600);
111 		if (fd != -1)
112 			f = fdopen(fd, "ab");
113 	} else {
114 		fd = openat(cwd, path, O_CREAT|O_RDWR, 0600);
115 		if (fd != -1)
116 			f = fdopen(fd, "wb");
117 	}
118 	if (f == NULL) {
119 		if (fd != -1)
120 			close(fd);
121 		cmdq_error(cmdq, "%s: %s", path, strerror(errno));
122 		return (CMD_RETURN_ERROR);
123 	}
124 	if (fwrite(pb->data, 1, pb->size, f) != pb->size) {
125 		cmdq_error(cmdq, "%s: fwrite error", path);
126 		fclose(f);
127 		return (CMD_RETURN_ERROR);
128 	}
129 	fclose(f);
130 
131 	return (CMD_RETURN_NORMAL);
132 
133 do_stdout:
134 	evbuffer_add(c->stdout_data, pb->data, pb->size);
135 	server_push_stdout(c);
136 	return (CMD_RETURN_NORMAL);
137 
138 do_print:
139 	if (pb->size > (INT_MAX / 4) - 1) {
140 		cmdq_error(cmdq, "buffer too big");
141 		return (CMD_RETURN_ERROR);
142 	}
143 	msg = NULL;
144 	msglen = 0;
145 
146 	used = 0;
147 	while (used != pb->size) {
148 		start = pb->data + used;
149 		end = memchr(start, '\n', pb->size - used);
150 		if (end != NULL)
151 			size = end - start;
152 		else
153 			size = pb->size - used;
154 
155 		msglen = size * 4 + 1;
156 		msg = xrealloc(msg, 1, msglen);
157 
158 		strvisx(msg, start, size, VIS_OCTAL|VIS_TAB);
159 		cmdq_print(cmdq, "%s", msg);
160 
161 		used += size + (end != NULL);
162 	}
163 
164 	free(msg);
165 	return (CMD_RETURN_NORMAL);
166 }
167