From http://www.jwz.org/xscreensaver/xscreensaver-5.37.tar.gz
[xscreensaver] / hacks / glx / gltext.c
index 0ea82fc0497fa94d47f0488996553b2fd9baf611..cc39bc928fe3e5f8bd6ea79cf4a3f9f3bb225ac5 100644 (file)
@@ -1,4 +1,4 @@
-/* gltext, Copyright (c) 2001 Jamie Zawinski <jwz@jwz.org>
+/* gltext, Copyright (c) 2001-2014 Jamie Zawinski <jwz@jwz.org>
  *
  * Permission to use, copy, modify, distribute, and sell this software and its
  * documentation for any purpose is hereby granted without fee, provided that
@@ -9,28 +9,13 @@
  * implied warranty.
  */
 
-#include <X11/Intrinsic.h>
-
-extern XtAppContext app;
-
-#define PROGCLASS      "GLText"
-#define HACK_INIT      init_text
-#define HACK_DRAW      draw_text
-#define HACK_RESHAPE   reshape_text
-#define sws_opts       xlockmore_opts
-
-#define DEF_TEXT        "(default)"
-#define DEF_SPIN        "XYZ"
-#define DEF_WANDER      "True"
-
-#define DEFAULTS       "*delay:        10000       \n" \
-                       "*showFPS:      False       \n" \
-                       "*wireframe:    False       \n" \
-                       "*spin:       " DEF_SPIN   "\n" \
-                       "*wander:     " DEF_WANDER "\n" \
-                       "*text:       " DEF_TEXT   "\n"
-
+#define DEFAULTS       "*delay:        20000        \n" \
+                       "*showFPS:      False        \n" \
+                       "*wireframe:    False        \n" \
+                       "*usePty:       False        \n" \
 
+# define refresh_text 0
+# define release_text 0
 #define SMOOTH_TUBE       /* whether to have smooth or faceted tubes */
 
 #ifdef SMOOTH_TUBE
@@ -46,16 +31,26 @@ extern XtAppContext app;
 #include "xlockmore.h"
 #include "colors.h"
 #include "tube.h"
+#include "sphere.h"
+#include "rotator.h"
+#include "gltrackball.h"
+#include "textclient.h"
+#include "utf8wc.h"
+
 #include <ctype.h>
 
 #ifdef USE_GL /* whole file */
 
+#define DEF_TEXT        "(default)"
+#define DEF_PROGRAM     "(default)"
+#define DEF_SPIN        "XYZ"
+#define DEF_WANDER      "True"
+#define DEF_FACE_FRONT  "True"
+
 #ifdef HAVE_UNAME
 # include <sys/utsname.h>
 #endif /* HAVE_UNAME */
 
-
-#include <GL/glu.h>
 #include "glutstroke.h"
 #include "glut_roman.h"
 #define GLUT_FONT (&glutStrokeRoman)
