ftp.nice.ch/pub/next/developer/resources/libraries/Mesa.2.0.s.tar.gz#/Mesa-2.0/demos/winpos.c

This is winpos.c in view mode; [Download] [Up]

/* winpos.c */

/*
 * Example of how to use the GL_MESA_window_pos extension.
 *
 * Brian Paul
 */


#include <math.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include "gltk.h"


#ifndef M_PI
#  define M_PI 3.14159265
#endif


static TK_RGBImageRec *image;



static void draw( void )
{
   GLfloat angle;
   char *extensions;

   extensions = (char *) glGetString( GL_EXTENSIONS );
   if (strstr( extensions, "GL_MESA_window_pos")==NULL) {
      printf("Sorry, GL_MESA_window_pos extension not available.\n");
      return;
   }

   glClear( GL_COLOR_BUFFER_BIT );

   for (angle = -45.0; angle <= 135.0; angle += 10.0) {
      GLfloat x = 50.0 + 200.0 * cos( angle * M_PI / 180.0 );
      GLfloat y = 50.0 + 200.0 * sin( angle * M_PI / 180.0 );

      /* Don't need to worry about the modelview or projection matrices!!! */
#ifdef GL_MESA_window_pos
      glWindowPos2fMESA( x, y );
#endif
      glDrawPixels( image->sizeX, image->sizeY, GL_RGB,
                    GL_UNSIGNED_BYTE, image->data );
   }
}




static GLenum key(int k, GLenum mask)
{
   switch (k) {
      case TK_ESCAPE:
	 tkQuit();
   }
   return GL_FALSE;
}



/* new window size or exposure */
static void reshape( int width, int height )
{
   GLfloat  h = (GLfloat) height / (GLfloat) width;
   glViewport(0, 0, (GLint)width, (GLint)height);
}


static void init( void )
{
   char *filename = "../samples/1.rgb";
   image = tkRGBImageLoad( filename );

   if (!image) {
      printf("Error: couldn't load image file: %s\n", filename );
      exit(1);
   }
}


main( int argc, char *argv[] )
{
   tkInitPosition(0, 0, 500, 500);
   tkInitDisplayMode( TK_RGB | TK_DIRECT );

   if (tkInitWindow("winpos") == GL_FALSE) {
      tkQuit();
   }

   init();

   tkExposeFunc( reshape );
   tkReshapeFunc( reshape );
   tkKeyDownFunc( key );
   tkDisplayFunc( draw );
   tkExec();
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.