|
|
1.1 ! root 1: /* ! 2: * Copyright (c) 1980 Regents of the University of California. ! 3: * All rights reserved. The Berkeley software License Agreement ! 4: * specifies the terms and conditions for redistribution. ! 5: */ ! 6: ! 7: #ifndef lint ! 8: static char sccsid[] = "@(#)dumpitime.c 5.2 (Berkeley) 5/28/86"; ! 9: #endif not lint ! 10: ! 11: #include "dump.h" ! 12: #include <sys/file.h> ! 13: ! 14: char *prdate(d) ! 15: time_t d; ! 16: { ! 17: char *p; ! 18: ! 19: if(d == 0) ! 20: return("the epoch"); ! 21: p = ctime(&d); ! 22: p[24] = 0; ! 23: return(p); ! 24: } ! 25: ! 26: struct idates **idatev = 0; ! 27: int nidates = 0; ! 28: int idates_in = 0; ! 29: struct itime *ithead = 0; ! 30: ! 31: inititimes() ! 32: { ! 33: FILE *df; ! 34: ! 35: if ((df = fopen(increm, "r")) == NULL) { ! 36: perror(increm); ! 37: return; ! 38: } ! 39: (void) flock(fileno(df), LOCK_SH); ! 40: readitimes(df); ! 41: fclose(df); ! 42: } ! 43: ! 44: readitimes(df) ! 45: FILE *df; ! 46: { ! 47: register int i; ! 48: register struct itime *itwalk; ! 49: ! 50: for (;;) { ! 51: itwalk = (struct itime *)calloc(1, sizeof (struct itime)); ! 52: if (getrecord(df, &(itwalk->it_value)) < 0) ! 53: break; ! 54: nidates++; ! 55: itwalk->it_next = ithead; ! 56: ithead = itwalk; ! 57: } ! 58: ! 59: idates_in = 1; ! 60: /* ! 61: * arrayify the list, leaving enough room for the additional ! 62: * record that we may have to add to the idate structure ! 63: */ ! 64: idatev = (struct idates **)calloc(nidates + 1,sizeof (struct idates *)); ! 65: itwalk = ithead; ! 66: for (i = nidates - 1; i >= 0; i--, itwalk = itwalk->it_next) ! 67: idatev[i] = &itwalk->it_value; ! 68: } ! 69: ! 70: getitime() ! 71: { ! 72: register struct idates *ip; ! 73: register int i; ! 74: char *fname; ! 75: ! 76: fname = disk; ! 77: #ifdef FDEBUG ! 78: msg("Looking for name %s in increm = %s for delta = %c\n", ! 79: fname, increm, incno); ! 80: #endif ! 81: spcl.c_ddate = 0; ! 82: lastincno = '0'; ! 83: ! 84: inititimes(); ! 85: /* ! 86: * Go find the entry with the same name for a lower increment ! 87: * and older date ! 88: */ ! 89: ITITERATE(i, ip) { ! 90: if (strncmp(fname, ip->id_name, sizeof (ip->id_name)) != 0) ! 91: continue; ! 92: if (ip->id_incno >= incno) ! 93: continue; ! 94: if (ip->id_ddate <= spcl.c_ddate) ! 95: continue; ! 96: spcl.c_ddate = ip->id_ddate; ! 97: lastincno = ip->id_incno; ! 98: } ! 99: } ! 100: ! 101: putitime() ! 102: { ! 103: FILE *df; ! 104: register struct idates *itwalk; ! 105: register int i; ! 106: int fd; ! 107: char *fname; ! 108: ! 109: if(uflag == 0) ! 110: return; ! 111: if ((df = fopen(increm, "r+")) == NULL) { ! 112: perror(increm); ! 113: dumpabort(); ! 114: } ! 115: fd = fileno(df); ! 116: (void) flock(fd, LOCK_EX); ! 117: fname = disk; ! 118: free(idatev); ! 119: idatev = 0; ! 120: nidates = 0; ! 121: ithead = 0; ! 122: idates_in = 0; ! 123: readitimes(df); ! 124: if (fseek(df,0L,0) < 0) { /* rewind() was redefined in dumptape.c */ ! 125: perror("fseek"); ! 126: dumpabort(); ! 127: } ! 128: spcl.c_ddate = 0; ! 129: ITITERATE(i, itwalk){ ! 130: if (strncmp(fname, itwalk->id_name, ! 131: sizeof (itwalk->id_name)) != 0) ! 132: continue; ! 133: if (itwalk->id_incno != incno) ! 134: continue; ! 135: goto found; ! 136: } ! 137: /* ! 138: * construct the new upper bound; ! 139: * Enough room has been allocated. ! 140: */ ! 141: itwalk = idatev[nidates] = ! 142: (struct idates *)calloc(1, sizeof(struct idates)); ! 143: nidates += 1; ! 144: found: ! 145: strncpy(itwalk->id_name, fname, sizeof (itwalk->id_name)); ! 146: itwalk->id_incno = incno; ! 147: itwalk->id_ddate = spcl.c_date; ! 148: ! 149: ITITERATE(i, itwalk){ ! 150: recout(df, itwalk); ! 151: } ! 152: if (ftruncate(fd, ftell(df))) { ! 153: perror("ftruncate"); ! 154: dumpabort(); ! 155: } ! 156: (void) fclose(df); ! 157: msg("level %c dump on %s\n", incno, prdate(spcl.c_date)); ! 158: } ! 159: ! 160: recout(file, what) ! 161: FILE *file; ! 162: struct idates *what; ! 163: { ! 164: fprintf(file, DUMPOUTFMT, ! 165: what->id_name, ! 166: what->id_incno, ! 167: ctime(&(what->id_ddate)) ! 168: ); ! 169: } ! 170: ! 171: int recno; ! 172: int getrecord(df, idatep) ! 173: FILE *df; ! 174: struct idates *idatep; ! 175: { ! 176: char buf[BUFSIZ]; ! 177: ! 178: recno = 0; ! 179: if ( (fgets(buf, BUFSIZ, df)) != buf) ! 180: return(-1); ! 181: recno++; ! 182: if (makeidate(idatep, buf) < 0) ! 183: msg("Unknown intermediate format in %s, line %d\n", ! 184: increm, recno); ! 185: ! 186: #ifdef FDEBUG ! 187: msg("getrecord: %s %c %s\n", ! 188: idatep->id_name, idatep->id_incno, prdate(idatep->id_ddate)); ! 189: #endif ! 190: return(0); ! 191: } ! 192: ! 193: time_t unctime(); ! 194: ! 195: int makeidate(ip, buf) ! 196: struct idates *ip; ! 197: char *buf; ! 198: { ! 199: char un_buf[128]; ! 200: ! 201: sscanf(buf, DUMPINFMT, ip->id_name, &ip->id_incno, un_buf); ! 202: ip->id_ddate = unctime(un_buf); ! 203: if (ip->id_ddate < 0) ! 204: return(-1); ! 205: return(0); ! 206: } ! 207: ! 208: /* ! 209: * This is an estimation of the number of TP_BSIZE blocks in the file. ! 210: * It estimates the number of blocks in files with holes by assuming ! 211: * that all of the blocks accounted for by di_blocks are data blocks ! 212: * (when some of the blocks are usually used for indirect pointers); ! 213: * hence the estimate may be high. ! 214: */ ! 215: est(ip) ! 216: struct dinode *ip; ! 217: { ! 218: long s, t; ! 219: ! 220: /* ! 221: * ip->di_size is the size of the file in bytes. ! 222: * ip->di_blocks stores the number of sectors actually in the file. ! 223: * If there are more sectors than the size would indicate, this just ! 224: * means that there are indirect blocks in the file or unused ! 225: * sectors in the last file block; we can safely ignore these ! 226: * (s = t below). ! 227: * If the file is bigger than the number of sectors would indicate, ! 228: * then the file has holes in it. In this case we must use the ! 229: * block count to estimate the number of data blocks used, but ! 230: * we use the actual size for estimating the number of indirect ! 231: * dump blocks (t vs. s in the indirect block calculation). ! 232: */ ! 233: esize++; ! 234: s = howmany(dbtob(ip->di_blocks), TP_BSIZE); ! 235: t = howmany(ip->di_size, TP_BSIZE); ! 236: if ( s > t ) ! 237: s = t; ! 238: if (ip->di_size > sblock->fs_bsize * NDADDR) { ! 239: /* calculate the number of indirect blocks on the dump tape */ ! 240: s += howmany(t - NDADDR * sblock->fs_bsize / TP_BSIZE, ! 241: TP_NINDIR); ! 242: } ! 243: esize += s; ! 244: } ! 245: ! 246: bmapest(map) ! 247: char *map; ! 248: { ! 249: register i, n; ! 250: ! 251: n = -1; ! 252: for (i = 0; i < msiz; i++) ! 253: if(map[i]) ! 254: n = i; ! 255: if(n < 0) ! 256: return; ! 257: n++; ! 258: esize++; ! 259: esize += howmany(n * sizeof map[0], TP_BSIZE); ! 260: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.