mirror of
https://github.com/RaySollium99/picodrive.git
synced 2025-09-05 07:17:45 -04:00
amalgamation
git-svn-id: file:///home/notaz/opt/svn/PicoDrive@227 be3aeb3a-fb24-0410-a615-afba39da0efa
This commit is contained in:
notaz
parent
a4f0cc8647
commit
eff55556cf
35 changed files with 607 additions and 363 deletions
10
tools/Makefile
Normal file
10
tools/Makefile
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
CFLAGS = -Wall -ggdb
|
||||
|
||||
TARGET = amalgamate
|
||||
OBJS = amalgamate.o
|
||||
|
||||
all: $(TARGET)
|
||||
|
||||
clean:
|
||||
$(RM) $(TARGET) $(OBJS)
|
||||
|
||||
246
tools/amalgamate.c
Normal file
246
tools/amalgamate.c
Normal file
|
|
@ -0,0 +1,246 @@
|
|||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <stdarg.h>
|
||||
#include <ctype.h>
|
||||
|
||||
#define OUT_FILE "PicoAll.c"
|
||||
|
||||
// files to amalgamate, in order
|
||||
static const char *files[] =
|
||||
{
|
||||
"Pico/Pico.h",
|
||||
// PicoInt.h includes some CD stuff, so start with them
|
||||
"Pico/cd/cd_file.h",
|
||||
"Pico/cd/cd_sys.h",
|
||||
"Pico/cd/LC89510.h",
|
||||
"Pico/cd/gfx_cd.h",
|
||||
"Pico/cd/pcm.h",
|
||||
"Pico/PicoInt.h",
|
||||
"Pico/Patch.h",
|
||||
"Pico/sound/mix.h",
|
||||
// source
|
||||
"Pico/Area.c",
|
||||
"Pico/Cart.c",
|
||||
"Pico/Draw2.c",
|
||||
"Pico/Draw.c",
|
||||
"Pico/VideoPort.c",
|
||||
"Pico/sound/sound.c",
|
||||
"Pico/MemoryCmn.c",
|
||||
"Pico/Memory.c",
|
||||
"Pico/Misc.c",
|
||||
"Pico/Patch.c",
|
||||
"Pico/Sek.c",
|
||||
"Pico/cd/Area.c",
|
||||
"Pico/cd/buffering.c",
|
||||
"Pico/cd/cd_file.c",
|
||||
"Pico/cd/cd_sys.c",
|
||||
"Pico/cd/cell_map.c",
|
||||
"Pico/cd/gfx_cd.c",
|
||||
"Pico/cd/LC89510.c",
|
||||
"Pico/cd/Memory.c",
|
||||
"Pico/cd/Misc.c",
|
||||
"Pico/cd/pcm.c",
|
||||
"Pico/cd/Sek.c",
|
||||
"Pico/cd/Pico.c",
|
||||
"Pico/Pico.c",
|
||||
};
|
||||
|
||||
static char *includes[128];
|
||||
|
||||
static void eprintf(const char *fmt, ...)
|
||||
{
|
||||
va_list args;
|
||||
|
||||
va_start(args, fmt);
|
||||
vprintf(fmt, args);
|
||||
va_end(args);
|
||||
|
||||
exit(1);
|
||||
}
|
||||
|
||||
static void emit_header(FILE *f, const char *fname)
|
||||
{
|
||||
char tmp[128] = "/* */";
|
||||
memcpy(tmp + 3, fname, strlen(fname));
|
||||
fprintf(f, "\n\n");
|
||||
fprintf(f, "/**************************************************************/\n");
|
||||
fprintf(f, "/**************************************************************/\n");
|
||||
fprintf(f, "%s\n", tmp);
|
||||
fprintf(f, "/**************************************************************/\n");
|
||||
}
|
||||
|
||||
static const char *add_include(const char *include)
|
||||
{
|
||||
int i;
|
||||
char processed_inc[128+4];
|
||||
|
||||
// must first quote relative includes
|
||||
snprintf(processed_inc, sizeof(processed_inc), (include[0] != '<') ? "\"%s\"" : "%s", include);
|
||||
|
||||
// find in include list
|
||||
for (i = 0; includes[i] && i < 128; i++)
|
||||
{
|
||||
if (strcmp(processed_inc, includes[i]) == 0) break;
|
||||
}
|
||||
if (i == 128) eprintf("add_include: includes overflowed\n");
|
||||
if (includes[i] != NULL)
|
||||
{
|
||||
printf("already have: %s\n", processed_inc);
|
||||
return NULL;
|
||||
}
|
||||
else
|
||||
{
|
||||
printf("adding: %s\n", processed_inc);
|
||||
includes[i] = strdup(processed_inc);
|
||||
if (includes[i] == NULL) eprintf("add_include: OOM\n");
|
||||
return includes[i];
|
||||
}
|
||||
}
|
||||
|
||||
static const char *add_raw_include(const char *include, const char *base)
|
||||
{
|
||||
const char *ps, *pe;
|
||||
char processed_inc[128];
|
||||
|
||||
for (ps = include; *ps && isspace(*ps); ps++);
|
||||
|
||||
if (*ps == '<')
|
||||
{
|
||||
int len = 1;
|
||||
// system include, search for '>'
|
||||
for (pe = ps; *pe && *pe != '>'; pe++, len++);
|
||||
if (*pe == 0 || len > 127) eprintf("add_raw_include: failed sysinclude, len=%i\n", len);
|
||||
strncpy(processed_inc, ps, len);
|
||||
processed_inc[len] = 0;
|
||||
}
|
||||
else if (*ps == '\"')
|
||||
{
|
||||
int len, pos;
|
||||
// relative include, make path absolute (or relative to base dir)
|
||||
strcpy(processed_inc, base);
|
||||
ps++;
|
||||
while (*ps == '.')
|
||||
{
|
||||
if (strncmp(ps, "../", 3) == 0)
|
||||
{
|
||||
char *p;
|
||||
if (processed_inc[0] == 0)
|
||||
eprintf("add_raw_include: already in root, can't go down: %s | %s\n", ps, include);
|
||||
p = strrchr(processed_inc, '/');
|
||||
if (p == NULL) eprintf("add_raw_include: can't happen\n");
|
||||
*p = 0;
|
||||
p = strrchr(processed_inc, '/');
|
||||
if (p != NULL) p[1] = 0;
|
||||
else processed_inc[0] = 0;
|
||||
ps += 3;
|
||||
}
|
||||
else if (strncmp(ps, "./", 2) == 0)
|
||||
{
|
||||
ps += 2; // just skip
|
||||
}
|
||||
while (*ps == '/') ps++;
|
||||
}
|
||||
if (*ps == 0) eprintf("add_raw_include: failed with %s\n", include);
|
||||
|
||||
len = pos = strlen(processed_inc);
|
||||
for (pe = ps; *pe && *pe != '\"'; pe++, len++);
|
||||
if (*pe == 0 || len > 127) eprintf("add_raw_include: failed with %s, len=%i\n", include, len);
|
||||
strncpy(processed_inc + pos, ps, len - pos);
|
||||
processed_inc[len] = 0;
|
||||
}
|
||||
else
|
||||
eprintf("add_raw_include: unhandled include: %s\n", ps);
|
||||
|
||||
return add_include(processed_inc);
|
||||
}
|
||||
|
||||
// returns pointer to location after part in string
|
||||
static const char *substr_end(const char *string, const char *part)
|
||||
{
|
||||
const char *p = string;
|
||||
int len = strlen(part);
|
||||
|
||||
while (*p && isspace(*p)) p++;
|
||||
return (strncmp(p, part, len) == 0) ? (p + len) : NULL;
|
||||
}
|
||||
|
||||
static void strip_cr(char *str)
|
||||
{
|
||||
int len = strlen(str);
|
||||
char *p = str;
|
||||
|
||||
while ((p = strchr(p, '\r')))
|
||||
{
|
||||
memmove(p, p + 1, len - (p - str) + 1);
|
||||
}
|
||||
if (strlen(str) > 0)
|
||||
{
|
||||
p = str + strlen(str) - 1;
|
||||
while (p >= str && isspace(*p)) { *p = 0; p--; } // strip spaces on line ends
|
||||
}
|
||||
strcat(str, "\n"); // re-add newline
|
||||
}
|
||||
|
||||
int main(void)
|
||||
{
|
||||
char buff[512]; // tmp buffer
|
||||
char path[128]; // path to file being included, with ending slash
|
||||
int i, ifile;
|
||||
FILE *fo;
|
||||
|
||||
memset(includes, 0, sizeof(includes));
|
||||
|
||||
fo = fopen(OUT_FILE, "w");
|
||||
if (fo == NULL) return 1;
|
||||
|
||||
// special header
|
||||
fprintf(fo, "#define PICO_INTERNAL static\n");
|
||||
fprintf(fo, "#define PICO_INTERNAL_ASM\n");
|
||||
|
||||
for (ifile = 0; ifile < sizeof(files) / sizeof(files[0]); ifile++)
|
||||
{
|
||||
FILE *fi;
|
||||
const char *file = files[ifile], *p;
|
||||
p = strrchr(file, '/');
|
||||
if (p == NULL) eprintf("main: file in root? %s\n", file);
|
||||
strncpy(path, file, p - file + 1);
|
||||
path[p - file + 1] = 0;
|
||||
|
||||
fi = fopen(file, "r");
|
||||
if (fi == NULL) eprintf("main: failed to open %s\n", file);
|
||||
|
||||
// if (strcmp(file + strlen(file) - 2, ".h") == 0)
|
||||
add_include(file);
|
||||
emit_header(fo, file);
|
||||
|
||||
while (!feof(fi))
|
||||
{
|
||||
p = fgets(buff, sizeof(buff), fi);
|
||||
if (p == NULL) break;
|
||||
strip_cr(buff);
|
||||
// include?
|
||||
p = substr_end(buff, "#include");
|
||||
if (p != NULL)
|
||||
{
|
||||
p = add_raw_include(p, path);
|
||||
if (p != NULL) fprintf(fo, "#include %s\n", p);
|
||||
continue;
|
||||
}
|
||||
// passthrough
|
||||
fputs(buff, fo);
|
||||
}
|
||||
}
|
||||
|
||||
emit_header(fo, "EOF");
|
||||
|
||||
for (i = 0; includes[i] && i < 128; i++)
|
||||
{
|
||||
free(includes[i]);
|
||||
}
|
||||
|
||||
fclose(fo);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue