Return to error.c CVS log

Up to [Research Unix] / researchv10no / cmd / face

Annotation of researchv10no/cmd/face/error.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * miscellaneous error handling
                      3:  */
                      4: 
                      5: #include <stdio.h>
                      6: 
                      7: extern char *malloc(), *realloc();
                      8: 
                      9: char *
                     10: emalloc(size)
                     11: int size;
                     12: {
                     13:        char *p;
                     14: 
                     15:        if ((p = malloc(size)) == NULL)
                     16:                panic("out of memory\n");
                     17:        return (p);
                     18: }
                     19: 
                     20: char *
                     21: erealloc(p, size)
                     22: char *p;
                     23: int size;
                     24: {
                     25:        if ((p = realloc(p, size)) == NULL)
                     26:                panic("out of memory\n");
                     27:        return (p);
                     28: }
                     29: 
                     30: /*
                     31:  * print to the log (== standard error)
                     32:  */
                     33: 
                     34: log(s, p0, p1, p2, p3, p4, p5)
                     35: char *s;
                     36: {
                     37:        char *ctime();
                     38:        long time();
                     39:        long now;
                     40: 
                     41:        time(&now);
                     42:        fprintf(stderr, "%.15s ", ctime(&now)+4);
                     43:        fprintf(stderr, s, p0, p1, p2, p3, p4, p5);
                     44:        fflush(stderr);
                     45: }
                     46: 
                     47: /*
                     48:  * fatal error: log and exit
                     49:  */
                     50: panic(s, p0, p1, p2, p3, p4, p5)
                     51: char *s;
                     52: {
                     53:        char *ctime();
                     54:        long time();
                     55:        long now;
                     56: 
                     57:        time(&now);
                     58:        fprintf(stderr, "%.15s panic:", ctime(&now)+4);
                     59:        fprintf(stderr, s, p0, p1, p2, p3, p4, p5);
                     60:        fflush(stderr);
                     61:        exit(1);
                     62: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.