开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > GIS编程 > 查看源码
textmap.c
资源名称：glut23-src.zip　[点击查看]
上传用户：xk288cn
上传日期：2007-05-28
资源大小：4876k
文件大小：8k
源码类别：

GIS编程

开发平台：

Visual C++

textmap.c：源码内容
  2. /* textmap.c - by David Blythe, SGI */
  4. /* Helper routines used by textext.c for texture mapped fonts. */
  6. #include <stdio.h>
  7. #include <stdlib.h>
  8. #include <GL/glut.h>
  9. #include "textmap.h"
  10. #include "texture.h"
  12. /* byte swap a 32-bit value */
  13. #define SWAPL(x, n) { 
  14.                  n = ((char *) (x))[0];
  15.                  ((char *) (x))[0] = ((char *) (x))[3];
  16.                  ((char *) (x))[3] = n;
  17.                  n = ((char *) (x))[1];
  18.                  ((char *) (x))[1] = ((char *) (x))[2];
  19.                  ((char *) (x))[2] = n; }
  21. /* byte swap a short */
  22. #define SWAPS(x, n) { 
  23.                  n = ((char *) (x))[0];
  24.                  ((char *) (x))[0] = ((char *) (x))[1];
  25.                  ((char *) (x))[1] = n; }
  27. static texfnt *curtfnt;
  28. static unsigned char *fb;
  29. static unsigned char *gptr;
  31. /* get metric data into image */
  32. static void
  33. initget(void)
  34. {
  35.   gptr = fb;
  36. }
  38. static void
  39. getbytes(void *pbuf, int n)
  40. {
  41.   char *buf = pbuf;
  42.   while (n--) {
  43.     *buf++ = *gptr++;
  44.   }
  45. }
  47. static void
  48. fixrow(unsigned short *sptr, int n)
  49. {
  50.   while (n--) {
  51.     /* *sptr = *sptr + (0xff<<8); */
  52.     /* *sptr = (*sptr<<8) | 0xff; */
  53.     sptr++;
  54.   }
  55. }
  57. int
  58. doSwap(void)
  59. {
  60.   int i = 0xffff0000;
  61.   char *cptr = (char*) &i;
  63.   if (cptr[0] == 0) {
  64.     return 1;  /* little endian (x86, alpha) */
  65.   } else {
  66.     return 0;  /* big endian (SGI, 68000, VAX, SPARC) */
  67.   }
  68. }
  70. texfnt *
  71. readtexfont(char *name)
  72. {
  73.   texfnt *tfnt;
  74.   unsigned *image;
  75.   unsigned char *cptr;
  76.   unsigned short *sbuf, *sptr;
  77.   short advancecell, xadvance;
  78.   short llx, lly, urx, ury, ox, oy;
  79.   int i, y, extralines;
  80.   texchardesc *cd;
  81.   int xsize, ysize, components;
  82.   int swap = doSwap();
  83.   int tmp;
  85.   tfnt = (texfnt *) malloc(sizeof(texfnt));
  86.   image = read_texture(name, &xsize, &ysize, &components);
  87.   if (!image) {
  88.     fprintf(stderr, "textmap: can't open font image %sn", name);
  89.     return 0;
  90.   }
  91.   extralines = ysize - xsize;
  92.   if (extralines < 1) {
  93.     fprintf(stderr, "textmap: bad input font!!n");
  94.     return 0;
  95.   }
  96.   fb = (unsigned char *) malloc(xsize * extralines);
  97.   sbuf = (unsigned short *) malloc(xsize * sizeof(short));
  98.   cptr = fb;
  99.   for (y = xsize; y < ysize; y++) {
  100.     int x;
  101.     for (x = 0; x < xsize; x++)
  102.       cptr[x] = image[y * xsize + x] >> 16;
  103.     cptr += xsize;
  104.   }
  105.   initget();
  106.   tfnt->rasxsize = xsize;
  107.   tfnt->rasysize = xsize;
  108.   getbytes(&tfnt->charmin, sizeof(short));
  109.   getbytes(&tfnt->charmax, sizeof(short));
  110.   getbytes(&tfnt->pixhigh, sizeof(float));
  111.   getbytes(&advancecell, sizeof(short));
  112.   if (swap) {
  113.     SWAPS(&tfnt->charmin, tmp);
  114.     SWAPS(&tfnt->charmax, tmp);
  115.     SWAPL(&tfnt->pixhigh, tmp);
  116.     SWAPS(&advancecell, tmp);
  117.   }
  118.   tfnt->nchars = tfnt->charmax - tfnt->charmin + 1;
  119.   tfnt->chars = (texchardesc *) malloc(tfnt->nchars * sizeof(texchardesc));
  120.   tfnt->rasdata = (unsigned short *) malloc(tfnt->rasxsize * tfnt->rasysize * sizeof(long));
  121.   sptr = tfnt->rasdata;
  122.   for (y = 0; y < tfnt->rasysize; y++) {
  123.     int x;
  124.     for (x = 0; x < xsize; x++)
  125.       sptr[x] = image[y * xsize + x] >> 16;
  126.     fixrow(sptr, tfnt->rasxsize);
  127.     sptr += tfnt->rasxsize;
  128.   }
  130.   cd = tfnt->chars;
  131.   for (i = 0; i < tfnt->nchars; i++) {
  132.     getbytes(&xadvance, sizeof(short));
  133.     getbytes(&llx, sizeof(short));
  134.     getbytes(&lly, sizeof(short));
  135.     getbytes(&urx, sizeof(short));
  136.     getbytes(&ury, sizeof(short));
  137.     getbytes(&ox, sizeof(short));
  138.     getbytes(&oy, sizeof(short));
  139.     if (swap) {
  140.       SWAPS(&xadvance, tmp);
  141.       SWAPS(&llx, tmp);
  142.       SWAPS(&lly, tmp);
  143.       SWAPS(&urx, tmp);
  144.       SWAPS(&ury, tmp);
  145.       SWAPS(&ox, tmp);
  146.       SWAPS(&oy, tmp);
  147.     }
  148.     cd->movex = xadvance / (float) advancecell;
  150.     if (llx >= 0) {
  151.       cd->haveimage = 1;
  152.       cd->llx = (llx - ox) / tfnt->pixhigh;
  153.       cd->lly = (lly - oy) / tfnt->pixhigh;
  154.       cd->urx = (urx - ox + 1) / tfnt->pixhigh;
  155.       cd->ury = (ury - oy + 1) / tfnt->pixhigh;
  156.       cd->tllx = llx / (float) tfnt->rasxsize;
  157.       cd->tlly = lly / (float) tfnt->rasysize;
  158.       cd->turx = (urx + 1) / (float) tfnt->rasxsize;
  159.       cd->tury = (ury + 1) / (float) tfnt->rasysize;
  160.       cd->data[0] = cd->tllx;
  161.       cd->data[1] = cd->tlly;
  163.       cd->data[2] = cd->llx;
  164.       cd->data[3] = cd->lly;
  166.       cd->data[4] = cd->turx;
  167.       cd->data[5] = cd->tlly;
  169.       cd->data[6] = cd->urx;
  170.       cd->data[7] = cd->lly;
  172.       cd->data[8] = cd->turx;
  173.       cd->data[9] = cd->tury;
  175.       cd->data[10] = cd->urx;
  176.       cd->data[11] = cd->ury;
  178.       cd->data[12] = cd->tllx;
  179.       cd->data[13] = cd->tury;
  181.       cd->data[14] = cd->llx;
  182.       cd->data[15] = cd->ury;
  184.       cd->data[16] = cd->llx;
  185.       cd->data[17] = cd->lly;
  186.       cd->data[18] = cd->urx;
  187.       cd->data[19] = cd->lly;
  189.       cd->data[20] = cd->urx;
  190.       cd->data[21] = cd->ury;
  191.       cd->data[22] = cd->llx;
  192.       cd->data[23] = cd->ury;
  194.     } else {
  195.       cd->haveimage = 0;
  196.     }
  197.     cd++;
  198.   }
  199.   free(fb);
  200.   free(sbuf);
  201.   free(image);
  202.   return tfnt;
  203. }
  205. void
  206. texfont(texfnt * tfnt)
  207. {
  208.   glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
  209.   glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
  210.   glTexImage2D(GL_TEXTURE_2D, 0, 2, tfnt->rasxsize, tfnt->rasysize, 0,
  211.     GL_LUMINANCE_ALPHA, GL_UNSIGNED_BYTE, tfnt->rasdata);
  212.   glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
  213.   curtfnt = tfnt;
  214. }
  216. float
  217. texstrwidth(char *str)
  218. {
  219.   unsigned int c;
  220.   unsigned int charmin, tnchars;
  221.   texfnt *tfnt;
  222.   texchardesc *cdbase, *cd;
  223.   float xpos;
  225.   tfnt = curtfnt;
  226.   if (!tfnt) {
  227.     fprintf(stderr, "texstrwidth: no texfont set!!n");
  228.     return 0;
  229.   }
  230.   charmin = tfnt->charmin;
  231.   tnchars = tfnt->nchars;
  232.   cdbase = tfnt->chars;
  233.   xpos = 0.0;
  234.   while (*str) {
  235.     c = *str - charmin;
  236.     if (c < tnchars) {
  237.       cd = cdbase + c;
  238.       xpos += cd->movex;
  239.     }
  240.     str++;
  241.   }
  242.   return xpos;
  243. }
  245. void
  246. texcharstr(char *str)
  247. {
  248.   unsigned int c;
  249.   unsigned int charmin, tnchars;
  250.   texfnt *tfnt;
  251.   texchardesc *cdbase, *cd;
  252.   float *fdata, xpos;
  254.   tfnt = curtfnt;
  255.   if (!tfnt) {
  256.     fprintf(stderr, "texcharstr: no texfont set!!n");
  257.     return;
  258.   }
  259.   charmin = tfnt->charmin;
  260.   tnchars = tfnt->nchars;
  261.   cdbase = tfnt->chars;
  262.   xpos = 0.0;
  263. #if 0
  264.   texbind(TX_TEXTURE_0, LETTER_INDEX);  /* bind letter texture */
  265.   tevbind(TV_ENV0, LETTER_INDEX);
  266. #endif
  267.   while (*str) {
  268.     c = *str - charmin;
  269.     if (c < tnchars) {
  270.       cd = cdbase + c;
  271.       if (cd->haveimage) {
  272.         fdata = cd->data;
  273.         fdata[16] = fdata[2] + xpos;
  274.         fdata[18] = fdata[6] + xpos;
  275.         fdata[20] = fdata[10] + xpos;
  276.         fdata[22] = fdata[14] + xpos;
  277.         glBegin(GL_POLYGON);
  278.         glTexCoord2fv(&fdata[0]);
  279.         glVertex2fv(&fdata[16]);
  280.         glTexCoord2fv(&fdata[4]);
  281.         glVertex2fv(&fdata[18]);
  282.         glTexCoord2fv(&fdata[8]);
  283.         glVertex2fv(&fdata[20]);
  284.         glTexCoord2fv(&fdata[12]);
  285.         glVertex2fv(&fdata[22]);
  286.         glEnd();
  287.       }
  288.       xpos += cd->movex;
  289.     }
  290.     str++;
  291.   }
  292. }
  294. int
  295. texfntinit(char *file)
  296. {
  297.   static int once = 0;
  298.   static texfnt *tfnt;
  299.   if (!once) {
  300.     tfnt = readtexfont(file);
  301.     if (!tfnt) {
  302.       fprintf(stderr, "texfntinit: can't open input font %sn", file);
  303.       return -1;
  304.     }
  305.     texfont(tfnt);
  306.     once = 1;
  307.   }
  308.   return 0;
  309. }
  311. float
  312. texfntwidth(char *str)
  313. {
  314.   return texstrwidth(str) * 12.5 / 6.;
  315. }
  317. void
  318. texfntstroke(char *s, float xoffset, float yoffset)
  319. {
  320.   glEnable(GL_BLEND);
  321.   glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
  322.   glPushMatrix();
  323.   glTranslatef(xoffset, yoffset, 0.0);
  324.   glScalef(12.5, 12.5, 12.5);
  325.   texcharstr(s);
  326.   glPopMatrix();
  327.   glDisable(GL_BLEND);
  328. }