@@ -63,11 +58,10 @@ extern XtAppContext app;
 
 typedef struct {
   GLXContext *glx_context;
-
-  GLfloat rotx, roty, rotz;       /* current object rotation */
-  GLfloat dx, dy, dz;             /* current rotational velocity */
-  GLfloat ddx, ddy, ddz;          /* current rotational acceleration */
-  GLfloat d_max;                  /* max velocity */
+  rotator *rot, *rot2;
+  trackball_state *trackball;
+  Bool button_down_p;
+  Bool spinx, spiny, spinz;
 
   GLuint text_list;
 
@@ -75,37 +69,47 @@ typedef struct {
   XColor *colors;
   int ccolor;
 
-  Bool spin_x, spin_y, spin_z;
   char *text;
+  int reload;
+
+  time_t last_update;
+  text_data *tc;
 
 } text_configuration;
 
 static text_configuration *tps = NULL;
 
 static char *text_fmt;
+static char *program_str;
 static char *do_spin;
 static Bool do_wander;
+static Bool face_front_p;
 
 static XrmOptionDescRec opts[] = {
-  { "-text",   ".text",   XrmoptionSepArg, 0 },
-  { "-spin",   ".spin",   XrmoptionSepArg, 0 },
-  { "+spin",   ".spin",   XrmoptionNoArg, "False" },
-  { "-wander", ".wander", XrmoptionNoArg, "True" },
-  { "+wander", ".wander", XrmoptionNoArg, "False" }
+  { "-text",    ".text",      XrmoptionSepArg, 0 },
+  { "-program", ".program",   XrmoptionSepArg, 0 },
+  { "-spin",    ".spin",      XrmoptionSepArg, 0 },
+  { "+spin",    ".spin",      XrmoptionNoArg, "" },
+  { "-wander",  ".wander",    XrmoptionNoArg, "True" },
+  { "+wander",  ".wander",    XrmoptionNoArg, "False" },
+  { "-front",   ".faceFront", XrmoptionNoArg, "True" },
+  { "+front",   ".faceFront", XrmoptionNoArg, "False" }
 };
 
 static argtype vars[] = {
-  {(caddr_t *) &text_fmt,  "text",   "Text",   DEF_TEXT,   t_String},
-  {(caddr_t *) &do_spin,   "spin",   "Spin",   DEF_SPIN,   t_String},
-  {(caddr_t *) &do_wander, "wander", "Wander", DEF_WANDER, t_Bool},
+  {&text_fmt,     "text",      "Text",      DEF_TEXT,       t_String},
+  {&program_str,  "program",   "Program",   DEF_PROGRAM,    t_String},
+  {&do_spin,      "spin",      "Spin",      DEF_SPIN,       t_String},
+  {&do_wander,    "wander",    "Wander",    DEF_WANDER,     t_Bool},
+  {&face_front_p, "faceFront", "FaceFront", DEF_FACE_FRONT, t_Bool},
 };
 
-ModeSpecOpt sws_opts = {countof(opts), opts, countof(vars), vars, NULL};
+ENTRYPOINT ModeSpecOpt text_opts = {countof(opts), opts, countof(vars), vars, NULL};
 
 
 /* Window management, etc
  */
-void
+ENTRYPOINT void
 reshape_text (ModeInfo *mi, int width, int height)
 {
   GLfloat h = (GLfloat) height / (GLfloat) width;
@@ -114,14 +118,21 @@ reshape_text (ModeInfo *mi, int width, int height)
 
   glMatrixMode(GL_PROJECTION);
   glLoadIdentity();
+  gluPerspective (30.0, 1/h, 1.0, 100.0);
 
-  gluPerspective( 30.0, 1/h, 1.0, 100.0 );
-  gluLookAt( 0.0, 0.0, 15.0,
-             0.0, 0.0, 0.0,
-             0.0, 1.0, 0.0);
   glMatrixMode(GL_MODELVIEW);
   glLoadIdentity();
-  glTranslatef(0.0, 0.0, -15.0);
+  gluLookAt( 0.0, 0.0, 30.0,
+             0.0, 0.0, 0.0,
+             0.0, 1.0, 0.0);
+
+# ifdef HAVE_MOBILE    /* Keep it the same relative size when rotated. */
+  {
+    int o = (int) current_device_rotation();
+    if (o != 0 && o != 180 && o != -180)
+      glScalef (1/h, 1/h, 1/h);
+  }
+# endif
 
   glClear(GL_COLOR_BUFFER_BIT);
 }
@@ -133,7 +144,7 @@ gl_init (ModeInfo *mi)
   text_configuration *tp = &tps[MI_SCREEN(mi)];
   int wire = MI_IS_WIREFRAME(mi);
 
-  static GLfloat pos[4] = {5.0, 5.0, 10.0, 1.0};
+  static const GLfloat pos[4] = {5.0, 5.0, 10.0, 1.0};
 
   if (!wire)
     {
@@ -150,85 +161,45 @@ gl_init (ModeInfo *mi)
 }
 
 
-/* lifted from lament.c */
-#define RAND(n) ((long) ((random() & 0x7fffffff) % ((long) (n))))
-#define RANDSIGN() ((random() & 1) ? 1 : -1)
-
 static void
-rotate(GLfloat *pos, GLfloat *v, GLfloat *dv, GLfloat max_v)
+parse_text (ModeInfo *mi)
 {
-  double ppos = *pos;
-
-  /* tick position */
-  if (ppos < 0)
-    ppos = -(ppos + *v);
-  else
-    ppos += *v;
-
-  if (ppos > 1.0)
-    ppos -= 1.0;
-  else if (ppos < 0)
-    ppos += 1.0;
-
-  if (ppos < 0) abort();
-  if (ppos > 1.0) abort();
-  *pos = (*pos > 0 ? ppos : -ppos);
-
-  /* accelerate */
-  *v += *dv;
+  text_configuration *tp = &tps[MI_SCREEN(mi)];
+  char *old = tp->text;
 
-  /* clamp velocity */
-  if (*v > max_v || *v < -max_v)
-    {
-      *dv = -*dv;
-    }
-  /* If it stops, start it going in the other direction. */
-  else if (*v < 0)
+  if (program_str && *program_str && !!strcmp(program_str, "(default)"))
     {
-      if (random() % 4)
-       {
-         *v = 0;
-
-         /* keep going in the same direction */
-         if (random() % 2)
-           *dv = 0;
-         else if (*dv < 0)
-           *dv = -*dv;
-       }
-      else
-       {
-         /* reverse gears */
-         *v = -*v;
-         *dv = -*dv;
-         *pos = -*pos;
-       }
-    }
+      int max_lines = 8;
+      char buf[1024];
+      char *p = buf;
+      int lines = 0;
 
-  /* Alter direction of rotational acceleration randomly. */
-  if (! (random() % 120))
-    *dv = -*dv;
+      if (! tp->tc)
+        tp->tc = textclient_open (mi->dpy);
 
-  /* Change acceleration very occasionally. */
-  if (! (random() % 200))
-    {
-      if (*dv == 0)
-       *dv = 0.00001;
-      else if (random() & 1)
-       *dv *= 1.2;
-      else
-       *dv *= 0.8;
-    }
-}
-
-
-static void
-parse_text (ModeInfo *mi)
-{
-  text_configuration *tp = &tps[MI_SCREEN(mi)];
+      while (p < buf + sizeof(buf) - 1 &&
+             lines < max_lines)
+        {
+          int c = textclient_getc (tp->tc);
+          if (c == '\n')
+            lines++;
+          if (c > 0)
+            *p++ = (char) c;
+          else
+            break;
+        }
+      *p = 0;
+      if (lines == 0 && buf[0])
+        lines++;
 
-  if (tp->text) free (tp->text);
+      tp->text = strdup (buf);
+      
+      tp->reload = 7;  /* Let this one linger for a few seconds */
+      if (!*tp->text)
+        tp->reload = 1;
 
-  if (!text_fmt || !*text_fmt || !strcmp(text_fmt, "(default)"))
+    }
+  else if (!text_fmt || !*text_fmt || !strcmp(text_fmt, "(default)"))
     {
 # ifdef HAVE_UNAME
       struct utsname uts;
@@ -246,13 +217,46 @@ parse_text (ModeInfo *mi)
                                      strlen(uts.sysname) +
                                      strlen(uts.version) +
                                      strlen(uts.release) + 10);
-#  ifdef _AIX
+#  if defined(_AIX)
           sprintf(tp->text, "%s\n%s %s.%s",
                   uts.nodename, uts.sysname, uts.version, uts.release);
-#  else  /* !_AIX */
+#  elif defined(USE_IPHONE)
+          /* "My iPhone\n iPhone4,1\n Darwin 11.0.0" */
+          sprintf(tp->text, "%s\n%s\n%s %s",
+                  uts.nodename, uts.machine, uts.sysname, uts.release);
+#  elif defined(__APPLE__)  /* MacOS X + XDarwin */
+          {
+            const char *file = 
+              "/System/Library/CoreServices/SystemVersion.plist";
+            FILE *f = fopen (file, "r");
+            char *pbv = 0, *pn = 0, *puvv = 0;
+            if (f) {
+              char *s, buf[255];
+
+              while (fgets (buf, sizeof(buf)-1, f)) {
+#               define GRAB(S,V)                                       \
+                if (strstr(buf, S)) {                                  \
+                  fgets (buf, sizeof(buf)-1, f);                       \
+                  if ((s = strchr (buf, '>'))) V = strdup(s+1);        \
+                  if ((s = strchr (V, '<'))) *s = 0;                   \
+                }
+                GRAB ("ProductName", pn)
+                GRAB ("ProductBuildVersion", pbv)
+                GRAB ("ProductUserVisibleVersion", puvv)
+#               undef GRAB
+              }
+            }
+            if (pbv)
+              sprintf (tp->text, "%s\n%s\n%s\n%s", 
+                       uts.nodename, pn, puvv, uts.machine);
+            else
+              sprintf(tp->text, "%s\n%s %s\n%s",
+                      uts.nodename, uts.sysname, uts.release, uts.machine);
+          }
+#  else
           sprintf(tp->text, "%s\n%s %s",
                   uts.nodename, uts.sysname, uts.release);
-#  endif /* !_AIX */
+#  endif /* special system types */
         }
 # else /* !HAVE_UNAME */
 #  ifdef VMS
