/*
  OpenMW - The completely unofficial reimplementation of Morrowind
  Copyright (C) 2008-2010  Nicolay Korslund
  Email: < korslund@gmail.com >
  WWW: http://openmw.sourceforge.net/

  This file (nif_file.h) is part of the OpenMW package.

  OpenMW is distributed as free software: you can redistribute it
  and/or modify it under the terms of the GNU General Public License
  version 3, as published by the Free Software Foundation.

  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
  version 3 along with this program. If not, see
  http://www.gnu.org/licenses/ .

 */

#ifndef _NIF_FILE_H_
#define _NIF_FILE_H_

#include <libs/mangle/stream/stream.hpp>
#include <libs/mangle/stream/filters/buffer_stream.hpp>
#include <components/misc/slice_array.hpp>

#include <stdexcept>
#include <vector>
#include <string>
#include <assert.h>

#include "record.hpp"
#include "nif_types.hpp"

using namespace Mangle::Stream;

namespace Nif
{

class NIFFile
{
  enum NIFVersion
    {
      VER_MW    = 0x04000002    // Morrowind NIFs
    };

  /// Nif file version
  int ver;

  /// Input stream
  StreamPtr inp;

  /// File name, used for error messages
  std::string filename;

  /// Record list
  std::vector<Record*> records;

  /// Parse the file
  void parse();

 public:
  /// Used for error handling
  void fail(const std::string &msg)
    {
      std::string err = "NIFFile Error: " + msg;
      err += "\nFile: " + filename;
      throw std::runtime_error(err);
    }

  /// Open a NIF stream. The name is used for error messages.
  NIFFile(StreamPtr nif, const std::string &name)
    : filename(name)
    {
      /* Load the entire file into memory. This allows us to use
         direct pointers to the data arrays in the NIF, instead of
         individually allocating and copying each one.

         The NIF data is only stored temporarily in memory, since once
         the mesh data is loaded it is siphoned into OGRE and
         deleted. For that reason, we might improve this further and
         use a shared region/pool based allocation scheme in the
         future, especially since only one NIFFile will ever be loaded
         at any given time.
      */
      inp = StreamPtr(new BufferStream(nif));

      parse();
    }

  ~NIFFile()
    {
      for(std::size_t i=0; i<records.size(); i++)
        {
          delete records[i];
        }
    }

  /// Get a given record
  Record *getRecord(int index)
  {
    assert(index >= 0 && index < static_cast<int> (records.size()));
    Record *res = records[index];
    assert(res != NULL);
    return res;
  }

  /// Number of records
  int numRecords() { return records.size(); }

  /* ************************************************

               Parser functions

  ****************************************************/

  void skip(size_t size) { inp->getPtr(size); }

  template<class X> const X* getPtr() { return (const X*)inp->getPtr(sizeof(X)); }
  template<class X> X getType() { return *getPtr<X>(); }
  unsigned short getShort() { return getType<unsigned short>(); }
  int getInt() { return getType<int>(); }
  float getFloat() { return getType<float>(); }
  char getByte() { return getType<char>(); }

  template<class X>
  SliceArray<X> getArrayLen(int num)
    { return SliceArray<X>((const X*)inp->getPtr(num*sizeof(X)),num); }

  template<class X>
  SliceArray<X> getArray()
    {
      int len = getInt();
      return getArrayLen<X>(len);
    }

  SString getString() { return getArray<char>(); }

  const Vector *getVector() { return getPtr<Vector>(); }
  const Matrix *getMatrix() { return getPtr<Matrix>(); }
  const Transformation *getTrafo() { return getPtr<Transformation>(); }
  const Vector4 *getVector4() { return getPtr<Vector4>(); }

  FloatArray getFloatLen(int num)
    { return getArrayLen<float>(num); }

  // For fixed-size strings where you already know the size
  const char *getString(int size)
    { return (const char*)inp->getPtr(size); }
};

} // Namespace
#endif