/*---------------------------------------------------------------------------*
  Project:  NintendoWare
  File:     math_Matrix44.ipp

  Copyright (C)2009-2010 Nintendo Co., Ltd./HAL Laboratory, Inc.  All rights reserved.

  These coded instructions, statements, and computer programs contain
  proprietary information of Nintendo of America Inc. and/or Nintendo
  Company Ltd., and are protected by Federal copyright law.  They may
  not be disclosed to third parties or copied or duplicated in any form,
  in whole or in part, without the prior written consent of Nintendo.

  $Revision: 28766 $
 *---------------------------------------------------------------------------*/

#include <cmath>
#include <nw/math/math_Vector3.h>

namespace nw { 
namespace math {
using namespace nn::math;

/*!---------------------------------------------------------------------------*
  @brief        Maya 用のテクスチャ座標変換行列を作成します。
  
  @details 以下のような変換行列を作成します。
  
  [S] [T] [t(0.5,0.5)] [R] [t(-0.5,-0.5)]
  
  [S] = \n
  | scaleS      0 0 0 |\n
  |      0 scaleT 0 0 |\n
  |      0      0 1 0 |\n
  |      0      0 0 1 |\n
  \n
  [T] = t( -translateS , -translateT )\n
  \n
  [R] =\n
  | rotateCos -rotateSin 0 0 |\n
  | rotateSin  rotateCos 0 0 |\n
  |         0          0 1 0 |\n
  |         0          0 0 1 |
  
  @param[out]   pOut  計算結果を受け取るバッファへのポインタ。
  @param[in]    scaleS S 軸のスケール値です。
  @param[in]    scaleT T 軸のスケール値です。
  @param[in]    rotate 回転値です。
  @param[in]    translateS S 軸の移動値です。
  @param[in]    translateT T 軸の移動値です。
  
  @return       pOut を返します。
 *---------------------------------------------------------------------------*/
NW_MATH_INLINE MTX44*
MTX44TextureMatrixForMaya(MTX44* pOut,
    float scaleS, float scaleT,
    float rotate,
    float translateS, float translateT)
{
    NW_NULL_ASSERT(pOut);

    float rotateSin;
    float rotateCos;
    SinCosFIdx(&rotateSin, &rotateCos, NN_MATH_RAD_TO_FIDX(rotate));

    pOut->m[0][0] =  scaleS * rotateCos;
    pOut->m[0][1] = -scaleS * rotateSin;
    pOut->m[0][3] =  scaleS * ( 0.5f * rotateSin - 0.5f * rotateCos + 0.5f - translateS);

    pOut->m[1][0] = scaleT * rotateSin;
    pOut->m[1][1] = scaleT * rotateCos;
    pOut->m[1][3] = scaleT * (-0.5f * rotateSin - 0.5f * rotateCos + 0.5f - translateT);

    pOut->m[0][2] = pOut->m[1][2] =
    pOut->m[2][0] = pOut->m[2][1] = pOut->m[2][3] =
    pOut->m[3][0] = pOut->m[3][1] = pOut->m[3][2] = 0.0f;
    pOut->m[2][2] = pOut->m[3][3] = 1.0f;

    return pOut;
}

/*!---------------------------------------------------------------------------*
  @brief        Softimage 用のテクスチャ座標変換行列を作成します。
  
  @details 以下のような変換行列を作成します。
  
  [S] [R] [T]
  
  [S] = \n
  | scaleS      0 0 0 |\n
  |      0 scaleT 0 0 |\n
  |      0      0 1 0 |\n
  |      0      0 0 1 |\n
  \n
  [R] = \n
  |  rotateCos rotateSin 0 0 |\n
  | -rotateSin rotateCos 0 0 |\n
  |          0         0 1 0 |\n
  |          0         0 0 1 |\n
  \n
  [T] = t( -translateS , -translateT) \n
  \n
  [R] の回転方向は Maya および Max とは逆方向が正になっています。

  
  @param[out]   pOut  計算結果を受け取るバッファへのポインタ。
  @param[in]    scaleS S 軸のスケール値です。
  @param[in]    scaleT T 軸のスケール値です。
  @param[in]    rotate 回転値です。
  @param[in]    translateS S 軸の移動値です。
  @param[in]    translateT T 軸の移動値です。
  
  @return       pOut を返します。
 *---------------------------------------------------------------------------*/
NW_MATH_INLINE MTX44*
MTX44TextureMatrixForSoftimage(MTX44* pOut,
    float scaleS, float scaleT,
    float rotate,
    float translateS, float translateT)
{
    NW_NULL_ASSERT(pOut);

    float rotateSin;
    float rotateCos;
    SinCosFIdx(&rotateSin, &rotateCos, NN_MATH_RAD_TO_FIDX(rotate));

    pOut->m[0][0] = scaleS * rotateCos;
    pOut->m[0][1] = scaleS * rotateSin;
    pOut->m[0][3] = scaleS * (-rotateCos * translateS - rotateSin * translateT);

    pOut->m[1][0] = -scaleT * rotateSin;
    pOut->m[1][1] =  scaleT * rotateCos;
    pOut->m[1][3] =  scaleT * ( rotateSin * translateS - rotateCos * translateT);

    pOut->m[0][2] = pOut->m[1][2] =
    pOut->m[2][0] = pOut->m[2][1] = pOut->m[2][3] =
    pOut->m[3][0] = pOut->m[3][1] = pOut->m[3][2] = 0.0f;
    pOut->m[2][2] = pOut->m[3][3] = 1.0f;

    return pOut;
}

/*!---------------------------------------------------------------------------*
  @brief        3ds Max 用のテクスチャ座標変換行列を作成します。
  
  @details 以下のような変換行列を作成します。
  
  [t(0.5,0.5)] [S] [R] [t(-0.5,-0.5)] [T]
  
  [S] = \n
  | scaleS      0 0 0 |\n
  |      0 scaleT 0 0 |\n
  |      0      0 1 0 |\n
  |      0      0 0 1 |\n
  \n
  [R] = \n
  | rotateCos -rotateSin 0 0 |\n
  | rotateSin  rotateCos 0 0 |\n
  |         0          0 1 0 |\n
  |         0          0 0 1 |\n
  \n
  [T] = t( -translateS , translateT )

  @param[out]   pOut  計算結果を受け取るバッファへのポインタ。
  @param[in]    scaleS S 軸のスケール値です。
  @param[in]    scaleT T 軸のスケール値です。
  @param[in]    rotate 回転値です。
  @param[in]    translateS S 軸の移動値です。
  @param[in]    translateT T 軸の移動値です。

  @return       pOut を返します。
 *---------------------------------------------------------------------------*/
NW_MATH_INLINE MTX44*
MTX44TextureMatrixForMax(MTX44* pOut,
    float scaleS, float scaleT,
    float rotate,
    float translateS, float translateT)
{
    NW_NULL_ASSERT(pOut);

    float rotateSin;
    float rotateCos;
    SinCosFIdx(&rotateSin, &rotateCos, NN_MATH_RAD_TO_FIDX(rotate));

    float scaleSSin = scaleS * rotateSin;
    float scaleSCos = scaleS * rotateCos;
    float scaleTSin = scaleT * rotateSin;
    float scaleTCos = scaleT * rotateCos;
    float ts = -translateS - 0.5f;
    float tt =  translateT - 0.5f;

    pOut->m[0][0] =  scaleSCos;
    pOut->m[0][1] = -scaleSSin;
    pOut->m[0][3] =  (scaleSCos * ts) - (scaleSSin * tt) + 0.5f;

    pOut->m[1][0] =  scaleTSin;
    pOut->m[1][1] =  scaleTCos;
    pOut->m[1][3] =  (scaleTSin * ts) + (scaleTCos * tt) + 0.5f;

    pOut->m[0][2] = pOut->m[1][2] =
    pOut->m[2][0] = pOut->m[2][1] = pOut->m[2][3] =
    pOut->m[3][0] = pOut->m[3][1] = pOut->m[3][2] = 0.0f;
    pOut->m[2][2] = pOut->m[3][3] = 1.0f;

    return pOut;
}


}  // namespace math
}  // namespace nw