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 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 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 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