xref: /netbsd-src/external/bsd/tmux/dist/cmd-save-buffer.c (revision f3cfa6f6ce31685c6c4a758bc430e69eb99f50a4)
1 /* $OpenBSD$ */
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 static enum cmd_retval	cmd_save_buffer_exec(struct cmd *, struct cmdq_item *);
35 
36 const struct cmd_entry cmd_save_buffer_entry = {
37 	.name = "save-buffer",
38 	.alias = "saveb",
39 
40 	.args = { "ab:", 1, 1 },
41 	.usage = "[-a] " CMD_BUFFER_USAGE " path",
42 
43 	.flags = CMD_AFTERHOOK,
44 	.exec = cmd_save_buffer_exec
45 };
46 
47 const struct cmd_entry cmd_show_buffer_entry = {
48 	.name = "show-buffer",
49 	.alias = "showb",
50 
51 	.args = { "b:", 0, 0 },
52 	.usage = CMD_BUFFER_USAGE,
53 
54 	.flags = CMD_AFTERHOOK,
55 	.exec = cmd_save_buffer_exec
56 };
57 
58 static enum cmd_retval
59 cmd_save_buffer_exec(struct cmd *self, struct cmdq_item *item)
60 {
61 	struct args		*args = self->args;
62 	struct client		*c = cmd_find_client(item, NULL, 1);
63 	struct session		*s = item->target.s;
64 	struct winlink		*wl = item->target.wl;
65 	struct window_pane	*wp = item->target.wp;
66 	struct paste_buffer	*pb;
67 	const char		*bufname, *bufdata, *start, *end, *flags;
68 	char			*msg, *path, *file;
69 	size_t			 size, used, msglen, bufsize;
70 	FILE			*f;
71 
72 	if (!args_has(args, 'b')) {
73 		if ((pb = paste_get_top(NULL)) == NULL) {
74 			cmdq_error(item, "no buffers");
75 			return (CMD_RETURN_ERROR);
76 		}
77 	} else {
78 		bufname = args_get(args, 'b');
79 		pb = paste_get_name(bufname);
80 		if (pb == NULL) {
81 			cmdq_error(item, "no buffer %s", bufname);
82 			return (CMD_RETURN_ERROR);
83 		}
84 	}
85 	bufdata = paste_buffer_data(pb, &bufsize);
86 
87 	if (self->entry == &cmd_show_buffer_entry)
88 		path = xstrdup("-");
89 	else
90 		path = format_single(item, args->argv[0], c, s, wl, wp);
91 	if (strcmp(path, "-") == 0) {
92 		free(path);
93 		c = item->client;
94 		if (c == NULL) {
95 			cmdq_error(item, "can't write to stdout");
96 			return (CMD_RETURN_ERROR);
97 		}
98 		if (c->session == NULL || (c->flags & CLIENT_CONTROL))
99 			goto do_stdout;
100 		goto do_print;
101 	}
102 
103 	flags = "wb";
104 	if (args_has(self->args, 'a'))
105 		flags = "ab";
106 
107 	file = server_client_get_path(c, path);
108 	free(path);
109 
110 	f = fopen(file, flags);
111 	if (f == NULL) {
112 		cmdq_error(item, "%s: %s", file, strerror(errno));
113 		free(file);
114 		return (CMD_RETURN_ERROR);
115 	}
116 
117 	if (fwrite(bufdata, 1, bufsize, f) != bufsize) {
118 		cmdq_error(item, "%s: write error", file);
119 		fclose(f);
120 		free(file);
121 		return (CMD_RETURN_ERROR);
122 	}
123 
124 	fclose(f);
125 	free(file);
126 
127 	return (CMD_RETURN_NORMAL);
128 
129 do_stdout:
130 	evbuffer_add(c->stdout_data, bufdata, bufsize);
131 	server_client_push_stdout(c);
132 	return (CMD_RETURN_NORMAL);
133 
134 do_print:
135 	if (bufsize > (INT_MAX / 4) - 1) {
136 		cmdq_error(item, "buffer too big");
137 		return (CMD_RETURN_ERROR);
138 	}
139 	msg = NULL;
140 
141 	used = 0;
142 	while (used != bufsize) {
143 		start = bufdata + used;
144 		end = memchr(start, '\n', bufsize - used);
145 		if (end != NULL)
146 			size = end - start;
147 		else
148 			size = bufsize - used;
149 
150 		msglen = size * 4 + 1;
151 		msg = xrealloc(msg, msglen);
152 
153 		strvisx(msg, start, size, VIS_OCTAL|VIS_TAB);
154 		cmdq_print(item, "%s", msg);
155 
156 		used += size + (end != NULL);
157 	}
158 
159 	free(msg);
160 	return (CMD_RETURN_NORMAL);
161 }
162