Started.
This commit is contained in:
commit
bdeab375e1
195
Makefile
Normal file
195
Makefile
Normal file
@ -0,0 +1,195 @@
|
||||
# GNU Make 3.81; MacOSX gcc 4.2.1; clang 19.6.0; MacOSX MinGW 4.3.0
|
||||
|
||||
# https://stackoverflow.com/questions/18136918/how-to-get-current-relative-directory-of-your-makefile
|
||||
mkfile_path := $(abspath $(lastword $(MAKEFILE_LIST)))
|
||||
current_dir := $(notdir $(patsubst %/,%,$(dir $(mkfile_path))))
|
||||
|
||||
project := $(current_dir)
|
||||
|
||||
# dirs
|
||||
src := src
|
||||
test := test
|
||||
build := build
|
||||
bin := bin
|
||||
backup := backup
|
||||
doc := doc
|
||||
media := media
|
||||
#lemon := lemon
|
||||
PREFIX := /usr/local
|
||||
|
||||
# files in $(bin)
|
||||
install := $(project)-`date +%Y-%m-%d`
|
||||
|
||||
# extra stuff we should back up
|
||||
extra :=
|
||||
|
||||
# John Graham-Cumming: rwildcard is a recursive wildcard
|
||||
rwildcard=$(foreach d,$(wildcard $1*),$(call rwildcard,$d/,$2) \
|
||||
$(filter $(subst *,%,$2),$d))
|
||||
|
||||
java_srcs := $(call rwildcard, $(src), *.java)
|
||||
c_srcs := $(call rwildcard, $(src), *.c)
|
||||
h_srcs := $(call rwildcard, $(src), *.h)
|
||||
c_re_srcs := $(call rwildcard, $(src), *.c.re)
|
||||
c_rec_srcs := $(call rwildcard, $(src), *.c.re_c)
|
||||
y_srcs := $(call rwildcard, $(src), *.y)
|
||||
c_tests := $(call rwildcard, $(test), *.c)
|
||||
h_tests := $(call rwildcard, $(test), *.h)
|
||||
icons := $(call rwildcard, $(media), *.ico)
|
||||
|
||||
# combinations
|
||||
all_h := $(h_srcs) $(h_tests)
|
||||
all_srcs := $(java_srcs) $(c_srcs) $(c_re_srcs) $(c_rec_srcs) $(y_srcs)
|
||||
all_tests := $(c_tests)
|
||||
all_icons := $(icons)
|
||||
|
||||
java_class := $(patsubst $(src)/%.java, $(build)/%.class, $(java_srcs))
|
||||
c_objs := $(patsubst $(src)/%.c, $(build)/%.o, $(c_srcs))
|
||||
# must not conflict, eg, foo.c.re and foo.c would go to the same thing
|
||||
c_re_builds := $(patsubst $(src)/%.c.re, $(build)/%.c, $(c_re_srcs))
|
||||
c_rec_builds := $(patsubst $(src)/%.c.re_c, $(build)/%.c, $(c_rec_srcs))
|
||||
c_y_builds := $(patsubst $(src)/%.y, $(build)/%.c, $(y_srcs))
|
||||
# together .re/.re_c/.y
|
||||
c_other_objs := $(patsubst $(build)/%.c, $(build)/%.o, $(c_re_builds) \
|
||||
$(c_rec_builds) $(c_y_builds))
|
||||
test_c_objs := $(patsubst $(test)/%.c, $(build)/$(test)/%.o, $(c_tests))
|
||||
html_docs := $(patsubst $(src)/%.c, $(doc)/%.html, $(c_srcs))
|
||||
|
||||
cdoc := cdoc
|
||||
re2c := re2c
|
||||
mkdir := mkdir -p
|
||||
cat := cat
|
||||
zip := zip
|
||||
bison := bison
|
||||
#lemon := lemon
|
||||
|
||||
target := # -mwindows
|
||||
optimize := -ffast-math -funroll-loops -Ofast # -O3 -g
|
||||
warnbasic := -Wall -pedantic -ansi # -std=c99
|
||||
# Some stuff is really new.
|
||||
warnclang := -Wextra \
|
||||
-Weverything \
|
||||
-Wno-comma \
|
||||
-Wno-logical-op-parentheses \
|
||||
-Wno-parentheses \
|
||||
-Wno-poison-system-directories \
|
||||
-Wno-documentation-unknown-command \
|
||||
-Wno-documentation \
|
||||
-Wno-shift-op-parentheses \
|
||||
-Wno-empty-body \
|
||||
-Wno-padded \
|
||||
-Wdisabled-macro-expansion
|
||||
warn := $(warnbasic) $(warnclang)
|
||||
|
||||
CC := clang # gcc
|
||||
CF := $(target) $(optimize) $(warn)
|
||||
OF := -Ofast # -O3 -framework OpenGL -framework GLUT or -lglut -lGLEW
|
||||
|
||||
# Jakob Borg and Eldar Abusalimov
|
||||
# $(ARGS) is all the extra arguments; $(BRGS) is_all_the_extra_arguments
|
||||
EMPTY :=
|
||||
SPACE := $(EMPTY) $(EMPTY)
|
||||
ifeq (backup, $(firstword $(MAKECMDGOALS)))
|
||||
ARGS := $(wordlist 2,$(words $(MAKECMDGOALS)),$(MAKECMDGOALS))
|
||||
BRGS := $(subst $(SPACE),_,$(ARGS))
|
||||
ifneq (,$(BRGS))
|
||||
BRGS := -$(BRGS)
|
||||
endif
|
||||
$(eval $(ARGS):;@:)
|
||||
endif
|
||||
|
||||
######
|
||||
# compiles the programme by default
|
||||
|
||||
default: $(bin)/$(project)
|
||||
# . . . success; executable is in $(bin)/$(project)
|
||||
|
||||
docs: $(html_docs)
|
||||
|
||||
# linking
|
||||
$(bin)/$(project): $(c_objs) $(c_other_objs) $(test_c_objs)
|
||||
# linking rule
|
||||
@$(mkdir) $(bin)
|
||||
$(CC) $(OF) -o $@ $^
|
||||
|
||||
# compiling
|
||||
#$(lemon)/$(bin)/$(lem): $(lemon)/$(src)/lemon.c
|
||||
# # compiling lemon
|
||||
# @$(mkdir) $(lemon)/$(bin)
|
||||
# $(CC) $(CF) -o $@ $<
|
||||
|
||||
$(c_objs): $(build)/%.o: $(src)/%.c $(all_h)
|
||||
# c_objs rule
|
||||
@$(mkdir) $(build)
|
||||
$(CC) $(CF) -c -o $@ $<
|
||||
|
||||
$(c_other_objs): $(build)/%.o: $(build)/%.c $(all_h)
|
||||
# c_other_objs rule
|
||||
$(CC) $(CF) -c -o $@ $<
|
||||
|
||||
$(test_c_objs): $(build)/$(test)/%.o: $(test)/%.c $(all_h)
|
||||
# test_c_objs rule
|
||||
@$(mkdir) $(build)
|
||||
@$(mkdir) $(build)/$(test)
|
||||
$(CC) $(CF) -c -o $@ $<
|
||||
|
||||
$(c_re_builds): $(build)/%: $(src)/%.re
|
||||
# *.re build rule
|
||||
@$(mkdir) $(build)
|
||||
$(re2c) -W -T -o $@ $<
|
||||
|
||||
$(c_rec_builds): $(build)/%: $(src)/%.re_c
|
||||
# *.re_c (conditions) build rule
|
||||
@$(mkdir) $(build)
|
||||
$(re2c) -W -T -c -o $@ $<
|
||||
|
||||
$(c_y_builds): $(build)/%.c: $(src)/%.y # $(lemon)/$(bin)/$(lem)
|
||||
# .y rule
|
||||
@$(mkdir) $(build)
|
||||
$(bison) -o $@ $<
|
||||
|
||||
$(html_docs): $(doc)/%.html: $(src)/%.c $(src)/%.h
|
||||
# docs rule
|
||||
@$(mkdir) $(doc)
|
||||
cat $^ | $(cdoc) > $@
|
||||
|
||||
######
|
||||
# phoney targets
|
||||
|
||||
.PHONY: setup clean backup icon install uninstall test docs
|
||||
|
||||
clean:
|
||||
-rm -f $(c_objs) $(test_c_objs) $(c_other_objs) $(c_re_builds) \
|
||||
$(c_rec_builds) $(html_docs)
|
||||
-rm -rf $(bin)/$(test)
|
||||
|
||||
backup:
|
||||
@$(mkdir) $(backup)
|
||||
$(zip) $(backup)/$(project)-`date +%Y-%m-%dT%H%M%S`$(BRGS).zip \
|
||||
readme.txt Makefile $(all_h) $(all_srcs) $(all_tests) $(all_icons)
|
||||
|
||||
icon: default
|
||||
# . . . setting icon on a Mac.
|
||||
cp $(media)/$(icon) $(bin)/$(icon)
|
||||
-sips --addIcon $(bin)/$(icon)
|
||||
-DeRez -only icns $(bin)/$(icon) > $(bin)/$(RSRC)
|
||||
-Rez -append $(bin)/$(RSRC) -o $(bin)/$(project)
|
||||
-SetFile -a C $(bin)/$(project)
|
||||
|
||||
setup: default icon
|
||||
@$(mkdir) $(bin)/$(install)
|
||||
cp $(bin)/$(project) readme.txt $(bin)/$(install)
|
||||
rm -f $(bin)/$(install)-MacOSX.dmg
|
||||
# or rm -f $(BDIR)/$(INST)-Win32.zip
|
||||
hdiutil create $(bin)/$(install)-MacOSX.dmg -volname "$(project)" -srcfolder $(bin)/$(install)
|
||||
# or zip $(BDIR)/$(INST)-Win32.zip -r $(BDIR)/$(INST)
|
||||
rm -R $(bin)/$(install)
|
||||
|
||||
install: default
|
||||
@$(mkdir) -p $(DESTDIR)$(PREFIX)/bin
|
||||
cp $(bin)/$(project) $(DESTDIR)$(PREFIX)/bin/$(project)
|
||||
|
||||
uninstall:
|
||||
rm -f $(DESTDIR)$(PREFIX)/bin/$(project)
|
||||
|
||||
docs: $(html_docs)
|
||||
63
src/interpret.c.re
Normal file
63
src/interpret.c.re
Normal file
@ -0,0 +1,63 @@
|
||||
/** @license 2022 Neil Edelman, distributed under the terms of the
|
||||
[MIT License](https://opensource.org/licenses/MIT).
|
||||
|
||||
Lexer for journal entries.
|
||||
|
||||
@std C89/90 */
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <assert.h>
|
||||
#include <limits.h>
|
||||
#include <errno.h>
|
||||
|
||||
static int parse_uint(const char *s, const char *e, unsigned *u) {
|
||||
uint32_t n = 0;
|
||||
for ( ; s < e; ++s) {
|
||||
unsigned digit = (unsigned)(*s - '0');
|
||||
assert(digit < 10);
|
||||
if(n > (UINT_MAX - digit) / 10) return errno = ERANGE, 0; /* check */
|
||||
n = n * 10 + digit;
|
||||
}
|
||||
*u = n;
|
||||
return 1;
|
||||
}
|
||||
|
||||
static int lex_line(const char *YYCURSOR, unsigned *const u) {
|
||||
const char *YYMARKER, *o1, *o2, *o3, *o4;
|
||||
/*!stags:re2c format = 'const char *@@;\n'; */
|
||||
|
||||
/*!re2c
|
||||
re2c:yyfill:enable = 0;
|
||||
re2c:flags:tags = 1;
|
||||
re2c:define:YYCTYPE = char;
|
||||
|
||||
octet = [0-9] | [1-9][0-9] | [1][0-9][0-9] | [2][0-4][0-9] | [2][5][0-5];
|
||||
dot = [.];
|
||||
end = [\x00];
|
||||
|
||||
|
||||
|
||||
|
||||
@o1 octet dot @o2 octet dot @o3 octet dot @o4 octet end {
|
||||
unsigned u1, u2, u3, u4;
|
||||
if(!parse_uint(o1, o2 - 1, &u1)
|
||||
|| !parse_uint(o2, o3 - 1, &u2)
|
||||
|| !parse_uint(o3, o4 - 1, &u3)
|
||||
|| !parse_uint(o4, YYCURSOR - 1, &u4)) return 0;
|
||||
*u = u4 + (u3 << 8) + (u2 << 16) + (u1 << 24);
|
||||
return 1;
|
||||
}
|
||||
* { return 0; }
|
||||
*/
|
||||
}
|
||||
|
||||
|
||||
int main(int argc, char **argv) {
|
||||
unsigned u;
|
||||
int success;
|
||||
success = lex_line("1.2.3.4", &u);
|
||||
assert(success);
|
||||
printf("%x\n", u);
|
||||
return EXIT_SUCCESS;
|
||||
}
|
||||
Loading…
Reference in New Issue
Block a user