/*
Copyright (C) 2001-2006, William Joseph.
All Rights Reserved.

This file is part of GtkRadiant.

GtkRadiant 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.

GtkRadiant 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 GtkRadiant; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
*/

#if !defined(INCLUDED_ROTATION_H)
#define INCLUDED_ROTATION_H

#include "ientity.h"

#include "stream/stringstream.h"
#include "math/quaternion.h"
#include "generic/callback.h"
#include "stringio.h"

#include "angle.h"

typedef float Float9[9];

inline void default_rotation(Float9 rotation)
{
  rotation[0] = 1;
  rotation[1] = 0;
  rotation[2] = 0;
  rotation[3] = 0;
  rotation[4] = 1;
  rotation[5] = 0;
  rotation[6] = 0;
  rotation[7] = 0;
  rotation[8] = 1;
}
inline void write_rotation(const Float9 rotation, Entity* entity, const char* key = "rotation")
{
  if(rotation[0] == 1
    && rotation[1] == 0
    && rotation[2] == 0
    && rotation[3] == 0
    && rotation[4] == 1
    && rotation[5] == 0
    && rotation[6] == 0
    && rotation[7] == 0
    && rotation[8] == 1)
  {
    entity->setKeyValue(key, "");
  }
  else
  {
    StringOutputStream value(256);
    value << rotation[0] << ' '
      << rotation[1] << ' '
      << rotation[2] << ' '
      << rotation[3] << ' '
      << rotation[4] << ' '
      << rotation[5] << ' '
      << rotation[6] << ' '
      << rotation[7] << ' '
      << rotation[8];
    entity->setKeyValue(key, value.c_str());
  }
}
inline void read_rotation(Float9 rotation, const char* value)
{
  if(!string_parse_vector(value, rotation, rotation + 9))
  {
    default_rotation(rotation);
  }
}

inline Matrix4 rotation_toMatrix(const Float9 rotation)
{
  return Matrix4(
    rotation[0],
    rotation[1],
    rotation[2],
    0,
    rotation[3],
    rotation[4],
    rotation[5],
    0,
    rotation[6],
    rotation[7],
    rotation[8],
    0,
    0,
    0,
    0,
    1
  );
}

inline void rotation_fromMatrix(Float9 rotation, const Matrix4& matrix)
{
  rotation[0] = matrix.xx();
  rotation[1] = matrix.xy();
  rotation[2] = matrix.xz();
  rotation[3] = matrix.yx();
  rotation[4] = matrix.yy();
  rotation[5] = matrix.yz();
  rotation[6] = matrix.zx();
  rotation[7] = matrix.zy();
  rotation[8] = matrix.zz();
}

inline void rotation_assign(Float9 rotation, const Float9 other)
{
  rotation[0] = other[0];
  rotation[1] = other[1];
  rotation[2] = other[2];
  rotation[3] = other[3];
  rotation[4] = other[4];
  rotation[5] = other[5];
  rotation[6] = other[6];
  rotation[7] = other[7];
  rotation[8] = other[8];
}

inline void rotation_rotate(Float9 rotation, const Quaternion& rotate)
{
  rotation_fromMatrix(rotation,
    matrix4_multiplied_by_matrix4(
      rotation_toMatrix(rotation),
      matrix4_rotation_for_quaternion_quantised(rotate)
    )
  );
}

inline void read_angle(Float9 rotation, const char* value)
{
  float angle;
  if(!string_parse_float(value, angle))
  {
    default_rotation(rotation);
  }
  else
  {
    rotation_fromMatrix(rotation,  matrix4_rotation_for_z_degrees(angle));
  }
}

class RotationKey
{
  Callback m_rotationChanged;
public:
  Float9 m_rotation;


  RotationKey(const Callback& rotationChanged)
    : m_rotationChanged(rotationChanged)
  {
    default_rotation(m_rotation);
  }

  void angleChanged(const char* value)
  {
    read_angle(m_rotation, value);
    m_rotationChanged();
  }
  typedef MemberCaller1<RotationKey, const char*, &RotationKey::angleChanged> AngleChangedCaller;

  void rotationChanged(const char* value)
  {
    read_rotation(m_rotation, value);
    m_rotationChanged();
  }
  typedef MemberCaller1<RotationKey, const char*, &RotationKey::rotationChanged> RotationChangedCaller;

  void write(Entity* entity) const
  {
    Vector3 euler = matrix4_get_rotation_euler_xyz_degrees(rotation_toMatrix(m_rotation));
    if(euler[0] == 0 && euler[1] == 0)
    {
      entity->setKeyValue("rotation", "");
      write_angle(euler[2], entity);
    }
    else
    {
      entity->setKeyValue("angle", "");
      write_rotation(m_rotation, entity);
    }
  }
};

#endif