@@ -276,25 +280,53 @@ parse_text (ModeInfo *mi)
       strftime (tp->text, L-1, text_fmt, tm);
       if (!*tp->text)
         sprintf (tp->text, "strftime error:\n%s", text_fmt);
+      tp->reload = 1;
     }
+
+  {
+    /* The GLUT font only has ASCII characters. */
+    char *s1 = utf8_to_latin1 (tp->text, True);
+    free (tp->text);
+    tp->text = s1;
+  }
+
+  /* If we had text before but got no text this time, hold on to the
+     old one, to avoid flickering.
+   */
+  if (old && *old && !*tp->text)
+    {
+      free (tp->text);
+      tp->text = old;
+    }
+  else if (old)
+    free (old);
 }
 
 
-void 
+ENTRYPOINT Bool
+text_handle_event (ModeInfo *mi, XEvent *event)
+{
+  text_configuration *tp = &tps[MI_SCREEN(mi)];
+
+  if (gltrackball_event_handler (event, tp->trackball,
+                                 MI_WIDTH (mi), MI_HEIGHT (mi),
+                                 &tp->button_down_p))
+    return True;
+
+  return False;
+}
+
+
+static void free_text(ModeInfo * mi);
+
+
+ENTRYPOINT void 
 init_text (ModeInfo *mi)
 {
   text_configuration *tp;
+  int i;
 
-  if (!tps) {
-    tps = (text_configuration *)
-      calloc (MI_NUM_SCREENS(mi), sizeof (text_configuration));
-    if (!tps) {
-      fprintf(stderr, "%s: out of memory\n", progname);
-      exit(1);
-    }
-
-    tp = &tps[MI_SCREEN(mi)];
-  }
+  MI_INIT (mi, tps, free_text);
 
   tp = &tps[MI_SCREEN(mi)];
 
@@ -303,37 +335,19 @@ init_text (ModeInfo *mi)
     reshape_text (mi, MI_WIDTH(mi), MI_HEIGHT(mi));
   }
 
