32x: drc: more wip, some games work, debug stats

[picodrive.git] / platform / uiq2 / launcher / nicemake.c

#include <stdio.h>\r
#include <stdlib.h>\r
#include <string.h>\r
\r
\r
void targetname(char *dest, char *src)\r
{\r
	char *p, *p1;\r
\r
	if(strlen(src) < 5 || src[0] == '\t') return;\r
\r
	// goto string end\r
	for(p=src; *p && *p != ' ' && *p != '\r'; p++);\r
	// goto start\r
	for(p1=p; p1 > src && *p1 != '\\'; p1--); p1++;\r
	if(p-p1 > 0) {\r
		strncpy(dest, p1, p-p1);\r
		dest[p-p1] = 0;\r
	}\r
}\r
\r
\r
int main(int argc, char *argv[])\r
{\r
	FILE *f = 0, *fo = 0;\r
	unsigned char buff[512], buff2[128], outname[512];\r
	buff2[0] = 0;\r
\r
	if(argc != 2) {\r
		printf("usage: %s <makefile>\n\n", argv[0]);\r
		return 1;\r
	}\r
	\r
	f = fopen(argv[1], "r");\r
	if(!f) {\r
		printf("%s: couldn't open %s\n", argv[0], argv[1]);\r
		return 2;\r
	}\r
\r
	strcpy(outname, argv[1]);\r
	strcat(outname, ".out");\r
	fo = fopen(outname, "w");\r
	if(!fo) {\r
		fclose(f);\r
		printf("%s: couldn't open %s for writing\n", argv[0], outname);\r
		return 3;\r
	}\r
\r
\r
	while(!feof(f)) {\r
		fgets(buff, 512, f);\r
		if(!strncmp(buff, "\t$(GCCUREL)", 11) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: gcc\n\t@$(GCCUREL)", buff2);\r
			fputs(buff+11, fo);\r
		} else if(!strncmp(buff, "\tperl -S ecopyfile.pl", 21) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: perl -S ecopyfile.pl\n\t@perl", buff2);\r
			fputs(buff+5, fo);\r
		} else if(!strncmp(buff, "\tperl -S epocrc.pl", 18) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: perl -S epocrc.pl\n\t@perl", buff2);\r
			fputs(buff+5, fo);\r
		} else if(!strncmp(buff, "\tperl -S epocaif.pl", 19) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: perl -S epocaif.pl\n\t@perl", buff2);\r
			fputs(buff+5, fo);\r
		} else if(!strncmp(buff, "\tperl -S emkdir.pl", 18) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: perl -S emkdir.pl\n\t@perl", buff2);\r
			fputs(buff+5, fo);\r
		} else if(!strncmp(buff, "\tperl -S makedef.pl", 18) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: perl -S makedef.pl\n\t@perl", buff2);\r
			fputs(buff+5, fo);\r
		} else if(!strncmp(buff, "\tld ", 4) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: ld\n\t@ld ", buff2);\r
			fputs(buff+4, fo);\r
		} else if(!strncmp(buff, "\tar ", 4) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: ar\n\t@ar ", buff2);\r
			fputs(buff+4, fo);\r
		} else if(!strncmp(buff, "\tif exist ", 10) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: if exist (del?)\n\t@if exist ", buff2);\r
			fputs(buff+10, fo);\r
		} else if(!strncmp(buff, "\tdlltool ", 9) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: dlltool\n\t@dlltool ", buff2);\r
			fputs(buff+9, fo);\r
		} else if(!strncmp(buff, "\tpetran ", 8) && !strchr(buff, '>')) {\r
			fprintf(fo, "\t@echo %s: petran\n\t@petran ", buff2);\r
			fputs(buff+8, fo);\r
		} else {\r
			// try to get new targetname\r
			targetname(buff2, buff);\r
			fputs(buff, fo);\r
		}\r
	}\r
\r
\r
	// done!\r
	fclose(f);\r
	fclose(fo);\r
\r
	remove(argv[1]);\r
	rename(outname, argv[1]);\r
\r
	return 0;\r
}\r