projects/dstress: dstress.c annotate

annotate dstress.c @ 432:db4b6169a99d

1) implemented checkRuntimeErrorMessage 2) fixed norun test cases

author	thomask
date	Fri, 15 Apr 2005 08:55:00 +0000
parents	1185c50d4b08
children	5e210bace0f1

rev	line source
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	1 /*
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	2 * core test tool for the DStress test suite
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	3 * http://dstress.kuehne.cn
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	4 *
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	5 * Copyright (C) 2005 Thomas Kuehne <thomas@kuehne.cn>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	6 *
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	7 * This program is free software; you can redistribute it and/or modify
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	8 * it under the terms of the GNU General Public License as published by
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	9 * the Free Software Foundation; either version 2 of the License, or
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	10 * (at your option) any later version.
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	11 *
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	12 * This program is distributed in the hope that it will be useful,
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	15 * GNU General Public License for more details.
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	16 *
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	17 * You should have received a copy of the GNU General Public License
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	18 * along with this program; if not, write to the Free Software
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	20 *
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	21 * $HeadURL$
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	22 * $Date$
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	23 * $Author$
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	24 *
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	25 */
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	26
432 db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	27 // Beware: the code doesn't care about freeing allocated memory
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	28
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	29 #include <stdlib.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	30 #include <stdio.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	31 #include <string.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	32 #include <errno.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	33
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	34 #define TAG "__DSTRESS_DFLAGS__"
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	35 #define OBJ "-odobj "
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	36 #define TLOG "log.tmp"
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	37
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	38 #define RUN 1
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	39 #define NORUN 2
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	40 #define COMPILE 4
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	41 #define NOCOMPILE 8
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	42
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	43 #ifdef __GNU_LIBRARY__
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	44 #define USE_POSIX
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	45 #endif
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	46
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	47 #ifdef __GLIBC__
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	48 #define USE_POSIX
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	49 #endif
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	50
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	51 #ifdef linux
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	52 #define USE_POSIX
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	53 #endif
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	54
273 68b883fe4fad added BSD support to the test framework thomask* parents: 261 diff changeset	55 #if defined(__APPLE__) && defined(__MACH__)
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	56 #define USE_POSIX
273 68b883fe4fad added BSD support to the test framework thomask* parents: 261 diff changeset	57 #endif
68b883fe4fad added BSD support to the test framework thomask* parents: 261 diff changeset	58
68b883fe4fad added BSD support to the test framework thomask* parents: 261 diff changeset	59 #ifdef __FreeBSD__
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	60 #define USE_POSIX
273 68b883fe4fad added BSD support to the test framework thomask* parents: 261 diff changeset	61 #endif
68b883fe4fad added BSD support to the test framework thomask* parents: 261 diff changeset	62
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	63
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	64 #ifdef USE_POSIX
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	65
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	66 #define RETURN_OK 0
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	67 #define RETURN_FAIL 256
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	68 #define crashRun system
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	69
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	70 #include <sys/types.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	71 #include <sys/stat.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	72 #include <fcntl.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	73 #include <unistd.h>
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	74 char* loadFile(char* filename){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	75 char* back = NULL;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	76 struct stat fileInfo;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	77 int file = open(filename, O_RDONLY);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	78 if(errno == 0 && file != 0 && file != -1){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	79 if(0==fstat(file, &fileInfo)){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	80 back=malloc(fileInfo.st_size+1);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	81 fileInfo.st_size = read(file, back, fileInfo.st_size);
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	82 if(fileInfo.st_size>0){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	83 *(back+fileInfo.st_size+1) = '\x00';
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	84 }else{
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	85 back = "\x00";
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	86 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	87 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	88 close(file);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	89 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	90 return back;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	91 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	92
429 1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	93 void *xmalloc(size_t size)
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	94 {
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	95 void *p;
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	96 if (p < 0)
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	97 {
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	98 fprintf(stderr,"Failed to allocate %ld bytes!\n", size);
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	99 exit(1);
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	100 }
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	101 p = malloc(size);
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	102 if (p == NULL)
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	103 {
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	104 fprintf(stderr,"Failed to allocate %ld bytes!\n", size);
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	105 exit(1);
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	106 }
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	107 return p;
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	108 }
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	109
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	110 #define malloc xmalloc
1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	111
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	112 #else
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	113
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	114 #ifdef WIN32
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	115
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	116 #define RETURN_OK 0
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	117 #define RETURN_FAIL 1
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	118
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	119 #include <windows.h>
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	120 char* loadFile(char* filename){
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	121 char* back=NULL;
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	122 DWORD size, numread;
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	123 HANDLE file=CreateFile(filename, GENERIC_READ, FILE_SHARE_READ, NULL,
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	124 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL \| FILE_FLAG_SEQUENTIAL_SCAN, NULL);
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	125 if (file != INVALID_HANDLE_VALUE){
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	126 size = GetFileSize(file, NULL);
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	127 if (size != INVALID_FILE_SIZE){
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	128 back=malloc((size+1)*sizeof(char));
292 7e28d437d6d7 fixed Windows loadFile return code bug thomask parents: 273 diff changeset	129 if (ReadFile(file,back,size,&numread,NULL) == 1){
7e28d437d6d7 fixed Windows loadFile return code bug thomask parents: 273 diff changeset	130 if (numread==size){
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	131 *(back+size+1) = '\x00';
292 7e28d437d6d7 fixed Windows loadFile return code bug thomask parents: 273 diff changeset	132 }else{
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	133 back = "\x00";
292 7e28d437d6d7 fixed Windows loadFile return code bug thomask parents: 273 diff changeset	134 }
7e28d437d6d7 fixed Windows loadFile return code bug thomask parents: 273 diff changeset	135 }else{
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	136 back = "\x00";
292 7e28d437d6d7 fixed Windows loadFile return code bug thomask parents: 273 diff changeset	137 }
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	138 }
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	139 CloseHandle(file);
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	140 }
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	141 errno = 0;
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	142 return back;
a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	143 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	144 #error no crashRun adaptation for this system available
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	145
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	146 #else
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	147 #error no loadFile adaptation for this system available
361 0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	148 #error no crashRun adaptation for this system available /* like system(char) but has to return without human intervention even if the application segfaults /
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	149
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	150 #endif /* WIN32 else */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	151 #endif /* USE_POSIX else */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	152
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	153 /* Query the environment for the compiler name */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	154 char* getCompiler(){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	155 char* back = getenv("DMD");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	156 if(back == NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	157 back = getenv("dmd");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	158 if(back==NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	159 back = "dmd";
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	160 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	161 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	162 return back;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	163 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	164
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	165 /* Query the environment for general flags */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	166 char* getGeneralFlags(){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	167 char* back = getenv("DFLAGS");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	168 if(back == NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	169 back = getenv("dflags");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	170 if(back==NULL){
432 db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	171 back = calloc(1,1);
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	172 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	173 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	174 return back;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	175 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	176
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	177 /* extract the FIRST occurance of a given FLAG until the next linebreak */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	178 char* getCaseFlag(const char* data, const char* tag){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	179 char* begin;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	180 char* end1;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	181 char* end2;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	182 char* back;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	183
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	184 if(data!=NULL && tag!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	185 begin = strstr(data, tag);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	186 if(begin!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	187 begin = begin+strlen(tag);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	188 end1 = strstr(begin, "\n");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	189 end2 = strstr(begin, "\r");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	190 if(end2!=NULL && ((end1!=NULL && end2<end1) \|\| end1==NULL)){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	191 end1=end2;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	192 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	193 if(end1==NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	194 end1 = begin + strlen(begin);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	195 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	196 back = malloc(end1-begin+1);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	197 strncpy(back, begin, end1-begin);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	198 back[end1-begin+1]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	199 return back;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	200 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	201 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	202
429 1185c50d4b08 fix dstress.c's memory handling thomask parents: 405 diff changeset	203 return calloc(1,1);
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	204 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	205
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	206
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	207 int checkErrorMessage(const char* file_, const char* line_, const char* buffer){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	208
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	209 char* file;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	210 char* line;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	211 char* dmd;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	212 char* gdc;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	213
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	214 char* begin;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	215 char* end1;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	216 char* end2;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	217
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	218 int back=0;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	219
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	220 /* clean arguments */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	221 if(strcmp(file_, "")!=0){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	222 file = malloc(strlen(file_)+1);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	223 strcpy(file, file_);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	224 }else{
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	225 file=NULL;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	226 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	227
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	228 if(strcmp(line_, "")!=0){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	229 line = malloc(strlen(line_)+1);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	230 strcpy(line, line_);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	231 }else{
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	232 line=NULL;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	233 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	234
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	235 /* gen patterns*/
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	236 if(file!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	237 if(line!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	238 dmd = malloc(strlen(file)+strlen(line)+5);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	239 dmd[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	240 strcat(dmd, file);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	241 strcat(dmd, "(");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	242 strcat(dmd, line);
405 7df87732c662 fixed DMD's pattern generator for in-message location thomask parents: 373 diff changeset	243 strcat(dmd, ")");
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	244 gdc = malloc(strlen(file)+strlen(line)+4);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	245 gdc[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	246 strcat(gdc, file);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	247 strcat(gdc, ":");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	248 strcat(gdc, line);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	249 strcat(gdc, ": ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	250 }else{
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	251 dmd = malloc(strlen(file)+2);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	252 dmd[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	253 strcat(dmd, file);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	254 strcat(dmd, "(");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	255 gdc = malloc(strlen(file)+2);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	256 gdc[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	257 strcat(gdc, file);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	258 strcat(gdc, ":");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	259 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	260 }else if(line!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	261 dmd = malloc(strlen(line)+5);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	262 dmd[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	263 strcat(dmd, "(");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	264 strcat(dmd, line);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	265 strcat(dmd, "): ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	266 gdc = malloc(strlen(line)+4);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	267 gdc[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	268 strcat(gdc, ":");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	269 strcat(gdc, line);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	270 strcat(gdc, ": ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	271 }else{
432 db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	272 return 1;
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	273 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	274
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	275 /* fix filenames */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	276 #ifdef WIN32
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	277 end1="/";
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	278 end2="\\";
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	279 #else
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	280 end1="\\";
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	281 end2="/";
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	282 #endif
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	283
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	284 if(dmd!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	285 while( (begin=strchr(dmd, end1[0])) ){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	286 begin[0]=end2[0];
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	287 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	288 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	289
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	290 if(gdc!=NULL){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	291 while( (begin=strchr(gdc, end1[0])) ){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	292 begin[0]=end2[0];
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	293 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	294 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	295
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	296 /* specific error messages */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	297
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	298 if( (dmd!=NULL && strstr(buffer, dmd))
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	299 \|\| (gdc!=NULL && strstr(buffer, gdc))
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	300 \|\| (dmd==NULL && gdc==NULL)){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	301 back=1;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	302 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	303
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	304 return back;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	305 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	306
432 db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	307 int checkRuntimeErrorMessage(const char* file_, const char* line_, const char* buffer){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	308 // Phobos(dmd & gdc): dir/file.d(2)
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	309
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	310 char* file;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	311 char* line;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	312 char* phobos;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	313 char* phobosLong;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	314
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	315 char* begin;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	316 char* end1;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	317 char* end2;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	318
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	319 int back=0;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	320
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	321 /* clean arguments */
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	322 if(strcmp(file_, "")!=0){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	323 file = malloc(strlen(file_)+1);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	324 strcpy(file, file_);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	325 }else{
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	326 file=NULL;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	327 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	328
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	329 if(strcmp(line_, "")!=0){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	330 line = malloc(strlen(line_)+1);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	331 strcpy(line, line_);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	332 }else{
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	333 line=NULL;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	334 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	335
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	336 /* gen patterns*/
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	337 if(file!=NULL){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	338 if(line!=NULL){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	339 phobos = malloc(strlen(file)+strlen(line)+5);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	340 phobos[0]='\x00';
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	341 if(begin=rindex(file,'/')){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	342 begin++;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	343 }else if(begin=rindex(file,'\\')){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	344 begin++;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	345 }else{
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	346 begin=file;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	347 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	348 end1=rindex(file,'.');
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	349 strncat(phobos, begin, end1-begin);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	350 strcat(phobos, "(");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	351 strcat(phobos, line);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	352 strcat(phobos, ")");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	353
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	354 phobosLong = malloc(strlen(file)+strlen(line)+5);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	355 phobosLong[0]='\x00';
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	356 strcat(phobosLong, file);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	357 strcat(phobosLong, "(");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	358 strcat(phobosLong, line);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	359 strcat(phobosLong, ")");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	360
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	361 }else{
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	362 phobos = malloc(strlen(file)+2);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	363 phobos[0]='\x00';
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	364 if(begin=rindex(file,'/')){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	365 begin++;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	366 }else if(begin=rindex(file,'\\')){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	367 begin++;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	368 }else{
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	369 begin=file;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	370 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	371 end1=rindex(file,'.');
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	372 strncat(phobos, begin, end1-begin);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	373 strcat(phobos, "(");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	374
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	375 phobosLong = malloc(strlen(file)+2);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	376 phobosLong[0]='\x00';
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	377 strcat(phobosLong, file);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	378 strcat(phobosLong, "(");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	379 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	380 }else if(line!=NULL){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	381 phobos = malloc(strlen(line)+3);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	382 phobos[0]='\x00';
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	383 strcat(phobos, "(");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	384 strcat(phobos, line);
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	385 strcat(phobos, ")");
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	386
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	387 phobosLong=NULL;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	388 }else{
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	389 return 1;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	390 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	391
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	392 /* fix filenames */
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	393 #ifdef WIN32
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	394 end1="/";
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	395 end2="\\";
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	396 #else
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	397 end1="\\";
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	398 end2="/";
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	399 #endif
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	400
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	401 if(phobos){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	402 while( (begin=strchr(phobos, end1[0])) ){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	403 begin[0]=end2[0];
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	404 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	405 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	406
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	407 if(phobosLong){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	408 while( (begin=strchr(phobosLong, end1[0])) ){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	409 begin[0]=end2[0];
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	410 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	411 while(phobosLong[0]==end2[0]){
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	412 phobosLong++;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	413 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	414 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	415 /* specific error messages */
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	416
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	417 if( (phobos && strstr(buffer, phobos))
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	418 \|\| (phobosLong && strstr(buffer, phobosLong)))
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	419 {
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	420 back=1;
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	421 }
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	422
db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	423 return back;
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	424 return 1;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	425 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	426
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	427
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	428 int main(int argc, char* arg[]){
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	429 char* compiler; /* the compiler */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	430 char* cmd_arg_general; /* additional arguments - from enviroment flag "DFLAGS" */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	431 char* cmd_arg_case; /* additional arguments - from the testcase file */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	432 char* buffer; /* general purpos buffer */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	433 int modus; /* test modus: RUN NORUN COMPILE NOCOMPILE */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	434 int res; /* return code from external executions */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	435 char* error_file; /* expected sourcefile containing the error */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	436 char* error_line; /* expected error line */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	437 int good_error; /* error contained file and line and matched the expectations */
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	438
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	439 /* check arguments */
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	440 if(argc != 3){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	441 err: if(argc!=0)
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	442 fprintf(stderr,"%s <run\|norun\|compile\|nocompile> <source>\n", arg[0]);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	443 else
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	444 fprintf(stderr,"dstress.exe <run\|norun\|compile\|nocompile> <source>\n");
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	445 exit(-1);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	446 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	447
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	448 if(0==strcmp(arg[1], "run") \|\| 0==strcmp(arg[1], "RUN")){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	449 modus = RUN;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	450 }else if(0==strcmp(arg[1], "norun") \|\| 0==strcmp(arg[1], "NORUN")){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	451 modus = NORUN;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	452 }else if(0==strcmp(arg[1], "compile") \|\| 0==strcmp(arg[1], "COMPILE")){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	453 modus = COMPILE;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	454 }else if(0==strcmp(arg[1], "nocompile") \|\| 0==strcmp(arg[1], "NOCOMPILE")){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	455 modus = NOCOMPILE;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	456 }else{
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	457 goto err;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	458 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	459
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	460 /* gen flags */
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	461 compiler = getCompiler();
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	462 cmd_arg_general = getGeneralFlags();
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	463 buffer = loadFile(arg[2]);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	464
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	465 cmd_arg_case = getCaseFlag(buffer, "__DSTRESS_DFLAGS__");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	466 error_line = getCaseFlag(buffer, "__DSTRESS_ELINE__");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	467 error_file = getCaseFlag(buffer, "__DSTRESS_EFILE__");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	468
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	469 /* strip spaces */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	470 while(error_line[0]==' '){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	471 error_line++;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	472 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	473 for(buffer=error_line+strlen(error_line)-1; buffer && buffer[0]==' '; buffer=error_line+strlen(error_line)-1){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	474 buffer[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	475 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	476 while(error_file[0]==' '){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	477 error_file++;
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	478 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	479 for(buffer=error_file+strlen(error_file)-1; buffer && buffer[0]==' '; buffer=error_file+strlen(error_file)-1){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	480 buffer[0]='\x00';
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	481 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	482
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	483 /* set implicit source file */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	484 if(strcmp(error_line, "")!=0 && strcmp(error_file, "")==0){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	485 error_file=arg[2];
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	486 }
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	487
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	488 /* start working */
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	489 if(modus==COMPILE \|\| modus==NOCOMPILE){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	490 /* gen command */
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	491 buffer = malloc(strlen(compiler)+strlen(cmd_arg_general)+strlen(cmd_arg_case)+strlen(OBJ)
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	492 +strlen(arg[2])+strlen(TLOG)+64);
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	493 buffer[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	494 strcat(buffer, compiler);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	495 strcat(buffer, " ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	496 strcat(buffer, cmd_arg_general);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	497 strcat(buffer, " ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	498 strcat(buffer, cmd_arg_case);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	499 strcat(buffer, " -c ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	500 if(NULL==strstr(buffer, "-od")){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	501 strcat(buffer, OBJ);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	502 strcat(buffer, " ");
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	503 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	504 strcat(buffer, arg[2]);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	505 strcat(buffer, " 1> ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	506 strcat(buffer, TLOG);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	507 strcat(buffer, " 2>&1");
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	508
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	509 /* test */
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	510 if(modus==COMPILE){
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	511 fprintf(stderr, "compile: %s\n", buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	512 }else{
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	513 fprintf(stderr, "nocompile: %s\n", buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	514 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	515 res = crashRun(buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	516
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	517 /* diagnostic */
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	518 buffer = loadFile(TLOG);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	519 fprintf(stderr, "%s\n", buffer);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	520 good_error = checkErrorMessage(error_file, error_line, buffer);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	521
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	522 if(strstr(buffer, "Internal error")!= NULL \|\| strstr(buffer, "gcc.gnu.org/bugs")!=NULL){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	523 printf("ERROR:\t%s (Internal compiler error)\n", arg[2]);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	524 }else if(modus==COMPILE){
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	525 if(res==RETURN_OK){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	526 printf("PASS: \t%s\n", arg[2]);
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	527 }else if(res==RETURN_FAIL && good_error){
373 177ce8d13eac test cases that unexpectetly fail and in addition fail to provide file/line information are now treated as ERROR instead of FAIL thomask parents: 361 diff changeset	528 if(checkErrorMessage(arg[2], "", buffer)){
177ce8d13eac test cases that unexpectetly fail and in addition fail to provide file/line information are now treated as ERROR instead of FAIL thomask parents: 361 diff changeset	529 printf("FAIL: \t%s [%d]\n", arg[2], res);
177ce8d13eac test cases that unexpectetly fail and in addition fail to provide file/line information are now treated as ERROR instead of FAIL thomask parents: 361 diff changeset	530 }else{
177ce8d13eac test cases that unexpectetly fail and in addition fail to provide file/line information are now treated as ERROR instead of FAIL thomask parents: 361 diff changeset	531 printf("ERROR:\t%s [%d]\n", arg[2], res);
177ce8d13eac test cases that unexpectetly fail and in addition fail to provide file/line information are now treated as ERROR instead of FAIL thomask parents: 361 diff changeset	532 }
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	533 }else{
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	534 printf("ERROR:\t%s [%d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	535 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	536 }else{
361 0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	537 if(res==RETURN_FAIL){
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	538 if(good_error){
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	539 printf("XFAIL:\t%s\n", arg[2]);
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	540 }else{
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	541 printf("FAIL: \t%s\n", arg[2]);
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	542 }
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	543 }else if(res==RETURN_OK){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	544 printf("XPASS:\t%s\n", arg[2]);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	545 }else{
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	546 printf("ERROR:\t%s [%d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	547 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	548 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	549 fprintf(stderr,"--------\n");
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	550 }else if(modus==RUN \|\| modus==NORUN){
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	551 /* gen command */
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	552 buffer = malloc(strlen(compiler)+strlen(cmd_arg_general)+strlen(cmd_arg_case)+strlen(OBJ)
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	553 +strlen(arg[2])*2+strlen(TLOG)+64);
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	554 buffer[0]='\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	555 strcat(buffer, compiler);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	556 strcat(buffer, " ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	557 strcat(buffer, cmd_arg_general);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	558 strcat(buffer, " ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	559 strcat(buffer, cmd_arg_case);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	560 strcat(buffer, " ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	561 if(NULL==strstr(buffer, "-od")){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	562 strcat(buffer, OBJ);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	563 strcat(buffer, " ");
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	564 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	565 if(NULL==strstr(buffer, "-of")){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	566 strcat(buffer, "-of");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	567 strcat(buffer, arg[2]);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	568 strcat(buffer, ".exe ");
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	569 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	570 strcat(buffer, arg[2]);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	571 strcat(buffer, " 1> ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	572 strcat(buffer, TLOG);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	573 strcat(buffer, " 2>&1");
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	574
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	575 /* test 1/2 */
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	576 if(modus==RUN){
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	577 fprintf(stderr, "run: %s\n", buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	578 }else{
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	579 fprintf(stderr, "norun: %s\n", buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	580 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	581 res = crashRun(buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	582
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	583 /* diagnostic 1/2 */
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	584 buffer = loadFile(TLOG);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	585 fprintf(stderr, "%s", buffer);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	586 good_error = checkErrorMessage(error_file, error_line, buffer);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	587 if(strstr(buffer, "Internal error")!= NULL \|\| strstr(buffer, "gcc.gnu.org/bugs")!=NULL){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	588 printf("ERROR:\t%s (Internal compiler error)\n", arg[2]);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	589 fprintf(stderr, "\n--------\n");
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	590 return 0;
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	591 }else if(res==RETURN_FAIL && good_error){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	592 printf("FAIL: \t%s [%d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	593 fprintf(stderr, "\n--------\n");
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	594 return 0;
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	595 }else if(res!=RETURN_OK){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	596 printf("ERROR:\t%s [%d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	597 fprintf(stderr, "\n--------\n");
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	598 return 0;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	599 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	600
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	601 /* test 2/2 */
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	602 buffer = malloc(strlen(arg[2]) + strlen(TLOG) + 24);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	603 *buffer = '\x00';
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	604 strcat(buffer, arg[2]);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	605 strcat(buffer, ".exe 1> ");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	606 strcat(buffer, TLOG);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	607 strcat(buffer, " 2>&1");
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	608 fprintf(stderr, "%s\n", buffer);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	609 res=crashRun(buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	610
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	611 /* diagnostic 2/2 */
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	612 buffer = loadFile(TLOG);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	613 if(buffer==NULL \|\| strlen(buffer)<2){
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	614 buffer="";
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	615 }
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	616 fprintf(stderr, "%s\n", buffer);
a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	617 good_error = checkRuntimeErrorMessage(error_file, error_line, buffer);
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	618 if(modus==RUN){
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	619 if(res==RETURN_OK){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	620 printf("PASS: \t%s\n", arg[2]);
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	621 }else if(res==RETURN_FAIL && good_error){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	622 printf("FAIL: \t%s [run: %d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	623 }else{
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	624 printf("ERROR:\t%s [run: %d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	625 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	626 }else{
361 0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	627 if(res==RETURN_FAIL){
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	628 if(good_error){
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	629 printf("XFAIL:\t%s\n", arg[2]);
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	630 }else{
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	631 printf("FAIL: \t%s\n", arg[2]);
0147a35cbeb7 dif. fixes 5 thomask parents: 340 diff changeset	632 }
254 a39162afcc94 MSWindows port of "dstress.c" thomask parents: 251 diff changeset	633 }else if(res==RETURN_OK){
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	634 printf("XPASS:\t%s [norun: %d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	635 }else{
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	636 printf("ERROR:\t%s [norun: %d]\n", arg[2], res);
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	637 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	638 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	639 fprintf(stderr, "--------\n");
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	640 }else{
339 a74c84e75682 added error line tests (__DSTRESS_ELINE__ / __DSTRESS_EFILE__) thomask parents: 292 diff changeset	641 printf("@bug@ %d (%s)\n", modus, arg[2]);
432 db4b6169a99d 1) implemented checkRuntimeErrorMessage thomask parents: 429 diff changeset	642 return -1;
251 6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	643 }
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	644 return 0;
6cd84461e17b enabled new "dstress.c" test tool thomask parents: diff changeset	645 }

Mercurial > projects > dstress

annotate dstress.c @ 432:db4b6169a99d