4.3BSD - /usr/src/etc/dump/dumpitime.c

   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: }

Defined functions

Defined variables