![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to tmpfile.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv8dc / cmd / upas / common|
Return to tmpfile.c CVS log | Up to [Research Unix] / researchv8dc / cmd / upas / common |
1.1 ! root 1: /* ! 2: * Package to maintain the temporary file. ! 3: */ ! 4: #include <stdio.h> ! 5: #include <signal.h> ! 6: #include "letter.h" ! 7: #include "mail.h" ! 8: #include "string.h" ! 9: ! 10: /* imports */ ! 11: extern char *mktemp(); ! 12: extern int panic(); ! 13: ! 14: /* globals */ ! 15: static letter let[NLETTERS]; ! 16: ! 17: #define TMPNAME "/tmp/maXXXXX" ! 18: static char tmpfile[sizeof(TMPNAME)]; ! 19: ! 20: static FILE *tfp; ! 21: static letter *lastp; ! 22: ! 23: #define ASSERT(x,y) if(!(x)) panic(y) ! 24: ! 25: void ! 26: inittmp() ! 27: { ! 28: /* make temp file */ ! 29: (void)strcpy(tmpfile, TMPNAME); ! 30: (void)mktemp(tmpfile); ! 31: (void)unlink(tmpfile); ! 32: close(creat(tmpfile, 0600)); ! 33: chown(tmpfile, getuid(), getgid()); ! 34: tfp = fopen(tmpfile, "r+"); ! 35: if (tfp == NULL) ! 36: panic("mail: can't open tempfile"); ! 37: } ! 38: ! 39: void ! 40: releasetmp() ! 41: { ! 42: if (tfp != NULL) ! 43: fclose(tfp); ! 44: unlink(tmpfile); ! 45: } ! 46: ! 47: /* ! 48: * Modes are: ! 49: * "w" to write a letter ! 50: * "r" to read a letter ! 51: * "ru" to read only undeleted letters ! 52: */ ! 53: letter * ! 54: lopen(n, mode) ! 55: int n; ! 56: char *mode; ! 57: { ! 58: letter *lp, *rv = NULL; ! 59: ! 60: if (n >= NLETTERS) ! 61: return NULL; ! 62: ! 63: lp = &let[n]; ! 64: if (strcmp(mode, "w")==0) { ! 65: lp->status = L_USED; ! 66: (void)fseek(tfp, 0L, 2); ! 67: lp->address = ftell(tfp); ! 68: lp->offset = lp->size = 0; ! 69: rv = lp; ! 70: ! 71: } else if (strcmp(mode, "r")==0) { ! 72: if (lp->status & L_USED) { ! 73: lp->offset = 0; ! 74: (void)fseek(tfp, lp->address, 0); ! 75: rv = lp; ! 76: } ! 77: ! 78: } else if (strcmp(mode, "ru")==0) { ! 79: if ((lp->status & L_USED) && !(lp->status & L_DELETED)) { ! 80: lp->offset = 0; ! 81: (void)fseek(tfp, lp->address, 0); ! 82: rv = lp; ! 83: } ! 84: } ! 85: ! 86: lastp = rv; ! 87: return rv; ! 88: } ! 89: ! 90: extern char * ! 91: lgets(bp, len, lp) ! 92: char *bp; ! 93: int len; ! 94: letter *lp; ! 95: { ! 96: char *rv; ! 97: ! 98: ASSERT(lp->status & L_USED, "tmpfile botch"); ! 99: if (lp != lastp) ! 100: (void)fseek(tfp, lp->address+lp->offset, 0); ! 101: if (lp->offset >= lp->size) ! 102: return NULL; ! 103: if (lp->offset+len > lp->size) ! 104: len = lp->size - lp->offset + 1; ! 105: rv = fgets(bp, len, tfp); ! 106: ASSERT(rv != NULL, "tmpfile botch"); ! 107: lp->offset = ftell(tfp) - lp->address; ! 108: lastp = lp; ! 109: return bp; ! 110: } ! 111: ! 112: extern void ! 113: lputs(bp, lp) ! 114: char *bp; ! 115: letter *lp; ! 116: { ! 117: int rv; ! 118: ! 119: ASSERT(lp->status & L_USED, "tmpfile botch"); ! 120: if (lp != lastp) ! 121: (void)fseek(tfp, lp->address+lp->offset, 0); ! 122: rv = fputs(bp, tfp); ! 123: ASSERT(rv != EOF, "can't write to /tmp"); ! 124: lp->size = lp->offset = ftell(tfp) - lp->address; ! 125: lastp = lp; ! 126: } ! 127: ! 128: extern void ! 129: lputc(c, lp) ! 130: char c; ! 131: letter *lp; ! 132: { ! 133: char rv; ! 134: ! 135: ASSERT(lp->status & L_USED, "tmpfile botch"); ! 136: if (lp != lastp) ! 137: (void)fseek(tfp, lp->address+lp->offset, 0); ! 138: rv = fputc(c, tfp); ! 139: ASSERT(rv != EOF, "can't write to /tmp"); ! 140: lp->size = lp->offset = ftell(tfp) - lp->address; ! 141: lastp = lp; ! 142: } ! 143: ! 144: extern long ! 145: ltell(lp) ! 146: letter *lp; ! 147: { ! 148: ASSERT(lp->status & L_USED, "tmpfile botch"); ! 149: return lp->offset; ! 150: } ! 151: ! 152: extern long ! 153: lsize(lp) ! 154: letter *lp; ! 155: { ! 156: ASSERT(lp->status & L_USED, "tmpfile botch"); ! 157: return lp->size; ! 158: } ! 159: ! 160: extern int ! 161: letseek(lp, off) ! 162: letter *lp; ! 163: long off; ! 164: { ! 165: ASSERT(lp->status & L_USED, "tmpfile botch"); ! 166: lp->offset = off < lp->size ? off : lp->size - 1; ! 167: lastp = NULL; ! 168: return 0; ! 169: } ! 170: ! 171: extern int ! 172: ldelete(n) ! 173: int n; ! 174: { ! 175: ASSERT(n>= 0 && n < NLETTERS && (let[n].status & L_USED), "tmpfile botch"); ! 176: let[n].status |= L_DELETED; ! 177: return 1; ! 178: } ! 179: ! 180: extern int ! 181: lundelete(n) ! 182: int n; ! 183: { ! 184: ASSERT(n>= 0 && n < NLETTERS && (let[n].status & L_USED), "tmpfile botch"); ! 185: let[n].status &= ~L_DELETED; ! 186: return 1; ! 187: } ! 188: ! 189: extern int ! 190: copyto(fp, lp, onatty, escape) ! 191: FILE *fp; ! 192: letter *lp; ! 193: int onatty; ! 194: int escape; ! 195: { ! 196: char buf[FROMLINESIZE]; ! 197: ! 198: while (fgets(buf, FROMLINESIZE, fp)!=NULL) { ! 199: if (onatty && buf[0]=='.' && buf[1]=='\n' && buf[2]=='\0') ! 200: break; ! 201: if (escape && strncmp(buf, FROM, FSIZE)==0) ! 202: lputc('>', lp); ! 203: (void)lputs(buf, lp); ! 204: } ! 205: } ! 206: ! 207: extern int ! 208: copyfrom(lp, fp) ! 209: letter *lp; ! 210: FILE *fp; ! 211: { ! 212: char buf[FROMLINESIZE]; ! 213: ! 214: while (lgets(buf, FROMLINESIZE, lp)!=NULL) ! 215: (void)fputs(buf, fp); ! 216: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.