snark13
c71e249a4e
First substantive commit: the entire Sprinter C compiler tree on top of
the bare README+gitignore initial commit.
What's in here:
bin/sprinter-cc — driver script invoking SDCC + linker + mkexe
libc/ — Sprinter-specific libc layer over ESTEX/BIOS
(conio, gfx, io, mem, stdio + headers)
runtime/ — crt0 variants (default/small/banked/minimal)
+ heap + bank trampolines
toolchain/ — mkexe (SprintEXE packer, C + tests)
examples/ — 30 demo programs (gfx, file I/O, env, time, …)
lib/Makefile — builds the libc archive (sprinter.lib)
docs/ — converted Sprinter manuals + asm reference samples
third_party/ — solid-c reference compiler dump + sdcc setup script
release_docs/ — packaging / release notes
gitignore overhaul:
• Drop dangerous blanket patterns: *.asm (would hide docs/samples/*.asm)
and *.exe (case-insensitive match was hiding third_party/solid-c/*.EXE
on macOS APFS). Replaced with examples/*/*.{asm,exe,…} and lib/*.lib.
• Restore tracking of toolchain/mkexe/tests/{one,big}.bin — those are
INPUT fixtures, not build outputs.
• Collapse the duplicated SDCC/C/Sdcc sections into one section per
concern (build outputs / vendored / OS-junk).
• Add .sprinter-cc-*/, build/ (catches lib/build/ too), .claude/.
Co-Authored-By: Claude Opus 4.7 <noreply@anthropic.com>
90 lines
2.4 KiB
C
90 lines
2.4 KiB
C
/*
|
|
* stattest — exercise POSIX stat() and fstat() over ESTEX file metadata.
|
|
*
|
|
* Calls:
|
|
* stat() on a file by path
|
|
* stat() on a directory (current dir)
|
|
* stat() on a non-existent file (expects errno=ENOENT)
|
|
* fstat() on a freshly opened file
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <fcntl.h>
|
|
#include <sys/stat.h>
|
|
#include <unistd.h>
|
|
#include <errno.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
|
|
static const char *mode_str(uint16_t m)
|
|
{
|
|
if (S_ISDIR(m)) return "DIR";
|
|
if (S_ISREG(m)) return "REG";
|
|
return "???";
|
|
}
|
|
|
|
static void print_stat(const char *what, const struct stat *st)
|
|
{
|
|
char buf[32];
|
|
/* Reuse asctime by converting epoch → struct tm. */
|
|
time_t t = st->st_mtime;
|
|
struct tm *tm = localtime(&t);
|
|
sprintf(buf, "%04d-%02d-%02d %02d:%02d:%02d",
|
|
tm->tm_year + 1900, tm->tm_mon + 1, tm->tm_mday,
|
|
tm->tm_hour, tm->tm_min, tm->tm_sec);
|
|
|
|
printf(" %s: mode=%s perm=0%o size=%lu mtime=%s\n",
|
|
what,
|
|
mode_str(st->st_mode),
|
|
(unsigned)(st->st_mode & 0777),
|
|
(unsigned long)st->st_size,
|
|
buf);
|
|
}
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
struct stat st;
|
|
|
|
puts("stattest: stat() / fstat() smoke test");
|
|
|
|
/* stat on this very file (the .exe). */
|
|
if (stat(argv[0], &st) == 0)
|
|
print_stat("self.exe", &st);
|
|
else
|
|
printf(" stat(\"%s\") failed: errno=%d (%s)\n",
|
|
argv[0], errno, strerror(errno));
|
|
|
|
/* stat on a definitely-missing file. */
|
|
errno = 0;
|
|
if (stat("NOSUCH.XXX", &st) == 0)
|
|
puts(" stat(NOSUCH.XXX) unexpectedly succeeded?!");
|
|
else
|
|
printf(" stat(NOSUCH.XXX) -> errno=%d (%s) [expected ENOENT]\n",
|
|
errno, strerror(errno));
|
|
|
|
/* fstat on a fresh handle (open the running exe read-only). */
|
|
int fd = open(argv[0], O_RDONLY);
|
|
if (fd < 0) {
|
|
printf(" open(\"%s\") failed: errno=%d (%s)\n",
|
|
argv[0], errno, strerror(errno));
|
|
} else {
|
|
if (fstat(fd, &st) == 0)
|
|
print_stat("fstat(self)", &st);
|
|
else
|
|
printf(" fstat failed: errno=%d (%s)\n",
|
|
errno, strerror(errno));
|
|
close(fd);
|
|
}
|
|
|
|
/* Extra argv-passed path. */
|
|
if (argc > 1) {
|
|
if (stat(argv[1], &st) == 0)
|
|
print_stat(argv[1], &st);
|
|
else
|
|
printf(" stat(\"%s\") failed: errno=%d (%s)\n",
|
|
argv[1], errno, strerror(errno));
|
|
}
|
|
|
|
return 0;
|
|
}
|