Blob
1 #include "lib9.h"2 #include <bio.h>4 enum5 {6 MAXBUFS = 207 };9 static Biobuf* wbufs[MAXBUFS];10 static int atexitflag;12 static13 void14 batexit(void)15 {16 Biobuf *bp;17 int i;19 for(i=0; i<MAXBUFS; i++) {20 bp = wbufs[i];21 if(bp != 0) {22 wbufs[i] = 0;23 Bflush(bp);24 }25 }26 }28 static29 void30 deinstall(Biobuf *bp)31 {32 int i;34 for(i=0; i<MAXBUFS; i++)35 if(wbufs[i] == bp)36 wbufs[i] = 0;37 }39 static40 void41 install(Biobuf *bp)42 {43 int i;45 deinstall(bp);46 for(i=0; i<MAXBUFS; i++)47 if(wbufs[i] == 0) {48 wbufs[i] = bp;49 break;50 }51 if(atexitflag == 0) {52 atexitflag = 1;53 atexit(batexit);54 }55 }57 int58 Binits(Biobuf *bp, int f, int mode, unsigned char *p, int size)59 {61 p += Bungetsize; /* make room for Bungets */62 size -= Bungetsize;64 switch(mode) {65 default:66 fprint(2, "Bopen: unknown mode %d\n", mode);67 return Beof;69 case OREAD:70 bp->state = Bractive;71 bp->ocount = 0;72 break;74 case OWRITE:75 install(bp);76 bp->state = Bwactive;77 bp->ocount = -size;78 break;79 }80 bp->bbuf = p;81 bp->ebuf = p+size;82 bp->bsize = size;83 bp->icount = 0;84 bp->gbuf = bp->ebuf;85 bp->fid = f;86 bp->flag = 0;87 bp->rdline = 0;88 bp->offset = 0;89 /* bp->runesize = 0; */90 return 0;91 }94 int95 Binit(Biobuf *bp, int f, int mode)96 {97 return Binits(bp, f, mode, bp->b, sizeof(bp->b));98 }100 Biobuf*101 Bopen(char *name, int mode)102 {103 Biobuf *bp;104 int f;106 switch(mode) {107 default:108 fprint(2, "Bopen: unknown mode %d\n", mode);109 return 0;111 case OREAD:112 f = open(name, OREAD);113 if(f < 0)114 return 0;115 break;117 case OWRITE:118 f = creat(name, 0666);119 if(f < 0)120 return 0;121 }122 bp = malloc(sizeof(Biobuf));123 if(bp == 0)124 return 0;125 Binits(bp, f, mode, bp->b, sizeof(bp->b));126 bp->flag = Bmagic;127 return bp;128 }130 int131 Bterm(Biobuf *bp)132 {134 deinstall(bp);135 Bflush(bp);136 if(bp->flag == Bmagic) {137 bp->flag = 0;138 close(bp->fid);139 free(bp);140 }141 return 0;142 }