glut_overlay.c
上传用户:xk288cn
上传日期:2007-05-28
资源大小:4876k
文件大小:20k
源码类别:

GIS编程

开发平台:

Visual C++

  1. /* Copyright (c) Mark J. Kilgard, 1996, 1997.  */
  2. /* This program is freely distributable without licensing fees
  3.    and is provided without guarantee or warrantee expressed or
  4.    implied. This program is -not- in the public domain. */
  5. #include <stdlib.h>
  6. #include <stdio.h>
  7. #include <string.h>
  8. #include <assert.h>
  9. #if !defined(_WIN32)
  10. #include <X11/Xlib.h>
  11. #include <X11/Xutil.h>
  12. #include <X11/Xatom.h>  /* for XA_RGB_DEFAULT_MAP atom */
  13. #if defined (__vms)
  14. #include <Xmu/StdCmap.h>  /* for XmuLookupStandardColormap */
  15. #else
  16. #include <X11/Xmu/StdCmap.h>  /* for XmuLookupStandardColormap */
  17. #endif
  18. #endif /* !_WIN32 */
  19. #include "glutint.h"
  20. #include "layerutil.h"
  21. static Criterion requiredOverlayCriteria[] =
  22. {
  23.   {LEVEL, EQ, 1},       /* This entry gets poked in
  24.                            determineOverlayVisual. */
  25.   {TRANSPARENT, EQ, 1},
  26.   {XPSEUDOCOLOR, EQ, 1},
  27.   {RGBA, EQ, 0},
  28.   {BUFFER_SIZE, GTE, 1}
  29. };
  30. static int numRequiredOverlayCriteria = sizeof(requiredOverlayCriteria) / sizeof(Criterion);
  31. static int requiredOverlayCriteriaMask =
  32. (1 << LEVEL) | (1 << TRANSPARENT) | (1 << XSTATICGRAY) | (1 << RGBA) | (1 << CI_MODE);
  33. #if !defined(_WIN32)
  34. static int
  35. checkOverlayAcceptability(XVisualInfo * vi, unsigned int mode)
  36. {
  37.   int value;
  38.   /* Must support OpenGL. */
  39.   glXGetConfig(__glutDisplay, vi, GLX_USE_GL, &value);
  40.   if (!value)
  41.     return 1;
  42.   /* Must be color index. */
  43.   glXGetConfig(__glutDisplay, vi, GLX_RGBA, &value);
  44.   if (value)
  45.     return 1;
  46.   /* Must match single/double buffering request. */
  47.   glXGetConfig(__glutDisplay, vi, GLX_DOUBLEBUFFER, &value);
  48.   if (GLUT_WIND_IS_DOUBLE(mode) != (value != 0))
  49.     return 1;
  50.   /* Must match mono/stereo request. */
  51.   glXGetConfig(__glutDisplay, vi, GLX_STEREO, &value);
  52.   if (GLUT_WIND_IS_STEREO(mode) != (value != 0))
  53.     return 1;
  54.   /* Alpha and accumulation buffers incompatible with color
  55.      index. */
  56.   if (GLUT_WIND_HAS_ALPHA(mode) || GLUT_WIND_HAS_ACCUM(mode))
  57.     return 1;
  58.   /* Look for depth buffer if requested. */
  59.   glXGetConfig(__glutDisplay, vi, GLX_DEPTH_SIZE, &value);
  60.   if (GLUT_WIND_HAS_DEPTH(mode) && (value <= 0))
  61.     return 1;
  62.   /* Look for stencil buffer if requested. */
  63.   glXGetConfig(__glutDisplay, vi, GLX_STENCIL_SIZE, &value);
  64.   if (GLUT_WIND_HAS_STENCIL(mode) && (value <= 0))
  65.     return 1;
  66. #if defined(GLX_VERSION_1_1) && defined(GLX_SGIS_multisample)
  67.   /* XXX Multisampled overlay color index??  Pretty unlikely. */
  68.   /* Look for multisampling if requested. */
  69.   if (__glutIsSupportedByGLX("GLX_SGIS_multisample"))
  70.     glXGetConfig(__glutDisplay, vi, GLX_SAMPLES_SGIS, &value);
  71.   else
  72.     value = 0;
  73.   if (GLUT_WIND_IS_MULTISAMPLE(mode) && (value <= 0))
  74.     return 1;
  75. #endif
  76.   return 0;
  77. }
  78. #endif
  79. static XVisualInfo *
  80. getOverlayVisualInfoCI(unsigned int mode)
  81. {
  82. #if !defined(_WIN32)
  83.   XLayerVisualInfo *vi;
  84.   XLayerVisualInfo template;
  85.   XVisualInfo *goodVisual, *returnVisual;
  86.   int nitems, i, j, bad;
  87.   /* The GLX 1.0 glXChooseVisual is does not permit queries
  88.      based on pixel transparency (and GLX_BUFFER_SIZE uses
  89.      "smallest that meets" its requirement instead of "largest
  90.      that meets" that GLUT wants. So, GLUT implements its own
  91.      visual selection routine for color index overlays. */
  92.   /* Try three overlay layers. */
  93.   for (i = 1; i <= 3; i++) {
  94.     template.vinfo.screen = __glutScreen;
  95.     template.vinfo.class = PseudoColor;
  96.     template.layer = i;
  97.     template.type = TransparentPixel;
  98.     vi = __glutXGetLayerVisualInfo(__glutDisplay,
  99.       VisualTransparentType | VisualScreenMask | VisualClassMask | VisualLayerMask,
  100.       &template, &nitems);
  101.     if (vi) {
  102.       /* Check list for acceptable visual meeting requirements
  103.          of requested display mode. */
  104.       for (j = 0; j < nitems; j++) {
  105.         bad = checkOverlayAcceptability(&vi[j].vinfo, mode);
  106.         if (bad) {
  107.           /* Set vi[j].vinfo.visual to mark it unacceptable. */
  108.           vi[j].vinfo.visual = NULL;
  109.         }
  110.       }
  111.       /* Look through list to find deepest acceptable visual. */
  112.       goodVisual = NULL;
  113.       for (j = 0; j < nitems; j++) {
  114.         if (vi[j].vinfo.visual) {
  115.           if (goodVisual == NULL) {
  116.             goodVisual = &vi[j].vinfo;
  117.           } else {
  118.             if (goodVisual->depth < vi[j].vinfo.depth) {
  119.               goodVisual = &vi[j].vinfo;
  120.             }
  121.           }
  122.         }
  123.       }
  124.       /* If a visual is found, clean up and return the visual. */
  125.       if (goodVisual) {
  126.         returnVisual = (XVisualInfo *) malloc(sizeof(XVisualInfo));
  127.         if (returnVisual) {
  128.           *returnVisual = *goodVisual;
  129.         }
  130.         XFree(vi);
  131.         return returnVisual;
  132.       }
  133.       XFree(vi);
  134.     }
  135.   }
  136. #endif /* !_WIN32 */
  137.   return NULL;
  138. }
  139. /* ARGSUSED */
  140. static XVisualInfo *
  141. getOverlayVisualInfoRGB(unsigned int mode)
  142. {
  143.   /* XXX For now, transparent RGBA overlays are not supported
  144.      by GLUT.  RGBA overlays raise difficult questions about
  145.      what the transparent pixel (really color) value should be.
  146.      Color index overlay transparency is "easy" because the
  147.      transparent pixel value does not affect displayable colors
  148.      (except for stealing one color cell) since colors are
  149.      determined by indirection through a colormap, and because
  150.      it is uncommon for arbitrary pixel values in color index to
  151.      be "calculated" (as can occur with a host of RGBA operations
  152.      like lighting, blending, etc) so it is easy to avoid the
  153.      transparent pixel value.
  154.      Since it is typically easy to avoid the transparent pixel
  155.      value in color index mode, if GLUT tells the programmer what
  156.      pixel is transparent, then most program can easily avoid
  157.      generating that pixel value except when they intend
  158.      transparency.  GLUT returns whatever transparent pixel value
  159.      is provided by the system through glutGet(
  160.      GLUT_TRANSPARENT_INDEX).
  161.      Theory versus practice for RGBA overlay transparency: In
  162.      theory, the reasonable thing is enabling overlay transparency
  163.      when an overlay pixel's destination alpha is 0 because this
  164.      allows overlay transparency to be controlled via alpha and all
  165.      visibile colors are permited, but no hardware I am aware of
  166.      supports this practice (and it requires destination alpha which
  167.      is typically optional and quite uncommon for overlay windows!). 
  168.      In practice, the choice of  transparent pixel value is typically
  169.      "hardwired" into most graphics hardware to a single pixel value.
  170.      SGI hardware uses true black (0,0,0) without regard for the
  171.      destination alpha.  This is far from ideal because true black (a
  172.      common color that is easy to accidently generate) can not be
  173.      generated in an RGBA overlay. I am not sure what other vendors
  174.      do.
  175.      Pragmatically, most of the typical things you want to do in the
  176.      overlays can be done in color index (rubber banding, pop-up
  177.      menus, etc.).  One solution for GLUT would be to simply
  178.      "advertise" what RGB triple (or possibly RGBA quadruple or simply 
  179.      A alone) generates transparency.  The problem with this approach
  180.      is that it forces programmers to avoid whatever arbitrary color
  181.      various systems decide is transparent.  This is a difficult
  182.      burden to place on programmers that want to portably make use of
  183.      overlays.
  184.      To actually support transparent RGBA overlays, there are really
  185.      two reaonsable options.  ONE: Simply mandate that true black is
  186.      the RGBA overlay transparent color (what IRIS GL did).  This is
  187.      nice for programmers since only one option, nice for existing SGI 
  188.      hardware, bad for anyone (including SGI) who wants to improve
  189.      upon "true black" RGB transparency. 
  190.      Or TWO: Provide a set of queriable "transparency types" (like
  191.      "true black" or "alpha == 0" or "true white" or even a queriable
  192.      transparent color).  This is harder for programmers, OK for
  193.      existing SGI hardware, and it leaves open the issue of what other 
  194.      modes are reasonable.
  195.      Option TWO seems the more general approach, but since hardware
  196.      designers will likely only implement a single mode (this is a
  197.      scan out issue where bandwidth is pressing issue), codifying
  198.      multiple speculative approaches nobody may ever implement seems
  199.      silly.  And option ONE fiats a suboptimal solution.
  200.      Therefore, I defer any decision of how GLUT should support RGBA
  201.      overlay transparency and leave support for it unimplemented.
  202.      Nobody has been pressing me for RGBA overlay transparency (though 
  203.      people have requested color index overlay transparency
  204.      repeatedly).  Geez, if you read this far you are either really
  205.      bored or maybe actually  interested in this topic.  Anyway, if
  206.      you have ideas (particularly if you plan on implementing a
  207.      hardware scheme for RGBA overlay transparency), I'd be
  208.      interested.
  209.      For the record, SGI's expiremental Framebufer Configuration
  210.      experimental GLX extension uses option TWO.  Transparency modes
  211.      for "none" and "RGB" are defined (others could be defined later). 
  212.      What RGB value is the transparent one must be queried. 
  213.      I was hoping GLUT could have something that required less work
  214.      from the programmer to use portably. -mjk */
  215.   __glutWarning("RGBA overlays are not supported by GLUT (for now).");
  216.   return NULL;
  217. }
  218. static XVisualInfo *
  219. getOverlayVisualInfo(unsigned int mode)
  220. {
  221.   /* XXX GLUT_LUMINANCE not implemented for GLUT 3.0. */
  222.   if (GLUT_WIND_IS_LUMINANCE(mode))
  223.     return NULL;
  224.   if (GLUT_WIND_IS_RGB(mode))
  225.     return getOverlayVisualInfoRGB(mode);
  226.   else
  227.     return getOverlayVisualInfoCI(mode);
  228. }
  229. #if !defined(_WIN32)
  230. /* The GLUT overlay can come and go, and the overlay window has
  231.    a distinct X window ID.  Logically though, GLUT treats the
  232.    normal and overlay windows as a unified window.  In
  233.    particular, X input events typically go to the overlay window 
  234.    since it is "on top of" the normal window.  When an overlay
  235.    window ID is destroyed (due to glutRemoveOverlay or a call to 
  236.    glutEstablishOverlay when an overlay already exists), we
  237.    still keep track of the overlay window ID until we get back a 
  238.    DestroyNotify event for the overlay window. Otherwise, we
  239.    could lose track of X input events sent to a destroyed
  240.    overlay.  To avoid this, we keep the destroyed overlay window 
  241.    ID on a "stale window" list.  This lets us properly route X
  242.    input events generated on destroyed overlay windows to the
  243.    proper GLUT window. */
  244. static void
  245. addStaleWindow(GLUTwindow * window, Window win)
  246. {
  247.   GLUTstale *entry;
  248.   entry = (GLUTstale *) malloc(sizeof(GLUTstale));
  249.   if (!entry)
  250.     __glutFatalError("out of memory");
  251.   entry->window = window;
  252.   entry->win = win;
  253.   entry->next = __glutStaleWindowList;
  254.   __glutStaleWindowList = entry;
  255. }
  256. #endif
  257. void
  258. __glutFreeOverlay(GLUToverlay * overlay)
  259. {
  260.   if (overlay->visAlloced)
  261.     XFree(overlay->vis);
  262.   XDestroyWindow(__glutDisplay, overlay->win);
  263.   glXDestroyContext(__glutDisplay, overlay->ctx);
  264.   if (overlay->colormap) {
  265.     /* Only color index overlays have colormap data structure. */
  266.     __glutFreeColormap(overlay->colormap);
  267.   }
  268.   free(overlay);
  269. }
  270. static XVisualInfo *
  271. determineOverlayVisual(int *treatAsSingle, Bool * visAlloced, void **fbc)
  272. {
  273.   if (__glutDisplayString) {
  274.     XVisualInfo *vi;
  275.     int i;
  276.     /* __glutDisplayString should be NULL except if
  277.        glutInitDisplayString has been called to register a
  278.        different display string.  Calling glutInitDisplayString
  279.        means using a string instead of an integer mask determine 
  280.        the visual to use. Using the function pointer variable
  281.        __glutDetermineVisualFromString below avoids linking in
  282.        the code for implementing glutInitDisplayString (ie,
  283.        glut_dstr.o) unless glutInitDisplayString gets called by
  284.        the application. */
  285.     assert(__glutDetermineVisualFromString);
  286.     /* Try three overlay layers. */
  287.     *visAlloced = False;
  288.     *fbc = NULL;
  289.     for (i = 1; i <= 3; i++) {
  290.       requiredOverlayCriteria[0].value = i;
  291.       vi = __glutDetermineVisualFromString(__glutDisplayString, treatAsSingle,
  292.         requiredOverlayCriteria, numRequiredOverlayCriteria,
  293.         requiredOverlayCriteriaMask, fbc);
  294.       if (vi) {
  295.         return vi;
  296.       }
  297.     }
  298.     return NULL;
  299.   } else {
  300.     *visAlloced = True;
  301.     *fbc = NULL;
  302.     return __glutDetermineVisual(__glutDisplayMode,
  303.       treatAsSingle, getOverlayVisualInfo);
  304.   }
  305. }
  306. /* CENTRY */
  307. void APIENTRY
  308. glutEstablishOverlay(void)
  309. {
  310.   GLUToverlay *overlay;
  311.   GLUTwindow *window;
  312.   XSetWindowAttributes wa;
  313. #if defined(GLX_VERSION_1_1) && defined(GLX_SGIX_fbconfig)
  314.   GLXFBConfigSGIX fbc;
  315. #else
  316.   void *fbc;
  317. #endif
  318.   /* Register a routine to free an overlay with glut_win.c;
  319.      this keeps glut_win.c from pulling in all of
  320.      glut_overlay.c when no overlay functionality is used by
  321.      the application. */
  322.   __glutFreeOverlayFunc = __glutFreeOverlay;
  323.   window = __glutCurrentWindow;
  324.   /* Allow for an existant overlay to be re-established perhaps
  325.      if you wanted a different display mode. */
  326.   if (window->overlay) {
  327. #if !defined(_WIN32)
  328.     addStaleWindow(window, window->overlay->win);
  329. #endif
  330.     __glutFreeOverlay(window->overlay);
  331.   }
  332.   overlay = (GLUToverlay *) malloc(sizeof(GLUToverlay));
  333.   if (!overlay)
  334.     __glutFatalError("out of memory.");
  335.   overlay->vis = determineOverlayVisual(&overlay->treatAsSingle,
  336.     &overlay->visAlloced, (void **) &fbc);
  337.   if (!overlay->vis) {
  338.     __glutFatalError("lacks overlay support.");
  339.   }
  340. #if defined(GLX_VERSION_1_1) && defined(GLX_SGIX_fbconfig)
  341.   if (fbc) {
  342.     window->ctx = glXCreateContextWithConfigSGIX(__glutDisplay, fbc,
  343.       GLX_RGBA_TYPE_SGIX, None, __glutTryDirect);
  344.   } else
  345. #endif
  346.   {
  347.     overlay->ctx = glXCreateContext(__glutDisplay, overlay->vis,
  348.       None, __glutTryDirect);
  349.   }
  350.   if (!overlay->ctx) {
  351.     __glutFatalError(
  352.       "failed to create overlay OpenGL rendering context.");
  353.   }
  354. #if !defined(_WIN32)
  355.   overlay->isDirect = glXIsDirect(__glutDisplay, overlay->ctx);
  356.   if (__glutForceDirect) {
  357.     if (!overlay->isDirect) {
  358.       __glutFatalError("direct rendering not possible.");
  359.     }
  360.   }
  361. #endif
  362.   __glutSetupColormap(overlay->vis, &overlay->colormap, &overlay->cmap);
  363.   overlay->transparentPixel = __glutGetTransparentPixel(__glutDisplay,
  364.     overlay->vis);
  365.   wa.colormap = overlay->cmap;
  366.   wa.background_pixel = overlay->transparentPixel;
  367.   wa.event_mask = window->eventMask & GLUT_OVERLAY_EVENT_FILTER_MASK;
  368.   wa.border_pixel = 0;
  369. #if defined(_WIN32)
  370.   /* XXX Overlays not supported in Win32 yet. */
  371. #else
  372.   overlay->win = XCreateWindow(__glutDisplay,
  373.     window->win,
  374.     0, 0, window->width, window->height, 0,
  375.     overlay->vis->depth, InputOutput, overlay->vis->visual,
  376.     CWBackPixel | CWBorderPixel | CWEventMask | CWColormap,
  377.     &wa);
  378. #endif
  379.   if (window->children) {
  380.     /* Overlay window must be lowered below any GLUT
  381.        subwindows. */
  382.     XLowerWindow(__glutDisplay, overlay->win);
  383.   }
  384.   XMapWindow(__glutDisplay, overlay->win);
  385.   overlay->shownState = 1;
  386.   overlay->display = NULL;
  387.   /* Make sure a reshape gets delivered. */
  388.   window->forceReshape = True;
  389. #if !defined(_WIN32)
  390.   __glutPutOnWorkList(__glutToplevelOf(window), GLUT_COLORMAP_WORK);
  391. #endif
  392.   window->overlay = overlay;
  393.   glutUseLayer(GLUT_OVERLAY);
  394.   if (overlay->treatAsSingle) {
  395.     glDrawBuffer(GL_FRONT);
  396.     glReadBuffer(GL_FRONT);
  397.   }
  398. }
  399. void APIENTRY
  400. glutRemoveOverlay(void)
  401. {
  402.   GLUTwindow *window = __glutCurrentWindow;
  403.   GLUToverlay *overlay = __glutCurrentWindow->overlay;
  404.   if (!window->overlay)
  405.     return;
  406.   /* If using overlay, switch to the normal layer. */
  407.   if (window->renderWin == overlay->win) {
  408.     glutUseLayer(GLUT_NORMAL);
  409.   }
  410. #if !defined(_WIN32)
  411.   addStaleWindow(window, overlay->win);
  412. #endif
  413.   __glutFreeOverlay(overlay);
  414.   window->overlay = NULL;
  415. #if !defined(_WIN32)
  416.   __glutPutOnWorkList(__glutToplevelOf(window), GLUT_COLORMAP_WORK);
  417. #endif
  418. }
  419. void APIENTRY
  420. glutUseLayer(GLenum layer)
  421. {
  422.   GLUTwindow *window = __glutCurrentWindow;
  423.   switch (layer) {
  424.   case GLUT_NORMAL:
  425. #ifdef _WIN32
  426.     window->renderDc = window->hdc;
  427. #endif
  428.     window->renderWin = window->win;
  429.     window->renderCtx = window->ctx;
  430.     break;
  431.   case GLUT_OVERLAY:
  432.     /* Did you crash here?  Calling glutUseLayer(GLUT_OVERLAY)
  433.        without an overlay established is erroneous.  Fix your
  434.        code. */
  435. #ifdef _WIN32
  436.     window->renderDc = window->overlay->hdc;
  437. #endif
  438.     window->renderWin = window->overlay->win;
  439.     window->renderCtx = window->overlay->ctx;
  440.     break;
  441.   default:
  442.     __glutWarning("glutUseLayer: unknown layer, %d.", layer);
  443.     break;
  444.   }
  445.   __glutSetWindow(window);
  446. }
  447. void APIENTRY
  448. glutPostOverlayRedisplay(void)
  449. {
  450.   __glutPostRedisplay(__glutCurrentWindow, GLUT_OVERLAY_REDISPLAY_WORK);
  451. }
  452. /* The advantage of this routine is that it saves the cost of a
  453.    glutSetWindow call (entailing an expensive OpenGL context
  454.    switch), particularly useful when multiple windows need
  455.    redisplays posted at the same times. */
  456. void APIENTRY
  457. glutPostWindowOverlayRedisplay(int win)
  458. {
  459.   __glutPostRedisplay(__glutWindowList[win - 1], GLUT_OVERLAY_REDISPLAY_WORK);
  460. }
  461. void APIENTRY
  462. glutOverlayDisplayFunc(GLUTdisplayCB displayFunc)
  463. {
  464.   if (!__glutCurrentWindow->overlay) {
  465.     __glutWarning("glutOverlayDisplayFunc: window has no overlay established");
  466.     return;
  467.   }
  468.   __glutCurrentWindow->overlay->display = displayFunc;
  469. }
  470. void APIENTRY
  471. glutHideOverlay(void)
  472. {
  473.   if (!__glutCurrentWindow->overlay) {
  474.     __glutWarning("glutHideOverlay: window has no overlay established");
  475.     return;
  476.   }
  477.   XUnmapWindow(__glutDisplay, __glutCurrentWindow->overlay->win);
  478.   __glutCurrentWindow->overlay->shownState = 0;
  479. }
  480. void APIENTRY
  481. glutShowOverlay(void)
  482. {
  483.   if (!__glutCurrentWindow->overlay) {
  484.     __glutWarning("glutShowOverlay: window has no overlay established");
  485.     return;
  486.   }
  487.   XMapWindow(__glutDisplay, __glutCurrentWindow->overlay->win);
  488.   __glutCurrentWindow->overlay->shownState = 1;
  489. }
  490. int APIENTRY
  491. glutLayerGet(GLenum param)
  492. {
  493.   switch (param) {
  494.   case GLUT_OVERLAY_POSSIBLE:
  495.     {
  496.       XVisualInfo *vi;
  497.       Bool dummy, visAlloced;
  498.       void *fbc;
  499.       vi = determineOverlayVisual(&dummy, &visAlloced, &fbc);
  500.       if (vi) {
  501.         if (visAlloced)
  502.           XFree(vi);
  503.         return 1;
  504.       }
  505.       return 0;
  506.     }
  507.   case GLUT_LAYER_IN_USE:
  508.     return __glutCurrentWindow->renderWin != __glutCurrentWindow->win;
  509.   case GLUT_HAS_OVERLAY:
  510.     return __glutCurrentWindow->overlay != NULL;
  511.   case GLUT_TRANSPARENT_INDEX:
  512.     if (__glutCurrentWindow->overlay) {
  513.       return __glutCurrentWindow->overlay->transparentPixel;
  514.     } else {
  515.       return -1;
  516.     }
  517.   case GLUT_NORMAL_DAMAGED:
  518.     /* __glutWindowDamaged is used so the damage state within
  519.        the window (or overlay belwo) can be cleared before
  520.        calling a display callback so on return, the state does
  521.        not have to be cleared (since upon return from the
  522.        callback the window could be destroyed (or layer
  523.        removed). */
  524.     return (__glutCurrentWindow->workMask & GLUT_REPAIR_WORK)
  525.       || __glutWindowDamaged;
  526.   case GLUT_OVERLAY_DAMAGED:
  527.     if (__glutCurrentWindow->overlay) {
  528.       return (__glutCurrentWindow->workMask & GLUT_OVERLAY_REPAIR_WORK)
  529.         || __glutWindowDamaged;
  530.     } else {
  531.       return -1;
  532.     }
  533.   default:
  534.     __glutWarning("invalid glutLayerGet param: %d", param);
  535.     return -1;
  536.   }
  537. }
  538. /* ENDCENTRY */