home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / X / mit / lib / Xmu / StrToGrav.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-11-30  |  3.2 KB  |  93 lines
  1. /*
  2.  * $XConsortium: StrToGrav.c,v 1.4 90/11/30 17:00:50 rws Exp $
  3.  *
  4.  * Copyright 1989 Massachusetts Institute of Technology
  5.  *
  6.  * Permission to use, copy, modify, and distribute this software and its
  7.  * documentation for any purpose and without fee is hereby granted, provided
  8.  * that the above copyright notice appear in all copies and that both that
  9.  * copyright notice and this permission notice appear in supporting
  10.  * documentation, and that the name of M.I.T. not be used in advertising
  11.  * or publicity pertaining to distribution of the software without specific,
  12.  * written prior permission.  M.I.T. makes no representations about the
  13.  * suitability of this software for any purpose.  It is provided "as is"
  14.  * without express or implied warranty.
  15.  *
  16.  * M.I.T. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
  17.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL M.I.T.
  18.  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  19.  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
  20.  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN 
  21.  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  22.  */
  23.  
  24.  
  25. #include <X11/Intrinsic.h>
  26. #include <X11/Xmu/Converters.h>
  27.  
  28. #define done(address, type) \
  29.         { (*toVal).size = sizeof(type); (*toVal).addr = (caddr_t) address; }
  30.  
  31. static struct _namepair {
  32.     XrmQuark quark;
  33.     char *name;
  34.     XtGravity gravity;
  35. } names[] = {
  36.     { NULLQUARK, XtEForget, ForgetGravity },
  37.     { NULLQUARK, XtENorthWest, NorthWestGravity },
  38.     { NULLQUARK, XtENorth, NorthGravity },
  39.     { NULLQUARK, XtENorthEast, NorthEastGravity },
  40.     { NULLQUARK, XtEWest, WestGravity },
  41.     { NULLQUARK, XtECenter, CenterGravity },
  42.     { NULLQUARK, XtEEast, EastGravity },
  43.     { NULLQUARK, XtESouthWest, SouthWestGravity },
  44.     { NULLQUARK, XtESouth, SouthGravity },
  45.     { NULLQUARK, XtESouthEast, SouthEastGravity },
  46.     { NULLQUARK, XtEStatic, StaticGravity },
  47.     { NULLQUARK, XtEUnmap, UnmapGravity },
  48.     { NULLQUARK, XtEleft, WestGravity },
  49.     { NULLQUARK, XtEtop, NorthGravity },
  50.     { NULLQUARK, XtEright, EastGravity },
  51.     { NULLQUARK, XtEbottom, SouthGravity },
  52.     { NULLQUARK, NULL, ForgetGravity }
  53. };
  54.  
  55. void XmuCvtStringToGravity (args, num_args, fromVal, toVal)
  56.     XrmValuePtr args;
  57.     Cardinal    *num_args;
  58.     XrmValuePtr fromVal;
  59.     XrmValuePtr toVal;
  60. {
  61.     static Boolean haveQuarks = FALSE;
  62.     char lowerName[40];
  63.     XrmQuark q;
  64.     char *s;
  65.     struct _namepair *np;
  66.  
  67.     if (*num_args != 0)
  68.         XtWarningMsg("wrongParameters","cvtStringToGravity","XtToolkitError",
  69.                   "String to Gravity conversion needs no extra arguments",
  70.                   (String *) NULL, (Cardinal *)NULL);
  71.  
  72.     if (!haveQuarks) {
  73.     for (np = names; np->name; np++) {
  74.         np->quark = XrmPermStringToQuark (np->name);
  75.     }
  76.     haveQuarks = TRUE;
  77.     }
  78.  
  79.     s = (char *) fromVal->addr;
  80.     if (strlen(s) < sizeof lowerName) {
  81.     XmuCopyISOLatin1Lowered (lowerName, s);
  82.     q = XrmStringToQuark (lowerName);
  83.  
  84.     for (np = names; np->name; np++) {
  85.         if (np->quark == q) {
  86.         done (&np->gravity, XtGravity);
  87.         return;
  88.         }
  89.     }
  90.     }
  91.     XtStringConversionWarning((char *) fromVal->addr, XtRGravity);
  92. }
  93.