From 1fe3d156aee5929de9347e2cb6f5140e80379814 Mon Sep 17 00:00:00 2001 From: Charles Forsyth Date: Sat, 8 Jun 2013 07:21:06 +0000 Subject: use normal Plan9 u.h and common lib9.h --- Plan9/arm/include/lib9.h | 661 +-------------------------------------------- Plan9/arm/include/u.h | 66 +---- Plan9/mips/include/lib9.h | 660 +------------------------------------------- Plan9/mips/include/u.h | 66 +---- Plan9/power/include/lib9.h | 660 +------------------------------------------- Plan9/power/include/u.h | 85 +----- Plan9/sparc/include/lib9.h | 660 +------------------------------------------- Plan9/sparc/include/u.h | 65 +---- 8 files changed, 8 insertions(+), 2915 deletions(-) diff --git a/Plan9/arm/include/lib9.h b/Plan9/arm/include/lib9.h index de314ca7..97f16dd9 100644 --- a/Plan9/arm/include/lib9.h +++ b/Plan9/arm/include/lib9.h @@ -1,660 +1 @@ -#include -typedef unsigned long size_t; - -#define nelem(x) (sizeof(x)/sizeof((x)[0])) -#define offsetof(s, m) (ulong)(&(((s*)0)->m)) -#define assert(x) if(x){}else _assert("x") - -/* - * mem routines - */ -extern void* memccpy(void*, void*, int, ulong); -extern void* memset(void*, int, ulong); -extern int memcmp(void*, void*, ulong); -extern void* memcpy(void*, void*, ulong); -extern void* memmove(void*, void*, ulong); -extern void* memchr(void*, int, ulong); - -/* - * string routines - */ -extern char* strcat(char*, char*); -extern char* strchr(char*, int); -extern int strcmp(char*, char*); -extern char* strcpy(char*, char*); -extern char* strecpy(char*, char*, char*); -extern char* strdup(char*); -extern char* strncat(char*, char*, long); -extern char* strncpy(char*, char*, long); -extern int strncmp(char*, char*, long); -extern char* strpbrk(char*, char*); -extern char* strrchr(char*, int); -extern char* strtok(char*, char*); -extern long strlen(char*); -extern long strspn(char*, char*); -extern long strcspn(char*, char*); -extern char* strstr(char*, char*); -extern int cistrncmp(char*, char*, int); -extern int cistrcmp(char*, char*); -extern char* cistrstr(char*, char*); -extern int tokenize(char*, char**, int); - -enum -{ - UTFmax = 4, /* maximum bytes per rune */ - Runesync = 0x80, /* cannot represent part of a UTF sequence (<) */ - Runeself = 0x80, /* rune and UTF sequences are the same (<) */ - Runeerror = 0xFFFD, /* decoding error in UTF */ - Runemax = 0x10FFFF, /* 21-bit rune */ - Runemask = 0x1FFFFF, /* bits used by runes (see grep) */ -}; - -/* - * rune routines - */ -extern int runetochar(char*, Rune*); -extern int chartorune(Rune*, char*); -extern int runelen(long); -extern int runenlen(Rune*, int); -extern int fullrune(char*, int); -extern int utflen(char*); -extern int utfnlen(char*, long); -extern char* utfrune(char*, long); -extern char* utfrrune(char*, long); -extern char* utfutf(char*, char*); -extern char* utfecpy(char*, char*, char*); - -extern Rune* runestrcat(Rune*, Rune*); -extern Rune* runestrchr(Rune*, Rune); -extern int runestrcmp(Rune*, Rune*); -extern Rune* runestrcpy(Rune*, Rune*); -extern Rune* runestrncpy(Rune*, Rune*, long); -extern Rune* runestrecpy(Rune*, Rune*, Rune*); -extern Rune* runestrdup(Rune*); -extern Rune* runestrncat(Rune*, Rune*, long); -extern int runestrncmp(Rune*, Rune*, long); -extern Rune* runestrrchr(Rune*, Rune); -extern long runestrlen(Rune*); -extern Rune* runestrstr(Rune*, Rune*); - -extern Rune tolowerrune(Rune); -extern Rune totitlerune(Rune); -extern Rune toupperrune(Rune); -extern int isalpharune(Rune); -extern int islowerrune(Rune); -extern int isspacerune(Rune); -extern int istitlerune(Rune); -extern int isupperrune(Rune); - -/* - * malloc - */ -extern void* malloc(ulong); -extern void* mallocz(ulong, int); -extern void free(void*); -extern ulong msize(void*); -extern void* calloc(ulong, ulong); -extern void* realloc(void*, ulong); -extern void setmalloctag(void*, ulong); -extern void setrealloctag(void*, ulong); -extern ulong getmalloctag(void*); -extern ulong getrealloctag(void*); -extern void* malloctopoolblock(void*); - -/* - * print routines - */ -typedef struct Fmt Fmt; -struct Fmt{ - uchar runes; /* output buffer is runes or chars? */ - void *start; /* of buffer */ - void *to; /* current place in the buffer */ - void *stop; /* end of the buffer; overwritten if flush fails */ - int (*flush)(Fmt *); /* called when to == stop */ - void *farg; /* to make flush a closure */ - int nfmt; /* num chars formatted so far */ - va_list args; /* args passed to dofmt */ - int r; /* % format Rune */ - int width; - int prec; - ulong flags; -}; - -enum{ - FmtWidth = 1, - FmtLeft = FmtWidth << 1, - FmtPrec = FmtLeft << 1, - FmtSharp = FmtPrec << 1, - FmtSpace = FmtSharp << 1, - FmtSign = FmtSpace << 1, - FmtZero = FmtSign << 1, - FmtUnsigned = FmtZero << 1, - FmtShort = FmtUnsigned << 1, - FmtLong = FmtShort << 1, - FmtVLong = FmtLong << 1, - FmtComma = FmtVLong << 1, - FmtByte = FmtComma << 1, - - FmtFlag = FmtByte << 1 -}; - -extern int print(char*, ...); -extern char* seprint(char*, char*, char*, ...); -extern char* vseprint(char*, char*, char*, va_list); -extern int snprint(char*, int, char*, ...); -extern int vsnprint(char*, int, char*, va_list); -extern char* smprint(char*, ...); -extern char* vsmprint(char*, va_list); -extern int sprint(char*, char*, ...); -extern int fprint(int, char*, ...); -extern int vfprint(int, char*, va_list); - -extern int runesprint(Rune*, char*, ...); -extern int runesnprint(Rune*, int, char*, ...); -extern int runevsnprint(Rune*, int, char*, va_list); -extern Rune* runeseprint(Rune*, Rune*, char*, ...); -extern Rune* runevseprint(Rune*, Rune*, char*, va_list); -extern Rune* runesmprint(char*, ...); -extern Rune* runevsmprint(char*, va_list); - -extern int fmtfdinit(Fmt*, int, char*, int); -extern int fmtfdflush(Fmt*); -extern int fmtstrinit(Fmt*); -extern char* fmtstrflush(Fmt*); -extern int runefmtstrinit(Fmt*); -extern Rune* runefmtstrflush(Fmt*); - -#pragma varargck argpos fmtprint 2 -#pragma varargck argpos fprint 2 -#pragma varargck argpos print 1 -#pragma varargck argpos runeseprint 3 -#pragma varargck argpos runesmprint 1 -#pragma varargck argpos runesnprint 3 -#pragma varargck argpos runesprint 2 -#pragma varargck argpos seprint 3 -#pragma varargck argpos smprint 1 -#pragma varargck argpos snprint 3 -#pragma varargck argpos sprint 2 -#pragma varargck argpos vseprint 3 -#pragma varargck argpos vsnprint 3 - -#pragma varargck type "lld" vlong -#pragma varargck type "llx" vlong -#pragma varargck type "lld" uvlong -#pragma varargck type "llx" uvlong -#pragma varargck type "ld" long -#pragma varargck type "lx" long -#pragma varargck type "ld" ulong -#pragma varargck type "lx" ulong -#pragma varargck type "d" int -#pragma varargck type "x" int -#pragma varargck type "c" int -#pragma varargck type "C" int -#pragma varargck type "d" uint -#pragma varargck type "x" uint -#pragma varargck type "c" uint -#pragma varargck type "C" uint -#pragma varargck type "f" double -#pragma varargck type "e" double -#pragma varargck type "g" double -#pragma varargck type "s" char* -#pragma varargck type "q" char* -#pragma varargck type "S" Rune* -#pragma varargck type "Q" Rune* -#pragma varargck type "r" void -#pragma varargck type "%" void -#pragma varargck type "n" int* -#pragma varargck type "p" void* -#pragma varargck flag ',' -#pragma varargck type "<" void* -#pragma varargck type "[" void* -#pragma varargck type "H" void* - -extern int fmtinstall(int, int (*)(Fmt*)); -extern int dofmt(Fmt*, char*); -extern int dorfmt(Fmt*, Rune*); -extern int fmtprint(Fmt*, char*, ...); -extern int fmtvprint(Fmt*, char*, va_list); -extern int fmtrune(Fmt*, int); -extern int fmtstrcpy(Fmt*, char*); -extern int fmtrunestrcpy(Fmt*, Rune*); -/* - * error string for %r - * supplied on per os basis, not part of fmt library - */ -extern int errfmt(Fmt *f); - -/* - * quoted strings - */ -extern char *unquotestrdup(char*); -extern Rune *unquoterunestrdup(Rune*); -extern char *quotestrdup(char*); -extern Rune *quoterunestrdup(Rune*); -extern int quotestrfmt(Fmt*); -extern int quoterunestrfmt(Fmt*); -extern void quotefmtinstall(void); -extern int (*doquote)(int); - -/* - * random number - */ -extern void srand(long); -extern int rand(void); -extern int nrand(int); -extern long lrand(void); -extern long lnrand(long); -extern double frand(void); -extern ulong truerand(void); -extern ulong ntruerand(ulong); - -/* - * math - */ -extern ulong getfcr(void); -extern void setfsr(ulong); -extern ulong getfsr(void); -extern void setfcr(ulong); -extern double NaN(void); -extern double Inf(int); -extern int isNaN(double); -extern int isInf(double, int); - -extern double pow(double, double); -extern double atan2(double, double); -extern double fabs(double); -extern double atan(double); -extern double log(double); -extern double log10(double); -extern double exp(double); -extern double floor(double); -extern double ceil(double); -extern double hypot(double, double); -extern double sin(double); -extern double cos(double); -extern double tan(double); -extern double asin(double); -extern double acos(double); -extern double sinh(double); -extern double cosh(double); -extern double tanh(double); -extern double sqrt(double); -extern double fmod(double, double); - -#define HUGE 3.4028234e38 -#define PIO2 1.570796326794896619231e0 -#define PI (PIO2+PIO2) - -/* - * Time-of-day - */ - -typedef -struct Tm -{ - int sec; - int min; - int hour; - int mday; - int mon; - int year; - int wday; - int yday; - char zone[4]; - int tzoff; -} Tm; - -extern Tm* gmtime(long); -extern Tm* localtime(long); -extern char* asctime(Tm*); -extern char* ctime(long); -extern double cputime(void); -extern long times(long*); -extern long tm2sec(Tm*); -extern vlong nsec(void); - -/* - * one-of-a-kind - */ -enum -{ - PNPROC = 1, - PNGROUP = 2, -}; - -extern void _assert(char*); -extern int abs(int); -extern int atexit(void(*)(void)); -extern void atexitdont(void(*)(void)); -extern int atnotify(int(*)(void*, char*), int); -extern double atof(char*); -extern int atoi(char*); -extern long atol(char*); -extern double charstod(int(*)(void*), void*); -extern char* cleanname(char*); -extern int decrypt(void*, void*, int); -extern int encrypt(void*, void*, int); -extern int dec64(uchar*, int, char*, int); -extern int enc64(char*, int, uchar*, int); -extern int dec32(uchar*, int, char*, int); -extern int enc32(char*, int, uchar*, int); -extern int dec16(uchar*, int, char*, int); -extern int enc16(char*, int, uchar*, int); -extern int encodefmt(Fmt*); -extern void exits(char*); -extern double frexp(double, int*); -extern uintptr getcallerpc(void*); -extern char* getenv(char*); -extern int getfields(char*, char**, int, int, char*); -extern char* getuser(void); -extern char* getwd(char*, int); -extern int iounit(int); -extern long labs(long); -extern double ldexp(double, int); -extern void longjmp(jmp_buf, int); -extern char* mktemp(char*); -extern double modf(double, double*); -extern int netcrypt(void*, void*); -extern void notejmp(void*, jmp_buf, int); -extern void perror(char*); -extern int postnote(int, int, char *); -extern double pow10(int); -extern double ipow10(int); -extern int putenv(char*, char*); -extern void qsort(void*, long, long, int (*)(void*, void*)); -extern void* sbrk(ulong); -extern int setjmp(jmp_buf); -extern double strtod(char*, char**); -extern long strtol(char*, char**, int); -extern ulong strtoul(char*, char**, int); -extern vlong strtoll(char*, char**, int); -extern uvlong strtoull(char*, char**, int); -extern void sysfatal(char*, ...); -#pragma varargck argpos sysfatal 1 -extern void syslog(int, char*, char*, ...); -#pragma varargck argpos syslog 3 -extern long time(long*); -extern int tolower(int); -extern int toupper(int); - -/* - * synchronization - */ -typedef -struct Lock { - int val; -} Lock; - -extern int _tas(int*); - -extern void lock(Lock*); -extern void unlock(Lock*); -extern int canlock(Lock*); - -typedef struct QLp QLp; -struct QLp -{ - int inuse; - QLp *next; - char state; -}; - -typedef -struct QLock -{ - Lock lock; - int locked; - QLp *head; - QLp *tail; -} QLock; - -extern void qlock(QLock*); -extern void qunlock(QLock*); -extern int canqlock(QLock*); -extern void _qlockinit(ulong (*)(ulong, ulong)); /* called only by the thread library */ - -typedef -struct RWLock -{ - Lock lock; - int readers; /* number of readers */ - int writer; /* number of writers */ - QLp *head; /* list of waiting processes */ - QLp *tail; -} RWLock; - -extern int canrlock(RWLock*); -extern int canwlock(RWLock*); -extern void rlock(RWLock*); -extern void runlock(RWLock*); -extern void wlock(RWLock*); -extern void wunlock(RWLock*); - -extern void** privalloc(void); -extern void privfree(void**); - -/* - * network dialing - */ -#define NETPATHLEN 40 -extern int accept(int, char*); -extern int announce(char*, char*); -extern int dial(char*, char*, char*, int*); -extern void setnetmtpt(char*, int, char*); -extern int hangup(int); -extern int listen(char*, char*); -extern char* netmkaddr(char*, char*, char*); -extern int reject(int, char*, char*); - -/* - * system calls - * - */ -#define STATMAX 65535U /* max length of machine-independent stat structure */ -#define DIRMAX (sizeof(Dir)+STATMAX) /* max length of Dir structure */ -#define ERRMAX 128 /* max length of error string */ - -#define MORDER 0x0003 /* mask for bits defining order of mounting */ -#define MREPL 0x0000 /* mount replaces object */ -#define MBEFORE 0x0001 /* mount goes before others in union directory */ -#define MAFTER 0x0002 /* mount goes after others in union directory */ -#define MCREATE 0x0004 /* permit creation in mounted directory */ -#define MCACHE 0x0010 /* cache some data */ -#define MMASK 0x0017 /* all bits on */ - -#define OREAD 0 /* open for read */ -#define OWRITE 1 /* write */ -#define ORDWR 2 /* read and write */ -#define OEXEC 3 /* execute, == read but check execute permission */ -#define OTRUNC 16 /* or'ed in (except for exec), truncate file first */ -#define OCEXEC 32 /* or'ed in, close on exec */ -#define ORCLOSE 64 /* or'ed in, remove on close */ -#define OEXCL 0x1000 /* or'ed in, exclusive use (create only) */ - -#define AEXIST 0 /* accessible: exists */ -#define AEXEC 1 /* execute access */ -#define AWRITE 2 /* write access */ -#define AREAD 4 /* read access */ - - -/* Segattch */ -#define SG_RONLY 0040 /* read only */ -#define SG_CEXEC 0100 /* detach on exec */ - -#define NCONT 0 /* continue after note */ -#define NDFLT 1 /* terminate after note */ -#define NSAVE 2 /* clear note but hold state */ -#define NRSTR 3 /* restore saved state */ - -/* rfork */ -enum -{ - RFNAMEG = (1<<0), - RFENVG = (1<<1), - RFFDG = (1<<2), - RFNOTEG = (1<<3), - RFPROC = (1<<4), - RFMEM = (1<<5), - RFNOWAIT = (1<<6), - RFCNAMEG = (1<<10), - RFCENVG = (1<<11), - RFCFDG = (1<<12), - RFREND = (1<<13), - RFNOMNT = (1<<14) -}; - -/* bits in Qid.type */ -#define QTDIR 0x80 /* type bit for directories */ -#define QTAPPEND 0x40 /* type bit for append only files */ -#define QTEXCL 0x20 /* type bit for exclusive use files */ -#define QTMOUNT 0x10 /* type bit for mounted channel */ -#define QTAUTH 0x08 /* type bit for authentication file */ -#define QTFILE 0x00 /* plain file */ - -/* bits in Dir.mode */ -#define DMDIR 0x80000000 /* mode bit for directories */ -#define DMAPPEND 0x40000000 /* mode bit for append only files */ -#define DMEXCL 0x20000000 /* mode bit for exclusive use files */ -#define DMMOUNT 0x10000000 /* mode bit for mounted channel */ -#define DMAUTH 0x08000000 /* mode bit for authentication file */ -#define DMREAD 0x4 /* mode bit for read permission */ -#define DMWRITE 0x2 /* mode bit for write permission */ -#define DMEXEC 0x1 /* mode bit for execute permission */ - -typedef -struct Qid -{ - uvlong path; - ulong vers; - uchar type; -} Qid; - -typedef -struct Dir { - /* system-modified data */ - ushort type; /* server type */ - uint dev; /* server subtype */ - /* file data */ - Qid qid; /* unique id from server */ - ulong mode; /* permissions */ - ulong atime; /* last read time */ - ulong mtime; /* last write time */ - vlong length; /* file length */ - char *name; /* last element of path */ - char *uid; /* owner name */ - char *gid; /* group name */ - char *muid; /* last modifier name */ -} Dir; - -extern Dir* dirstat(char*); -extern Dir* dirfstat(int); -extern int dirwstat(char*, Dir*); -extern int dirfwstat(int, Dir*); -extern long dirread(int, Dir**); -extern void nulldir(Dir*); -extern long dirreadall(int, Dir**); - -typedef -struct Waitmsg -{ - int pid; /* of loved one */ - ulong time[3]; /* of loved one & descendants */ - char *msg; -} Waitmsg; - -typedef -struct IOchunk -{ - void *addr; - ulong len; -} IOchunk; - -extern void _exits(char*); - -extern void abort(void); -extern int access(char*, int); -extern long alarm(ulong); -extern int await(char*, int); -extern int bind(char*, char*, int); -extern int brk(void*); -extern int chdir(char*); -extern int close(int); -extern int create(char*, int, ulong); -extern int dup(int, int); -extern int errstr(char*, uint); -extern int exec(char*, char*[]); -extern int execl(char*, ...); -extern int fork(void); -extern int rfork(int); -extern int fauth(int, char*); -extern int fstat(int, uchar*, int); -extern int fwstat(int, uchar*, int); -extern int fversion(int, int, char*, int); -extern int mount(int, int, char*, int, char*); -extern int unmount(char*, char*); -extern int noted(int); -extern int notify(void(*)(void*, char*)); -extern int open(char*, int); -extern int fd2path(int, char*, int); -extern int pipe(int*); -extern long pread(int, void*, long, vlong); -extern long preadv(int, IOchunk*, int, vlong); -extern long pwrite(int, void*, long, vlong); -extern long pwritev(int, IOchunk*, int, vlong); -extern long read(int, void*, long); -extern long readn(int, void*, long); -extern long readv(int, IOchunk*, int); -extern int remove(char*); -extern void* sbrk(ulong); -extern long oseek(int, long, int); -extern vlong seek(int, vlong, int); -extern long segattach(int, char*, void*, ulong); -extern int segbrk(void*, void*); -extern int segdetach(void*); -extern int segflush(void*, ulong); -extern int segfree(void*, ulong); -extern int sleep(long); -extern int stat(char*, uchar*, int); -extern Waitmsg* wait(void); -extern int waitpid(void); -extern long write(int, void*, long); -extern long writev(int, IOchunk*, int); -extern int wstat(char*, uchar*, int); -extern void* rendezvous(void*, void*); - -extern int getpid(void); -extern int getppid(void); -extern void rerrstr(char*, uint); -extern char* sysname(void); -extern void werrstr(char*, ...); -#pragma varargck argpos werrstr 1 - -extern char *argv0; -#define ARGBEGIN for((argv0||(argv0=*argv)),argv++,argc--;\ - argv[0] && argv[0][0]=='-' && argv[0][1];\ - argc--, argv++) {\ - char *_args, *_argt;\ - Rune _argc;\ - _args = &argv[0][1];\ - if(_args[0]=='-' && _args[1]==0){\ - argc--; argv++; break;\ - }\ - _argc = 0;\ - while(*_args && (_args += chartorune(&_argc, _args)))\ - switch(_argc) -#define ARGEND SET(_argt);USED(_argt,_argc,_args);}USED(argv, argc); -#define ARGF() (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): 0)) -#define EARGF(x) (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): ((x), abort(), (char*)0))) - -#define ARGC() _argc - - -/* - * Extensions for Inferno to basic libc.h - */ - -#define setbinmode() -#define __LITTLE_ENDIAN - +#include "../../include/lib9.h" diff --git a/Plan9/arm/include/u.h b/Plan9/arm/include/u.h index ddefe4f4..0d03fe0f 100644 --- a/Plan9/arm/include/u.h +++ b/Plan9/arm/include/u.h @@ -1,65 +1 @@ -#define nil ((void*)0) - -typedef unsigned short ushort; -typedef unsigned char uchar; -typedef unsigned long ulong; -typedef unsigned int uint; -typedef signed char schar; -typedef long long vlong; -typedef unsigned long long uvlong; -typedef uint Rune; -typedef union FPdbleword FPdbleword; -typedef long jmp_buf[2]; -#define JMPBUFSP 0 -#define JMPBUFPC 1 -#define JMPBUFDPC 0 -typedef unsigned int mpdigit; /* for /sys/include/mp.h */ -typedef unsigned char u8int; -typedef unsigned short u16int; -typedef unsigned int u32int; -typedef unsigned long long u64int; -typedef unsigned long uintptr; - -/* FCR */ -#define FPINEX (1<<20) -#define FPUNFL (1<<19) -#define FPOVFL (1<<18) -#define FPZDIV (1<<17) -#define FPINVAL (1<<16) -#define FPRNR (0<<0) -#define FPRZ (1<<0) -#define FPRPINF (2<<0) -#define FPRNINF (3<<0) -#define FPRMASK (3<<0) -#define FPPEXT 0 -#define FPPSGL 0 -#define FPPDBL 0 -#define FPPMASK 0 -/* FSR */ -#define FPAINEX (1<<4) -#define FPAUNFL (1<<3) -#define FPAOVFL (1<<2) -#define FPAZDIV (1<<1) -#define FPAINVAL (1<<0) -union FPdbleword -{ - double x; - struct { /* little endian (on VFP and now in software) */ - ulong lo; - ulong hi; - }; -}; - -typedef char* va_list; -#define va_start(list, start) list =\ - (sizeof(start) < 4?\ - (char*)((int*)&(start)+1):\ - (char*)(&(start)+1)) -#define va_end(list)\ - USED(list) -#define va_arg(list, mode)\ - ((sizeof(mode) == 1)?\ - ((mode*)(list += 4))[-4]:\ - (sizeof(mode) == 2)?\ - ((mode*)(list += 4))[-2]:\ - ((mode*)(list += sizeof(mode)))[-1]) +#include "/arm/include/u.h" diff --git a/Plan9/mips/include/lib9.h b/Plan9/mips/include/lib9.h index 003188d3..97f16dd9 100644 --- a/Plan9/mips/include/lib9.h +++ b/Plan9/mips/include/lib9.h @@ -1,659 +1 @@ -#include -typedef unsigned long size_t; - -#define nelem(x) (sizeof(x)/sizeof((x)[0])) -#define offsetof(s, m) (ulong)(&(((s*)0)->m)) -#define assert(x) if(x){}else _assert("x") - -/* - * mem routines - */ -extern void* memccpy(void*, void*, int, ulong); -extern void* memset(void*, int, ulong); -extern int memcmp(void*, void*, ulong); -extern void* memcpy(void*, void*, ulong); -extern void* memmove(void*, void*, ulong); -extern void* memchr(void*, int, ulong); - -/* - * string routines - */ -extern char* strcat(char*, char*); -extern char* strchr(char*, int); -extern int strcmp(char*, char*); -extern char* strcpy(char*, char*); -extern char* strecpy(char*, char*, char*); -extern char* strdup(char*); -extern char* strncat(char*, char*, long); -extern char* strncpy(char*, char*, long); -extern int strncmp(char*, char*, long); -extern char* strpbrk(char*, char*); -extern char* strrchr(char*, int); -extern char* strtok(char*, char*); -extern long strlen(char*); -extern long strspn(char*, char*); -extern long strcspn(char*, char*); -extern char* strstr(char*, char*); -extern int cistrncmp(char*, char*, int); -extern int cistrcmp(char*, char*); -extern char* cistrstr(char*, char*); -extern int tokenize(char*, char**, int); - -enum -{ - UTFmax = 4, /* maximum bytes per rune */ - Runesync = 0x80, /* cannot represent part of a UTF sequence (<) */ - Runeself = 0x80, /* rune and UTF sequences are the same (<) */ - Runeerror = 0xFFFD, /* decoding error in UTF */ - Runemax = 0x10FFFF, /* 21-bit rune */ - Runemask = 0x1FFFFF, /* bits used by runes (see grep) */ -}; - -/* - * rune routines - */ -extern int runetochar(char*, Rune*); -extern int chartorune(Rune*, char*); -extern int runelen(long); -extern int runenlen(Rune*, int); -extern int fullrune(char*, int); -extern int utflen(char*); -extern int utfnlen(char*, long); -extern char* utfrune(char*, long); -extern char* utfrrune(char*, long); -extern char* utfutf(char*, char*); -extern char* utfecpy(char*, char*, char*); - -extern Rune* runestrcat(Rune*, Rune*); -extern Rune* runestrchr(Rune*, Rune); -extern int runestrcmp(Rune*, Rune*); -extern Rune* runestrcpy(Rune*, Rune*); -extern Rune* runestrncpy(Rune*, Rune*, long); -extern Rune* runestrecpy(Rune*, Rune*, Rune*); -extern Rune* runestrdup(Rune*); -extern Rune* runestrncat(Rune*, Rune*, long); -extern int runestrncmp(Rune*, Rune*, long); -extern Rune* runestrrchr(Rune*, Rune); -extern long runestrlen(Rune*); -extern Rune* runestrstr(Rune*, Rune*); - -extern Rune tolowerrune(Rune); -extern Rune totitlerune(Rune); -extern Rune toupperrune(Rune); -extern int isalpharune(Rune); -extern int islowerrune(Rune); -extern int isspacerune(Rune); -extern int istitlerune(Rune); -extern int isupperrune(Rune); - -/* - * malloc - */ -extern void* malloc(ulong); -extern void* mallocz(ulong, int); -extern void free(void*); -extern ulong msize(void*); -extern void* calloc(ulong, ulong); -extern void* realloc(void*, ulong); -extern void setmalloctag(void*, ulong); -extern void setrealloctag(void*, ulong); -extern ulong getmalloctag(void*); -extern ulong getrealloctag(void*); -extern void* malloctopoolblock(void*); - -/* - * print routines - */ -typedef struct Fmt Fmt; -struct Fmt{ - uchar runes; /* output buffer is runes or chars? */ - void *start; /* of buffer */ - void *to; /* current place in the buffer */ - void *stop; /* end of the buffer; overwritten if flush fails */ - int (*flush)(Fmt *); /* called when to == stop */ - void *farg; /* to make flush a closure */ - int nfmt; /* num chars formatted so far */ - va_list args; /* args passed to dofmt */ - int r; /* % format Rune */ - int width; - int prec; - ulong flags; -}; - -enum{ - FmtWidth = 1, - FmtLeft = FmtWidth << 1, - FmtPrec = FmtLeft << 1, - FmtSharp = FmtPrec << 1, - FmtSpace = FmtSharp << 1, - FmtSign = FmtSpace << 1, - FmtZero = FmtSign << 1, - FmtUnsigned = FmtZero << 1, - FmtShort = FmtUnsigned << 1, - FmtLong = FmtShort << 1, - FmtVLong = FmtLong << 1, - FmtComma = FmtVLong << 1, - FmtByte = FmtComma << 1, - - FmtFlag = FmtByte << 1 -}; - -extern int print(char*, ...); -extern char* seprint(char*, char*, char*, ...); -extern char* vseprint(char*, char*, char*, va_list); -extern int snprint(char*, int, char*, ...); -extern int vsnprint(char*, int, char*, va_list); -extern char* smprint(char*, ...); -extern char* vsmprint(char*, va_list); -extern int sprint(char*, char*, ...); -extern int fprint(int, char*, ...); -extern int vfprint(int, char*, va_list); - -extern int runesprint(Rune*, char*, ...); -extern int runesnprint(Rune*, int, char*, ...); -extern int runevsnprint(Rune*, int, char*, va_list); -extern Rune* runeseprint(Rune*, Rune*, char*, ...); -extern Rune* runevseprint(Rune*, Rune*, char*, va_list); -extern Rune* runesmprint(char*, ...); -extern Rune* runevsmprint(char*, va_list); - -extern int fmtfdinit(Fmt*, int, char*, int); -extern int fmtfdflush(Fmt*); -extern int fmtstrinit(Fmt*); -extern char* fmtstrflush(Fmt*); -extern int runefmtstrinit(Fmt*); -extern Rune* runefmtstrflush(Fmt*); - -#pragma varargck argpos fmtprint 2 -#pragma varargck argpos fprint 2 -#pragma varargck argpos print 1 -#pragma varargck argpos runeseprint 3 -#pragma varargck argpos runesmprint 1 -#pragma varargck argpos runesnprint 3 -#pragma varargck argpos runesprint 2 -#pragma varargck argpos seprint 3 -#pragma varargck argpos smprint 1 -#pragma varargck argpos snprint 3 -#pragma varargck argpos sprint 2 -#pragma varargck argpos vseprint 3 -#pragma varargck argpos vsnprint 3 - -#pragma varargck type "lld" vlong -#pragma varargck type "llx" vlong -#pragma varargck type "lld" uvlong -#pragma varargck type "llx" uvlong -#pragma varargck type "ld" long -#pragma varargck type "lx" long -#pragma varargck type "ld" ulong -#pragma varargck type "lx" ulong -#pragma varargck type "d" int -#pragma varargck type "x" int -#pragma varargck type "c" int -#pragma varargck type "C" int -#pragma varargck type "d" uint -#pragma varargck type "x" uint -#pragma varargck type "c" uint -#pragma varargck type "C" uint -#pragma varargck type "f" double -#pragma varargck type "e" double -#pragma varargck type "g" double -#pragma varargck type "s" char* -#pragma varargck type "q" char* -#pragma varargck type "S" Rune* -#pragma varargck type "Q" Rune* -#pragma varargck type "r" void -#pragma varargck type "%" void -#pragma varargck type "n" int* -#pragma varargck type "p" void* -#pragma varargck flag ',' -#pragma varargck type "<" void* -#pragma varargck type "[" void* -#pragma varargck type "H" void* - -extern int fmtinstall(int, int (*)(Fmt*)); -extern int dofmt(Fmt*, char*); -extern int dorfmt(Fmt*, Rune*); -extern int fmtprint(Fmt*, char*, ...); -extern int fmtvprint(Fmt*, char*, va_list); -extern int fmtrune(Fmt*, int); -extern int fmtstrcpy(Fmt*, char*); -extern int fmtrunestrcpy(Fmt*, Rune*); -/* - * error string for %r - * supplied on per os basis, not part of fmt library - */ -extern int errfmt(Fmt *f); - -/* - * quoted strings - */ -extern char *unquotestrdup(char*); -extern Rune *unquoterunestrdup(Rune*); -extern char *quotestrdup(char*); -extern Rune *quoterunestrdup(Rune*); -extern int quotestrfmt(Fmt*); -extern int quoterunestrfmt(Fmt*); -extern void quotefmtinstall(void); -extern int (*doquote)(int); - -/* - * random number - */ -extern void srand(long); -extern int rand(void); -extern int nrand(int); -extern long lrand(void); -extern long lnrand(long); -extern double frand(void); -extern ulong truerand(void); -extern ulong ntruerand(ulong); - -/* - * math - */ -extern ulong getfcr(void); -extern void setfsr(ulong); -extern ulong getfsr(void); -extern void setfcr(ulong); -extern double NaN(void); -extern double Inf(int); -extern int isNaN(double); -extern int isInf(double, int); - -extern double pow(double, double); -extern double atan2(double, double); -extern double fabs(double); -extern double atan(double); -extern double log(double); -extern double log10(double); -extern double exp(double); -extern double floor(double); -extern double ceil(double); -extern double hypot(double, double); -extern double sin(double); -extern double cos(double); -extern double tan(double); -extern double asin(double); -extern double acos(double); -extern double sinh(double); -extern double cosh(double); -extern double tanh(double); -extern double sqrt(double); -extern double fmod(double, double); - -#define HUGE 3.4028234e38 -#define PIO2 1.570796326794896619231e0 -#define PI (PIO2+PIO2) - -/* - * Time-of-day - */ - -typedef -struct Tm -{ - int sec; - int min; - int hour; - int mday; - int mon; - int year; - int wday; - int yday; - char zone[4]; - int tzoff; -} Tm; - -extern Tm* gmtime(long); -extern Tm* localtime(long); -extern char* asctime(Tm*); -extern char* ctime(long); -extern double cputime(void); -extern long times(long*); -extern long tm2sec(Tm*); -extern vlong nsec(void); - -/* - * one-of-a-kind - */ -enum -{ - PNPROC = 1, - PNGROUP = 2, -}; - -extern void _assert(char*); -extern int abs(int); -extern int atexit(void(*)(void)); -extern void atexitdont(void(*)(void)); -extern int atnotify(int(*)(void*, char*), int); -extern double atof(char*); -extern int atoi(char*); -extern long atol(char*); -extern double charstod(int(*)(void*), void*); -extern char* cleanname(char*); -extern int decrypt(void*, void*, int); -extern int encrypt(void*, void*, int); -extern int dec64(uchar*, int, char*, int); -extern int enc64(char*, int, uchar*, int); -extern int dec32(uchar*, int, char*, int); -extern int enc32(char*, int, uchar*, int); -extern int dec16(uchar*, int, char*, int); -extern int enc16(char*, int, uchar*, int); -extern int encodefmt(Fmt*); -extern void exits(char*); -extern double frexp(double, int*); -extern uintptr getcallerpc(void*); -extern char* getenv(char*); -extern int getfields(char*, char**, int, int, char*); -extern char* getuser(void); -extern char* getwd(char*, int); -extern int iounit(int); -extern long labs(long); -extern double ldexp(double, int); -extern void longjmp(jmp_buf, int); -extern char* mktemp(char*); -extern double modf(double, double*); -extern int netcrypt(void*, void*); -extern void notejmp(void*, jmp_buf, int); -extern void perror(char*); -extern int postnote(int, int, char *); -extern double pow10(int); -extern double ipow10(int); -extern int putenv(char*, char*); -extern void qsort(void*, long, long, int (*)(void*, void*)); -extern void* sbrk(ulong); -extern int setjmp(jmp_buf); -extern double strtod(char*, char**); -extern long strtol(char*, char**, int); -extern ulong strtoul(char*, char**, int); -extern vlong strtoll(char*, char**, int); -extern uvlong strtoull(char*, char**, int); -extern void sysfatal(char*, ...); -#pragma varargck argpos sysfatal 1 -extern void syslog(int, char*, char*, ...); -#pragma varargck argpos syslog 3 -extern long time(long*); -extern int tolower(int); -extern int toupper(int); - -/* - * synchronization - */ -typedef -struct Lock { - int val; -} Lock; - -extern int _tas(int*); - -extern void lock(Lock*); -extern void unlock(Lock*); -extern int canlock(Lock*); - -typedef struct QLp QLp; -struct QLp -{ - int inuse; - QLp *next; - char state; -}; - -typedef -struct QLock -{ - Lock lock; - int locked; - QLp *head; - QLp *tail; -} QLock; - -extern void qlock(QLock*); -extern void qunlock(QLock*); -extern int canqlock(QLock*); -extern void _qlockinit(ulong (*)(ulong, ulong)); /* called only by the thread library */ - -typedef -struct RWLock -{ - Lock lock; - int readers; /* number of readers */ - int writer; /* number of writers */ - QLp *head; /* list of waiting processes */ - QLp *tail; -} RWLock; - -extern int canrlock(RWLock*); -extern int canwlock(RWLock*); -extern void rlock(RWLock*); -extern void runlock(RWLock*); -extern void wlock(RWLock*); -extern void wunlock(RWLock*); - -extern void** privalloc(void); -extern void privfree(void**); - -/* - * network dialing - */ -#define NETPATHLEN 40 -extern int accept(int, char*); -extern int announce(char*, char*); -extern int dial(char*, char*, char*, int*); -extern void setnetmtpt(char*, int, char*); -extern int hangup(int); -extern int listen(char*, char*); -extern char* netmkaddr(char*, char*, char*); -extern int reject(int, char*, char*); - -/* - * system calls - * - */ -#define STATMAX 65535U /* max length of machine-independent stat structure */ -#define DIRMAX (sizeof(Dir)+STATMAX) /* max length of Dir structure */ -#define ERRMAX 128 /* max length of error string */ - -#define MORDER 0x0003 /* mask for bits defining order of mounting */ -#define MREPL 0x0000 /* mount replaces object */ -#define MBEFORE 0x0001 /* mount goes before others in union directory */ -#define MAFTER 0x0002 /* mount goes after others in union directory */ -#define MCREATE 0x0004 /* permit creation in mounted directory */ -#define MCACHE 0x0010 /* cache some data */ -#define MMASK 0x0017 /* all bits on */ - -#define OREAD 0 /* open for read */ -#define OWRITE 1 /* write */ -#define ORDWR 2 /* read and write */ -#define OEXEC 3 /* execute, == read but check execute permission */ -#define OTRUNC 16 /* or'ed in (except for exec), truncate file first */ -#define OCEXEC 32 /* or'ed in, close on exec */ -#define ORCLOSE 64 /* or'ed in, remove on close */ -#define OEXCL 0x1000 /* or'ed in, exclusive use (create only) */ - -#define AEXIST 0 /* accessible: exists */ -#define AEXEC 1 /* execute access */ -#define AWRITE 2 /* write access */ -#define AREAD 4 /* read access */ - - -/* Segattch */ -#define SG_RONLY 0040 /* read only */ -#define SG_CEXEC 0100 /* detach on exec */ - -#define NCONT 0 /* continue after note */ -#define NDFLT 1 /* terminate after note */ -#define NSAVE 2 /* clear note but hold state */ -#define NRSTR 3 /* restore saved state */ - -/* rfork */ -enum -{ - RFNAMEG = (1<<0), - RFENVG = (1<<1), - RFFDG = (1<<2), - RFNOTEG = (1<<3), - RFPROC = (1<<4), - RFMEM = (1<<5), - RFNOWAIT = (1<<6), - RFCNAMEG = (1<<10), - RFCENVG = (1<<11), - RFCFDG = (1<<12), - RFREND = (1<<13), - RFNOMNT = (1<<14) -}; - -/* bits in Qid.type */ -#define QTDIR 0x80 /* type bit for directories */ -#define QTAPPEND 0x40 /* type bit for append only files */ -#define QTEXCL 0x20 /* type bit for exclusive use files */ -#define QTMOUNT 0x10 /* type bit for mounted channel */ -#define QTAUTH 0x08 /* type bit for authentication file */ -#define QTFILE 0x00 /* plain file */ - -/* bits in Dir.mode */ -#define DMDIR 0x80000000 /* mode bit for directories */ -#define DMAPPEND 0x40000000 /* mode bit for append only files */ -#define DMEXCL 0x20000000 /* mode bit for exclusive use files */ -#define DMMOUNT 0x10000000 /* mode bit for mounted channel */ -#define DMAUTH 0x08000000 /* mode bit for authentication file */ -#define DMREAD 0x4 /* mode bit for read permission */ -#define DMWRITE 0x2 /* mode bit for write permission */ -#define DMEXEC 0x1 /* mode bit for execute permission */ - -typedef -struct Qid -{ - uvlong path; - ulong vers; - uchar type; -} Qid; - -typedef -struct Dir { - /* system-modified data */ - ushort type; /* server type */ - uint dev; /* server subtype */ - /* file data */ - Qid qid; /* unique id from server */ - ulong mode; /* permissions */ - ulong atime; /* last read time */ - ulong mtime; /* last write time */ - vlong length; /* file length */ - char *name; /* last element of path */ - char *uid; /* owner name */ - char *gid; /* group name */ - char *muid; /* last modifier name */ -} Dir; - -extern Dir* dirstat(char*); -extern Dir* dirfstat(int); -extern int dirwstat(char*, Dir*); -extern int dirfwstat(int, Dir*); -extern long dirread(int, Dir**); -extern void nulldir(Dir*); -extern long dirreadall(int, Dir**); - -typedef -struct Waitmsg -{ - int pid; /* of loved one */ - ulong time[3]; /* of loved one & descendants */ - char *msg; -} Waitmsg; - -typedef -struct IOchunk -{ - void *addr; - ulong len; -} IOchunk; - -extern void _exits(char*); - -extern void abort(void); -extern int access(char*, int); -extern long alarm(ulong); -extern int await(char*, int); -extern int bind(char*, char*, int); -extern int brk(void*); -extern int chdir(char*); -extern int close(int); -extern int create(char*, int, ulong); -extern int dup(int, int); -extern int errstr(char*, uint); -extern int exec(char*, char*[]); -extern int execl(char*, ...); -extern int fork(void); -extern int rfork(int); -extern int fauth(int, char*); -extern int fstat(int, uchar*, int); -extern int fwstat(int, uchar*, int); -extern int fversion(int, int, char*, int); -extern int mount(int, int, char*, int, char*); -extern int unmount(char*, char*); -extern int noted(int); -extern int notify(void(*)(void*, char*)); -extern int open(char*, int); -extern int fd2path(int, char*, int); -extern int pipe(int*); -extern long pread(int, void*, long, vlong); -extern long preadv(int, IOchunk*, int, vlong); -extern long pwrite(int, void*, long, vlong); -extern long pwritev(int, IOchunk*, int, vlong); -extern long read(int, void*, long); -extern long readn(int, void*, long); -extern long readv(int, IOchunk*, int); -extern int remove(char*); -extern void* sbrk(ulong); -extern long oseek(int, long, int); -extern vlong seek(int, vlong, int); -extern long segattach(int, char*, void*, ulong); -extern int segbrk(void*, void*); -extern int segdetach(void*); -extern int segflush(void*, ulong); -extern int segfree(void*, ulong); -extern int sleep(long); -extern int stat(char*, uchar*, int); -extern Waitmsg* wait(void); -extern int waitpid(void); -extern long write(int, void*, long); -extern long writev(int, IOchunk*, int); -extern int wstat(char*, uchar*, int); -extern void* rendezvous(void*, void*); - -extern int getpid(void); -extern int getppid(void); -extern void rerrstr(char*, uint); -extern char* sysname(void); -extern void werrstr(char*, ...); -#pragma varargck argpos werrstr 1 - -extern char *argv0; -#define ARGBEGIN for((argv0||(argv0=*argv)),argv++,argc--;\ - argv[0] && argv[0][0]=='-' && argv[0][1];\ - argc--, argv++) {\ - char *_args, *_argt;\ - Rune _argc;\ - _args = &argv[0][1];\ - if(_args[0]=='-' && _args[1]==0){\ - argc--; argv++; break;\ - }\ - _argc = 0;\ - while(*_args && (_args += chartorune(&_argc, _args)))\ - switch(_argc) -#define ARGEND SET(_argt);USED(_argt,_argc,_args);}USED(argv, argc); -#define ARGF() (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): 0)) -#define EARGF(x) (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): ((x), abort(), (char*)0))) - -#define ARGC() _argc - -/* - * Extensions for Inferno to basic libc.h - */ - -#define setbinmode() -#undef __LITTLE_ENDIAN - +#include "../../include/lib9.h" diff --git a/Plan9/mips/include/u.h b/Plan9/mips/include/u.h index eb908e6d..475a73a6 100644 --- a/Plan9/mips/include/u.h +++ b/Plan9/mips/include/u.h @@ -1,65 +1 @@ -#define nil ((void*)0) -typedef unsigned short ushort; -typedef unsigned char uchar; -typedef unsigned long ulong; -typedef unsigned int uint; -typedef signed char schar; -typedef long long vlong; -typedef unsigned long long uvlong; -typedef unsigned long uintptr; -typedef uint Rune; -typedef union FPdbleword FPdbleword; -typedef long jmp_buf[2]; -#define JMPBUFSP 0 -#define JMPBUFPC 1 -#define JMPBUFDPC 0 -typedef unsigned int mpdigit; /* for /sys/include/mp.h */ -typedef unsigned char u8int; -typedef unsigned short u16int; -typedef unsigned int u32int; -typedef unsigned long long u64int; - -/* FCR */ -#define FPINEX (1<<7) -#define FPUNFL (1<<8) -#define FPOVFL (1<<9) -#define FPZDIV (1<<10) -#define FPINVAL (1<<11) -#define FPRNR (0<<0) -#define FPRZ (1<<0) -#define FPRPINF (2<<0) -#define FPRNINF (3<<0) -#define FPRMASK (3<<0) -#define FPPEXT 0 -#define FPPSGL 0 -#define FPPDBL 0 -#define FPPMASK 0 -/* FSR */ -#define FPAINEX (1<<2) -#define FPAOVFL (1<<4) -#define FPAUNFL (1<<3) -#define FPAZDIV (1<<5) -#define FPAINVAL (1<<6) -union FPdbleword -{ - double x; - struct { /* big endian */ - ulong hi; - ulong lo; - }; -}; - -/* stdarg */ -typedef char* va_list; -#define va_start(list, start) list =\ - (sizeof(start) < 4?\ - (char*)((int*)&(start)+1):\ - (char*)(&(start)+1)) -#define va_end(list)\ - USED(list) -#define va_arg(list, mode)\ - ((sizeof(mode) == 1)?\ - ((mode*)(list += 4))[-1]:\ - (sizeof(mode) == 2)?\ - ((mode*)(list += 4))[-1]:\ - ((mode*)(list += sizeof(mode)))[-1]) +#include "/mips/include/u.h" diff --git a/Plan9/power/include/lib9.h b/Plan9/power/include/lib9.h index 003188d3..97f16dd9 100644 --- a/Plan9/power/include/lib9.h +++ b/Plan9/power/include/lib9.h @@ -1,659 +1 @@ -#include -typedef unsigned long size_t; - -#define nelem(x) (sizeof(x)/sizeof((x)[0])) -#define offsetof(s, m) (ulong)(&(((s*)0)->m)) -#define assert(x) if(x){}else _assert("x") - -/* - * mem routines - */ -extern void* memccpy(void*, void*, int, ulong); -extern void* memset(void*, int, ulong); -extern int memcmp(void*, void*, ulong); -extern void* memcpy(void*, void*, ulong); -extern void* memmove(void*, void*, ulong); -extern void* memchr(void*, int, ulong); - -/* - * string routines - */ -extern char* strcat(char*, char*); -extern char* strchr(char*, int); -extern int strcmp(char*, char*); -extern char* strcpy(char*, char*); -extern char* strecpy(char*, char*, char*); -extern char* strdup(char*); -extern char* strncat(char*, char*, long); -extern char* strncpy(char*, char*, long); -extern int strncmp(char*, char*, long); -extern char* strpbrk(char*, char*); -extern char* strrchr(char*, int); -extern char* strtok(char*, char*); -extern long strlen(char*); -extern long strspn(char*, char*); -extern long strcspn(char*, char*); -extern char* strstr(char*, char*); -extern int cistrncmp(char*, char*, int); -extern int cistrcmp(char*, char*); -extern char* cistrstr(char*, char*); -extern int tokenize(char*, char**, int); - -enum -{ - UTFmax = 4, /* maximum bytes per rune */ - Runesync = 0x80, /* cannot represent part of a UTF sequence (<) */ - Runeself = 0x80, /* rune and UTF sequences are the same (<) */ - Runeerror = 0xFFFD, /* decoding error in UTF */ - Runemax = 0x10FFFF, /* 21-bit rune */ - Runemask = 0x1FFFFF, /* bits used by runes (see grep) */ -}; - -/* - * rune routines - */ -extern int runetochar(char*, Rune*); -extern int chartorune(Rune*, char*); -extern int runelen(long); -extern int runenlen(Rune*, int); -extern int fullrune(char*, int); -extern int utflen(char*); -extern int utfnlen(char*, long); -extern char* utfrune(char*, long); -extern char* utfrrune(char*, long); -extern char* utfutf(char*, char*); -extern char* utfecpy(char*, char*, char*); - -extern Rune* runestrcat(Rune*, Rune*); -extern Rune* runestrchr(Rune*, Rune); -extern int runestrcmp(Rune*, Rune*); -extern Rune* runestrcpy(Rune*, Rune*); -extern Rune* runestrncpy(Rune*, Rune*, long); -extern Rune* runestrecpy(Rune*, Rune*, Rune*); -extern Rune* runestrdup(Rune*); -extern Rune* runestrncat(Rune*, Rune*, long); -extern int runestrncmp(Rune*, Rune*, long); -extern Rune* runestrrchr(Rune*, Rune); -extern long runestrlen(Rune*); -extern Rune* runestrstr(Rune*, Rune*); - -extern Rune tolowerrune(Rune); -extern Rune totitlerune(Rune); -extern Rune toupperrune(Rune); -extern int isalpharune(Rune); -extern int islowerrune(Rune); -extern int isspacerune(Rune); -extern int istitlerune(Rune); -extern int isupperrune(Rune); - -/* - * malloc - */ -extern void* malloc(ulong); -extern void* mallocz(ulong, int); -extern void free(void*); -extern ulong msize(void*); -extern void* calloc(ulong, ulong); -extern void* realloc(void*, ulong); -extern void setmalloctag(void*, ulong); -extern void setrealloctag(void*, ulong); -extern ulong getmalloctag(void*); -extern ulong getrealloctag(void*); -extern void* malloctopoolblock(void*); - -/* - * print routines - */ -typedef struct Fmt Fmt; -struct Fmt{ - uchar runes; /* output buffer is runes or chars? */ - void *start; /* of buffer */ - void *to; /* current place in the buffer */ - void *stop; /* end of the buffer; overwritten if flush fails */ - int (*flush)(Fmt *); /* called when to == stop */ - void *farg; /* to make flush a closure */ - int nfmt; /* num chars formatted so far */ - va_list args; /* args passed to dofmt */ - int r; /* % format Rune */ - int width; - int prec; - ulong flags; -}; - -enum{ - FmtWidth = 1, - FmtLeft = FmtWidth << 1, - FmtPrec = FmtLeft << 1, - FmtSharp = FmtPrec << 1, - FmtSpace = FmtSharp << 1, - FmtSign = FmtSpace << 1, - FmtZero = FmtSign << 1, - FmtUnsigned = FmtZero << 1, - FmtShort = FmtUnsigned << 1, - FmtLong = FmtShort << 1, - FmtVLong = FmtLong << 1, - FmtComma = FmtVLong << 1, - FmtByte = FmtComma << 1, - - FmtFlag = FmtByte << 1 -}; - -extern int print(char*, ...); -extern char* seprint(char*, char*, char*, ...); -extern char* vseprint(char*, char*, char*, va_list); -extern int snprint(char*, int, char*, ...); -extern int vsnprint(char*, int, char*, va_list); -extern char* smprint(char*, ...); -extern char* vsmprint(char*, va_list); -extern int sprint(char*, char*, ...); -extern int fprint(int, char*, ...); -extern int vfprint(int, char*, va_list); - -extern int runesprint(Rune*, char*, ...); -extern int runesnprint(Rune*, int, char*, ...); -extern int runevsnprint(Rune*, int, char*, va_list); -extern Rune* runeseprint(Rune*, Rune*, char*, ...); -extern Rune* runevseprint(Rune*, Rune*, char*, va_list); -extern Rune* runesmprint(char*, ...); -extern Rune* runevsmprint(char*, va_list); - -extern int fmtfdinit(Fmt*, int, char*, int); -extern int fmtfdflush(Fmt*); -extern int fmtstrinit(Fmt*); -extern char* fmtstrflush(Fmt*); -extern int runefmtstrinit(Fmt*); -extern Rune* runefmtstrflush(Fmt*); - -#pragma varargck argpos fmtprint 2 -#pragma varargck argpos fprint 2 -#pragma varargck argpos print 1 -#pragma varargck argpos runeseprint 3 -#pragma varargck argpos runesmprint 1 -#pragma varargck argpos runesnprint 3 -#pragma varargck argpos runesprint 2 -#pragma varargck argpos seprint 3 -#pragma varargck argpos smprint 1 -#pragma varargck argpos snprint 3 -#pragma varargck argpos sprint 2 -#pragma varargck argpos vseprint 3 -#pragma varargck argpos vsnprint 3 - -#pragma varargck type "lld" vlong -#pragma varargck type "llx" vlong -#pragma varargck type "lld" uvlong -#pragma varargck type "llx" uvlong -#pragma varargck type "ld" long -#pragma varargck type "lx" long -#pragma varargck type "ld" ulong -#pragma varargck type "lx" ulong -#pragma varargck type "d" int -#pragma varargck type "x" int -#pragma varargck type "c" int -#pragma varargck type "C" int -#pragma varargck type "d" uint -#pragma varargck type "x" uint -#pragma varargck type "c" uint -#pragma varargck type "C" uint -#pragma varargck type "f" double -#pragma varargck type "e" double -#pragma varargck type "g" double -#pragma varargck type "s" char* -#pragma varargck type "q" char* -#pragma varargck type "S" Rune* -#pragma varargck type "Q" Rune* -#pragma varargck type "r" void -#pragma varargck type "%" void -#pragma varargck type "n" int* -#pragma varargck type "p" void* -#pragma varargck flag ',' -#pragma varargck type "<" void* -#pragma varargck type "[" void* -#pragma varargck type "H" void* - -extern int fmtinstall(int, int (*)(Fmt*)); -extern int dofmt(Fmt*, char*); -extern int dorfmt(Fmt*, Rune*); -extern int fmtprint(Fmt*, char*, ...); -extern int fmtvprint(Fmt*, char*, va_list); -extern int fmtrune(Fmt*, int); -extern int fmtstrcpy(Fmt*, char*); -extern int fmtrunestrcpy(Fmt*, Rune*); -/* - * error string for %r - * supplied on per os basis, not part of fmt library - */ -extern int errfmt(Fmt *f); - -/* - * quoted strings - */ -extern char *unquotestrdup(char*); -extern Rune *unquoterunestrdup(Rune*); -extern char *quotestrdup(char*); -extern Rune *quoterunestrdup(Rune*); -extern int quotestrfmt(Fmt*); -extern int quoterunestrfmt(Fmt*); -extern void quotefmtinstall(void); -extern int (*doquote)(int); - -/* - * random number - */ -extern void srand(long); -extern int rand(void); -extern int nrand(int); -extern long lrand(void); -extern long lnrand(long); -extern double frand(void); -extern ulong truerand(void); -extern ulong ntruerand(ulong); - -/* - * math - */ -extern ulong getfcr(void); -extern void setfsr(ulong); -extern ulong getfsr(void); -extern void setfcr(ulong); -extern double NaN(void); -extern double Inf(int); -extern int isNaN(double); -extern int isInf(double, int); - -extern double pow(double, double); -extern double atan2(double, double); -extern double fabs(double); -extern double atan(double); -extern double log(double); -extern double log10(double); -extern double exp(double); -extern double floor(double); -extern double ceil(double); -extern double hypot(double, double); -extern double sin(double); -extern double cos(double); -extern double tan(double); -extern double asin(double); -extern double acos(double); -extern double sinh(double); -extern double cosh(double); -extern double tanh(double); -extern double sqrt(double); -extern double fmod(double, double); - -#define HUGE 3.4028234e38 -#define PIO2 1.570796326794896619231e0 -#define PI (PIO2+PIO2) - -/* - * Time-of-day - */ - -typedef -struct Tm -{ - int sec; - int min; - int hour; - int mday; - int mon; - int year; - int wday; - int yday; - char zone[4]; - int tzoff; -} Tm; - -extern Tm* gmtime(long); -extern Tm* localtime(long); -extern char* asctime(Tm*); -extern char* ctime(long); -extern double cputime(void); -extern long times(long*); -extern long tm2sec(Tm*); -extern vlong nsec(void); - -/* - * one-of-a-kind - */ -enum -{ - PNPROC = 1, - PNGROUP = 2, -}; - -extern void _assert(char*); -extern int abs(int); -extern int atexit(void(*)(void)); -extern void atexitdont(void(*)(void)); -extern int atnotify(int(*)(void*, char*), int); -extern double atof(char*); -extern int atoi(char*); -extern long atol(char*); -extern double charstod(int(*)(void*), void*); -extern char* cleanname(char*); -extern int decrypt(void*, void*, int); -extern int encrypt(void*, void*, int); -extern int dec64(uchar*, int, char*, int); -extern int enc64(char*, int, uchar*, int); -extern int dec32(uchar*, int, char*, int); -extern int enc32(char*, int, uchar*, int); -extern int dec16(uchar*, int, char*, int); -extern int enc16(char*, int, uchar*, int); -extern int encodefmt(Fmt*); -extern void exits(char*); -extern double frexp(double, int*); -extern uintptr getcallerpc(void*); -extern char* getenv(char*); -extern int getfields(char*, char**, int, int, char*); -extern char* getuser(void); -extern char* getwd(char*, int); -extern int iounit(int); -extern long labs(long); -extern double ldexp(double, int); -extern void longjmp(jmp_buf, int); -extern char* mktemp(char*); -extern double modf(double, double*); -extern int netcrypt(void*, void*); -extern void notejmp(void*, jmp_buf, int); -extern void perror(char*); -extern int postnote(int, int, char *); -extern double pow10(int); -extern double ipow10(int); -extern int putenv(char*, char*); -extern void qsort(void*, long, long, int (*)(void*, void*)); -extern void* sbrk(ulong); -extern int setjmp(jmp_buf); -extern double strtod(char*, char**); -extern long strtol(char*, char**, int); -extern ulong strtoul(char*, char**, int); -extern vlong strtoll(char*, char**, int); -extern uvlong strtoull(char*, char**, int); -extern void sysfatal(char*, ...); -#pragma varargck argpos sysfatal 1 -extern void syslog(int, char*, char*, ...); -#pragma varargck argpos syslog 3 -extern long time(long*); -extern int tolower(int); -extern int toupper(int); - -/* - * synchronization - */ -typedef -struct Lock { - int val; -} Lock; - -extern int _tas(int*); - -extern void lock(Lock*); -extern void unlock(Lock*); -extern int canlock(Lock*); - -typedef struct QLp QLp; -struct QLp -{ - int inuse; - QLp *next; - char state; -}; - -typedef -struct QLock -{ - Lock lock; - int locked; - QLp *head; - QLp *tail; -} QLock; - -extern void qlock(QLock*); -extern void qunlock(QLock*); -extern int canqlock(QLock*); -extern void _qlockinit(ulong (*)(ulong, ulong)); /* called only by the thread library */ - -typedef -struct RWLock -{ - Lock lock; - int readers; /* number of readers */ - int writer; /* number of writers */ - QLp *head; /* list of waiting processes */ - QLp *tail; -} RWLock; - -extern int canrlock(RWLock*); -extern int canwlock(RWLock*); -extern void rlock(RWLock*); -extern void runlock(RWLock*); -extern void wlock(RWLock*); -extern void wunlock(RWLock*); - -extern void** privalloc(void); -extern void privfree(void**); - -/* - * network dialing - */ -#define NETPATHLEN 40 -extern int accept(int, char*); -extern int announce(char*, char*); -extern int dial(char*, char*, char*, int*); -extern void setnetmtpt(char*, int, char*); -extern int hangup(int); -extern int listen(char*, char*); -extern char* netmkaddr(char*, char*, char*); -extern int reject(int, char*, char*); - -/* - * system calls - * - */ -#define STATMAX 65535U /* max length of machine-independent stat structure */ -#define DIRMAX (sizeof(Dir)+STATMAX) /* max length of Dir structure */ -#define ERRMAX 128 /* max length of error string */ - -#define MORDER 0x0003 /* mask for bits defining order of mounting */ -#define MREPL 0x0000 /* mount replaces object */ -#define MBEFORE 0x0001 /* mount goes before others in union directory */ -#define MAFTER 0x0002 /* mount goes after others in union directory */ -#define MCREATE 0x0004 /* permit creation in mounted directory */ -#define MCACHE 0x0010 /* cache some data */ -#define MMASK 0x0017 /* all bits on */ - -#define OREAD 0 /* open for read */ -#define OWRITE 1 /* write */ -#define ORDWR 2 /* read and write */ -#define OEXEC 3 /* execute, == read but check execute permission */ -#define OTRUNC 16 /* or'ed in (except for exec), truncate file first */ -#define OCEXEC 32 /* or'ed in, close on exec */ -#define ORCLOSE 64 /* or'ed in, remove on close */ -#define OEXCL 0x1000 /* or'ed in, exclusive use (create only) */ - -#define AEXIST 0 /* accessible: exists */ -#define AEXEC 1 /* execute access */ -#define AWRITE 2 /* write access */ -#define AREAD 4 /* read access */ - - -/* Segattch */ -#define SG_RONLY 0040 /* read only */ -#define SG_CEXEC 0100 /* detach on exec */ - -#define NCONT 0 /* continue after note */ -#define NDFLT 1 /* terminate after note */ -#define NSAVE 2 /* clear note but hold state */ -#define NRSTR 3 /* restore saved state */ - -/* rfork */ -enum -{ - RFNAMEG = (1<<0), - RFENVG = (1<<1), - RFFDG = (1<<2), - RFNOTEG = (1<<3), - RFPROC = (1<<4), - RFMEM = (1<<5), - RFNOWAIT = (1<<6), - RFCNAMEG = (1<<10), - RFCENVG = (1<<11), - RFCFDG = (1<<12), - RFREND = (1<<13), - RFNOMNT = (1<<14) -}; - -/* bits in Qid.type */ -#define QTDIR 0x80 /* type bit for directories */ -#define QTAPPEND 0x40 /* type bit for append only files */ -#define QTEXCL 0x20 /* type bit for exclusive use files */ -#define QTMOUNT 0x10 /* type bit for mounted channel */ -#define QTAUTH 0x08 /* type bit for authentication file */ -#define QTFILE 0x00 /* plain file */ - -/* bits in Dir.mode */ -#define DMDIR 0x80000000 /* mode bit for directories */ -#define DMAPPEND 0x40000000 /* mode bit for append only files */ -#define DMEXCL 0x20000000 /* mode bit for exclusive use files */ -#define DMMOUNT 0x10000000 /* mode bit for mounted channel */ -#define DMAUTH 0x08000000 /* mode bit for authentication file */ -#define DMREAD 0x4 /* mode bit for read permission */ -#define DMWRITE 0x2 /* mode bit for write permission */ -#define DMEXEC 0x1 /* mode bit for execute permission */ - -typedef -struct Qid -{ - uvlong path; - ulong vers; - uchar type; -} Qid; - -typedef -struct Dir { - /* system-modified data */ - ushort type; /* server type */ - uint dev; /* server subtype */ - /* file data */ - Qid qid; /* unique id from server */ - ulong mode; /* permissions */ - ulong atime; /* last read time */ - ulong mtime; /* last write time */ - vlong length; /* file length */ - char *name; /* last element of path */ - char *uid; /* owner name */ - char *gid; /* group name */ - char *muid; /* last modifier name */ -} Dir; - -extern Dir* dirstat(char*); -extern Dir* dirfstat(int); -extern int dirwstat(char*, Dir*); -extern int dirfwstat(int, Dir*); -extern long dirread(int, Dir**); -extern void nulldir(Dir*); -extern long dirreadall(int, Dir**); - -typedef -struct Waitmsg -{ - int pid; /* of loved one */ - ulong time[3]; /* of loved one & descendants */ - char *msg; -} Waitmsg; - -typedef -struct IOchunk -{ - void *addr; - ulong len; -} IOchunk; - -extern void _exits(char*); - -extern void abort(void); -extern int access(char*, int); -extern long alarm(ulong); -extern int await(char*, int); -extern int bind(char*, char*, int); -extern int brk(void*); -extern int chdir(char*); -extern int close(int); -extern int create(char*, int, ulong); -extern int dup(int, int); -extern int errstr(char*, uint); -extern int exec(char*, char*[]); -extern int execl(char*, ...); -extern int fork(void); -extern int rfork(int); -extern int fauth(int, char*); -extern int fstat(int, uchar*, int); -extern int fwstat(int, uchar*, int); -extern int fversion(int, int, char*, int); -extern int mount(int, int, char*, int, char*); -extern int unmount(char*, char*); -extern int noted(int); -extern int notify(void(*)(void*, char*)); -extern int open(char*, int); -extern int fd2path(int, char*, int); -extern int pipe(int*); -extern long pread(int, void*, long, vlong); -extern long preadv(int, IOchunk*, int, vlong); -extern long pwrite(int, void*, long, vlong); -extern long pwritev(int, IOchunk*, int, vlong); -extern long read(int, void*, long); -extern long readn(int, void*, long); -extern long readv(int, IOchunk*, int); -extern int remove(char*); -extern void* sbrk(ulong); -extern long oseek(int, long, int); -extern vlong seek(int, vlong, int); -extern long segattach(int, char*, void*, ulong); -extern int segbrk(void*, void*); -extern int segdetach(void*); -extern int segflush(void*, ulong); -extern int segfree(void*, ulong); -extern int sleep(long); -extern int stat(char*, uchar*, int); -extern Waitmsg* wait(void); -extern int waitpid(void); -extern long write(int, void*, long); -extern long writev(int, IOchunk*, int); -extern int wstat(char*, uchar*, int); -extern void* rendezvous(void*, void*); - -extern int getpid(void); -extern int getppid(void); -extern void rerrstr(char*, uint); -extern char* sysname(void); -extern void werrstr(char*, ...); -#pragma varargck argpos werrstr 1 - -extern char *argv0; -#define ARGBEGIN for((argv0||(argv0=*argv)),argv++,argc--;\ - argv[0] && argv[0][0]=='-' && argv[0][1];\ - argc--, argv++) {\ - char *_args, *_argt;\ - Rune _argc;\ - _args = &argv[0][1];\ - if(_args[0]=='-' && _args[1]==0){\ - argc--; argv++; break;\ - }\ - _argc = 0;\ - while(*_args && (_args += chartorune(&_argc, _args)))\ - switch(_argc) -#define ARGEND SET(_argt);USED(_argt,_argc,_args);}USED(argv, argc); -#define ARGF() (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): 0)) -#define EARGF(x) (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): ((x), abort(), (char*)0))) - -#define ARGC() _argc - -/* - * Extensions for Inferno to basic libc.h - */ - -#define setbinmode() -#undef __LITTLE_ENDIAN - +#include "../../include/lib9.h" diff --git a/Plan9/power/include/u.h b/Plan9/power/include/u.h index 2108776a..2ca7ff8a 100644 --- a/Plan9/power/include/u.h +++ b/Plan9/power/include/u.h @@ -1,84 +1 @@ -#define nil ((void*)0) -typedef unsigned short ushort; -typedef unsigned char uchar; -typedef unsigned long ulong; -typedef unsigned int uint; -typedef signed char schar; -typedef long long vlong; -typedef unsigned long long uvlong; -typedef unsigned long uintptr; -typedef uint Rune; -typedef union FPdbleword FPdbleword; -typedef long jmp_buf[2]; -#define JMPBUFSP 0 -#define JMPBUFPC 1 -#define JMPBUFDPC 0 -typedef unsigned int mpdigit; /* for /sys/include/mp.h */ -typedef unsigned char u8int; -typedef unsigned short u16int; -typedef unsigned int u32int; -typedef unsigned long long u64int; - -/* FPSCR */ -#define FPSFX (1<<31) /* exception summary (sticky) */ -#define FPSEX (1<<30) /* enabled exception summary */ -#define FPSVX (1<<29) /* invalid operation exception summary */ -#define FPSOX (1<<28) /* overflow exception OX (sticky) */ -#define FPSUX (1<<27) /* underflow exception UX (sticky) */ -#define FPSZX (1<<26) /* zero divide exception ZX (sticky) */ -#define FPSXX (1<<25) /* inexact exception XX (sticky) */ -#define FPSVXSNAN (1<<24) /* invalid operation exception for SNaN (sticky) */ -#define FPSVXISI (1<<23) /* invalid operation exception for ∞-∞ (sticky) */ -#define FPSVXIDI (1<<22) /* invalid operation exception for ∞/∞ (sticky) */ -#define FPSVXZDZ (1<<21) /* invalid operation exception for 0/0 (sticky) */ -#define FPSVXIMZ (1<<20) /* invalid operation exception for ∞*0 (sticky) */ -#define FPSVXVC (1<<19) /* invalid operation exception for invalid compare (sticky) */ -#define FPSFR (1<<18) /* fraction rounded */ -#define FPSFI (1<<17) /* fraction inexact */ -#define FPSFPRF (1<<16) /* floating point result class */ -#define FPSFPCC (0xF<<12) /* <, >, =, unordered */ -#define FPVXCVI (1<<8) /* enable exception for invalid integer convert (sticky) */ -#define FPVE (1<<7) /* invalid operation exception enable */ -#define FPOVFL (1<<6) /* enable overflow exceptions */ -#define FPUNFL (1<<5) /* enable underflow */ -#define FPZDIV (1<<4) /* enable zero divide */ -#define FPINEX (1<<3) /* enable inexact exceptions */ -#define FPRMASK (3<<0) /* rounding mode */ -#define FPRNR (0<<0) -#define FPRZ (1<<0) -#define FPRPINF (2<<0) -#define FPRNINF (3<<0) -#define FPPEXT 0 -#define FPPSGL 0 -#define FPPDBL 0 -#define FPPMASK 0 -#define FPINVAL FPVE - -#define FPAOVFL FPSOX -#define FPAINEX FPSXX -#define FPAUNFL FPSUX -#define FPAZDIV FPSZX -#define FPAINVAL FPSVX - -union FPdbleword -{ - double x; - struct { /* big endian */ - ulong hi; - ulong lo; - }; -}; - -typedef char* va_list; -#define va_start(list, start) list =\ - (sizeof(start) < 4?\ - (char*)((int*)&(start)+1):\ - (char*)(&(start)+1)) -#define va_end(list)\ - USED(list) -#define va_arg(list, mode)\ - ((sizeof(mode) == 1)?\ - ((mode*)(list += 4))[-1]:\ - (sizeof(mode) == 2)?\ - ((mode*)(list += 4))[-1]:\ - ((mode*)(list += sizeof(mode)))[-1]) +#include "/power/include/u.h" diff --git a/Plan9/sparc/include/lib9.h b/Plan9/sparc/include/lib9.h index 003188d3..97f16dd9 100644 --- a/Plan9/sparc/include/lib9.h +++ b/Plan9/sparc/include/lib9.h @@ -1,659 +1 @@ -#include -typedef unsigned long size_t; - -#define nelem(x) (sizeof(x)/sizeof((x)[0])) -#define offsetof(s, m) (ulong)(&(((s*)0)->m)) -#define assert(x) if(x){}else _assert("x") - -/* - * mem routines - */ -extern void* memccpy(void*, void*, int, ulong); -extern void* memset(void*, int, ulong); -extern int memcmp(void*, void*, ulong); -extern void* memcpy(void*, void*, ulong); -extern void* memmove(void*, void*, ulong); -extern void* memchr(void*, int, ulong); - -/* - * string routines - */ -extern char* strcat(char*, char*); -extern char* strchr(char*, int); -extern int strcmp(char*, char*); -extern char* strcpy(char*, char*); -extern char* strecpy(char*, char*, char*); -extern char* strdup(char*); -extern char* strncat(char*, char*, long); -extern char* strncpy(char*, char*, long); -extern int strncmp(char*, char*, long); -extern char* strpbrk(char*, char*); -extern char* strrchr(char*, int); -extern char* strtok(char*, char*); -extern long strlen(char*); -extern long strspn(char*, char*); -extern long strcspn(char*, char*); -extern char* strstr(char*, char*); -extern int cistrncmp(char*, char*, int); -extern int cistrcmp(char*, char*); -extern char* cistrstr(char*, char*); -extern int tokenize(char*, char**, int); - -enum -{ - UTFmax = 4, /* maximum bytes per rune */ - Runesync = 0x80, /* cannot represent part of a UTF sequence (<) */ - Runeself = 0x80, /* rune and UTF sequences are the same (<) */ - Runeerror = 0xFFFD, /* decoding error in UTF */ - Runemax = 0x10FFFF, /* 21-bit rune */ - Runemask = 0x1FFFFF, /* bits used by runes (see grep) */ -}; - -/* - * rune routines - */ -extern int runetochar(char*, Rune*); -extern int chartorune(Rune*, char*); -extern int runelen(long); -extern int runenlen(Rune*, int); -extern int fullrune(char*, int); -extern int utflen(char*); -extern int utfnlen(char*, long); -extern char* utfrune(char*, long); -extern char* utfrrune(char*, long); -extern char* utfutf(char*, char*); -extern char* utfecpy(char*, char*, char*); - -extern Rune* runestrcat(Rune*, Rune*); -extern Rune* runestrchr(Rune*, Rune); -extern int runestrcmp(Rune*, Rune*); -extern Rune* runestrcpy(Rune*, Rune*); -extern Rune* runestrncpy(Rune*, Rune*, long); -extern Rune* runestrecpy(Rune*, Rune*, Rune*); -extern Rune* runestrdup(Rune*); -extern Rune* runestrncat(Rune*, Rune*, long); -extern int runestrncmp(Rune*, Rune*, long); -extern Rune* runestrrchr(Rune*, Rune); -extern long runestrlen(Rune*); -extern Rune* runestrstr(Rune*, Rune*); - -extern Rune tolowerrune(Rune); -extern Rune totitlerune(Rune); -extern Rune toupperrune(Rune); -extern int isalpharune(Rune); -extern int islowerrune(Rune); -extern int isspacerune(Rune); -extern int istitlerune(Rune); -extern int isupperrune(Rune); - -/* - * malloc - */ -extern void* malloc(ulong); -extern void* mallocz(ulong, int); -extern void free(void*); -extern ulong msize(void*); -extern void* calloc(ulong, ulong); -extern void* realloc(void*, ulong); -extern void setmalloctag(void*, ulong); -extern void setrealloctag(void*, ulong); -extern ulong getmalloctag(void*); -extern ulong getrealloctag(void*); -extern void* malloctopoolblock(void*); - -/* - * print routines - */ -typedef struct Fmt Fmt; -struct Fmt{ - uchar runes; /* output buffer is runes or chars? */ - void *start; /* of buffer */ - void *to; /* current place in the buffer */ - void *stop; /* end of the buffer; overwritten if flush fails */ - int (*flush)(Fmt *); /* called when to == stop */ - void *farg; /* to make flush a closure */ - int nfmt; /* num chars formatted so far */ - va_list args; /* args passed to dofmt */ - int r; /* % format Rune */ - int width; - int prec; - ulong flags; -}; - -enum{ - FmtWidth = 1, - FmtLeft = FmtWidth << 1, - FmtPrec = FmtLeft << 1, - FmtSharp = FmtPrec << 1, - FmtSpace = FmtSharp << 1, - FmtSign = FmtSpace << 1, - FmtZero = FmtSign << 1, - FmtUnsigned = FmtZero << 1, - FmtShort = FmtUnsigned << 1, - FmtLong = FmtShort << 1, - FmtVLong = FmtLong << 1, - FmtComma = FmtVLong << 1, - FmtByte = FmtComma << 1, - - FmtFlag = FmtByte << 1 -}; - -extern int print(char*, ...); -extern char* seprint(char*, char*, char*, ...); -extern char* vseprint(char*, char*, char*, va_list); -extern int snprint(char*, int, char*, ...); -extern int vsnprint(char*, int, char*, va_list); -extern char* smprint(char*, ...); -extern char* vsmprint(char*, va_list); -extern int sprint(char*, char*, ...); -extern int fprint(int, char*, ...); -extern int vfprint(int, char*, va_list); - -extern int runesprint(Rune*, char*, ...); -extern int runesnprint(Rune*, int, char*, ...); -extern int runevsnprint(Rune*, int, char*, va_list); -extern Rune* runeseprint(Rune*, Rune*, char*, ...); -extern Rune* runevseprint(Rune*, Rune*, char*, va_list); -extern Rune* runesmprint(char*, ...); -extern Rune* runevsmprint(char*, va_list); - -extern int fmtfdinit(Fmt*, int, char*, int); -extern int fmtfdflush(Fmt*); -extern int fmtstrinit(Fmt*); -extern char* fmtstrflush(Fmt*); -extern int runefmtstrinit(Fmt*); -extern Rune* runefmtstrflush(Fmt*); - -#pragma varargck argpos fmtprint 2 -#pragma varargck argpos fprint 2 -#pragma varargck argpos print 1 -#pragma varargck argpos runeseprint 3 -#pragma varargck argpos runesmprint 1 -#pragma varargck argpos runesnprint 3 -#pragma varargck argpos runesprint 2 -#pragma varargck argpos seprint 3 -#pragma varargck argpos smprint 1 -#pragma varargck argpos snprint 3 -#pragma varargck argpos sprint 2 -#pragma varargck argpos vseprint 3 -#pragma varargck argpos vsnprint 3 - -#pragma varargck type "lld" vlong -#pragma varargck type "llx" vlong -#pragma varargck type "lld" uvlong -#pragma varargck type "llx" uvlong -#pragma varargck type "ld" long -#pragma varargck type "lx" long -#pragma varargck type "ld" ulong -#pragma varargck type "lx" ulong -#pragma varargck type "d" int -#pragma varargck type "x" int -#pragma varargck type "c" int -#pragma varargck type "C" int -#pragma varargck type "d" uint -#pragma varargck type "x" uint -#pragma varargck type "c" uint -#pragma varargck type "C" uint -#pragma varargck type "f" double -#pragma varargck type "e" double -#pragma varargck type "g" double -#pragma varargck type "s" char* -#pragma varargck type "q" char* -#pragma varargck type "S" Rune* -#pragma varargck type "Q" Rune* -#pragma varargck type "r" void -#pragma varargck type "%" void -#pragma varargck type "n" int* -#pragma varargck type "p" void* -#pragma varargck flag ',' -#pragma varargck type "<" void* -#pragma varargck type "[" void* -#pragma varargck type "H" void* - -extern int fmtinstall(int, int (*)(Fmt*)); -extern int dofmt(Fmt*, char*); -extern int dorfmt(Fmt*, Rune*); -extern int fmtprint(Fmt*, char*, ...); -extern int fmtvprint(Fmt*, char*, va_list); -extern int fmtrune(Fmt*, int); -extern int fmtstrcpy(Fmt*, char*); -extern int fmtrunestrcpy(Fmt*, Rune*); -/* - * error string for %r - * supplied on per os basis, not part of fmt library - */ -extern int errfmt(Fmt *f); - -/* - * quoted strings - */ -extern char *unquotestrdup(char*); -extern Rune *unquoterunestrdup(Rune*); -extern char *quotestrdup(char*); -extern Rune *quoterunestrdup(Rune*); -extern int quotestrfmt(Fmt*); -extern int quoterunestrfmt(Fmt*); -extern void quotefmtinstall(void); -extern int (*doquote)(int); - -/* - * random number - */ -extern void srand(long); -extern int rand(void); -extern int nrand(int); -extern long lrand(void); -extern long lnrand(long); -extern double frand(void); -extern ulong truerand(void); -extern ulong ntruerand(ulong); - -/* - * math - */ -extern ulong getfcr(void); -extern void setfsr(ulong); -extern ulong getfsr(void); -extern void setfcr(ulong); -extern double NaN(void); -extern double Inf(int); -extern int isNaN(double); -extern int isInf(double, int); - -extern double pow(double, double); -extern double atan2(double, double); -extern double fabs(double); -extern double atan(double); -extern double log(double); -extern double log10(double); -extern double exp(double); -extern double floor(double); -extern double ceil(double); -extern double hypot(double, double); -extern double sin(double); -extern double cos(double); -extern double tan(double); -extern double asin(double); -extern double acos(double); -extern double sinh(double); -extern double cosh(double); -extern double tanh(double); -extern double sqrt(double); -extern double fmod(double, double); - -#define HUGE 3.4028234e38 -#define PIO2 1.570796326794896619231e0 -#define PI (PIO2+PIO2) - -/* - * Time-of-day - */ - -typedef -struct Tm -{ - int sec; - int min; - int hour; - int mday; - int mon; - int year; - int wday; - int yday; - char zone[4]; - int tzoff; -} Tm; - -extern Tm* gmtime(long); -extern Tm* localtime(long); -extern char* asctime(Tm*); -extern char* ctime(long); -extern double cputime(void); -extern long times(long*); -extern long tm2sec(Tm*); -extern vlong nsec(void); - -/* - * one-of-a-kind - */ -enum -{ - PNPROC = 1, - PNGROUP = 2, -}; - -extern void _assert(char*); -extern int abs(int); -extern int atexit(void(*)(void)); -extern void atexitdont(void(*)(void)); -extern int atnotify(int(*)(void*, char*), int); -extern double atof(char*); -extern int atoi(char*); -extern long atol(char*); -extern double charstod(int(*)(void*), void*); -extern char* cleanname(char*); -extern int decrypt(void*, void*, int); -extern int encrypt(void*, void*, int); -extern int dec64(uchar*, int, char*, int); -extern int enc64(char*, int, uchar*, int); -extern int dec32(uchar*, int, char*, int); -extern int enc32(char*, int, uchar*, int); -extern int dec16(uchar*, int, char*, int); -extern int enc16(char*, int, uchar*, int); -extern int encodefmt(Fmt*); -extern void exits(char*); -extern double frexp(double, int*); -extern uintptr getcallerpc(void*); -extern char* getenv(char*); -extern int getfields(char*, char**, int, int, char*); -extern char* getuser(void); -extern char* getwd(char*, int); -extern int iounit(int); -extern long labs(long); -extern double ldexp(double, int); -extern void longjmp(jmp_buf, int); -extern char* mktemp(char*); -extern double modf(double, double*); -extern int netcrypt(void*, void*); -extern void notejmp(void*, jmp_buf, int); -extern void perror(char*); -extern int postnote(int, int, char *); -extern double pow10(int); -extern double ipow10(int); -extern int putenv(char*, char*); -extern void qsort(void*, long, long, int (*)(void*, void*)); -extern void* sbrk(ulong); -extern int setjmp(jmp_buf); -extern double strtod(char*, char**); -extern long strtol(char*, char**, int); -extern ulong strtoul(char*, char**, int); -extern vlong strtoll(char*, char**, int); -extern uvlong strtoull(char*, char**, int); -extern void sysfatal(char*, ...); -#pragma varargck argpos sysfatal 1 -extern void syslog(int, char*, char*, ...); -#pragma varargck argpos syslog 3 -extern long time(long*); -extern int tolower(int); -extern int toupper(int); - -/* - * synchronization - */ -typedef -struct Lock { - int val; -} Lock; - -extern int _tas(int*); - -extern void lock(Lock*); -extern void unlock(Lock*); -extern int canlock(Lock*); - -typedef struct QLp QLp; -struct QLp -{ - int inuse; - QLp *next; - char state; -}; - -typedef -struct QLock -{ - Lock lock; - int locked; - QLp *head; - QLp *tail; -} QLock; - -extern void qlock(QLock*); -extern void qunlock(QLock*); -extern int canqlock(QLock*); -extern void _qlockinit(ulong (*)(ulong, ulong)); /* called only by the thread library */ - -typedef -struct RWLock -{ - Lock lock; - int readers; /* number of readers */ - int writer; /* number of writers */ - QLp *head; /* list of waiting processes */ - QLp *tail; -} RWLock; - -extern int canrlock(RWLock*); -extern int canwlock(RWLock*); -extern void rlock(RWLock*); -extern void runlock(RWLock*); -extern void wlock(RWLock*); -extern void wunlock(RWLock*); - -extern void** privalloc(void); -extern void privfree(void**); - -/* - * network dialing - */ -#define NETPATHLEN 40 -extern int accept(int, char*); -extern int announce(char*, char*); -extern int dial(char*, char*, char*, int*); -extern void setnetmtpt(char*, int, char*); -extern int hangup(int); -extern int listen(char*, char*); -extern char* netmkaddr(char*, char*, char*); -extern int reject(int, char*, char*); - -/* - * system calls - * - */ -#define STATMAX 65535U /* max length of machine-independent stat structure */ -#define DIRMAX (sizeof(Dir)+STATMAX) /* max length of Dir structure */ -#define ERRMAX 128 /* max length of error string */ - -#define MORDER 0x0003 /* mask for bits defining order of mounting */ -#define MREPL 0x0000 /* mount replaces object */ -#define MBEFORE 0x0001 /* mount goes before others in union directory */ -#define MAFTER 0x0002 /* mount goes after others in union directory */ -#define MCREATE 0x0004 /* permit creation in mounted directory */ -#define MCACHE 0x0010 /* cache some data */ -#define MMASK 0x0017 /* all bits on */ - -#define OREAD 0 /* open for read */ -#define OWRITE 1 /* write */ -#define ORDWR 2 /* read and write */ -#define OEXEC 3 /* execute, == read but check execute permission */ -#define OTRUNC 16 /* or'ed in (except for exec), truncate file first */ -#define OCEXEC 32 /* or'ed in, close on exec */ -#define ORCLOSE 64 /* or'ed in, remove on close */ -#define OEXCL 0x1000 /* or'ed in, exclusive use (create only) */ - -#define AEXIST 0 /* accessible: exists */ -#define AEXEC 1 /* execute access */ -#define AWRITE 2 /* write access */ -#define AREAD 4 /* read access */ - - -/* Segattch */ -#define SG_RONLY 0040 /* read only */ -#define SG_CEXEC 0100 /* detach on exec */ - -#define NCONT 0 /* continue after note */ -#define NDFLT 1 /* terminate after note */ -#define NSAVE 2 /* clear note but hold state */ -#define NRSTR 3 /* restore saved state */ - -/* rfork */ -enum -{ - RFNAMEG = (1<<0), - RFENVG = (1<<1), - RFFDG = (1<<2), - RFNOTEG = (1<<3), - RFPROC = (1<<4), - RFMEM = (1<<5), - RFNOWAIT = (1<<6), - RFCNAMEG = (1<<10), - RFCENVG = (1<<11), - RFCFDG = (1<<12), - RFREND = (1<<13), - RFNOMNT = (1<<14) -}; - -/* bits in Qid.type */ -#define QTDIR 0x80 /* type bit for directories */ -#define QTAPPEND 0x40 /* type bit for append only files */ -#define QTEXCL 0x20 /* type bit for exclusive use files */ -#define QTMOUNT 0x10 /* type bit for mounted channel */ -#define QTAUTH 0x08 /* type bit for authentication file */ -#define QTFILE 0x00 /* plain file */ - -/* bits in Dir.mode */ -#define DMDIR 0x80000000 /* mode bit for directories */ -#define DMAPPEND 0x40000000 /* mode bit for append only files */ -#define DMEXCL 0x20000000 /* mode bit for exclusive use files */ -#define DMMOUNT 0x10000000 /* mode bit for mounted channel */ -#define DMAUTH 0x08000000 /* mode bit for authentication file */ -#define DMREAD 0x4 /* mode bit for read permission */ -#define DMWRITE 0x2 /* mode bit for write permission */ -#define DMEXEC 0x1 /* mode bit for execute permission */ - -typedef -struct Qid -{ - uvlong path; - ulong vers; - uchar type; -} Qid; - -typedef -struct Dir { - /* system-modified data */ - ushort type; /* server type */ - uint dev; /* server subtype */ - /* file data */ - Qid qid; /* unique id from server */ - ulong mode; /* permissions */ - ulong atime; /* last read time */ - ulong mtime; /* last write time */ - vlong length; /* file length */ - char *name; /* last element of path */ - char *uid; /* owner name */ - char *gid; /* group name */ - char *muid; /* last modifier name */ -} Dir; - -extern Dir* dirstat(char*); -extern Dir* dirfstat(int); -extern int dirwstat(char*, Dir*); -extern int dirfwstat(int, Dir*); -extern long dirread(int, Dir**); -extern void nulldir(Dir*); -extern long dirreadall(int, Dir**); - -typedef -struct Waitmsg -{ - int pid; /* of loved one */ - ulong time[3]; /* of loved one & descendants */ - char *msg; -} Waitmsg; - -typedef -struct IOchunk -{ - void *addr; - ulong len; -} IOchunk; - -extern void _exits(char*); - -extern void abort(void); -extern int access(char*, int); -extern long alarm(ulong); -extern int await(char*, int); -extern int bind(char*, char*, int); -extern int brk(void*); -extern int chdir(char*); -extern int close(int); -extern int create(char*, int, ulong); -extern int dup(int, int); -extern int errstr(char*, uint); -extern int exec(char*, char*[]); -extern int execl(char*, ...); -extern int fork(void); -extern int rfork(int); -extern int fauth(int, char*); -extern int fstat(int, uchar*, int); -extern int fwstat(int, uchar*, int); -extern int fversion(int, int, char*, int); -extern int mount(int, int, char*, int, char*); -extern int unmount(char*, char*); -extern int noted(int); -extern int notify(void(*)(void*, char*)); -extern int open(char*, int); -extern int fd2path(int, char*, int); -extern int pipe(int*); -extern long pread(int, void*, long, vlong); -extern long preadv(int, IOchunk*, int, vlong); -extern long pwrite(int, void*, long, vlong); -extern long pwritev(int, IOchunk*, int, vlong); -extern long read(int, void*, long); -extern long readn(int, void*, long); -extern long readv(int, IOchunk*, int); -extern int remove(char*); -extern void* sbrk(ulong); -extern long oseek(int, long, int); -extern vlong seek(int, vlong, int); -extern long segattach(int, char*, void*, ulong); -extern int segbrk(void*, void*); -extern int segdetach(void*); -extern int segflush(void*, ulong); -extern int segfree(void*, ulong); -extern int sleep(long); -extern int stat(char*, uchar*, int); -extern Waitmsg* wait(void); -extern int waitpid(void); -extern long write(int, void*, long); -extern long writev(int, IOchunk*, int); -extern int wstat(char*, uchar*, int); -extern void* rendezvous(void*, void*); - -extern int getpid(void); -extern int getppid(void); -extern void rerrstr(char*, uint); -extern char* sysname(void); -extern void werrstr(char*, ...); -#pragma varargck argpos werrstr 1 - -extern char *argv0; -#define ARGBEGIN for((argv0||(argv0=*argv)),argv++,argc--;\ - argv[0] && argv[0][0]=='-' && argv[0][1];\ - argc--, argv++) {\ - char *_args, *_argt;\ - Rune _argc;\ - _args = &argv[0][1];\ - if(_args[0]=='-' && _args[1]==0){\ - argc--; argv++; break;\ - }\ - _argc = 0;\ - while(*_args && (_args += chartorune(&_argc, _args)))\ - switch(_argc) -#define ARGEND SET(_argt);USED(_argt,_argc,_args);}USED(argv, argc); -#define ARGF() (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): 0)) -#define EARGF(x) (_argt=_args, _args="",\ - (*_argt? _argt: argv[1]? (argc--, *++argv): ((x), abort(), (char*)0))) - -#define ARGC() _argc - -/* - * Extensions for Inferno to basic libc.h - */ - -#define setbinmode() -#undef __LITTLE_ENDIAN - +#include "../../include/lib9.h" diff --git a/Plan9/sparc/include/u.h b/Plan9/sparc/include/u.h index ff9a3eaf..ff354477 100644 --- a/Plan9/sparc/include/u.h +++ b/Plan9/sparc/include/u.h @@ -1,64 +1 @@ -#define nil ((void*)0) -typedef unsigned short ushort; -typedef unsigned char uchar; -typedef unsigned long ulong; -typedef unsigned int uint; -typedef signed char schar; -typedef long long vlong; -typedef unsigned long long uvlong; -typedef unsigned long uintptr; -typedef uint Rune; -typedef union FPdbleword FPdbleword; -typedef long jmp_buf[2]; -#define JMPBUFSP 0 -#define JMPBUFPC 1 -#define JMPBUFDPC (-8) -typedef unsigned int mpdigit; /* for /sys/include/mp.h */ -typedef unsigned char u8int; -typedef unsigned short u16int; -typedef unsigned int u32int; -typedef unsigned long long u64int; - -/* FCR */ -#define FPINEX (1<<23) -#define FPOVFL (1<<26) -#define FPUNFL (1<<25) -#define FPZDIV (1<<24) -#define FPRNR (0<<30) -#define FPRZ (1<<30) -#define FPINVAL (1<<27) -#define FPRPINF (2<<30) -#define FPRNINF (3<<30) -#define FPRMASK (3<<30) -#define FPPEXT 0 -#define FPPSGL 0 -#define FPPDBL 0 -#define FPPMASK 0 -/* FSR */ -#define FPAINEX (1<<5) -#define FPAZDIV (1<<6) -#define FPAUNFL (1<<7) -#define FPAOVFL (1<<8) -#define FPAINVAL (1<<9) -union FPdbleword -{ - double x; - struct { /* big endian */ - ulong hi; - ulong lo; - }; -}; - -typedef char* va_list; -#define va_start(list, start) list =\ - (sizeof(start) < 4?\ - (char*)((int*)&(start)+1):\ - (char*)(&(start)+1)) -#define va_end(list)\ - USED(list) -#define va_arg(list, mode)\ - ((sizeof(mode) == 1)?\ - ((mode*)(list += 4))[-1]:\ - (sizeof(mode) == 2)?\ - ((mode*)(list += 4))[-1]:\ - ((mode*)(list += sizeof(mode)))[-1]) +#include "/sparc/include/u.h" -- cgit v1.2.3