src/rt/freeobjmem.c

#ifndef lint
static const char       RCSid[] = "$Id: freeobjmem.c,v 2.9 2013/12/09 17:56:25 greg Exp $";
#endif
/*
 * Free memory associated with object(s)
 *
 * External symbols declared in ray.h
 */

#include "copyright.h"

#include "ray.h"
#include "otypes.h"
#include "rtotypes.h"
#include "bsdf.h"
#include "face.h"
#include "cone.h"
#include "instance.h"
#include "data.h"
#include "font.h"
#include "func.h"
#include "mesh.h"


int
free_os(                        /* free unneeded memory for object */
        OBJREC  *op
)
{
        if (op->os == NULL)
                return(0);
        if (hasfunc(op->otype)) {
                freefunc(op);
                return(1);
        }
        switch (op->otype) {
        case OBJ_FACE:          /* polygon */
                freeface(op);
                return(1);
        case OBJ_CONE:          /* cone */
        case OBJ_RING:          /* disk */
        case OBJ_CYLINDER:      /* cylinder */
        case OBJ_CUP:           /* inverted cone */
        case OBJ_TUBE:          /* inverted cylinder */
                freecone(op);
                return(1);
        case OBJ_INSTANCE:      /* octree instance */
                freeinstance(op);
                return(1);
        case OBJ_MESH:          /* mesh instance */
                freemeshinst(op);
                return(1);
        case PAT_BTEXT:         /* monochromatic text */
        case PAT_CTEXT:         /* colored text */
        case MIX_TEXT:          /* mixing text */
                freetext(op);
                return(1);
        case MAT_CLIP:          /* clipping surface */
        case MAT_SPOT:          /* spot light source */
        case PAT_SPECTRUM:      /* constant spectrum */
        case PAT_SPECFILE:      /* spectrum from data file */
                free((void *)op->os);
                op->os = NULL;
                return(1);
        }
#ifdef DEBUG
        objerror(op, WARNING, "cannot free structure");
#endif
        return(0);
}


int
free_objs(              /* free some object structures */
        OBJECT  on,
        OBJECT  no
)
{
        int     nfreed;
        OBJREC  *op;

        for (nfreed = 0; no-- > 0; on++) {
                op = objptr(on);
                if (op->os != NULL)
                        nfreed += free_os(op);
        }
        return(nfreed);
}


void
free_objmem(void)                       /* free all object cache memory */
{
        free_objs(0, nobjects);
        freedata(NULL);
        freefont(NULL);
        SDfreeCache(NULL);
}
Revision:	2.10
Committed:	Wed Nov 15 18:02:52 2023 UTC (23 months, 3 weeks ago) by greg
Content type:	text/plain
Branch:	MAIN
Changes since 2.9:	+3 -1 lines
Log Message:	feat(rpict,rtrace,rcontrib,rtpict): Hyperspectral rendering (except photon map)
#	User	Rev	Content
1	greg	2.1	#ifndef lint
2	greg	2.10	static const char RCSid[] = "$Id: freeobjmem.c,v 2.9 2013/12/09 17:56:25 greg Exp $";
3	greg	2.1	#endif
4			/*
5			* Free memory associated with object(s)
6	greg	2.4	*
7			* External symbols declared in ray.h
8	greg	2.1	*/
9
10	greg	2.5	#include "copyright.h"
11	greg	2.4
12			#include "ray.h"
13	greg	2.1	#include "otypes.h"
14	schorsch	2.7	#include "rtotypes.h"
15	greg	2.8	#include "bsdf.h"
16	greg	2.4	#include "face.h"
17			#include "cone.h"
18			#include "instance.h"
19			#include "data.h"
20			#include "font.h"
21	schorsch	2.7	#include "func.h"
22			#include "mesh.h"
23	greg	2.1
24
25	greg	2.9	int
26	schorsch	2.7	free_os( /* free unneeded memory for object */
27	greg	2.9	OBJREC *op
28	schorsch	2.7	)
29	greg	2.1	{
30			if (op->os == NULL)
31			return(0);
32			if (hasfunc(op->otype)) {
33			freefunc(op);
34			return(1);
35			}
36			switch (op->otype) {
37			case OBJ_FACE: /* polygon */
38			freeface(op);
39			return(1);
40			case OBJ_CONE: /* cone */
41			case OBJ_RING: /* disk */
42			case OBJ_CYLINDER: /* cylinder */
43			case OBJ_CUP: /* inverted cone */
44			case OBJ_TUBE: /* inverted cylinder */
45			freecone(op);
46			return(1);
47			case OBJ_INSTANCE: /* octree instance */
48			freeinstance(op);
49	greg	2.6	return(1);
50			case OBJ_MESH: /* mesh instance */
51			freemeshinst(op);
52	greg	2.1	return(1);
53			case PAT_BTEXT: /* monochromatic text */
54			case PAT_CTEXT: /* colored text */
55			case MIX_TEXT: /* mixing text */
56			freetext(op);
57			return(1);
58			case MAT_CLIP: /* clipping surface */
59	greg	2.4	case MAT_SPOT: /* spot light source */
60	greg	2.10	case PAT_SPECTRUM: /* constant spectrum */
61			case PAT_SPECFILE: /* spectrum from data file */
62	greg	2.4	free((void *)op->os);
63	greg	2.1	op->os = NULL;
64			return(1);
65	greg	2.4	}
66	greg	2.1	#ifdef DEBUG
67	greg	2.4	objerror(op, WARNING, "cannot free structure");
68	greg	2.1	#endif
69	greg	2.4	return(0);
70	greg	2.1	}
71
72
73	greg	2.9	int
74	schorsch	2.7	free_objs( /* free some object structures */
75	greg	2.9	OBJECT on,
76	schorsch	2.7	OBJECT no
77			)
78	greg	2.1	{
79			int nfreed;
80	greg	2.9	OBJREC *op;
81	greg	2.1
82			for (nfreed = 0; no-- > 0; on++) {
83			op = objptr(on);
84	greg	2.2	if (op->os != NULL)
85	greg	2.1	nfreed += free_os(op);
86			}
87			return(nfreed);
88			}
89
90
91	greg	2.9	void
92	schorsch	2.7	free_objmem(void) /* free all object cache memory */
93	greg	2.1	{
94	greg	2.2	free_objs(0, nobjects);
95	greg	2.1	freedata(NULL);
96			freefont(NULL);
97	greg	2.8	SDfreeCache(NULL);
98	greg	2.1	}