Return to endfile.c CVS log

Up to [Research Unix] / researchv10dc / libI77 / d

Annotation of researchv10dc/libI77/d/endfile.c, revision 1.1

1.1     ! root        1: 4d3
        !             2: < #include "fcntl.h"
        !             3: 6,8d4
        !             4: < #ifndef O_RDONLY
        !             5: < #define O_RDONLY 0
        !             6: < #endif
        !             7: 19a16,24
        !             8: > #ifdef NON_UNIX_STDIO
        !             9: > #ifndef unlink
        !            10: > #define unlink remove
        !            11: > #endif
        !            12: > #else
        !            13: > #ifdef MSDOS
        !            14: > #include "io.h"
        !            15: > #endif
        !            16: > #endif
        !            17: 20a26,29
        !            18: > #ifdef NON_UNIX_STDIO
        !            19: > extern char *f__r_mode[], *f__w_mode[];
        !            20: > #endif
        !            21: > 
        !            22: 32a42,47
        !            23: > #ifdef NON_UNIX_STDIO
        !            24: >              { FILE *tf;
        !            25: >                      if (tf = fopen(nbuf, f__w_mode[0]))
        !            26: >                              fclose(tf);
        !            27: >                      }
        !            28: > #else
        !            29: 33a49
        !            30: > #endif
        !            31: 40a57
        !            32: > #ifdef NON_UNIX_STDIO
        !            33: 43a61,78
        !            34: > copy(FILE *from, register long len, FILE *to)
        !            35: > #endif
        !            36: > {
        !            37: >      int k, len1;
        !            38: >      char buf[BUFSIZ];
        !            39: > 
        !            40: >      while(fread(buf, len1 = len > BUFSIZ ? BUFSIZ : (int)len, 1, from)) {
        !            41: >              if (!fwrite(buf, len1, 1, to))
        !            42: >                      return 1;
        !            43: >              if ((len -= len1) <= 0)
        !            44: >                      break;
        !            45: >              }
        !            46: >      return 0;
        !            47: >      }
        !            48: > #else
        !            49: > #ifdef KR_headers
        !            50: > copy(from, len, to) char *from, *to; register long len;
        !            51: > #else
        !            52: 64a100
        !            53: > #endif
        !            54: 79a116,120
        !            55: > #ifdef NON_UNIX_STDIO
        !            56: >      FILE *bf, *tf;
        !            57: > #else
        !            58: >      FILE *bf;
        !            59: > #endif
        !            60: 83,86c124,128
        !            61: <      if(b->url) return(0);   /*don't truncate direct files*/
        !            62: <      loc=ftell(b->ufd);
        !            63: <      (void) fseek(b->ufd,0L,SEEK_END);
        !            64: <      len=ftell(b->ufd);
        !            65: ---
        !            66: >      if(b->url)
        !            67: >              return(0);      /*don't truncate direct files*/
        !            68: >      loc=ftell(bf = b->ufd);
        !            69: >      fseek(bf,0L,SEEK_END);
        !            70: >      len=ftell(bf);
        !            71: 89c131
        !            72: < #ifdef MSDOS
        !            73: ---
        !            74: > #ifdef NON_UNIX_STDIO
        !            75: 94a137,139
        !            76: > #ifdef NON_UNIX_STDIO
        !            77: >              if (!(bf = fopen(b->ufnm, f__w_mode[b->ufmt])))
        !            78: > #else
        !            79: 96c141
        !            80: < #ifdef MSDOS
        !            81: ---
        !            82: > #endif
        !            83: 98,100d142
        !            84: <              goto done;
        !            85: < #else
        !            86: <                      { rc = 1; goto done; }
        !            87: 103,104c145
        !            88: <              return 0;
        !            89: < #endif
        !            90: ---
        !            91: >              goto done;
        !            92: 109,110c150,151
        !            93: <      (void) strcpy(nm,"tmp.FXXXXXX");
        !            94: <      (void) mktemp(nm);
        !            95: ---
        !            96: >      strcpy(nm,"tmp.FXXXXXX");
        !            97: >      mktemp(nm);
        !            98: 111a153,182
        !            99: > #ifdef NON_UNIX_STDIO
        !           100: >      if (!(bf = fopen(b->ufnm, f__r_mode[0]))) {
        !           101: >  bad:
        !           102: >              rc = 1;
        !           103: >              goto done;
        !           104: >              }
        !           105: >      if (!(tf = fopen(nm, f__w_mode[0])))
        !           106: >              goto bad;
        !           107: >      if (copy(bf, loc, tf)) {
        !           108: >  bad1:
        !           109: >              rc = 1;
        !           110: >              goto done1;
        !           111: >              }
        !           112: >      if (!(bf = freopen(b->ufnm, f__w_mode[0], bf)))
        !           113: >              goto bad1;
        !           114: >      if (!(tf = freopen(nm, f__r_mode[0], tf)))
        !           115: >              goto bad1;
        !           116: >      if (copy(tf, loc, bf))
        !           117: >              goto bad1;
        !           118: >      if (f__w_mode[0] != f__w_mode[b->ufmt]) {
        !           119: >              if (!(bf = freopen(b->ufnm, f__w_mode[b->ufmt+2], bf)))
        !           120: >                      goto bad1;
        !           121: >              fseek(bf, loc, SEEK_SET);
        !           122: >              }
        !           123: > done1:
        !           124: >      fclose(tf);
        !           125: >      unlink(nm);
        !           126: > done:
        !           127: >      f__cf = b->ufd = bf;
        !           128: > #else
        !           129: 115a187
        !           130: >      fseek(b->ufd, loc, SEEK_SET);
        !           131: 117,124d188
        !           132: < #ifdef MSDOS
        !           133: <      {
        !           134: <      extern char *f__r_mode[];
        !           135: <      b->uwrt = 0;
        !           136: <      if (!(b->ufd = fopen(b->ufnm, f__r_mode[b->ufmt])))
        !           137: <              rc = 1;
        !           138: <      }
        !           139: <      if (loc)
        !           140: 126d189
        !           141: <      fseek(b->ufd, loc, SEEK_SET);

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