/*
   * Copyright (c) 2000-2001 Christoph Hellwig.

   * Copyright (c) 2016 Krzysztof Blaszkowski

   * All rights reserved.
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   * 1. Redistributions of source code must retain the above copyright
   *    notice, this list of conditions, and the following disclaimer,
   *    without modification.
   * 2. The name of the author may not be used to endorse or promote products
   *    derived from this software without specific prior written permission.
   *
   * Alternatively, this software may be distributed under the terms of the
   * GNU General Public License ("GPL").
   *
   * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
   * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
   * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   * SUCH DAMAGE.
   */
  
  /*
   * Veritas filesystem driver - fileset header routines.
   */
  #include <linux/fs.h>
  #include <linux/buffer_head.h>
  #include <linux/kernel.h>
  #include <linux/slab.h>
  #include <linux/string.h>
  
  #include "vxfs.h"
  #include "vxfs_inode.h"
  #include "vxfs_extern.h"
  #include "vxfs_fshead.h"
  
  
  #ifdef DIAGNOSTIC
  static void
  vxfs_dumpfsh(struct vxfs_fsh *fhp)
  {
  	printk("
  
  dumping fileset header:
  ");
  	printk("----------------------------
  ");
  	printk("version: %u
  ", fhp->fsh_version);
  	printk("fsindex: %u
  ", fhp->fsh_fsindex);
  	printk("iauino: %u\tninodes:%u
  ",
  			fhp->fsh_iauino, fhp->fsh_ninodes);
  	printk("maxinode: %u\tlctino: %u
  ",
  			fhp->fsh_maxinode, fhp->fsh_lctino);
  	printk("nau: %u
  ", fhp->fsh_nau);
  	printk("ilistino[0]: %u\tilistino[1]: %u
  ",
  			fhp->fsh_ilistino[0], fhp->fsh_ilistino[1]);
  }
  #endif
  
  /**
   * vxfs_getfsh - read fileset header into memory
   * @ip:		the (fake) fileset header inode
   * @which:	0 for the structural, 1 for the primary fsh.
   *
   * Description:
   *   vxfs_getfsh reads either the structural or primary fileset header
   *   described by @ip into memory.
   *
   * Returns:
   *   The fileset header structure on success, else Zero.
   */
  static struct vxfs_fsh *
  vxfs_getfsh(struct inode *ip, int which)
  {
  	struct buffer_head		*bp;
  
  	bp = vxfs_bread(ip, which);

  	if (bp) {

  		struct vxfs_fsh		*fhp;

  		if (!(fhp = kmalloc(sizeof(*fhp), GFP_KERNEL)))
  			goto out;

  		memcpy(fhp, bp->b_data, sizeof(*fhp));

  		put_bh(bp);

  		return (fhp);
  	}

  out:
  	brelse(bp);

  	return NULL;
  }
  
  /**
   * vxfs_read_fshead - read the fileset headers
   * @sbp:	superblock to which the fileset belongs
   *
   * Description:
   *   vxfs_read_fshead will fill the inode and structural inode list in @sb.
   *
   * Returns:
   *   Zero on success, else a negative error code (-EINVAL).
   */
  int
  vxfs_read_fshead(struct super_block *sbp)
  {
  	struct vxfs_sb_info		*infp = VXFS_SBI(sbp);
  	struct vxfs_fsh			*pfp, *sfp;

  	struct vxfs_inode_info		*vip;

  	infp->vsi_fship = vxfs_blkiget(sbp, infp->vsi_iext, infp->vsi_fshino);
  	if (!infp->vsi_fship) {

  		printk(KERN_ERR "vxfs: unable to read fsh inode
  ");

  		return -EINVAL;
  	}

  
  	vip = VXFS_INO(infp->vsi_fship);

  	if (!VXFS_ISFSH(vip)) {
  		printk(KERN_ERR "vxfs: fsh list inode is of wrong type (%x)
  ",
  				vip->vii_mode & VXFS_TYPE_MASK); 

  		goto out_iput_fship;

  	}

  #ifdef DIAGNOSTIC
  	printk("vxfs: fsh inode dump:
  ");
  	vxfs_dumpi(vip, infp->vsi_fshino);
  #endif

  	sfp = vxfs_getfsh(infp->vsi_fship, 0);
  	if (!sfp) {

  		printk(KERN_ERR "vxfs: unable to get structural fsh
  ");

  		goto out_iput_fship;
  	} 
  
  #ifdef DIAGNOSTIC
  	vxfs_dumpfsh(sfp);
  #endif
  
  	pfp = vxfs_getfsh(infp->vsi_fship, 1);
  	if (!pfp) {

  		printk(KERN_ERR "vxfs: unable to get primary fsh
  ");

  		goto out_free_sfp;
  	}
  
  #ifdef DIAGNOSTIC
  	vxfs_dumpfsh(pfp);
  #endif

  	infp->vsi_stilist = vxfs_blkiget(sbp, infp->vsi_iext,

  			fs32_to_cpu(infp, sfp->fsh_ilistino[0]));

  	if (!infp->vsi_stilist) {

  		printk(KERN_ERR "vxfs: unable to get structural list inode
  ");

  		goto out_free_pfp;
  	}
  	if (!VXFS_ISILT(VXFS_INO(infp->vsi_stilist))) {

  		printk(KERN_ERR "vxfs: structural list inode is of wrong type (%x)
  ",

  				VXFS_INO(infp->vsi_stilist)->vii_mode & VXFS_TYPE_MASK); 
  		goto out_iput_stilist;
  	}

  	infp->vsi_ilist = vxfs_stiget(sbp, fs32_to_cpu(infp, pfp->fsh_ilistino[0]));

  	if (!infp->vsi_ilist) {

  		printk(KERN_ERR "vxfs: unable to get inode list inode
  ");

  		goto out_iput_stilist;
  	}
  	if (!VXFS_ISILT(VXFS_INO(infp->vsi_ilist))) {
  		printk(KERN_ERR "vxfs: inode list inode is of wrong type (%x)
  ",
  				VXFS_INO(infp->vsi_ilist)->vii_mode & VXFS_TYPE_MASK);
  		goto out_iput_ilist;
  	}

  	kfree(pfp);
  	kfree(sfp);

  	return 0;
  
   out_iput_ilist:
   	iput(infp->vsi_ilist);
   out_iput_stilist:
   	iput(infp->vsi_stilist);
   out_free_pfp:
  	kfree(pfp);
   out_free_sfp:
   	kfree(sfp);
   out_iput_fship:
  	iput(infp->vsi_fship);
  	return -EINVAL;

  }