APLawrence - Information and Resources for Unix and Linux Systems, Bloggers and the self-employed
RSS Feeds Get APLawrence.com by RSS














(OLDER) <- More Stuff -> (NEWER) (NEWEST)
Printer Friendly Version



We no longer offer ftp downloads. If there is a file you need referenced here, please contact me by email and I will get it to you.

bfind.c for SCO Unix 3.2v4.x

3.2v4.2 binary (note NOT for Release 5!!) Shift-Click here

If you are running 3.2v5.x, see man badblk
DO NOT USE THIS!!



/* bfind.c finds the inode for a given disk block
   or prints block numbers for an inode (-i) (pretty print)
   or prints block numbers for an inode (-l) (simple list)
   (C) October 1993 Anthony Lawrence
(781) 784-7547
*/
#include <stdio.h>  
#include <sys/types.h>
#include <sys/fs/s5param.h>
#include <sys/fs/s5filsys.h>
#include <sys/ino.h>

char SCCSID[]="@(#) bfind.c 1.6 (C) 10/14/93 Lawrence & Clark, Inc";

int inum=0;
int Blocksize=1024; /* default, reset later if necessary */
int pblocks=0; /* default action, looking for blocks, not inodes */
char lister=' ';  /* -i or -l */
int level=0; /* used for tabbing in on -l */
int alevel=0; /* used to determine depth of indirection (see below) */

main(int argc,char **argv)
 {
 struct filsys buf;
 struct dinode node;
 FILE *dsk;
 struct filsys *d=&buf;
 struct dinode *i=&node;
 int x,start_at;
 ulong num_inodes;
 unsigned long wants;

 if (argc < 3)
  {
  printf("bfind filesys block-no\n)");
  exit(1);
  }
 wants=atol(argv[2]);
 
 if ((dsk=fopen(argv[1],"r"))== NULL) 
  {
  printf("bfind filesys block-no\n)");
  exit(1);
  }
 fseek(dsk,512,SEEK_SET);
 fread(d,1,512,dsk);
/* Checking to be sure this is a filesystem that we know how
   to handle, etc.  See /usr/include/sys/filesys.h */
 if (d->s_magic != FsMAGIC && d->s_magic != FsEMAGIC)
   {
   fprintf(stderr,"(%x) Unknown File System: can't.\n",d->s_magic);
   exit(0);
   }
 if (d->s_fsize <=0 || d->s_isize > d->s_fsize)
   {
   fprintf(stderr,"Corrupted File System: can't.\n",d->s_magic);
   exit(0);
   }
 if (d->s_state+(long)d->s_time != FsOKAY && d->s_state != FsACTIVE)
   {
   fprintf(stderr,"State: (%x) Unclean or corrupted File System: can't.\n",d->s_state);
   exit(0);
   }

 switch(d->s_type)
   {
   case 1:
      Blocksize=512;break;
   case 2:
      Blocksize=1024;break;
   case 3:
      Blocksize=2048;break;
   default :
      fprintf(stderr,"I don't know this type of filesystem %d\n",d->s_type);
      exit(0);
   }
 num_inodes=Blocksize * (d->s_isize-2)/(sizeof(node));  
 printf("%u %u byte inodes, %u block-size\n",num_inodes,sizeof(struct dinode),Blocksize);
 fseek(dsk,3 * 512,SEEK_SET);
 fread(d,1,512,dsk);
 fread(i,1,sizeof(node),dsk);
 
 start_at=0;
 if (argc > 3) /* -i or -l */
   {
   start_at=atoi(argv[3])-2;
   lister=argv[2][1];
   if (start_at > num_inodes+2)
     {
     fprintf(stderr,"Too high inum %u only %u\n",start_at,num_inodes);
     exit(1);
     }
   fseek(dsk,start_at * sizeof(node),SEEK_CUR);
   pblocks=1;  
   }
 
 for (x=start_at ; x < num_inodes-2 ; x++)
  { 
  int deep;
  inum=x+2; /* first inum is 2, but we are indexing from 0 */
  if (pblocks)
   printf("Checking Inode %d\n",inum);
  fread(i,1,sizeof(node),dsk);
  if (i->di_size) /* if this is zero, we have a "special" file: no blocks */
   {
     /* There are 13 sets of 3 byte integers that hold the 
        disk block #'s.  The first 10 (0-9) are direct blocks
        (file data will be found in the blocks), the 11th is
        indirect (it points to direct blocks that point to data)
        and the 12th is Double Indirect (it points to indirect
        blocks that point to direct blocks that point to data).
        The 13th is Triple Indirect (points to double indirect
        which... as usual)

        There are undoubtedly easier ways to extract these numbers,
        but the method below shows (I think!) what's really there.
      */
    for (deep=0; deep < 39; deep += 3)
     {
     unsigned long z;
     z= i->di_addr[deep+0] & 0xff;
     z +=  (i->di_addr[deep+1] << 8) & 0xff00;
     z +=  (i->di_addr[deep+2] << 16) & 0xff0000;
     if (pblocks)
        do_blocks(z,deep);
     if (z == wants && z)  /* wants is zero if pblock is true */
      {
      printf("%lu is inode %d \n",z,inum);
      fclose(dsk);
      exit(0);
      /* found it and done */
      }
      if (deep > 27 && z ) /* indirect block */
        {
        level++;
        alevel=deep/3;
        descend(dsk,deep,wants,z);
        level--;
        }
      }
    }
  if (pblocks) /* done, but may need flushing */
    {
    do_blocks(0,0); /* The zero will force a flush */
    printf("\n");
    exit(0);
    }
   }
 }
 
 int descend(FILE *dsk, int deep, unsigned long wants,unsigned long now)
   {
   unsigned long cpos=ftell(dsk);
   unsigned long z;
   int x=Blocksize / sizeof(long);
   int y=0;
     
   
   fseek(dsk,now * Blocksize,SEEK_SET);
   for ( y=0; y < x; y++)
      {
      fread((char *) &z,sizeof(long),1,dsk);
      if (pblocks)  
        do_blocks(z,deep);
      if (z == wants && z)
        {
        printf("%lu is inode %d \n",z,inum);
        fclose(dsk);
        exit(0);
        }
     if (deep > 30 && z)
       {
       level++;
       alevel=deep/3-1;
       descend( dsk, deep - 3, wants, z);
       level--;
       }
      }
 
   fseek(dsk,cpos,SEEK_SET);
   return(0);
   }

