--- deliantra/Deliantra-Client/Client.xs	2007/07/14 12:05:52	1.195
+++ deliantra/Deliantra-Client/Client.xs	2007/07/17 13:53:02	1.199
@@ -665,13 +665,17 @@
 char *
 SDL_GetKeyName (int sym)
 
+int
+SDL_GetAppState ()
+
 void
-SDL_PollEvent ()
+poll_events ()
 	PPCODE:
 {
 	SDL_Event ev;
 
-        while (SDL_PollEvent (&ev))
+        SDL_PumpEvents ();
+        while (SDL_PeepEvents (&ev, 1, SDL_GETEVENT, SDL_ALLEVENTS) > 0)
           {
             HV *hv = newHV ();
             hv_store (hv, "type", 4, newSViv (ev.type), 0);
@@ -693,13 +697,31 @@
                   break;
 
                 case SDL_MOUSEMOTION:
-                  hv_store (hv, "mod",    3, newSViv (SDL_GetModState ()), 0);
+                  {
+                    int state = ev.motion.state;
+                    int x     = ev.motion.x;
+                    int y     = ev.motion.y;
+                    int xrel  = ev.motion.xrel;
+                    int yrel  = ev.motion.yrel;
+
+                    /* do simplistic event compression */
+                    while (SDL_PeepEvents (&ev, 1, SDL_PEEKEVENT, SDL_EVENTMASK (SDL_MOUSEMOTION)) > 0
+                           && state == ev.motion.state)
+                      {
+                        xrel += ev.motion.xrel;
+                        yrel += ev.motion.yrel;
+                        x     = ev.motion.x;
+                        y     = ev.motion.y;
+                        SDL_PeepEvents (&ev, 1, SDL_GETEVENT, SDL_EVENTMASK (SDL_MOUSEMOTION));
+                      }
 
-                  hv_store (hv, "state",  5, newSViv (ev.motion.state), 0);
-                  hv_store (hv, "x",      1, newSViv (ev.motion.x), 0);
-                  hv_store (hv, "y",      1, newSViv (ev.motion.y), 0);
-                  hv_store (hv, "xrel",   4, newSViv (ev.motion.xrel), 0);
-                  hv_store (hv, "yrel",   4, newSViv (ev.motion.yrel), 0);
+                    hv_store (hv, "mod",    3, newSViv (SDL_GetModState ()), 0);
+                    hv_store (hv, "state",  5, newSViv (state), 0);
+                    hv_store (hv, "x",      1, newSViv (x), 0);
+                    hv_store (hv, "y",      1, newSViv (y), 0);
+                    hv_store (hv, "xrel",   4, newSViv (xrel), 0);
+                    hv_store (hv, "yrel",   4, newSViv (yrel), 0);
+                  }
                   break;
 
                 case SDL_MOUSEBUTTONDOWN:
@@ -1222,6 +1244,8 @@
 
 MODULE = CFPlus	PACKAGE = CFPlus::Texture
 
+int minpot (int n)
+
 void
 pad2pot (SV *data_, SV *w_, SV *h_)
 	CODE:
@@ -1308,6 +1332,17 @@
           }
 }
 
+IV texture_valid_2d (GLint internalformat, GLsizei w, GLsizei h, GLenum format, GLenum type)
+	CODE:
+{
+        GLint width;
+        glTexImage2D (GL_PROXY_TEXTURE_2D, 0, internalformat, w, h, 0, format, type, 0);
+        glGetTexLevelParameteriv (GL_PROXY_TEXTURE_2D, 0, GL_TEXTURE_WIDTH, &width);
+        RETVAL = width > 0;
+}
+	OUTPUT:
+        RETVAL
+
 MODULE = CFPlus	PACKAGE = CFPlus::Map
 
 CFPlus::Map
@@ -2185,6 +2220,9 @@
     IV iv;
   } *civ, const_iv[] = {
 #	define const_iv(name) { # name, (IV)name }
+        const_iv (GL_VENDOR),
+        const_iv (GL_VERSION),
+        const_iv (GL_EXTENSIONS),
 	const_iv (GL_COLOR_MATERIAL),
 	const_iv (GL_SMOOTH),
 	const_iv (GL_FLAT),
@@ -2221,6 +2259,8 @@
 	const_iv (GL_FLOAT),
 	const_iv (GL_UNSIGNED_INT_8_8_8_8_REV),
 	const_iv (GL_COMPILE),
+	const_iv (GL_PROXY_TEXTURE_1D),
+	const_iv (GL_PROXY_TEXTURE_2D),
 	const_iv (GL_TEXTURE_1D),
 	const_iv (GL_TEXTURE_2D),
 	const_iv (GL_TEXTURE_ENV),
@@ -2296,6 +2336,20 @@
 	OUTPUT:
         RETVAL
 
+char *glGetString (GLenum pname)
+
+GLint glGetInteger (GLenum pname)
+	CODE:
+        glGetIntegerv (pname, &RETVAL);
+	OUTPUT:
+        RETVAL
+
+GLdouble glGetDouble (GLenum pname)
+	CODE:
+        glGetDoublev (pname, &RETVAL);
+	OUTPUT:
+        RETVAL
+
 int glGetError ()
 
 void glFinish ()
@@ -2427,6 +2481,8 @@
 
 void glDrawPixels (int width, int height, int format, int type, char *pixels)
 
+void glPixelZoom (float x, float y)
+
 void glCopyPixels (int x, int y, int width, int height, int type = GL_COLOR)
 
 int glGenTexture ()