/*
*   ２Ｄ描画
*/

#include <GL/glut.h>

GLuint texName[1];

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

  /* デプスバッファをオフ */
  glDisable(GL_DEPTH_TEST)

  /* カリングで裏を描画しない */
  glEnable(GL_CULL_FACE);
  glCullFace(GL_BACK);

  /* 透明色を有効に */
  glEnable(GL_BLEND);

  /* 新しい色は GL_SRC_ALPHA で、元の色は GL_ONE_MINUS_SRC_ALPHA で */
  glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

  /* 光源の設定 */
  glDisable(GL_LIGHTING);
}

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

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

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

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

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

/* テクスチャ設定 */
void initTexture(void)
{
  int i, j;

  /* テクスチャデータ image0 */
  GLubyte image0[64][64][4];

  for(j = 0; j < 64; j++){
    for(i = 0; i < 64; i++){
      if(((j == 0 || j == 39) && i < 40) || (i == 0 && j < 40)){
        image0[j][i][0] = 255;
        image0[j][i][1] = 0;
        image0[j][i][2] = 0;
        image0[j][i][3] = 255;
      }
      else if(i == 39 && j < 40){
        image0[j][i][0] = 0;
        image0[j][i][1] = 255;
        image0[j][i][2] = 0;
        image0[j][i][3] = 255;
      }
      else{
        image0[j][i][0] = 0;
        image0[j][i][1] = 0;
        image0[j][i][2] = 0;
        image0[j][i][3] = 0;
      }
    }
  }

  glGenTextures(1 , texName);

  glBindTexture(GL_TEXTURE_2D , texName[0]);

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

  /* 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 square(int x, int y){
  glEnable(GL_TEXTURE_2D);

  glBindTexture(GL_TEXTURE_2D , texName[0]);

  glPushMatrix();

  glTranslated((double)x, -(double)y, 0.0);

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

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

  glEnd();

  glPopMatrix();

  glDisable(GL_TEXTURE_2D);
}

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

  glLoadIdentity();

  glTranslated(-200.0, 150.0, -1.0);

  square(0, 0);

  square(30, 20);

  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;
}