-  tp->rotx = frand(1.0) * RANDSIGN();
-  tp->roty = frand(1.0) * RANDSIGN();
-  tp->rotz = frand(1.0) * RANDSIGN();
-
-  /* bell curve from 0-6 degrees, avg 3 */
-  tp->dx = (frand(1) + frand(1) + frand(1)) / (360/2);
-  tp->dy = (frand(1) + frand(1) + frand(1)) / (360/2);
-  tp->dz = (frand(1) + frand(1) + frand(1)) / (360/2);
-
-  tp->d_max = tp->dx * 2;
-
-  tp->ddx = 0.00006 + frand(0.00003);
-  tp->ddy = 0.00006 + frand(0.00003);
-  tp->ddz = 0.00006 + frand(0.00003);
-
-
-  tp->ncolors = 255;
-  tp->colors = (XColor *) calloc(tp->ncolors, sizeof(XColor));
-  make_smooth_colormap (0, 0, 0,
-                        tp->colors, &tp->ncolors,
-                        False, 0, False);
-
-  parse_text (mi);
-
   {
+    double spin_speed   = 0.5;
+    double wander_speed = 0.02;
+    double tilt_speed   = 0.03;
+    double spin_accel   = 0.5;
+
     char *s = do_spin;
     while (*s)
       {
-        if      (*s == 'x' || *s == 'X') tp->spin_x = 1;
-        else if (*s == 'y' || *s == 'Y') tp->spin_y = 1;
-        else if (*s == 'z' || *s == 'Z') tp->spin_z = 1;
+        if      (*s == 'x' || *s == 'X') tp->spinx = True;
+        else if (*s == 'y' || *s == 'Y') tp->spiny = True;
+        else if (*s == 'z' || *s == 'Z') tp->spinz = True;
+        else if (*s == '0') ;
         else
           {
             fprintf (stderr,
@@ -343,13 +357,40 @@ init_text (ModeInfo *mi)
           }
         s++;
       }
+
+    tp->rot = make_rotator (tp->spinx ? spin_speed : 0,
+                            tp->spiny ? spin_speed : 0,
+                            tp->spinz ? spin_speed : 0,
+                            spin_accel,
+                            do_wander ? wander_speed : 0,
+                            False);
+    tp->rot2 = (face_front_p
+                ? make_rotator (0, 0, 0, 0, tilt_speed, True)
+                : 0);
+    tp->trackball = gltrackball_init (False);
   }
 
+  tp->ncolors = 255;
+  tp->colors = (XColor *) calloc(tp->ncolors, sizeof(XColor));
+  make_smooth_colormap (0, 0, 0,
+                        tp->colors, &tp->ncolors,
+                        False, 0, False);
+
+  /* brighter colors, please... */
+  for (i = 0; i < tp->ncolors; i++)
+    {
+      tp->colors[i].red   = (tp->colors[i].red   / 2) + 32767;
+      tp->colors[i].green = (tp->colors[i].green / 2) + 32767;
+      tp->colors[i].blue  = (tp->colors[i].blue  / 2) + 32767;
+    }
+
+  parse_text (mi);
+
 }
 
 
 static int
