#version 120

// 頂点属性
attribute vec4 pv;  // ローカル座標系の頂点の位置
attribute vec4 nv;  // 頂点の法線ベクトル

// 変換行列
uniform mat4 mw;    // 視点座標系への変換行列
uniform mat4 mc;    // クリッピング座標系への変換行列
uniform mat4 mg;    // 法線ベクトルの変換行列

// 光源
uniform vec4 ldiff; // 拡散反射光成分
uniform vec4 lspec; // 鏡面反射光成分
uniform vec4 lamb;  // 環境光成分
uniform vec4 lpos;  // 位置

// 材質
uniform vec4 kdiff; // 拡散反射係数
uniform vec4 kspec; // 鏡面反射係数
uniform vec4 kamb;  // 環境光の反射係数
uniform float kshi; // 輝き係数

// 反射光強度
varying vec4 iamb;  // 環境光の反射光強度
varying vec4 idiff; // 拡散反射光強度
varying vec4 ispec; // 鏡面反射光強度

void main(void)
{
  vec4 p = mw * pv;
  vec3 n = normalize((mg * nv).xyz);
  vec3 l = normalize((p.w * lpos - lpos.w * p).xyz);
  vec3 h = normalize(l - normalize(p.xyz));

  iamb = kamb * lamb;
  idiff = max(dot(n, l), 0.0) * kdiff * ldiff;
  ispec = pow(max(dot(n, h), 0.0), kshi) * kspec * lspec;
  
  gl_Position = mc * pv;
}