1 #pragma lib "libc.a" 2 #pragma src "/sys/src/libc" 3 4 #define nelem(x) (sizeof(x)/sizeof((x)[0])) 5 #define offsetof(s, m) (ulong)(&(((s*)0)->m)) 6 #define assert(x) if(x){}else _assert("x") 7 8 /* 9 * mem routines 10 */ 11 extern void* memccpy(void*, void*, int, ulong); 12 extern void* memset(void*, int, ulong); 13 extern int memcmp(void*, void*, ulong); 14 extern void* memcpy(void*, void*, ulong); 15 extern void* memmove(void*, void*, ulong); 16 extern void* memchr(void*, int, ulong); 17 18 /* 19 * string routines 20 */ 21 extern char* strcat(char*, char*); 22 extern char* strchr(char*, int); 23 extern int strcmp(char*, char*); 24 extern char* strcpy(char*, char*); 25 extern char* strecpy(char*, char*, char*); 26 extern char* strdup(char*); 27 extern char* strncat(char*, char*, long); 28 extern char* strncpy(char*, char*, long); 29 extern int strncmp(char*, char*, long); 30 extern char* strpbrk(char*, char*); 31 extern char* strrchr(char*, int); 32 extern char* strtok(char*, char*); 33 extern long strlen(char*); 34 extern long strspn(char*, char*); 35 extern long strcspn(char*, char*); 36 extern char* strstr(char*, char*); 37 extern int cistrncmp(char*, char*, int); 38 extern int cistrcmp(char*, char*); 39 extern char* cistrstr(char*, char*); 40 extern int tokenize(char*, char**, int); 41 42 enum 43 { 44 UTFmax = 4, /* maximum bytes per rune */ 45 Runesync = 0x80, /* cannot represent part of a UTF sequence (<) */ 46 Runeself = 0x80, /* rune and UTF sequences are the same (<) */ 47 Runeerror = 0xFFFD, /* decoding error in UTF */ 48 Runemax = 0x10FFFF, /* 21-bit rune */ 49 Runemask = 0x1FFFFF, /* bits used by runes (see grep) */ 50 }; 51 52 /* 53 * rune routines 54 */ 55 extern int runetochar(char*, Rune*); 56 extern int chartorune(Rune*, char*); 57 extern int runelen(long); 58 extern int runenlen(Rune*, int); 59 extern int fullrune(char*, int); 60 extern int utflen(char*); 61 extern int utfnlen(char*, long); 62 extern char* utfrune(char*, long); 63 extern char* utfrrune(char*, long); 64 extern char* utfutf(char*, char*); 65 extern char* utfecpy(char*, char*, char*); 66 67 extern Rune* runestrcat(Rune*, Rune*); 68 extern Rune* runestrchr(Rune*, Rune); 69 extern int runestrcmp(Rune*, Rune*); 70 extern Rune* runestrcpy(Rune*, Rune*); 71 extern Rune* runestrncpy(Rune*, Rune*, long); 72 extern Rune* runestrecpy(Rune*, Rune*, Rune*); 73 extern Rune* runestrdup(Rune*); 74 extern Rune* runestrncat(Rune*, Rune*, long); 75 extern int runestrncmp(Rune*, Rune*, long); 76 extern Rune* runestrrchr(Rune*, Rune); 77 extern long runestrlen(Rune*); 78 extern Rune* runestrstr(Rune*, Rune*); 79 80 extern Rune tolowerrune(Rune); 81 extern Rune totitlerune(Rune); 82 extern Rune toupperrune(Rune); 83 extern Rune tobaserune(Rune); 84 extern int isalpharune(Rune); 85 extern int isbaserune(Rune); 86 extern int isdigitrune(Rune); 87 extern int islowerrune(Rune); 88 extern int isspacerune(Rune); 89 extern int istitlerune(Rune); 90 extern int isupperrune(Rune); 91 92 /* 93 * malloc 94 */ 95 extern void* malloc(ulong); 96 extern void* mallocz(ulong, int); 97 extern void free(void*); 98 extern ulong msize(void*); 99 extern void* mallocalign(ulong, ulong, long, ulong); 100 extern void* calloc(ulong, ulong); 101 extern void* realloc(void*, ulong); 102 extern void setmalloctag(void*, ulong); 103 extern void setrealloctag(void*, ulong); 104 extern ulong getmalloctag(void*); 105 extern ulong getrealloctag(void*); 106 extern void* malloctopoolblock(void*); 107 108 /* 109 * print routines 110 */ 111 typedef struct Fmt Fmt; 112 struct Fmt{ 113 uchar runes; /* output buffer is runes or chars? */ 114 void *start; /* of buffer */ 115 void *to; /* current place in the buffer */ 116 void *stop; /* end of the buffer; overwritten if flush fails */ 117 int (*flush)(Fmt *); /* called when to == stop */ 118 void *farg; /* to make flush a closure */ 119 int nfmt; /* num chars formatted so far */ 120 va_list args; /* args passed to dofmt */ 121 int r; /* % format Rune */ 122 int width; 123 int prec; 124 ulong flags; 125 }; 126 127 enum{ 128 FmtWidth = 1, 129 FmtLeft = FmtWidth << 1, 130 FmtPrec = FmtLeft << 1, 131 FmtSharp = FmtPrec << 1, 132 FmtSpace = FmtSharp << 1, 133 FmtSign = FmtSpace << 1, 134 FmtZero = FmtSign << 1, 135 FmtUnsigned = FmtZero << 1, 136 FmtShort = FmtUnsigned << 1, 137 FmtLong = FmtShort << 1, 138 FmtVLong = FmtLong << 1, 139 FmtComma = FmtVLong << 1, 140 FmtByte = FmtComma << 1, 141 142 FmtFlag = FmtByte << 1 143 }; 144 145 extern int print(char*, ...); 146 extern char* seprint(char*, char*, char*, ...); 147 extern char* vseprint(char*, char*, char*, va_list); 148 extern int snprint(char*, int, char*, ...); 149 extern int vsnprint(char*, int, char*, va_list); 150 extern char* smprint(char*, ...); 151 extern char* vsmprint(char*, va_list); 152 extern int sprint(char*, char*, ...); 153 extern int fprint(int, char*, ...); 154 extern int vfprint(int, char*, va_list); 155 156 extern int runesprint(Rune*, char*, ...); 157 extern int runesnprint(Rune*, int, char*, ...); 158 extern int runevsnprint(Rune*, int, char*, va_list); 159 extern Rune* runeseprint(Rune*, Rune*, char*, ...); 160 extern Rune* runevseprint(Rune*, Rune*, char*, va_list); 161 extern Rune* runesmprint(char*, ...); 162 extern Rune* runevsmprint(char*, va_list); 163 164 extern int fmtfdinit(Fmt*, int, char*, int); 165 extern int fmtfdflush(Fmt*); 166 extern int fmtstrinit(Fmt*); 167 extern char* fmtstrflush(Fmt*); 168 extern int runefmtstrinit(Fmt*); 169 extern Rune* runefmtstrflush(Fmt*); 170 171 #pragma varargck argpos fmtprint 2 172 #pragma varargck argpos fprint 2 173 #pragma varargck argpos print 1 174 #pragma varargck argpos runeseprint 3 175 #pragma varargck argpos runesmprint 1 176 #pragma varargck argpos runesnprint 3 177 #pragma varargck argpos runesprint 2 178 #pragma varargck argpos seprint 3 179 #pragma varargck argpos smprint 1 180 #pragma varargck argpos snprint 3 181 #pragma varargck argpos sprint 2 182 183 #pragma varargck type "lld" vlong 184 #pragma varargck type "llo" vlong 185 #pragma varargck type "llx" vlong 186 #pragma varargck type "llb" vlong 187 #pragma varargck type "lld" uvlong 188 #pragma varargck type "llo" uvlong 189 #pragma varargck type "llx" uvlong 190 #pragma varargck type "llb" uvlong 191 #pragma varargck type "ld" long 192 #pragma varargck type "lo" long 193 #pragma varargck type "lx" long 194 #pragma varargck type "lb" long 195 #pragma varargck type "ld" ulong 196 #pragma varargck type "lo" ulong 197 #pragma varargck type "lx" ulong 198 #pragma varargck type "lb" ulong 199 #pragma varargck type "d" int 200 #pragma varargck type "o" int 201 #pragma varargck type "x" int 202 #pragma varargck type "c" int 203 #pragma varargck type "C" int 204 #pragma varargck type "b" int 205 #pragma varargck type "d" uint 206 #pragma varargck type "x" uint 207 #pragma varargck type "c" uint 208 #pragma varargck type "C" uint 209 #pragma varargck type "b" uint 210 #pragma varargck type "f" double 211 #pragma varargck type "e" double 212 #pragma varargck type "g" double 213 #pragma varargck type "s" char* 214 #pragma varargck type "q" char* 215 #pragma varargck type "S" Rune* 216 #pragma varargck type "Q" Rune* 217 #pragma varargck type "r" void 218 #pragma varargck type "%" void 219 #pragma varargck type "n" int* 220 #pragma varargck type "p" uintptr 221 #pragma varargck type "p" void* 222 #pragma varargck flag ',' 223 #pragma varargck flag ' ' 224 #pragma varargck flag 'h' 225 #pragma varargck type "<" void* 226 #pragma varargck type "[" void* 227 #pragma varargck type "H" void* 228 #pragma varargck type "lH" void* 229 230 extern int fmtinstall(int, int (*)(Fmt*)); 231 extern int dofmt(Fmt*, char*); 232 extern int dorfmt(Fmt*, Rune*); 233 extern int fmtprint(Fmt*, char*, ...); 234 extern int fmtvprint(Fmt*, char*, va_list); 235 extern int fmtrune(Fmt*, int); 236 extern int fmtstrcpy(Fmt*, char*); 237 extern int fmtrunestrcpy(Fmt*, Rune*); 238 /* 239 * error string for %r 240 * supplied on per os basis, not part of fmt library 241 */ 242 extern int errfmt(Fmt *f); 243 244 /* 245 * quoted strings 246 */ 247 extern char *unquotestrdup(char*); 248 extern Rune *unquoterunestrdup(Rune*); 249 extern char *quotestrdup(char*); 250 extern Rune *quoterunestrdup(Rune*); 251 extern int quotestrfmt(Fmt*); 252 extern int quoterunestrfmt(Fmt*); 253 extern void quotefmtinstall(void); 254 extern int (*doquote)(int); 255 extern int needsrcquote(int); 256 257 /* 258 * random number 259 */ 260 extern void srand(long); 261 extern int rand(void); 262 extern int nrand(int); 263 extern long lrand(void); 264 extern long lnrand(long); 265 extern double frand(void); 266 extern ulong truerand(void); /* uses /dev/random */ 267 extern ulong ntruerand(ulong); /* uses /dev/random */ 268 269 /* 270 * math 271 */ 272 extern ulong getfcr(void); 273 extern void setfsr(ulong); 274 extern ulong getfsr(void); 275 extern void setfcr(ulong); 276 extern double NaN(void); 277 extern double Inf(int); 278 extern int isNaN(double); 279 extern int isInf(double, int); 280 extern ulong umuldiv(ulong, ulong, ulong); 281 extern long muldiv(long, long, long); 282 283 extern double pow(double, double); 284 extern double atan2(double, double); 285 extern double fabs(double); 286 extern double atan(double); 287 extern double log(double); 288 extern double log10(double); 289 extern double exp(double); 290 extern double floor(double); 291 extern double ceil(double); 292 extern double hypot(double, double); 293 extern double sin(double); 294 extern double cos(double); 295 extern double tan(double); 296 extern double asin(double); 297 extern double acos(double); 298 extern double sinh(double); 299 extern double cosh(double); 300 extern double tanh(double); 301 extern double sqrt(double); 302 extern double fmod(double, double); 303 304 #define HUGE 3.4028234e38 305 #define PIO2 1.570796326794896619231e0 306 #define PI (PIO2+PIO2) 307 308 /* 309 * Time-of-day 310 */ 311 312 typedef 313 struct Tm 314 { 315 int sec; 316 int min; 317 int hour; 318 int mday; 319 int mon; 320 int year; 321 int wday; 322 int yday; 323 char zone[4]; 324 int tzoff; 325 } Tm; 326 327 extern Tm* gmtime(long); 328 extern Tm* localtime(long); 329 extern char* asctime(Tm*); 330 extern char* ctime(long); 331 extern double cputime(void); 332 extern long times(long*); 333 extern long tm2sec(Tm*); 334 extern vlong nsec(void); 335 336 extern void cycles(uvlong*); /* 64-bit value of the cycle counter if there is one, 0 if there isn't */ 337 338 /* 339 * one-of-a-kind 340 */ 341 enum 342 { 343 PNPROC = 1, 344 PNGROUP = 2, 345 }; 346 347 extern void _assert(char*); 348 extern int abs(int); 349 extern int atexit(void(*)(void)); 350 extern void atexitdont(void(*)(void)); 351 extern int atnotify(int(*)(void*, char*), int); 352 extern double atof(char*); 353 extern int atoi(char*); 354 extern long atol(char*); 355 extern vlong atoll(char*); 356 extern double charstod(int(*)(void*), void*); 357 extern char* cleanname(char*); 358 extern int decrypt(void*, void*, int); 359 extern int encrypt(void*, void*, int); 360 extern int dec64(uchar*, int, char*, int); 361 extern int enc64(char*, int, uchar*, int); 362 extern int dec32(uchar*, int, char*, int); 363 extern int enc32(char*, int, uchar*, int); 364 extern int dec16(uchar*, int, char*, int); 365 extern int enc16(char*, int, uchar*, int); 366 extern int encodefmt(Fmt*); 367 extern void exits(char*); 368 extern double frexp(double, int*); 369 extern uintptr getcallerpc(void*); 370 extern char* getenv(char*); 371 extern int getfields(char*, char**, int, int, char*); 372 extern int gettokens(char *, char **, int, char *); 373 extern char* getuser(void); 374 extern char* getwd(char*, int); 375 extern int iounit(int); 376 extern long labs(long); 377 extern double ldexp(double, int); 378 extern void longjmp(jmp_buf, int); 379 extern char* mktemp(char*); 380 extern double modf(double, double*); 381 extern int netcrypt(void*, void*); 382 extern void notejmp(void*, jmp_buf, int); 383 extern void perror(char*); 384 extern int postnote(int, int, char *); 385 extern double pow10(int); 386 extern int putenv(char*, char*); 387 extern void qsort(void*, long, long, int (*)(void*, void*)); 388 extern int setjmp(jmp_buf); 389 extern double strtod(char*, char**); 390 extern long strtol(char*, char**, int); 391 extern ulong strtoul(char*, char**, int); 392 extern vlong strtoll(char*, char**, int); 393 extern uvlong strtoull(char*, char**, int); 394 extern void sysfatal(char*, ...); 395 #pragma varargck argpos sysfatal 1 396 extern void syslog(int, char*, char*, ...); 397 #pragma varargck argpos syslog 3 398 extern long time(long*); 399 extern int tolower(int); 400 extern int toupper(int); 401 402 /* 403 * profiling 404 */ 405 enum { 406 Profoff, /* No profiling */ 407 Profuser, /* Measure user time only (default) */ 408 Profkernel, /* Measure user + kernel time */ 409 Proftime, /* Measure total time */ 410 Profsample, /* Use clock interrupt to sample (default when there is no cycle counter) */ 411 }; /* what */ 412 extern void prof(void (*fn)(void*), void *arg, int entries, int what); 413 414 /* 415 * atomic 416 */ 417 long ainc(long*); 418 long adec(long*); 419 int cas32(u32int*, u32int, u32int); 420 int casp(void**, void*, void*); 421 int casl(ulong*, ulong, ulong); 422 423 /* 424 * synchronization 425 */ 426 typedef 427 struct Lock { 428 long key; 429 long sem; 430 } Lock; 431 432 extern int _tas(int*); 433 434 extern void lock(Lock*); 435 extern void unlock(Lock*); 436 extern int canlock(Lock*); 437 438 typedef struct QLp QLp; 439 struct QLp 440 { 441 int inuse; 442 QLp *next; 443 char state; 444 }; 445 446 typedef 447 struct QLock 448 { 449 Lock lock; 450 int locked; 451 QLp *head; 452 QLp *tail; 453 } QLock; 454 455 extern void qlock(QLock*); 456 extern void qunlock(QLock*); 457 extern int canqlock(QLock*); 458 extern void _qlockinit(void* (*)(void*, void*)); /* called only by the thread library */ 459 460 typedef 461 struct RWLock 462 { 463 Lock lock; 464 int readers; /* number of readers */ 465 int writer; /* number of writers */ 466 QLp *head; /* list of waiting processes */ 467 QLp *tail; 468 } RWLock; 469 470 extern void rlock(RWLock*); 471 extern void runlock(RWLock*); 472 extern int canrlock(RWLock*); 473 extern void wlock(RWLock*); 474 extern void wunlock(RWLock*); 475 extern int canwlock(RWLock*); 476 477 typedef 478 struct Rendez 479 { 480 QLock *l; 481 QLp *head; 482 QLp *tail; 483 } Rendez; 484 485 extern void rsleep(Rendez*); /* unlocks r->l, sleeps, locks r->l again */ 486 extern int rwakeup(Rendez*); 487 extern int rwakeupall(Rendez*); 488 extern void** privalloc(void); 489 extern void privfree(void**); 490 491 /* 492 * network dialing 493 */ 494 #define NETPATHLEN 40 495 extern int accept(int, char*); 496 extern int announce(char*, char*); 497 extern int dial(char*, char*, char*, int*); 498 extern void setnetmtpt(char*, int, char*); 499 extern int hangup(int); 500 extern int listen(char*, char*); 501 extern char* netmkaddr(char*, char*, char*); 502 extern int reject(int, char*, char*); 503 504 /* 505 * encryption 506 */ 507 extern int pushssl(int, char*, char*, char*, int*); 508 extern int pushtls(int, char*, char*, int, char*, char*); 509 510 /* 511 * network services 512 */ 513 typedef struct NetConnInfo NetConnInfo; 514 struct NetConnInfo 515 { 516 char *dir; /* connection directory */ 517 char *root; /* network root */ 518 char *spec; /* binding spec */ 519 char *lsys; /* local system */ 520 char *lserv; /* local service */ 521 char *rsys; /* remote system */ 522 char *rserv; /* remote service */ 523 char *laddr; /* local address */ 524 char *raddr; /* remote address */ 525 }; 526 extern NetConnInfo* getnetconninfo(char*, int); 527 extern void freenetconninfo(NetConnInfo*); 528 529 /* 530 * system calls 531 * 532 */ 533 #define STATMAX 65535U /* max length of machine-independent stat structure */ 534 #define DIRMAX (sizeof(Dir)+STATMAX) /* max length of Dir structure */ 535 #define ERRMAX 128 /* max length of error string */ 536 537 #define MORDER 0x0003 /* mask for bits defining order of mounting */ 538 #define MREPL 0x0000 /* mount replaces object */ 539 #define MBEFORE 0x0001 /* mount goes before others in union directory */ 540 #define MAFTER 0x0002 /* mount goes after others in union directory */ 541 #define MCREATE 0x0004 /* permit creation in mounted directory */ 542 #define MCACHE 0x0010 /* cache some data */ 543 #define MMASK 0x0017 /* all bits on */ 544 545 #define OREAD 0 /* open for read */ 546 #define OWRITE 1 /* write */ 547 #define ORDWR 2 /* read and write */ 548 #define OEXEC 3 /* execute, == read but check execute permission */ 549 #define OTRUNC 16 /* or'ed in (except for exec), truncate file first */ 550 #define OCEXEC 32 /* or'ed in, close on exec */ 551 #define ORCLOSE 64 /* or'ed in, remove on close */ 552 #define OEXCL 0x1000 /* or'ed in, exclusive use (create only) */ 553 // #define OBEHIND 0x2000 /* use write behind for writes [for 9n] */ 554 555 #define AEXIST 0 /* accessible: exists */ 556 #define AEXEC 1 /* execute access */ 557 #define AWRITE 2 /* write access */ 558 #define AREAD 4 /* read access */ 559 560 /* Segattch */ 561 #define SG_RONLY 0040 /* read only */ 562 #define SG_CEXEC 0100 /* detach on exec */ 563 564 #define NCONT 0 /* continue after note */ 565 #define NDFLT 1 /* terminate after note */ 566 #define NSAVE 2 /* clear note but hold state */ 567 #define NRSTR 3 /* restore saved state */ 568 569 /* bits in Qid.type */ 570 #define QTDIR 0x80 /* type bit for directories */ 571 #define QTAPPEND 0x40 /* type bit for append only files */ 572 #define QTEXCL 0x20 /* type bit for exclusive use files */ 573 #define QTMOUNT 0x10 /* type bit for mounted channel */ 574 #define QTAUTH 0x08 /* type bit for authentication file */ 575 #define QTTMP 0x04 /* type bit for not-backed-up file */ 576 #define QTFILE 0x00 /* plain file */ 577 578 /* bits in Dir.mode */ 579 #define DMDIR 0x80000000 /* mode bit for directories */ 580 #define DMAPPEND 0x40000000 /* mode bit for append only files */ 581 #define DMEXCL 0x20000000 /* mode bit for exclusive use files */ 582 #define DMMOUNT 0x10000000 /* mode bit for mounted channel */ 583 #define DMAUTH 0x08000000 /* mode bit for authentication file */ 584 #define DMTMP 0x04000000 /* mode bit for non-backed-up files */ 585 #define DMREAD 0x4 /* mode bit for read permission */ 586 #define DMWRITE 0x2 /* mode bit for write permission */ 587 #define DMEXEC 0x1 /* mode bit for execute permission */ 588 589 /* rfork */ 590 enum 591 { 592 RFNAMEG = (1<<0), 593 RFENVG = (1<<1), 594 RFFDG = (1<<2), 595 RFNOTEG = (1<<3), 596 RFPROC = (1<<4), 597 RFMEM = (1<<5), 598 RFNOWAIT = (1<<6), 599 RFCNAMEG = (1<<10), 600 RFCENVG = (1<<11), 601 RFCFDG = (1<<12), 602 RFREND = (1<<13), 603 RFNOMNT = (1<<14) 604 }; 605 606 typedef 607 struct Qid 608 { 609 uvlong path; 610 ulong vers; 611 uchar type; 612 } Qid; 613 614 typedef 615 struct Dir { 616 /* system-modified data */ 617 ushort type; /* server type */ 618 uint dev; /* server subtype */ 619 /* file data */ 620 Qid qid; /* unique id from server */ 621 ulong mode; /* permissions */ 622 ulong atime; /* last read time */ 623 ulong mtime; /* last write time */ 624 vlong length; /* file length */ 625 char *name; /* last element of path */ 626 char *uid; /* owner name */ 627 char *gid; /* group name */ 628 char *muid; /* last modifier name */ 629 } Dir; 630 631 /* keep /sys/src/ape/lib/ap/plan9/sys9.h in sync with this -rsc */ 632 typedef 633 struct Waitmsg 634 { 635 int pid; /* of loved one */ 636 ulong time[3]; /* of loved one & descendants */ 637 char *msg; 638 } Waitmsg; 639 640 typedef 641 struct IOchunk 642 { 643 void *addr; 644 ulong len; 645 } IOchunk; 646 647 extern void _exits(char*); 648 649 extern void abort(void); 650 extern int access(char*, int); 651 extern long alarm(ulong); 652 extern int await(char*, int); 653 extern int bind(char*, char*, int); 654 extern int brk(void*); 655 extern int chdir(char*); 656 extern int close(int); 657 extern int create(char*, int, ulong); 658 extern int dup(int, int); 659 extern int errstr(char*, uint); 660 extern int exec(char*, char*[]); 661 extern int execl(char*, ...); 662 extern int fork(void); 663 extern int rfork(int); 664 extern int fauth(int, char*); 665 extern int fstat(int, uchar*, int); 666 extern int fwstat(int, uchar*, int); 667 extern int fversion(int, int, char*, int); 668 extern int mount(int, int, char*, int, char*); 669 extern int unmount(char*, char*); 670 extern int noted(int); 671 extern int notify(void(*)(void*, char*)); 672 extern int open(char*, int); 673 extern int fd2path(int, char*, int); 674 // extern int fdflush(int); 675 extern int pipe(int*); 676 extern long pread(int, void*, long, vlong); 677 extern long preadv(int, IOchunk*, int, vlong); 678 extern long pwrite(int, void*, long, vlong); 679 extern long pwritev(int, IOchunk*, int, vlong); 680 extern long read(int, void*, long); 681 extern long readn(int, void*, long); 682 extern long readv(int, IOchunk*, int); 683 extern int remove(char*); 684 extern void* sbrk(ulong); 685 extern long oseek(int, long, int); 686 extern vlong seek(int, vlong, int); 687 extern void* segattach(int, char*, void*, ulong); 688 extern void* segbrk(void*, void*); 689 extern int segdetach(void*); 690 extern int segflush(void*, ulong); 691 extern int segfree(void*, ulong); 692 extern int semacquire(long*, int); 693 extern long semrelease(long*, long); 694 extern int sleep(long); 695 extern int stat(char*, uchar*, int); 696 extern int tsemacquire(long*, ulong); 697 extern Waitmsg* wait(void); 698 extern int waitpid(void); 699 extern long write(int, void*, long); 700 extern long writev(int, IOchunk*, int); 701 extern int wstat(char*, uchar*, int); 702 extern void* rendezvous(void*, void*); 703 704 extern Dir* dirstat(char*); 705 extern Dir* dirfstat(int); 706 extern int dirwstat(char*, Dir*); 707 extern int dirfwstat(int, Dir*); 708 extern long dirread(int, Dir**); 709 extern void nulldir(Dir*); 710 extern long dirreadall(int, Dir**); 711 extern int getpid(void); 712 extern int getppid(void); 713 extern void rerrstr(char*, uint); 714 extern char* sysname(void); 715 extern void werrstr(char*, ...); 716 #pragma varargck argpos werrstr 1 717 718 extern char *argv0; 719 #define ARGBEGIN for((argv0||(argv0=*argv)),argv++,argc--;\ 720 argv[0] && argv[0][0]=='-' && argv[0][1];\ 721 argc--, argv++) {\ 722 char *_args, *_argt;\ 723 Rune _argc;\ 724 _args = &argv[0][1];\ 725 if(_args[0]=='-' && _args[1]==0){\ 726 argc--; argv++; break;\ 727 }\ 728 _argc = 0;\ 729 while(*_args && (_args += chartorune(&_argc, _args)))\ 730 switch(_argc) 731 #define ARGEND SET(_argt);USED(_argt,_argc,_args);}USED(argv, argc); 732 #define ARGF() (_argt=_args, _args="",\ 733 (*_argt? _argt: argv[1]? (argc--, *++argv): 0)) 734 #define EARGF(x) (_argt=_args, _args="",\ 735 (*_argt? _argt: argv[1]? (argc--, *++argv): ((x), abort(), (char*)0))) 736 737 #define ARGC() _argc 738 739 /* this is used by sbrk and brk, it's a really bad idea to redefine it */ 740 extern char end[]; 741