int do_blocks(unsigned z,int depth)
{
static int reached_depth=0;
static int in_range=0;
static int in_zero=0;
static int zeros=0;
static ulong last_block=0;
int tabs;

if (!z)
     {
     zeros++;
     in_zero++;
     }
/* Above counts blocks pointing to 0.  Could be 'holes', so we
   want to print them if they are.
   Below looks to see if we have been counting zeros */
 
if (z && in_zero)      
  {
  printf("\n %d Zero Blocks (holes)\n",zeros);
  in_zero=0;
  zeros=0;
  }

if (lister=='l' && z) /* straight list of blocks */
     {
     for (tabs=0; tabs < level; tabs++)
        printf("   ");
     printf("%u\n",z);
     }
if (lister=='i') /* prettied list of blocks */
  {
  if (alevel > 9)  
  {
  if (in_range)
     {
     printf("- %u ",last_block);
     in_range=0;
     }
    switch(alevel)
      {
      case 10: printf("\n(Indirect) %u\n",last_block);break;
      case 11: printf("\n(Double Indirect) %u\n",last_block);break;
      case 12: printf("\n(Triple Indirect) %u\n",last_block);break;
      }
  last_block=z;
  alevel--;
  printf("%u ",z);
  return(0);
  }
  if (z == last_block+1)
     {
     in_range=1;
     last_block=z;
     return(0);
     }
  if (!in_range && z)
     {
     printf("\n%u ",z);
     last_block=z;
     return(0);
     }
  if (in_range)
     {
     printf("- %u",last_block);
     last_block=z;
     in_range=0;
     printf("\n%u ",z);
     }
  }
}






Click here to add your comments



Don't miss responses! Subscribe to Comments by RSS or by Email

Click here to add your comments


If you want a picture to show with your comment, go get a Gravatar



ad

Have you tried Searching this site?

Unix/Linux/Mac OS X support by phone, email or on-site: Support Rates

This is a Unix/Linux resource website. It contains technical articles about Unix, Linux and general computing related subjects, opinion, news, help files, how-to's, tutorials and more. We appreciate comments and article submissions.

Publishing your articles here

Jump to Comments



Many of the products and books I review are things I purchased for my own use. Some were given to me specifically for the purpose of reviewing them. I resell or can earn commissions from the sale of some of these items. Links within these pages may be affiliate links that pay me for referring you to them. That's mostly insignificant amounts of money; whenever it is not I have made my relationship plain. I also may own stock in companies mentioned here. If you have any question, please do feel free to contact me.

Specific links that take you to pages that allow you to purchase the item I reviewed are very likely to pay me a commission. Many of the books I review were given to me by the publishers specifically for the purpose of writing a review. These gifts and referral fees do not affect my opinions; I often give bad reviews anyway.

We use Google third-party advertising companies to serve ads when you visit our website. These companies may use information (not including your name, address, email address, or telephone number) about your visits to this and other websites in order to provide advertisements about goods and services of interest to you. If you would like more information about this practice and to know your choices about not having this information used by these companies, click here.


book graphic unix and linux troubleshooting guide

My Troubleshooting E-Book will show you how to solve tough problems on Linux and Unix systems!



 I sell and support
 Kerio Mail server




pavatar.jpg
More:
       - Disks/Filesystems
       - Code


Unix/Linux Consultants

Skills Tests

Guest Post Here











My Favorites

Change Congress