-fill_character (GLUTstrokeFont font, int c, Bool wire)
+fill_character (GLUTstrokeFont font, int c, Bool wire, int *polysP)
 {
   GLfloat tube_width = 10;
 
@@ -366,7 +407,7 @@ fill_character (GLUTstrokeFont font, int c, Bool wire)
   ch = &(fontinfo->ch[c]);
   if (ch)
     {
-      GLfloat lx, ly;
+      GLfloat lx=0, ly=0;
       for (i = ch->num_strokes, stroke = ch->stroke;
            i > 0; i--, stroke++) {
         for (j = stroke->num_coords, coord = stroke->coord;
@@ -377,17 +418,29 @@ fill_character (GLUTstrokeFont font, int c, Bool wire)
 # else
             int smooth = False;
 # endif
+
             if (j != stroke->num_coords)
-              tube (lx,       ly,       0,
-                    coord->x, coord->y, 0,
-                    tube_width,
-                    tube_width * 0.15,
-                    TUBE_FACES, smooth, wire);
+              *polysP += tube (lx,       ly,       0,
+                               coord->x, coord->y, 0,
+                               tube_width,
+                               tube_width * 0.15,
+                               TUBE_FACES, smooth, False, wire);
             lx = coord->x;
             ly = coord->y;
+
+            /* Put a sphere at the endpoint of every line segment.  Wasteful
+               on curves like "0" but necessary on corners like "4". */
+            if (! wire)
+              {
+                glPushMatrix();
+                glTranslatef (lx, ly, 0);
+                glScalef (tube_width, tube_width, tube_width);
+                *polysP += unit_sphere (TUBE_FACES, TUBE_FACES, wire);
+                glPopMatrix();
+              }
           }
       }
-      return (int) (ch->right + tube_width/2);
+      return (int) (ch->right + tube_width);
     }
   return 0;
 }
@@ -416,9 +469,9 @@ text_extents (const char *string, int *wP, int *hP)
 
         if (w > *wP) *wP = w;
         *hP += line_height;
-        s++;
         lines++;
         if (*s == 0) break;
+        s++;
       }
     else
       s++;
@@ -427,17 +480,17 @@ text_extents (const char *string, int *wP, int *hP)
 }
 
 
-static void
+static unsigned long
 fill_string (const char *string, Bool wire)
 {
+  int polys = 0;
   const char *s, *start;
   int line_height = GLUT_FONT->top - GLUT_FONT->bottom;
   int off;
   GLfloat x = 0, y = 0;
-  int lines;
 
   int ow, oh;
-  lines = text_extents (string, &ow, &oh);
+  text_extents (string, &ow, &oh);
 
   y = oh / 2 - line_height;
 
@@ -466,7 +519,7 @@ fill_string (const char *string, Bool wire)
           {
             glPushMatrix();
             glTranslatef(x, y, 0);
-            off = fill_character (GLUT_FONT, *s2, wire);
+            off = fill_character (GLUT_FONT, *s2, wire, &polys);
             x += off;
             glPopMatrix();
           }
@@ -479,10 +532,11 @@ fill_string (const char *string, Bool wire)
       }
     else
       s++;
+  return polys;
 }
 
 
