xref: /netbsd-src/tests/lib/libcurses/slave/slave.c (revision 1b9578b8c2c1f848eeb16dabbfd7d1f0d9fdefbd)
1 /*	$NetBSD: slave.c,v 1.5 2011/06/17 02:15:28 christos Exp $	*/
2 
3 /*-
4  * Copyright 2009 Brett Lymn <blymn@NetBSD.org>
5  *
6  * All rights reserved.
7  *
8  * This code has been donated to The NetBSD Foundation by the Author.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. The name of the author may not be used to endorse or promote products
16  *    derived from this software withough specific prior written permission
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  *
29  *
30  */
31 #include <fcntl.h>
32 #include <sys/ioctl.h>
33 #include <unistd.h>
34 #include <err.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <string.h>
38 #include <curses.h>
39 #include "returns.h"
40 #include "slave.h"
41 
42 int cmdpipe[2];
43 int slvpipe[2];
44 
45 #if 0
46 static const char *returns_enum_names[] = {
47 	"unused", "numeric", "string", "byte", "ERR", "OK", "NULL", "not NULL",
48 	"variable"
49 };
50 #endif
51 
52 /*
53  * Read the command pipe for the function to execute, gather the args
54  * and then process the command.
55  */
56 static void
57 process_commands(WINDOW *mainscr)
58 {
59 	int len, maxlen, argslen, i, ret, type;
60 	char *cmdbuf, *tmpbuf, **args, **tmpargs;
61 
62 	len = maxlen = 30;
63 	if ((cmdbuf = malloc(maxlen)) == NULL)
64 		err(1, "slave cmdbuf malloc failed");
65 
66 	while(1) {
67 		if (read(cmdpipe[READ_PIPE], &type, sizeof(int)) < 0)
68 			err(1, "slave command type read failed");
69 
70 		if (type != ret_string)
71 			errx(1, "Unexpected type for command, got %d", type);
72 
73 		if (read(cmdpipe[READ_PIPE], &len, sizeof(int)) < 0)
74 			err(1, "slave command len read failed");
75 
76 		if ((len + 1) > maxlen) {
77 			maxlen = len + 1;
78 			if ((tmpbuf = realloc(cmdbuf, maxlen)) == NULL)
79 				err(1, "slave cmdbuf realloc to %d "
80 				    "bytes failed", maxlen);
81 			cmdbuf = tmpbuf;
82 		}
83 
84 		if (read(cmdpipe[READ_PIPE], cmdbuf, len) < 0)
85 			err(1, "slave command read failed");
86 		cmdbuf[len] = '\0';
87 
88 		argslen = 0;
89 		args = NULL;
90 
91 		do {
92 			if (read(cmdpipe[READ_PIPE], &type, sizeof(int)) < 0)
93 				err(1, "slave arg type read failed");
94 
95 			if (read(cmdpipe[READ_PIPE], &len, sizeof(int)) < 0)
96 				err(1, "slave arg len read failed");
97 
98 			if (len >= 0) {
99 				tmpargs = realloc(args,
100 				    (argslen + 1) * sizeof(char *));
101 				if (tmpargs == NULL)
102 					err(1, "slave realloc of args array "
103 					    "failed");
104 
105 				args = tmpargs;
106 				if (type != ret_null)
107 					args[argslen] = malloc(len + 1);
108 
109 				if (args[argslen] == NULL)
110 					err(1, "slave alloc of %d bytes for"
111 					    " args failed", len);
112 
113 				if (len == 0) {
114 					if (type == ret_null)
115 						args[argslen] = NULL;
116 					else
117 						args[argslen][0] = '\0';
118 				} else {
119 					read(cmdpipe[READ_PIPE], args[argslen],
120 					     len);
121 					if (type != ret_byte)
122 						args[argslen][len] = '\0';
123 
124 					if (len == 6) {
125 						if (strcmp(args[argslen],
126 							   "STDSCR") == 0) {
127 							ret = asprintf(&tmpbuf,
128 								 "%p",
129 								 stdscr);
130 							if (ret < 0)
131 								err(2,
132 								    "asprintf of stdscr failed");
133 							free(args[argslen]);
134 							args[argslen] = tmpbuf;
135 						}
136 					}
137 				}
138 
139 				argslen++;
140 			}
141 		}
142 		while(len >= 0);
143 
144 
145 		command_execute(cmdbuf, argslen, args);
146 
147 		if (args != NULL) {
148 			for (i = 0; i < argslen; i++)
149 				free(args[i]);
150 
151 			free(args);
152 		}
153 	}
154 }
155 
156 int
157 main(int argc, char *argv[])
158 {
159 	WINDOW *mainscr;
160 
161 	if (argc != 5) {
162 		fprintf(stderr, "Usage: %s <cmdin> <cmdout> <slvin> slvout>\n",
163 			getprogname());
164 		return 0;
165 	}
166 	sscanf(argv[1], "%d", &cmdpipe[0]);
167 	sscanf(argv[2], "%d", &cmdpipe[1]);
168 	sscanf(argv[3], "%d", &slvpipe[0]);
169 	sscanf(argv[4], "%d", &slvpipe[1]);
170 
171 	mainscr = initscr();
172 	if (mainscr == NULL)
173 		err(1, "initscr failed");
174 
175 	process_commands(mainscr);
176 
177 	return 0;
178 }
179