xref: /freebsd/crypto/heimdal/lib/roken/test-readenv.c (revision 6a068746777241722b2b32c5d0bc443a2a64d80b)
1c19800e8SDoug Rabson /*
2*ae771770SStanislav Sedov  * Copyright (c) 2005 Kungliga Tekniska Högskolan
3c19800e8SDoug Rabson  * (Royal Institute of Technology, Stockholm, Sweden).
4c19800e8SDoug Rabson  * All rights reserved.
5c19800e8SDoug Rabson  *
6c19800e8SDoug Rabson  * Redistribution and use in source and binary forms, with or without
7c19800e8SDoug Rabson  * modification, are permitted provided that the following conditions
8c19800e8SDoug Rabson  * are met:
9c19800e8SDoug Rabson  *
10c19800e8SDoug Rabson  * 1. Redistributions of source code must retain the above copyright
11c19800e8SDoug Rabson  *    notice, this list of conditions and the following disclaimer.
12c19800e8SDoug Rabson  *
13c19800e8SDoug Rabson  * 2. Redistributions in binary form must reproduce the above copyright
14c19800e8SDoug Rabson  *    notice, this list of conditions and the following disclaimer in the
15c19800e8SDoug Rabson  *    documentation and/or other materials provided with the distribution.
16c19800e8SDoug Rabson  *
17c19800e8SDoug Rabson  * 3. Neither the name of the Institute nor the names of its contributors
18c19800e8SDoug Rabson  *    may be used to endorse or promote products derived from this software
19c19800e8SDoug Rabson  *    without specific prior written permission.
20c19800e8SDoug Rabson  *
21c19800e8SDoug Rabson  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22c19800e8SDoug Rabson  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23c19800e8SDoug Rabson  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24c19800e8SDoug Rabson  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25c19800e8SDoug Rabson  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26c19800e8SDoug Rabson  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27c19800e8SDoug Rabson  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28c19800e8SDoug Rabson  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29c19800e8SDoug Rabson  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30c19800e8SDoug Rabson  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31c19800e8SDoug Rabson  * SUCH DAMAGE.
32c19800e8SDoug Rabson  */
33c19800e8SDoug Rabson 
34c19800e8SDoug Rabson #include <config.h>
35c19800e8SDoug Rabson 
36c19800e8SDoug Rabson #include "roken.h"
37c19800e8SDoug Rabson #include "test-mem.h"
38c19800e8SDoug Rabson 
39c19800e8SDoug Rabson char *s1 = "VAR1=VAL1#comment\n\
40c19800e8SDoug Rabson VAR2=VAL2 VAL2 #comment\n\
41c19800e8SDoug Rabson #this another comment\n\
42c19800e8SDoug Rabson \n\
43c19800e8SDoug Rabson VAR3=FOO";
44c19800e8SDoug Rabson 
45c19800e8SDoug Rabson char *s2 = "VAR1=ENV2\n\
46c19800e8SDoug Rabson ";
47c19800e8SDoug Rabson 
48c19800e8SDoug Rabson static void
make_file(char * tmpl,size_t l)49c19800e8SDoug Rabson make_file(char *tmpl, size_t l)
50c19800e8SDoug Rabson {
51c19800e8SDoug Rabson     int fd;
52c19800e8SDoug Rabson     strlcpy(tmpl, "env.XXXXXX", l);
53c19800e8SDoug Rabson     fd = mkstemp(tmpl);
54c19800e8SDoug Rabson     if(fd < 0)
55c19800e8SDoug Rabson 	err(1, "mkstemp");
56c19800e8SDoug Rabson     close(fd);
57c19800e8SDoug Rabson }
58c19800e8SDoug Rabson 
59c19800e8SDoug Rabson static void
write_file(const char * fn,const char * s)60c19800e8SDoug Rabson write_file(const char *fn, const char *s)
61c19800e8SDoug Rabson {
62c19800e8SDoug Rabson     FILE *f;
63c19800e8SDoug Rabson     f = fopen(fn, "w");
64c19800e8SDoug Rabson     if(f == NULL) {
65c19800e8SDoug Rabson 	unlink(fn);
66c19800e8SDoug Rabson 	err(1, "fopen");
67c19800e8SDoug Rabson     }
68c19800e8SDoug Rabson     if(fwrite(s, 1, strlen(s), f) != strlen(s))
69c19800e8SDoug Rabson 	err(1, "short write");
70c19800e8SDoug Rabson     if(fclose(f) != 0) {
71c19800e8SDoug Rabson 	unlink(fn);
72c19800e8SDoug Rabson 	err(1, "fclose");
73c19800e8SDoug Rabson     }
74c19800e8SDoug Rabson }
75c19800e8SDoug Rabson 
76c19800e8SDoug Rabson int
main(int argc,char ** argv)77c19800e8SDoug Rabson main(int argc, char **argv)
78c19800e8SDoug Rabson {
79c19800e8SDoug Rabson     char **env = NULL;
80c19800e8SDoug Rabson     int count = 0;
81c19800e8SDoug Rabson     char fn[MAXPATHLEN];
82c19800e8SDoug Rabson     int error = 0;
83c19800e8SDoug Rabson 
84c19800e8SDoug Rabson     make_file(fn, sizeof(fn));
85c19800e8SDoug Rabson 
86c19800e8SDoug Rabson     write_file(fn, s1);
87c19800e8SDoug Rabson     count = read_environment(fn, &env);
88c19800e8SDoug Rabson     if(count != 3) {
89c19800e8SDoug Rabson 	warnx("test 1: variable count %d != 3", count);
90c19800e8SDoug Rabson 	error++;
91c19800e8SDoug Rabson     }
92c19800e8SDoug Rabson 
93c19800e8SDoug Rabson     write_file(fn, s2);
94c19800e8SDoug Rabson     count = read_environment(fn, &env);
95c19800e8SDoug Rabson     if(count != 1) {
96c19800e8SDoug Rabson 	warnx("test 2: variable count %d != 1", count);
97c19800e8SDoug Rabson 	error++;
98c19800e8SDoug Rabson     }
99c19800e8SDoug Rabson 
100c19800e8SDoug Rabson     unlink(fn);
101c19800e8SDoug Rabson     count = read_environment(fn, &env);
102c19800e8SDoug Rabson     if(count != 0) {
103c19800e8SDoug Rabson 	warnx("test 3: variable count %d != 0", count);
104c19800e8SDoug Rabson 	error++;
105c19800e8SDoug Rabson     }
106c19800e8SDoug Rabson     for(count = 0; env && env[count]; count++);
107c19800e8SDoug Rabson     if(count != 3) {
108c19800e8SDoug Rabson 	warnx("total variable count %d != 3", count);
109c19800e8SDoug Rabson 	error++;
110c19800e8SDoug Rabson     }
111c19800e8SDoug Rabson     free_environment(env);
112c19800e8SDoug Rabson 
113c19800e8SDoug Rabson 
114c19800e8SDoug Rabson     return error;
115c19800e8SDoug Rabson }
116