home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / modelers / geomview / source.lha / Geomview / src / lib / gprim / vect / vectcreate.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-07-19  |  5.8 KB  |  229 lines
  1. /* Copyright (c) 1992 The Geometry Center; University of Minnesota
  2.    1300 South Second Street;  Minneapolis, MN  55454, USA;
  3.    
  4. This file is part of geomview/OOGL. geomview/OOGL is free software;
  5. you can redistribute it and/or modify it only under the terms given in
  6. the file COPYING, which you should have received along with this file.
  7. This and other related software may be obtained via anonymous ftp from
  8. geom.umn.edu; email: software@geom.umn.edu. */
  9. static char *copyright = "Copyright (C) 1992 The Geometry Center";
  10.  
  11. /* Authors: Charlie Gunn, Stuart Levy, Tamara Munzner, Mark Phillips */
  12.  
  13. #include "vectP.h"
  14.  
  15. /*
  16.  * Vect object creation, editing, copying, deletion.
  17.  */
  18.  
  19. Vect *
  20. VectCopy(register Vect *ov)
  21. {
  22.     register Vect  *v;
  23.  
  24.     if (ov == NULL) return (NULL);
  25.  
  26.     v = OOGLNewE(Vect, "new Vect");
  27.  
  28.     *v = *ov;
  29.     v->p = OOGLNewNE(HPoint3, ov->nvert, "Vect vertices");
  30.     v->c = ov->ncolor ? OOGLNewNE(ColorA, ov->ncolor, "Vect colors")
  31.               : NULL;
  32.     v->vnvert = OOGLNewNE(short, ov->nvec, "Vect nverts");
  33.     v->vncolor = OOGLNewNE(short, ov->nvec, "Vect nverts");
  34.  
  35.     memcpy(v->p, ov->p, ov->nvert * sizeof(HPoint3));
  36.     memcpy(v->c, ov->c, ov->ncolor * sizeof(ColorA));
  37.     memcpy(v->vnvert, ov->vnvert, ov->nvec * sizeof(short));
  38.     memcpy(v->vncolor, ov->vncolor, ov->nvec * sizeof(short));
  39.     return(v);
  40. }
  41.  
  42. void
  43. VectDelete( register Vect *v )
  44. {
  45.     if (v) {
  46.     if(v->p != NULL) OOGLFree(v->p);
  47.     if(v->c != NULL) OOGLFree(v->c);
  48.     if(v->vnvert != NULL) OOGLFree(v->vnvert);
  49.     }
  50. }
  51.  
  52. Vect *
  53. VectCreate ( Vect *exist, GeomClass *classp, va_list a_list )
  54. {
  55.     register Vect *vect;
  56.     int attr, copy = 1;
  57.     int police = 1;    /* by default, check the input to see it's good */
  58.  
  59.     short *vectcounts;    /* vectcounts[0..nvec-1] */
  60.     short *colorcounts;    /* colorcounts[0..nvec-1] */
  61.     Point3    *v3;
  62.     HPoint3    *v4;            /* vertices[0..nvert-1] */
  63.     ColorA    *colors;        /* colors[0..ncolor-1] */
  64.  
  65.     if (exist == NULL) {
  66.     vect = OOGLNewE(Vect, "new vect");
  67.         GGeomInit (vect, classp, VECTMAGIC, NULL);
  68.     vect->flag = 0;
  69.     vect->nvec = 0;
  70.     vect->nvert = 0;
  71.     vect->ncolor = 0;
  72.     vect->p = NULL;
  73.     vect->c = NULL;
  74.     vect->vnvert = NULL;
  75.     vect->vncolor = NULL;
  76.     } else {
  77.     /* Should check that exist is a vect */
  78.     vect = exist;
  79.     }
  80.  
  81.     while (attr = va_arg (a_list, int)) 
  82.       switch (attr) {
  83.      case CR_POLICE:
  84.         police = 1;
  85.         break;
  86.  
  87.      case CR_NOPOLICE:
  88.         police = 0;
  89.         break;
  90.  
  91.     case CR_FLAG:
  92.         vect->flag = va_arg (a_list, int);
  93.         break;
  94.  
  95.     case CR_NVECT:
  96.         vect->nvec = va_arg (a_list, int);
  97.         break;
  98.  
  99.     case CR_NVERT:
  100.         vect->nvert = va_arg (a_list, int);
  101.         break;
  102.  
  103.     case CR_NCOLR:
  104.         vect->ncolor = va_arg (a_list, int);
  105.         break;
  106.  
  107.     case CR_VECTC:
  108.         vectcounts = va_arg (a_list, short *);
  109.         if(vect->vnvert) OOGLFree(vect->vnvert);
  110.             if (vectcounts == NULL) {
  111.                vect->vnvert = NULL;
  112.                vect->nvert = 0;
  113.             } else if (copy) {
  114.             vect->vnvert = OOGLNewNE(short, vect->nvec, "vect vert counts");
  115.             memcpy(vect->vnvert, vectcounts, vect->nvec*sizeof(*vect->vnvert));
  116.             } else {
  117.         vect->vnvert = vectcounts;
  118.         }
  119.         break;
  120.  
  121.     case CR_COLRC:
  122.         colorcounts = va_arg (a_list, short *);
  123.         if(vect->vncolor) OOGLFree(vect->vncolor);
  124.             if (colorcounts == NULL) {
  125.         vect->vncolor = NULL;
  126.         vect->nvert = 0;
  127.             } else if (copy) {
  128.             vect->vncolor = OOGLNewNE(short, vect->nvec, "vect vert counts");
  129.             memcpy(vect->vncolor, colorcounts, vect->nvec*sizeof(*vect->vncolor));
  130.             } else {
  131.         vect->vncolor = colorcounts;
  132.         }
  133.         break;
  134.  
  135.     case CR_POINT:
  136.         v3 = va_arg (a_list, Point3 *);
  137.         if(vect->p) OOGLFree(vect->p);
  138.             if (v3 == NULL) {
  139.                vect->p = NULL;
  140.                vect->nvert = 0;
  141.             } else {
  142.             vect->p = OOGLNewNE(HPoint3, vect->nvert, "vect points");
  143.         Pt3ToPt4(v3, vect->p, vect->nvert);
  144.         if(!copy) OOGLFree(v3);
  145.         }
  146.         break;
  147.  
  148.     case CR_POINT4:
  149.         v4 = va_arg (a_list, HPoint3 *);
  150.         if(vect->p) OOGLFree(vect->p);
  151.             if (v4 == NULL) {
  152.                vect->p = NULL;
  153.                vect->nvert = 0;
  154.             } else if (copy) {
  155.             vect->p = OOGLNewNE(HPoint3, vect->nvert, "vect points");
  156.             memcpy(vect->p, v4, vect->nvert*sizeof(HPoint3));
  157.             } else {
  158.         vect->p = v4;
  159.         }
  160.         break;
  161.  
  162.     case CR_COLOR:
  163.         colors = va_arg (a_list, ColorA *);
  164.         if(vect->c) OOGLFree(vect->c);
  165.             if (colors == NULL) {
  166.                vect->c = NULL;
  167.                vect->ncolor = 0;
  168.             } else if (copy) {
  169.             vect->c = OOGLNewNE(ColorA, vect->ncolor, "vect colors");
  170.             memcpy(vect->c, colors, vect->ncolor*sizeof(ColorA));
  171.             } else {
  172.         vect->c = colors;
  173.         }
  174.         break;
  175.  
  176.     default:
  177.         if (GeomDecorate (vect, ©, attr, &a_list)) {
  178.         OOGLError (0, "VectCreate: Undefined option: %d\n", attr);
  179.         OOGLFree (vect);
  180.         return NULL;
  181.         }
  182.     }
  183.  
  184.  
  185.     if (police)    {
  186.       if(0 > vect->ncolor || 0 > vect->nvec )
  187.     OOGLError(0, "VectCreate: ncol=%d nvert=%d; need 0<ncol<nvert",vect->ncolor, vect->nvert);
  188.       if (    0 > vect->nvec ||
  189.         vect->nvec > vect->nvert || 
  190.         vect->nvert > 99999999) {
  191.     OOGLError (0, "VectCreate: nvec=%d, nvert=%d; need 0<=nvec<=nvert<=1e8", vect->nvec, vect->nvert);
  192.     return(NULL);
  193.       }
  194.  
  195.       if (!VectSane(vect)) {
  196.       OOGLError (0, "VectCreate: Bogus data supplied");
  197.       GeomDelete((Geom *)vect);
  198.       return NULL;
  199.         }
  200.       }    /* end police work */
  201.  
  202.     if (exist != NULL) return exist;
  203.  
  204.     return vect;
  205. }
  206.  
  207. int
  208. VectSane(vect)
  209.     register Vect *vect;
  210. {
  211.     register int i;
  212.     register int vleft, cleft;
  213.     register short *p, *c;
  214.  
  215.     if(!vSane(vect))
  216.         return(0);
  217.     vleft = vect->nvert;
  218.     cleft = vect->ncolor;
  219.     for(i = vect->nvec, p = vect->vnvert, c = vect->vncolor; --i >= 0; p++, c++) {
  220.         if(*p == 0 || (vleft -= vcount(*p)) < 0)
  221.             return(0);
  222.         if(*c < 0 || (cleft -= *c) < 0)
  223.             return(0);
  224.     }
  225.     if(vleft || cleft)
  226.         return(0);
  227.     return(1);
  228. }
  229.