/*
 * Mesa 3-D graphics library
 * Version:  4.0
 * Copyright (C) 1995-1998  Brian Paul
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Library General Public License for more details.
 *
 * You should have received a copy of the GNU Library General Public
 * License along with this library; if not, write to the Free
 * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

/*
 * DOS/DJGPP glut driver v1.0 for Mesa 4.0
 *
 *  Copyright (C) 2002 - Borca Daniel
 *  Email : dborca@yahoo.com
 *  Web   : http://www.geocities.com/dborca
 */


#include "GL/glut.h"
#include "internal.h"


void APIENTRY glutInit (int *argcp, char **argv)
{
 glutGet(GLUT_ELAPSED_TIME);
}


void APIENTRY glutInitDisplayMode (unsigned int mode)
{
 g_display_mode = mode;

/*  pc_install_keyb(); */
/*  g_mouse = pc_install_mouse(); */
}


void APIENTRY glutInitWindowPosition (int x, int y)
{
 g_xpos = x;
 g_ypos = y;
}


void APIENTRY glutInitWindowSize (int width, int height)
{
 g_width  = width;
 g_height = height;
}


void APIENTRY glutMainLoop (void)
{
 GLboolean idle;
 static int old_mouse_x = 0;
 static int old_mouse_y = 0;
 static int old_mouse_b = 0;

 glutPostRedisplay();
 if (reshape_func) reshape_func(g_width, g_height);
 if (visibility_func) visibility_func(GLUT_VISIBLE);
/*  if (g_mouse) pc_show_mouse(); */

 while (GL_TRUE) {
       idle = GL_TRUE;

       if (g_redisplay && display_func) {
          idle        = GL_FALSE;
          g_redisplay = GL_FALSE;

/*           if (g_mouse && !(g_display_mode & GLUT_DOUBLE)) pc_scare_mouse(); */
          display_func();
/*           if (g_mouse && !(g_display_mode & GLUT_DOUBLE)) pc_unscare_mouse(); */
       }

#if 0
       if (pc_keypressed()) {
          int key;

          idle = GL_FALSE;
          key  = pc_readkey();

          switch (key>>16) {
                 case KEY_F1:     if (special_func) special_func(GLUT_KEY_F1,        0, 0); break;
                 case KEY_F2:     if (special_func) special_func(GLUT_KEY_F2,        0, 0); break;
                 case KEY_F3:     if (special_func) special_func(GLUT_KEY_F3,        0, 0); break;
                 case KEY_F4:     if (special_func) special_func(GLUT_KEY_F4,        0, 0); break;
                 case KEY_F5:     if (special_func) special_func(GLUT_KEY_F5,        0, 0); break;
                 case KEY_F6:     if (special_func) special_func(GLUT_KEY_F6,        0, 0); break;
                 case KEY_F7:     if (special_func) special_func(GLUT_KEY_F7,        0, 0); break;
                 case KEY_F8:     if (special_func) special_func(GLUT_KEY_F8,        0, 0); break;
                 case KEY_F9:     if (special_func) special_func(GLUT_KEY_F9,        0, 0); break;
                 case KEY_F10:    if (special_func) special_func(GLUT_KEY_F10,       0, 0); break;
                 case KEY_F11:    if (special_func) special_func(GLUT_KEY_F11,       0, 0); break;
                 case KEY_F12:    if (special_func) special_func(GLUT_KEY_F12,       0, 0); break;
                 case KEY_LEFT:   if (special_func) special_func(GLUT_KEY_LEFT,      0, 0); break;
                 case KEY_UP:     if (special_func) special_func(GLUT_KEY_UP,        0, 0); break;
                 case KEY_RIGHT:  if (special_func) special_func(GLUT_KEY_RIGHT,     0, 0); break;
                 case KEY_DOWN:   if (special_func) special_func(GLUT_KEY_DOWN,      0, 0); break;
                 case KEY_PGUP:   if (special_func) special_func(GLUT_KEY_PAGE_UP,   0, 0); break;
                 case KEY_PGDN:   if (special_func) special_func(GLUT_KEY_PAGE_DOWN, 0, 0); break;
                 case KEY_HOME:   if (special_func) special_func(GLUT_KEY_HOME,      0, 0); break;
                 case KEY_END:    if (special_func) special_func(GLUT_KEY_END,       0, 0); break;
                 case KEY_INSERT: if (special_func) special_func(GLUT_KEY_INSERT,    0, 0); break;
                 default:         if (keyboard_func) keyboard_func(key & 0xFF, 0, 0);
          }
       }

       if (g_mouse) {
          int mouse_x;
          int mouse_y;
          int mouse_b;
       
          mouse_b = pc_query_mouse(&mouse_x, &mouse_y);
          
          if (motion_func && ((mouse_x != old_mouse_x) || (mouse_y != old_mouse_y))) {
             idle        = GL_FALSE;
             old_mouse_x = mouse_x;
             old_mouse_y = mouse_y;
   
             motion_func(old_mouse_x, old_mouse_y);
          }
   
          if (mouse_func && (mouse_b != old_mouse_b)) {
             int new_mouse_b = mouse_b;
   
             if ((old_mouse_b & 1) && !(new_mouse_b & 1))
                mouse_func(GLUT_LEFT_BUTTON, GLUT_UP,   mouse_x, mouse_y);
             else if (!(old_mouse_b & 1) && (new_mouse_b & 1))
                mouse_func(GLUT_LEFT_BUTTON, GLUT_DOWN, mouse_x, mouse_y);
   
             if ((old_mouse_b & 2) && !(new_mouse_b & 2))
                mouse_func(GLUT_RIGHT_BUTTON, GLUT_UP,   mouse_x, mouse_y);
             else if (!(old_mouse_b & 2) && (new_mouse_b & 2))
                mouse_func(GLUT_RIGHT_BUTTON, GLUT_DOWN, mouse_x, mouse_y);
   
             if ((old_mouse_b & 4) && !(new_mouse_b & 4))
                mouse_func(GLUT_MIDDLE_BUTTON, GLUT_UP,   mouse_x, mouse_y);
             else if (!(old_mouse_b & 3) && (new_mouse_b & 4))
                mouse_func(GLUT_MIDDLE_BUTTON, GLUT_DOWN, mouse_x, mouse_y);
   
             idle        = GL_FALSE;
             old_mouse_b = new_mouse_b;
          }
       }
#endif

       if (idle && idle_func)
          idle_func();
 }
}