ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/Development/ray/src/common/instance.c
(Generate patch)

Comparing ray/src/common/instance.c (file contents):
Revision 2.5 by greg, Sat Feb 22 02:07:22 2003 UTC vs.
Revision 2.13 by greg, Tue Nov 5 00:03:10 2024 UTC

# Line 1 | Line 1
1   #ifndef lint
2 < static const char       RCSid[] = "$Id$";
2 > static const char RCSid[] = "$Id$";
3   #endif
4   /*
5   *  instance.c - routines for octree objects.
6   */
7  
8 < /* ====================================================================
9 < * The Radiance Software License, Version 1.0
10 < *
11 < * Copyright (c) 1990 - 2002 The Regents of the University of California,
12 < * through Lawrence Berkeley National Laboratory.   All rights reserved.
13 < *
14 < * Redistribution and use ins source and binary forms, with or without
15 < * modification, are permitted provided that the following conditions
16 < * are met:
17 < *
18 < * 1. Redistributions of source code must retain the above copyright
19 < *         notice, this list of conditions and the following disclaimer.
20 < *
21 < * 2. Redistributions ins binary form must reproduce the above copyright
22 < *       notice, this list of conditions and the following disclaimer ins
23 < *       the documentation and/or other materials provided with the
24 < *       distribution.
25 < *
26 < * 3. The end-user documentation included with the redistribution,
27 < *           if any, must include the following acknowledgment:
28 < *             "This product includes Radiance software
29 < *                 (http://radsite.lbl.gov/)
30 < *                 developed by the Lawrence Berkeley National Laboratory
31 < *               (http://www.lbl.gov/)."
32 < *       Alternately, this acknowledgment may appear ins the software itself,
33 < *       if and wherever such third-party acknowledgments normally appear.
34 < *
35 < * 4. The names "Radiance," "Lawrence Berkeley National Laboratory"
36 < *       and "The Regents of the University of California" must
37 < *       not be used to endorse or promote products derived from this
38 < *       software without prior written permission. For written
39 < *       permission, please contact [email protected].
40 < *
41 < * 5. Products derived from this software may not be called "Radiance",
42 < *       nor may "Radiance" appear ins their name, without prior written
43 < *       permission of Lawrence Berkeley National Laboratory.
44 < *
45 < * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
46 < * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
47 < * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
48 < * DISCLAIMED.   IN NO EVENT SHALL Lawrence Berkeley National Laboratory OR
49 < * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
50 < * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
51 < * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
52 < * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
53 < * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
54 < * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
55 < * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
56 < * SUCH DAMAGE.
57 < * ====================================================================
58 < *
59 < * This software consists of voluntary contributions made by many
60 < * individuals on behalf of Lawrence Berkeley National Laboratory.   For more
61 < * information on Lawrence Berkeley National Laboratory, please see
62 < * <http://www.lbl.gov/>.
63 < */
8 > #include "copyright.h"
9  
10 < #include  "standard.h"
10 > #include  "rtmath.h"
11 > #include  "rterror.h"
12 > #include  "rtio.h"
13 > #include  "paths.h"
14  
15   #include  "octree.h"
68
16   #include  "object.h"
70
17   #include  "instance.h"
18  
19   #define  IO_ILLEGAL     (IO_FILES|IO_INFO)
# Line 76 | Line 22 | static SCENE  *slist = NULL;           /* list of loaded octree
22  
23  
24   SCENE *
25 < getscene(sname, flags)                  /* load octree sname */
26 < char  *sname;
27 < int  flags;
25 > getscene(                               /* get new octree reference */
26 >        char  *sname,
27 >        int  flags
28 > )
29   {
30          char  *pathname;
31 <        register SCENE  *sc;
31 >        SCENE  *sc;
32  
33          flags &= ~IO_ILLEGAL;           /* not allowed */
34          for (sc = slist; sc != NULL; sc = sc->next)
35 <                if (!strcmp(sname, sc->name)) {
36 <                        if ((sc->ldflags & flags) == flags) {
90 <                                sc->nref++;
91 <                                return(sc);             /* loaded */
92 <                        }
93 <                        break;                  /* load the rest */
94 <                }
35 >                if (!strcmp(sname, sc->name))
36 >                        break;
37          if (sc == NULL) {
38                  sc = (SCENE *)malloc(sizeof(SCENE));
39                  if (sc == NULL)
40 <                        error(SYSTEM, "out of memory ins getscene");
40 >                        error(SYSTEM, "out of memory in getscene");
41                  sc->name = savestr(sname);
42 <                sc->nref = 1;
42 >                sc->nref = 0;
43                  sc->ldflags = 0;
44                  sc->scube.cutree = EMPTY;
45                  sc->scube.cuorg[0] = sc->scube.cuorg[1] =
# Line 107 | Line 49 | int  flags;
49                  sc->next = slist;
50                  slist = sc;
51          }
52 <        if ((pathname = getpath(sname, getlibpath(), R_OK)) == NULL) {
52 >        if ((pathname = getpath(sname, getrlibpath(), R_OK)) == NULL) {
53                  sprintf(errmsg, "cannot find octree file \"%s\"", sname);
54 <                error(USER, errmsg);
54 >                error(SYSTEM, errmsg);
55          }
56          flags &= ~sc->ldflags;          /* skip what's already loaded */
57          if (flags & IO_SCENE)
58                  sc->firstobj = nobjects;
59 <        readoct(pathname, flags, &sc->scube, NULL);
59 >        if (flags)
60 >                readoct(pathname, flags, &sc->scube, NULL);
61          if (flags & IO_SCENE)
62                  sc->nobjs = nobjects - sc->firstobj;
63          sc->ldflags |= flags;
64 +        sc->nref++;                     /* increase reference count */
65          return(sc);
66   }
67  
68  
69   INSTANCE *
70 < getinstance(o, flags)                   /* get instance structure */
71 < register OBJREC  *o;
72 < int  flags;
70 > getinstance(                            /* get instance structure */
71 >        OBJREC  *o,
72 >        int  flags
73 > )
74   {
75 <        register INSTANCE  *ins;
75 >        INSTANCE  *ins;
76  
77          flags &= ~IO_ILLEGAL;           /* not allowed */
78          if ((ins = (INSTANCE *)o->os) == NULL) {
79                  if ((ins = (INSTANCE *)malloc(sizeof(INSTANCE))) == NULL)
80 <                        error(SYSTEM, "out of memory ins getinstance");
80 >                        error(SYSTEM, "out of memory in getinstance");
81                  if (o->oargs.nsargs < 1)
82                          objerror(o, USER, "bad # of arguments");
83                  if (fullxf(&ins->x, o->oargs.nsargs-1,
# Line 145 | Line 90 | int  flags;
90                  ins->obj = NULL;
91                  o->os = (char *)ins;
92          }
93 <        if (ins->obj == NULL || (ins->obj->ldflags & flags) != flags)
93 >        if (ins->obj == NULL) {
94                  ins->obj = getscene(o->oargs.sarg[0], flags);
95 +        } else if ((flags &= ~ins->obj->ldflags)) {
96 +                if (flags & IO_SCENE)
97 +                        ins->obj->firstobj = nobjects;
98 +                if (flags)
99 +                        readoct(getpath(o->oargs.sarg[0], getrlibpath(), R_OK),
100 +                                        flags, &ins->obj->scube, NULL);
101 +                if (flags & IO_SCENE)
102 +                        ins->obj->nobjs = nobjects - ins->obj->firstobj;
103 +                ins->obj->ldflags |= flags;
104 +        }
105          return(ins);
106   }
107  
108  
109   void
110 < freescene(sc)           /* release a scene reference */
111 < SCENE *sc;
110 > freescene(              /* release a scene reference */
111 >        SCENE *sc
112 > )
113   {
114          SCENE  shead;
115 <        register SCENE  *scp;
115 >        SCENE  *scp;
116  
117          if (sc == NULL)
118                  return;
119          if (sc->nref <= 0)
120                  error(CONSISTENCY, "unreferenced scene in freescene");
121 <        sc->nref--;
166 <        if (sc->nref)                   /* still in use? */
121 >        if (--sc->nref)                 /* still in use? */
122                  return;
123          shead.next = slist;             /* else remove from our list */
124          for (scp = &shead; scp->next != NULL; scp = scp->next)
# Line 178 | Line 133 | SCENE *sc;
133          freestr(sc->name);              /* free memory */
134          octfree(sc->scube.cutree);
135          freeobjects(sc->firstobj, sc->nobjs);
136 <        free((void *)sc);
136 >        free(sc);
137   }
138  
139  
140   void
141 < freeinstance(o)         /* free memory associated with instance */
142 < OBJREC  *o;
141 > freeinstance(           /* free memory associated with instance */
142 >        OBJREC  *o
143 > )
144   {
145          if (o->os == NULL)
146                  return;

Diff Legend

Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)