/* Copyright (C) 2013 Computer Science Department of
 * Физико-математический лицей № 30.
 * Макет программы для вывода прямоугольной картинки */
#include <stdlib.h>
#include <glut.h>

/* Массив с цветами точек (три компоненты BGR) */
#define WIDTH 400 /* должна быть кратна 4 */
#define HEIGHT 400
unsigned char image[HEIGHT][WIDTH][3];

/* Масштаб */
double Scale = 1;

/* Размеры окна */
int WinWidth, WinHeight;

/* Функция рисования точки от мышинных координат */
void Put( int X, int Y, int R, int G, int B )
{
  Y = (WinHeight - 1 - Y) / Scale;
  X /= Scale;
  if (X >= 0 && Y >= 0 && X < WIDTH && Y < HEIGHT)
  {
    image[Y][X][0] = B;
    image[Y][X][1] = G;
    image[Y][X][2] = R;
  }
}

/* Функция реакции на событие изменение размера окна */
void Resize( int W, int H )
{
  WinWidth = W;
  WinHeight = H;
}

/* Функция реакции на событие перерисовка окна */
void Draw( void )
{
  /* Очищаем окно (rgba - 0..1) */
  glClearColor(0.3, 0.5, 0.7, 0);
  glClear(GL_COLOR_BUFFER_BIT);

  /* Рисуем массив в окно */
  /* можно для масштаба: glPixelZoom(sx, sy); */
  glPixelZoom(Scale, Scale);
  glDrawPixels(WIDTH, HEIGHT, GL_BGR_EXT, GL_UNSIGNED_BYTE, image);

  /* отсылаем на рисовку */
  glFinish();          /* окончание рисовательных команд */
  glutSwapBuffers();   /* копирование фонового буфера */
  glutPostRedisplay(); /* сигнал на перерисовку */
}

/* Функция реакции на событие от клавиатуры */
void Kbd( unsigned char Key, int X, int Y )
{
  if (Key == 27)
    exit(0);
  else if (Key == 'a')
    Put(X, Y, 255, 0, 0);
  else if (Key == '+')
    Scale += 0.1;
  else if (Key == '-')
    Scale -= 0.1;
}

/* Функция реакции на событие сдвинутой нажатой мыши */
void MouseMove( int X, int Y )
{
  Put(X, Y, 255, 255, 255);
}

/* Функция реакции на событие нажатия мыши */
void MouseButton( int Button, int State, int X, int Y )
{
  int i, j;

  /* ловим нажатие левой и правой кнопок */
  if (Button == GLUT_LEFT_BUTTON && State == GLUT_DOWN)
    Put(X, Y, 55, 155, 255);
  else if (Button == GLUT_RIGHT_BUTTON && State == GLUT_DOWN)
    for (i = -8; i <= 8; i++)
      for (j = -8; j <= 8; j++)
        Put(X + j, Y + i, 255, 255, 255);
}

void main( int argc, char *argv[] )
{
  int x, y, c;

  /* Инициализация */
  glutInit(&argc, argv);
  glutInitDisplayMode(GLUT_RGB | GLUT_DOUBLE);
  glutInitWindowPosition(0, 0);
  glutInitWindowSize(300, 300);
  glutCreateWindow("11-6 forever...");

  /* Подвес на события */
  glutDisplayFunc(Draw);       /* перерисовка */
  glutKeyboardFunc(Kbd);       /* клавиатура */
  glutReshapeFunc(Resize);     /* изменение размера */
  glutMotionFunc(MouseMove);   /* движение нажатой мыши */
  glutMouseFunc(MouseButton);  /* нажатие мыши */

  /* Рисуем, что хотим */
  for (y = 0; y < HEIGHT; y++)
    for (x = 0; x < WIDTH; x++)
      for (c = 0; c < 3; c++)
        image[y][x][c] = 0; /* rand() % 256; */

  /* запуск цикла работы */
  glutMainLoop();
}