Fix syntax for ID keyword.
[blender-staging.git] / source / blender / blenloader / intern / undofile.c
1 /**
2  * $Id$
3  *
4  * ***** BEGIN GPL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software Foundation,
18  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
19  *
20  * The Original Code is Copyright (C) 2004 Blender Foundation
21  * All rights reserved.
22  *
23  * The Original Code is: all of this file.
24  *
25  * Contributor(s): none yet.
26  *
27  * ***** END GPL LICENSE BLOCK *****
28  * .blend file reading entry point
29  */
30
31 #ifdef HAVE_CONFIG_H
32 #include <config.h>
33 #endif
34
35 #include <stdlib.h>
36 #include <string.h>
37 #include <stdio.h>
38 #include <math.h>
39
40 #include "MEM_guardedalloc.h"
41
42 #include "DNA_listBase.h"
43 #include "DNA_userdef_types.h"
44
45 #include "BKE_utildefines.h"
46 #include "BKE_global.h"
47
48 #include "BLO_undofile.h"
49
50 #include "BLI_blenlib.h"
51 #include "BLI_linklist.h"
52
53
54
55 /* **************** support for memory-write, for undo buffers *************** */
56
57 /* not memfile itself */
58 void BLO_free_memfile(MemFile *memfile)
59 {
60         MemFileChunk *chunk;
61         
62         while( (chunk = (memfile->chunks.first) ) ) {
63                 if(chunk->ident==0) MEM_freeN(chunk->buf);
64                 BLI_remlink(&memfile->chunks, chunk);
65                 MEM_freeN(chunk);
66         }
67         memfile->size= 0;
68 }
69
70 /* to keep list of memfiles consistent, 'first' is always first in list */
71 /* result is that 'first' is being freed */
72 void BLO_merge_memfile(MemFile *first, MemFile *second)
73 {
74         MemFileChunk *fc, *sc;
75         
76         fc= first->chunks.first;
77         sc= second->chunks.first;
78         while (fc || sc) {
79                 if(fc && sc) {
80                         if(sc->ident) {
81                                 sc->ident= 0;
82                                 fc->ident= 1;
83                         }
84                 }
85                 if(fc) fc= fc->next;
86                 if(sc) sc= sc->next;
87         }
88         
89         BLO_free_memfile(first);
90 }
91
92 static int my_memcmp(int *mem1, int *mem2, int len)
93 {
94         register int a= len, *mema= mem1, *memb= mem2;
95         
96         while(a--) {
97                 if( *mema != *memb) return 1;
98                 mema++;
99                 memb++;
100         }
101         return 0;
102 }
103
104 void add_memfilechunk(MemFile *compare, MemFile *current, char *buf, unsigned int size)
105 {
106         static MemFileChunk *compchunk=NULL;
107         MemFileChunk *curchunk;
108         
109         /* this function inits when compare != NULL or when current==NULL */
110         if(compare) {
111                 compchunk= compare->chunks.first;
112                 return;
113         }
114         if(current==NULL) {
115                 compchunk= NULL;
116                 return;
117         }
118         
119         curchunk= MEM_mallocN(sizeof(MemFileChunk), "MemFileChunk");
120         curchunk->size= size;
121         curchunk->buf= NULL;
122         curchunk->ident= 0;
123         BLI_addtail(&current->chunks, curchunk);
124         
125         /* we compare compchunk with buf */
126         if(compchunk) {
127                 if(compchunk->size == curchunk->size) {
128                         if( my_memcmp((int *)compchunk->buf, (int *)buf, size/4)==0) {
129                                 curchunk->buf= compchunk->buf;
130                                 curchunk->ident= 1;
131                         }
132                 }
133                 compchunk= compchunk->next;
134         }
135         
136         /* not equal... */
137         if(curchunk->buf==NULL) {
138                 curchunk->buf= MEM_mallocN(size, "Chunk buffer");
139                 memcpy(curchunk->buf, buf, size);
140                 current->size += size;
141         }
142 }
143