shared_src/fsys_ffs.c

/*
 *  GRUB  --  GRand Unified Bootloader
 *  Copyright (C) 1996   Erich Boleyn  <erich@uruk.org>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

/*
 * Elements of this file were originally from the FreeBSD "biosboot"
 * bootloader file "disk.c" dated 4/12/95.
 *
 * The license and header comments from that file are included here.
 */

/*
 * Mach Operating System
 * Copyright (c) 1992, 1991 Carnegie Mellon University
 * All Rights Reserved.
 * 
 * Permission to use, copy, modify and distribute this software and its
 * documentation is hereby granted, provided that both the copyright
 * notice and this permission notice appear in all copies of the
 * software, derivative works or modified versions, and any portions
 * thereof, and that both notices appear in supporting documentation.
 * 
 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
 * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
 * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
 * 
 * Carnegie Mellon requests users of this software to return to
 * 
 *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
 *  School of Computer Science
 *  Carnegie Mellon University
 *  Pittsburgh PA 15213-3890
 * 
 * any improvements or extensions that they make and grant Carnegie Mellon
 * the rights to redistribute these changes.
 *
 *	from: Mach, Revision 2.2  92/04/04  11:35:49  rpd
 *	$Id$
 */



#include "shared.h"

#include "filesys.h"

#include "defs.h"
#include "disk_inode.h"
#include "disk_inode_ffs.h"
#include "dir.h"
#include "fs.h"

/* used for filesystem map blocks */
static int mapblock;

/* pointer to superblock */
#define SUPERBLOCK ((struct fs *) ( FSYS_BUF + 8192 ))
#define INODE ((struct icommon *) ( FSYS_BUF + 16384 ))
#define MAPBUF ( FSYS_BUF + 24576 )


int
ffs_mount(void)
{
  int retval = 1;

  if ( (((current_drive & 0x80) || (current_slice != 0))
	&& current_slice != (PC_SLICE_TYPE_BSD | (FS_BSDFFS<<8)))
       || part_length < (SBLOCK + (SBSIZE/DEV_BSIZE))
       || !devread(SBLOCK, 0, SBSIZE, (int) SUPERBLOCK)
       || SUPERBLOCK->fs_magic != FS_MAGIC )
    retval = 0;

  mapblock = -1;

  return retval;
}

int
block_map(int file_block)
{
  int bnum;

  if (file_block < NDADDR)
    return(INODE->i_db[file_block]);

  if ( (bnum = fsbtodb(SUPERBLOCK, INODE->i_ib[0])) != mapblock )
    {
      if (!devread(bnum, 0, SUPERBLOCK->fs_bsize, MAPBUF))
	{
	  mapblock = -1;
	  errnum = ERR_FSYS_CORRUPT;
	  return -1;
	}

      mapblock = bnum;
    }

  return (((int *)MAPBUF)[(file_block - NDADDR) % NINDIR(SUPERBLOCK)]);
}


int
ffs_read(int addr, int len)
{
  int logno, off, size, map, ret = 0;

  while (len && !errnum)
    {
      off = blkoff(SUPERBLOCK, filepos);
      logno = lblkno(SUPERBLOCK, filepos);
      size = blksize(SUPERBLOCK, INODE, logno);

      if ((map = block_map(logno)) < 0)
	break;

      size -= off;

      if (size > len)
	size = len;

#ifndef NO_FANCY_STUFF
      debug_fs_func = debug_fs;
#endif  /* NO_FANCY_STUFF */

      devread(fsbtodb(SUPERBLOCK, map), off, size, addr);

#ifndef NO_FANCY_STUFF
      debug_fs_func = NULL;
#endif  /* NO_FANCY_STUFF */

      addr += size;
      len -= size;
      filepos += size;
      ret += size;
    }

  if (errnum)
    ret = 0;

  return ret;
}


int
ffs_dir(char *dirname)
{
  char *rest, ch;
  int block, off, loc, map, ino = ROOTINO;
  struct direct *dp;

/* main loop to find destination inode */
loop:

  /* load current inode (defaults to the root inode) */

  if (!devread(fsbtodb(SUPERBLOCK,itod(SUPERBLOCK,ino)),
	       0, SUPERBLOCK->fs_bsize, FSYS_BUF))
    return 0;  /* XXX what return value? */

  bcopy((void *)&(((struct dinode *)FSYS_BUF)[ino % (SUPERBLOCK->fs_inopb)]),
	(void *)INODE, sizeof (struct dinode));

  /* if we have a real file (and we're not just printing possibilities),
     then this is where we want to exit */

  if (!*dirname || isspace(*dirname))
    {
      if ((INODE->i_mode & IFMT) != IFREG)
	{
	  errnum = ERR_BAD_FILETYPE;
	  return 0;
	}

      filemax = INODE->i_size;

      /* incomplete implementation requires this! */
      fsmax = (NDADDR + NINDIR(SUPERBLOCK)) * SUPERBLOCK->fs_bsize;
      return 1;
    }

  /* continue with file/directory name interpretation */

  while (*dirname == '/')
    dirname++;

  if (!(INODE->i_size) || ((INODE->i_mode & IFMT) != IFDIR))
    {
      errnum = ERR_BAD_FILETYPE;
      return 0;
    }

  for (rest = dirname; (ch = *rest) && !isspace(ch) && ch != '/'; rest++) ;

  *rest = 0;
  loc = 0;

  /* loop for reading a the entries in a directory */

  do
    {
      if (loc >= INODE->i_size)
	{
	  putchar('\n');

	  if (print_possibilities < 0)
	    return 1;

	  errnum = ERR_FILE_NOT_FOUND;
	  *rest = ch;
	  return 0;
	}

      if (!(off = blkoff(SUPERBLOCK, loc)))
	{
	  block = lblkno(SUPERBLOCK, loc);

	  if ( (map = block_map(block)) < 0
		|| !devread(fsbtodb(SUPERBLOCK, map), 0,
			    blksize(SUPERBLOCK, INODE, block), FSYS_BUF) )
	    {
	      errnum = ERR_FSYS_CORRUPT;
	      *rest = ch;
	      return 0;
	    }
	}

      dp = (struct direct *)(FSYS_BUF + off);
      loc += dp->d_reclen;

      if (dp->d_ino && print_possibilities && ch != '/'
	  && (!*dirname || strcmp(dirname, dp->d_name) <= 0))
	{
	  if (print_possibilities > 0)
	    print_possibilities = -print_possibilities;

	  printf("  %s", dp->d_name);
	}
    }
  while (!dp->d_ino || (strcmp(dirname, dp->d_name) != 0
			|| (print_possibilities && ch != '/')) );

  /* only get here if we have a matching directory entry */

  ino = dp->d_ino;
  *(dirname = rest) = ch;

  /* go back to main loop at top of function */
  goto loop;
}