/*
*   テクスチャ
*/

#include <GL/glut.h>

GLuint texName[2];

/* 初期化 */
void init(void)
{
  GLfloat lightAmb[] = {0.0, 0.0, 0.0, 1.0};
  GLfloat lightPos[] = {0.0, 0.0, -1.0, 1.0};
  GLfloat lightDif[] = {1.0, 1.0, 1.0, 1.0};

  /* 背景色の指定 R 赤 G 緑 B 青 A 透明度 の順 */
  glClearColor(0.0, 0.0, 0.0, 0.0);

  /* 光源の設定 */
  glLightfv(GL_LIGHT0, GL_AMBIENT, lightAmb);
  glLightfv(GL_LIGHT0, GL_POSITION, lightPos);
  glLightfv(GL_LIGHT0, GL_DIFFUSE, lightDif);
  glLightf(GL_LIGHT0, GL_CONSTANT_ATTENUATION, 0.0);
  glLightf(GL_LIGHT0, GL_LINEAR_ATTENUATION, 0.2);
  glEnable(GL_LIGHTING);
  glEnable(GL_LIGHT0);
}

void resize(int w, int h)
{
  /* ビューポートの設定 */
  glViewport(0, 0, w, h);

  /* 射影変換モードに */
  glMatrixMode(GL_PROJECTION);

  /* 変換行列を単位行列に */
  glLoadIdentity();

  /* 正射影の視野長方形 左、右、下、上、手前、奥 */
  glFrustum(-1.33, 1.33, -1.0, 1.0, 1.0, 5.0);

  /* モデル変換モードに戻す */
  glMatrixMode(GL_MODELVIEW);
}




/* テクスチャ設定 */
void initTexture(void)
{
  /* テクスチャデータ image0-2 */
  GLubyte image0[4][4][4] = {
    255, 255, 255, 255, 255, 255, 255, 255,   255,   0,   0, 255, 255,   0,   0, 255,
    255, 255, 255, 255, 255, 255, 255, 255,   255,   0,   0, 255, 255,   0,   0, 255,
    255,   0,   0, 255, 255,   0,   0, 255,   255, 255, 255, 255, 255, 255, 255, 255,
    255,   0,   0, 255, 255,   0,   0, 255,   255, 255, 255, 255, 255, 255, 255, 255
  };

  GLubyte image1[2][2][4] = {
    255, 255, 255, 255,   0,   0, 255, 255,
      0,   0, 255, 255, 255, 255, 255, 255
  };

  GLubyte image2[1][1][4] ={
      0, 255,   0, 255 
  };

  /* テクスチャデータ image3 */
  GLubyte image3[4][4][3]={
    255,   0,   0, 255,   0,   0, 255, 255, 255, 255, 255, 255,
    255,   0,   0, 255,   0,   0, 255, 255, 255, 255, 255, 255,
    255, 255, 255, 255, 255, 255,   0,   0, 255,   0,   0, 255, 
    255, 255, 255, 255, 255, 255,   0,   0, 255,   0,   0, 255
  };

  glGenTextures(2 , texName);
  glBindTexture(GL_TEXTURE_2D , texName[0]);

  /* ３段階のミップマップ */
  glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, 4, 4, 0, GL_RGBA, GL_UNSIGNED_BYTE, image0);
  glTexImage2D(GL_TEXTURE_2D, 1, GL_RGBA, 2, 2, 0, GL_RGBA, GL_UNSIGNED_BYTE, image1);
  glTexImage2D(GL_TEXTURE_2D, 2, GL_RGBA, 1, 1, 0, GL_RGBA, GL_UNSIGNED_BYTE, image2);

  /* S方向に繰り返すGL_REPEAT 打ち切る GL_CLAMP */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
  /* T方向に繰り返すGL_REPEAT 打ち切る GL_CLAMP */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);

  /* 画像縮小時に画像は近い色を選択 ミップマップはリニアに変化させる */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST_MIPMAP_LINEAR);
  /* 画像拡大時に画像は近い色を選択 */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);

  /* 元の面の色への対応 反映 GL_MODULATE 無視 GL_DECAL */
  glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);

  glBindTexture(GL_TEXTURE_2D , texName[1]);

  /* テクスチャの設定 */
  glTexImage2D(
    GL_TEXTURE_2D
    ,0                 /* ミップマップ */
    ,3                 /* RGBなので3 */
    ,4                 /* 幅 */
    ,4                 /* 高さ */
    ,0                 /* 境界線の幅 */
    ,GL_RGB            /* RGB形式 */
    ,GL_UNSIGNED_BYTE  /* 符号無しバイトデータ */
    ,image3);           /* イメージへのポインタ */

  /* S方向に繰り返すGL_REPEAT 打ち切る GL_CLAMP */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
  /* T方向に繰り返すGL_REPEAT 打ち切る GL_CLAMP */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);

  /* 画像縮小時に画像は近い色を選択 */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
  /* 画像拡大時に画像は近い色を選択 */
  glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);

  /* 元の面の色への対応 反映 GL_MODULATE 無視 GL_DECAL */
  glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
}

void deinitTexture(void)
{
  /* テクスチャの解放 */
  glDeleteTextures(2, texName);
}

/* 画面表示 */
void display(void)
{
  /* 背景色でクリア */
  glClear(GL_COLOR_BUFFER_BIT);

  glLoadIdentity();

  glTranslated(0.0, 0.0, -3.0);

  glPushMatrix();

  glEnable(GL_TEXTURE_2D);

  glBindTexture(GL_TEXTURE_2D , texName[0]);

  /* 市松模様の床 */
  glBegin(GL_QUADS);

  glNormal3d(0.0, 1.0, 0.0);
  glTexCoord2f(0.0, 0.0);
  glVertex3d(-1.33, -1.0, -2.0);
  glTexCoord2f(0.0, 16.0);
  glVertex3d(-1.33, -1.0, 2.0);
  glTexCoord2f(8.0, 16.0);
  glVertex3d(1.33, -1.0, 2.0);
  glTexCoord2f(8.0, 0.0);
  glVertex3d(1.33, -1.0, -2.0);

  glEnd();

  glBindTexture(GL_TEXTURE_2D , texName[1]);

  /* 赤と青の板 */
  glBegin(GL_QUADS);

  glNormal3d(0.0, 0.0, 1.0);
  glTexCoord2f(0.0, 0.0);
  glVertex3d(-0.5, 0.5, 0.0);
  glTexCoord2f(0.0, 1.0);
  glVertex3d(-0.5, -0.5, 0.0);
  glTexCoord2f(1.0, 1.0);
  glVertex3d(0.5, -0.5, 0.0);
  glTexCoord2f(1.0, 0.0);
  glVertex3d(0.5, 0.5, 0.0);

  glEnd();

  glDisable(GL_TEXTURE_2D);

  glPopMatrix();

  glFlush();
}

int main(int argc, char *argv[])
{
  glutInit(&argc, argv);
  glutInitWindowPosition(100, 50);
  glutInitWindowSize(400, 300);
  glutInitDisplayMode(GLUT_RGBA);
  glutCreateWindow(argv[0]);

  /* 各関数の指定 */
  glutDisplayFunc(display);
  glutReshapeFunc(resize);

  /* 初期化 */
  init();

  /* テクスチャ準備 */
  initTexture();

  /* メインループ  */
  glutMainLoop();

  /* テクスチャ後片付け */
  deinitTexture();

  return 0;
}