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