-void
+ENTRYPOINT void
 draw_text (ModeInfo *mi)
 {
   text_configuration *tp = &tps[MI_SCREEN(mi)];
@@ -490,19 +544,21 @@ draw_text (ModeInfo *mi)
   Window window = MI_WINDOW(mi);
   int wire = MI_IS_WIREFRAME(mi);
 
-  static GLfloat color[4] = {0.0, 0.0, 0.0, 1.0};
-  static GLfloat white[4] = {1.0, 1.0, 1.0, 1.0};
+  GLfloat white[4] = {1.0, 1.0, 1.0, 1.0};
+  GLfloat color[4] = {0.0, 0.0, 0.0, 1.0};
 
   if (!tp->glx_context)
     return;
 
-  if (strchr (text_fmt, '%'))
+  glXMakeCurrent(MI_DISPLAY(mi), MI_WINDOW(mi), *(tp->glx_context));
+
+  if (tp->reload)
     {
-      static time_t last_update = -1;
-      time_t now = time ((time_t *) 0);
-      if (now != last_update) /* do it once a second */
-        parse_text (mi);
-      last_update = now;
+      if (time ((time_t *) 0) >= tp->last_update + tp->reload)
+        {
+          parse_text (mi);
+          tp->last_update = time ((time_t *) 0);
+        }
     }
 
   glShadeModel(GL_SMOOTH);
@@ -511,48 +567,40 @@ draw_text (ModeInfo *mi)
   glEnable(GL_NORMALIZE);
   glEnable(GL_CULL_FACE);
 
+
   glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
 
   glPushMatrix ();
-
   glScalef(1.1, 1.1, 1.1);
+  glRotatef(current_device_rotation(), 0, 0, 1);
 
   {
-    GLfloat x, y, z;
-
-    if (do_wander)
-      {
-        static int frame = 0;
+    double x, y, z;
+    get_position (tp->rot, &x, &y, &z, !tp->button_down_p);
+    glTranslatef((x - 0.5) * 8,
+                 (y - 0.5) * 8,
+                 (z - 0.5) * 8);
 
-#       define SINOID(SCALE,SIZE) \
-        ((((1 + sin((frame * (SCALE)) / 2 * M_PI)) / 2.0) * (SIZE)) - (SIZE)/2)
+    gltrackball_rotate (tp->trackball);
 
-        x = SINOID(0.031, 9.0);
-        y = SINOID(0.023, 9.0);
-        z = SINOID(0.017, 9.0);
-        frame++;
-        glTranslatef(x, y, z);
+    if (face_front_p)
+      {
+        double max = 90;
+        get_position (tp->rot2, &x, &y, &z, !tp->button_down_p);
+        if (tp->spinx) glRotatef (max/2 - x*max, 1, 0, 0);
+        if (tp->spiny) glRotatef (max/2 - y*max, 0, 1, 0);
+        if (tp->spinz) glRotatef (max/2 - z*max, 0, 0, 1);
       }
-
-    if (tp->spin_x || tp->spin_y || tp->spin_z)
+    else
       {
-        x = tp->rotx;
-        y = tp->roty;
-        z = tp->rotz;
-        if (x < 0) x = 1 - (x + 1);
-        if (y < 0) y = 1 - (y + 1);
-        if (z < 0) z = 1 - (z + 1);
-
-        if (tp->spin_x) glRotatef(x * 360, 1.0, 0.0, 0.0);
-        if (tp->spin_y) glRotatef(y * 360, 0.0, 1.0, 0.0);
-        if (tp->spin_z) glRotatef(z * 360, 0.0, 0.0, 1.0);
-
-        rotate(&tp->rotx, &tp->dx, &tp->ddx, tp->d_max);
-        rotate(&tp->roty, &tp->dy, &tp->ddy, tp->d_max);
-        rotate(&tp->rotz, &tp->dz, &tp->ddz, tp->d_max);
+        get_rotation (tp->rot, &x, &y, &z, !tp->button_down_p);
+        glRotatef (x * 360, 1, 0, 0);
+        glRotatef (y * 360, 0, 1, 0);
+        glRotatef (z * 360, 0, 0, 1);
       }
   }
 
+
   glColor4fv (white);
 
   color[0] = tp->colors[tp->ccolor].red   / 65536.0;
@@ -565,7 +613,7 @@ draw_text (ModeInfo *mi)
 
   glScalef(0.01, 0.01, 0.01);
 
-  fill_string(tp->text, wire);
+  mi->polygon_count = fill_string(tp->text, wire);
 
   glPopMatrix ();
 
@@ -575,4 +623,15 @@ draw_text (ModeInfo *mi)
   glXSwapBuffers(dpy, window);
 }
 
+ENTRYPOINT void
+free_text(ModeInfo * mi)
+{
+  text_configuration *tp = &tps[MI_SCREEN(mi)];
+  if (tp->tc)
+    textclient_close (tp->tc);
+}
+
+
+XSCREENSAVER_MODULE_2 ("GLText", gltext, text)
+
 #endif /* USE_GL */