1 // 2 // The LLVM Compiler Infrastructure 3 // 4 // This file is distributed under the University of Illinois Open Source 5 // License. See LICENSE.TXT for details. 6 7 /* 8 * fail.c 9 * testObjects 10 * 11 * Created by Blaine Garst on 9/16/08. 12 * 13 */ 14 #include <stdio.h> 15 #include <unistd.h> 16 #include <fcntl.h> 17 #include <string.h> 18 #include <stdlib.h> 19 #include <stdbool.h> 20 21 22 bool readfile(char *buffer, const char *from) { 23 int fd = open(from, 0); 24 if (fd < 0) return false; 25 int count = read(fd, buffer, 512); 26 if (count < 0) return false; 27 buffer[count] = 0; // zap newline 28 return true; 29 } 30 31 // basic idea, take compiler args, run compiler, and verify that expected failure matches any existing one 32 33 int main(int argc, char *argv[]) { 34 if (argc == 1) return 0; 35 char *copy[argc+1]; // make a copy 36 // find and strip off -e "errorfile" 37 char *errorfile = NULL; 38 int counter = 0, i = 0; 39 for (i = 1; i < argc; ++i) { // skip 0 arg which is "fail" 40 if (!strncmp(argv[i], "-e", 2)) { 41 errorfile = argv[++i]; 42 } 43 else { 44 copy[counter++] = argv[i]; 45 } 46 } 47 copy[counter] = NULL; 48 pid_t child = fork(); 49 char buffer[512]; 50 if (child == 0) { 51 // in child 52 sprintf(buffer, "/tmp/errorfile_%d", getpid()); 53 close(1); 54 int fd = creat(buffer, 0777); 55 if (fd != 1) { 56 fprintf(stderr, "didn't open custom error file %s as 1, got %d\n", buffer, fd); 57 exit(1); 58 } 59 close(2); 60 dup(1); 61 int result = execv(copy[0], copy); 62 exit(10); 63 } 64 if (child < 0) { 65 printf("fork failed\n"); 66 exit(1); 67 } 68 int status = 0; 69 pid_t deadchild = wait(&status); 70 if (deadchild != child) { 71 printf("wait got %d instead of %d\n", deadchild, child); 72 exit(1); 73 } 74 if (WEXITSTATUS(status) == 0) { 75 printf("compiler exited normally, not good under these circumstances\n"); 76 exit(1); 77 } 78 //printf("exit status of child %d was %d\n", child, WEXITSTATUS(status)); 79 sprintf(buffer, "/tmp/errorfile_%d", child); 80 if (errorfile) { 81 //printf("ignoring error file: %s\n", errorfile); 82 char desired[512]; 83 char got[512]; 84 bool gotErrorFile = readfile(desired, errorfile); 85 bool gotOutput = readfile(got, buffer); 86 if (!gotErrorFile && gotOutput) { 87 printf("didn't read errorfile %s, it should have something from\n*****\n%s\n*****\nin it.\n", 88 errorfile, got); 89 exit(1); 90 } 91 else if (gotErrorFile && gotOutput) { 92 char *where = strstr(got, desired); 93 if (!where) { 94 printf("didn't find contents of %s in %s\n", errorfile, buffer); 95 exit(1); 96 } 97 } 98 else { 99 printf("errorfile %s and output %s inconsistent\n", errorfile, buffer); 100 exit(1); 101 } 102 } 103 unlink(buffer); 104 printf("success\n"); 105 exit(0); 106 } 107 108
