diff options
| -rw-r--r-- | project/pyexts.c | 360 |
1 files changed, 360 insertions, 0 deletions
diff --git a/project/pyexts.c b/project/pyexts.c new file mode 100644 index 0000000..3a6197e --- /dev/null +++ b/project/pyexts.c @@ -0,0 +1,360 @@ +/*******************************************************************/ +/* sbpython3: external configurable build project for Python-3.x. */ +/* Copyright (C) 2018 Z. Gilboa */ +/* Released under the Standard MIT License; see COPYING.SBPYTHON3.*/ +/*******************************************************************/ + +/*******************************************************************/ +/* pyexts.c: a simple development-time utility for generating */ +/* make rules for python's extension modules. The utility is */ +/* included with the sbpython3 project for reference only. */ +/* */ +/* cc -std=c99 -D_XOPEN_SOURCE=700 pyexts.c */ +/*******************************************************************/ + +#include <stdio.h> +#include <string.h> + +#define PYEXT_LIST(...) (const char *[]){__VA_ARGS__,0} +#define PYEXT_SIMPLE(name,...) {name,PYEXT_LIST(__VA_ARGS__),0,0,0,0} + +#define PYEXT_COMMON(name,hvar,lvar,...) {name,PYEXT_LIST(__VA_ARGS__), \ + PYEXT_LIST(hvar),0, \ + PYEXT_LIST(lvar),0} + +#define PYEXT_ALTSTD(name,cstd,...) {name,PYEXT_LIST(__VA_ARGS__), \ + 0,PYEXT_LIST(cstd),0,0} + +struct pyext_meta { + const char * name; + const char ** srcs; + const char ** hdrs; + const char ** cstd; + const char ** vars; + const char ** deps; +}; + +static const struct pyext_meta pyexts[] = { + PYEXT_SIMPLE("_multibytecodec", "cjkcodecs/multibytecodec"), + PYEXT_SIMPLE("_codecs_cn", "cjkcodecs/_codecs_cn"), + PYEXT_SIMPLE("_codecs_hk", "cjkcodecs/_codecs_hk"), + PYEXT_SIMPLE("_codecs_jp", "cjkcodecs/_codecs_jp"), + PYEXT_SIMPLE("_codecs_kr", "cjkcodecs/_codecs_kr"), + PYEXT_SIMPLE("_codecs_tw", "cjkcodecs/_codecs_tw"), + PYEXT_SIMPLE("_codecs_iso2022", "cjkcodecs/_codecs_iso2022"), + + PYEXT_SIMPLE("_asyncio", "_asynciomodule"), + PYEXT_SIMPLE("_bisect", "_bisectmodule"), + PYEXT_SIMPLE("_crypt", "_cryptmodule"), + PYEXT_SIMPLE("_csv", "_csv"), + PYEXT_SIMPLE("_ctypes_test", "_ctypes/_ctypes_test"), + PYEXT_SIMPLE("_datetime", "_datetimemodule"), + PYEXT_SIMPLE("_elementtree", "_elementtree"), + PYEXT_SIMPLE("_heapq", "_heapqmodule"), + PYEXT_SIMPLE("_json", "_json"), + PYEXT_SIMPLE("_md5", "md5module"), + PYEXT_SIMPLE("_opcode", "_opcode"), + PYEXT_SIMPLE("_pickle", "_pickle"), + PYEXT_SIMPLE("_posixsubprocess", "_posixsubprocess"), + PYEXT_SIMPLE("_random", "_randommodule"), + PYEXT_SIMPLE("_sha1", "sha1module"), + PYEXT_SIMPLE("_sha256", "sha256module"), + PYEXT_SIMPLE("_sha3", "_sha3/sha3module"), + PYEXT_SIMPLE("_sha512", "sha512module"), + PYEXT_SIMPLE("_socket", "socketmodule"), + PYEXT_SIMPLE("_struct", "_struct"), + PYEXT_SIMPLE("_testbuffer", "_testbuffer"), + PYEXT_SIMPLE("_testcapi", "_testcapimodule"), + PYEXT_SIMPLE("_testimportmultiple", "_testimportmultiple"), + PYEXT_SIMPLE("_testmultiphase", "_testmultiphase"), + + + + PYEXT_SIMPLE("array", "arraymodule"), + PYEXT_SIMPLE("audioop", "audioop"), + PYEXT_SIMPLE("fcntl", "fcntlmodule"), + PYEXT_SIMPLE("grp", "grpmodule"), + PYEXT_SIMPLE("mmap", "mmapmodule"), + PYEXT_SIMPLE("ossaudiodev", "ossaudiodev"), + PYEXT_SIMPLE("parser", "parsermodule"), + PYEXT_SIMPLE("resource", "resource"), + PYEXT_SIMPLE("select", "selectmodule"), + PYEXT_SIMPLE("spwd", "spwdmodule"), + PYEXT_SIMPLE("syslog", "syslogmodule"), + PYEXT_SIMPLE("termios", "termios"), + PYEXT_SIMPLE("unicodedata", "unicodedata"), + PYEXT_SIMPLE("xxlimited", "xxlimited"), + + PYEXT_SIMPLE("_blake2", + "_blake2/blake2module", + "_blake2/blake2b_impl", + "_blake2/blake2s_impl"), + + PYEXT_SIMPLE("_lsprof", + "_lsprof", + "rotatingtree"), + + PYEXT_SIMPLE("_multiprocessing", + "_multiprocessing/multiprocessing", + "_multiprocessing/semaphore"), + + PYEXT_SIMPLE("cmath", + "cmathmodule", + "_math"), + + PYEXT_SIMPLE("math", + "mathmodule", + "_math"), + + PYEXT_COMMON("_bz2",0,"-lbz2", + "_bz2module"), + + PYEXT_COMMON("_ctypes",0,"-lffi", + "_ctypes/_ctypes", + "_ctypes/callbacks", + "_ctypes/callproc", + "_ctypes/stgdict", + "_ctypes/cfield"), + + PYEXT_COMMON("_curses", + "$(CFLAGS_NCURSES)", + "$(LDFLAGS_NCURSES)", + "_cursesmodule"), + + PYEXT_COMMON("_curses_panel", + "$(CFLAGS_NCURSES)", + "$(LDFLAGS_NCURSES)", + "_curses_panel"), + + PYEXT_COMMON("_decimal", + "-I$(SOURCE_DIR)/Modules/_decimal/libmpdec",0, + "_decimal/_decimal", + "_decimal/libmpdec/basearith", + "_decimal/libmpdec/constants", + "_decimal/libmpdec/context", + "_decimal/libmpdec/convolute", + "_decimal/libmpdec/crt", + "_decimal/libmpdec/difradix2", + "_decimal/libmpdec/fnt", + "_decimal/libmpdec/fourstep", + "_decimal/libmpdec/io", + "_decimal/libmpdec/memory", + "_decimal/libmpdec/mpdecimal", + "_decimal/libmpdec/numbertheory", + "_decimal/libmpdec/sixstep", + "_decimal/libmpdec/transpose"), + + PYEXT_COMMON("_dbm",0,"-lgdbm_compat", + "_dbmmodule"), + + PYEXT_COMMON("_gdbm",0,"-lgdbm", + "_gdbmmodule"), + + PYEXT_COMMON("_hashlib",0,"-lssl -lcrypto", + "_hashopenssl"), + + PYEXT_COMMON("_lzma",0,"-llzma", + "_lzmamodule"), + + PYEXT_COMMON("_sqlite3", + "$(CFLAGS_SQLITE)", + "$(LDFLAGS_SQLITE)", + "_sqlite/cache", + "_sqlite/connection", + "_sqlite/cursor", + "_sqlite/microprotocols", + "_sqlite/module", + "_sqlite/prepare_protocol", + "_sqlite/row", + "_sqlite/statement", + "_sqlite/util"), + + PYEXT_COMMON("_ssl",0,"-lssl -lcrypto", + "_ssl"), + + PYEXT_COMMON("_tkinter", + "$(CFLAGS_TCLTK)", + "$(LDFLAGS_TCLTK)", + "_tkinter", + "tkappinit"), + + PYEXT_COMMON("binascii",0,"-lz", + "binascii"), + + PYEXT_COMMON("pyexpat",0,"-lexpat", + "pyexpat"), + + PYEXT_COMMON("readline",0,"-lreadline", + "readline"), + + PYEXT_COMMON("zlib",0,"-lz", + "zlibmodule"), + + {0,0,0,0,0,0}, +}; + +static void pyext_uppercase(char * buf, const char * name) +{ + const char * src; + char * dst; + + src = name; + dst = buf; + + for (; *src; ) + *dst++ = ((*src >= 'a') && (*src <= 'z')) + ? 'A' - 'a' + *src++ : *src++; + + *dst = 0; +} + +int main(int argc, char ** argv) +{ + const struct pyext_meta * p; + size_t nlen; + const char ** parg; + const char * dtab; + const char * otab; + const char * htab; + const char * stab; + const char * ltab; + const char * rtab; + const char * vtab; + const char * name; + char fmt[64]; + char uname[64]; + + if ((argc == 2) && !strcmp(argv[1],"--py-init-func")) { + for (p=pyexts; p->name; p++) + printf("PY_INIT_FUNC(%s);\n",p->name); + + return 0; + } + + if ((argc == 2) && !strcmp(argv[1],"--init-func-ptr")) { + for (p=pyexts; p->name; p++) { + nlen = strlen(p->name); + + sprintf(fmt,"\t{\"%%s\",%%-%zusPyInit_%%s},%%-%zus\\\n", + 20-nlen,23-nlen); + + printf(fmt,p->name," ",p->name," "); + } + + return 0; + } + + for (p=pyexts; p->name; p++) { + /* init */ + name = (p->name[0] == '_') ? &p->name[1] : p->name; + nlen = strlen(name); + + pyext_uppercase(uname,name); + + /* pretty */ + dtab = (nlen <= 4) + ? "\t\t\t" + : (nlen <= 12) + ? "\t\t" : "\t"; + + otab = (nlen <= 3) + ? "\t\t\t" + : (nlen <= 11) + ? "\t\t" : "\t"; + + ltab = (nlen <= 2) + ? "\t\t\t" + : (nlen <= 10) + ? "\t\t" : "\t"; + + rtab = (nlen <= 1) + ? "\t\t\t" + : (nlen <= 9) + ? "\t\t" : "\t"; + + vtab = (nlen <= 6) + ? "\t\t" + : (nlen <= 14) + ? "\t" : ""; + + htab = (nlen <= 8) + ? "\t\t" : "\t"; + + stab = (nlen <= 9) + ? "\t\t" : "\t"; + + + /* output */ + printf("# %s\n",p->name); + + for (parg=p->srcs; *parg; parg++) + printf("PYEXT_%s_SRCS%s+= " + "pyext/obj/%s.c\n", + uname,dtab,*parg); + + printf("\n"); + printf("PYEXT_%s_LOBJS%s= $(PYEXT_%s_SRCS:.c=.lo)\n",uname,otab,uname); + printf("PYEXT_%s_OBJS%s= $(PYEXT_%s_SRCS:.c=.o)\n",uname,dtab,uname); + printf("\n"); + + for (parg=p->hdrs; parg && *parg; parg++) + printf("$(PYEXT_%s_LOBJS):%s" + "CFLAGS_CONFIG += %s\n", + uname,htab,*parg); + + for (parg=p->hdrs; parg && *parg; parg++) + printf("$(PYEXT_%s_OBJS):%s" + "CFLAGS_CONFIG += %s\n", + uname,stab,*parg); + + for (parg=p->cstd; parg && *parg; parg++) + printf("$(PYEXT_%s_LOBJS):%s" + "CFLAGS_LAST += %s\n", + uname,otab,*parg); + + for (parg=p->cstd; parg && *parg; parg++) + printf("$(PYEXT_%s_OBJS):%s" + "CFLAGS_LAST += %s\n", + uname,dtab,*parg); + + if (p->hdrs || p->cstd) + printf("\n"); + + printf("PYEXT_%s_SHARED%s= pyext/%s$(PYTHON_SOEXT)\n",uname,ltab,p->name); + printf("PYEXT_%s_STATIC%s= pyext/%s$(OS_ARCHIVE_EXT)\n",uname,ltab,p->name); + printf("\n"); + + for (parg=p->vars; parg && *parg; parg++) + printf("$(PYEXT_%s_SHARED):%s" + "LDFLAGS_DYNEXT += %s\n", + uname,vtab,*parg); + + for (parg=p->deps; parg && *parg; parg++) + printf("$(PYEXT_%s_SHARED):%s%s\n",uname,vtab,*parg); + + printf("$(PYEXT_%s_SHARED):%s$(PYEXT_%s_LOBJS)\n",uname,vtab,uname); + printf("$(PYEXT_%s_STATIC):%s$(PYEXT_%s_OBJS)\n",uname,vtab,uname); + + printf("\n"); + printf("pyext-%s-shared:%s$(PYEXT_%s_SHARED)\n",name,rtab,uname); + printf("pyext-%s-static:%s$(PYEXT_%s_STATIC)\n",name,rtab,uname); + + printf("\n"); + printf("pyext-%s-clean:\n",name); + printf("\trm -f $(PYEXT_%s_LOBJS)\n",uname); + printf("\trm -f $(PYEXT_%s_OBJS)\n",uname); + printf("\trm -f $(PYEXT_%s_SHARED)\n",uname); + printf("\trm -f $(PYEXT_%s_STATIC)\n",uname); + + printf("\n"); + printf("clean:\tpyext-%s-clean\n",name); + + printf("\n"); + printf(".PHONY:\tpyext-%s-shared\n",name); + printf(".PHONY:\tpyext-%s-static\n",name); + printf(".PHONY:\tpyext-%s-clean\n",name); + printf("\n\n"); + } + + return 0; +} |