Orange:
[blender-staging.git] / source / blender / avi / intern / endian.c
1 /**
2  * endian.h
3  *
4  * This is external code. Streams bytes to output depending on the
5  * endianness of the system.
6  *
7  * $Id$ 
8  *
9  * ***** BEGIN GPL/BL DUAL LICENSE BLOCK *****
10  *
11  * This program is free software; you can redistribute it and/or
12  * modify it under the terms of the GNU General Public License
13  * as published by the Free Software Foundation; either version 2
14  * of the License, or (at your option) any later version. The Blender
15  * Foundation also sells licenses for use in proprietary software under
16  * the Blender License.  See http://www.blender.org/BL/ for information
17  * about this.
18  *
19  * This program is distributed in the hope that it will be useful,
20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  * GNU General Public License for more details.
23  *
24  * You should have received a copy of the GNU General Public License
25  * along with this program; if not, write to the Free Software Foundation,
26  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
27  *
28  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
29  * All rights reserved.
30  *
31  * The Original Code is: all of this file.
32  *
33  * Contributor(s): none yet.
34  *
35  * ***** END GPL/BL DUAL LICENSE BLOCK *****
36  *  */
37
38 #ifdef HAVE_CONFIG_H
39 #include <config.h>
40 #endif
41
42 #include <stdlib.h>
43 #include <string.h>
44 #include <stdio.h> 
45 #include "AVI_avi.h"
46 #include "endian.h"
47 #include "avi_intern.h"
48
49 #if defined(__sgi) || defined (__sparc) || defined (__sparc__) || defined (__PPC__) || defined (__ppc__) || defined (__BIG_ENDIAN__)
50 #define WORDS_BIGENDIAN
51 #endif
52
53 static void invert (int *num) {
54         int new=0,i,j;
55
56         for (j=0; j < 4; j++) {
57                 for (i=0; i<8; i++) {
58                         new |= ((*num>>(j*8+i))&1)<<((3-j)*8+i);
59                 }
60         }
61         
62         *num = new;
63 }
64
65 static void sinvert (short int *num) {
66         short int new=0;
67         int i,j;
68
69         for (j=0; j < 2; j++) {
70                 for (i=0; i<8; i++) {
71                         new |= ((*num>>(j*8+i))&1)<<((1-j)*8+i);
72                 }
73         }
74
75         *num = new;
76 }
77
78 static void Ichunk (AviChunk *chunk) {
79         invert (&chunk->fcc);
80         invert (&chunk->size);
81 }
82
83 #ifdef WORDS_BIGENDIAN
84 static void Ilist (AviList *list){
85         invert (&list->fcc);
86         invert (&list->size);
87         invert (&list->ids);
88 }
89
90 static void Imainh (AviMainHeader *mainh) {
91         invert (&mainh->fcc);
92         invert (&mainh->size);
93         invert (&mainh->MicroSecPerFrame);
94         invert (&mainh->MaxBytesPerSec);
95         invert (&mainh->PaddingGranularity);
96         invert (&mainh->Flags);
97         invert (&mainh->TotalFrames);
98         invert (&mainh->InitialFrames);
99         invert (&mainh->Streams);
100         invert (&mainh->SuggestedBufferSize);
101         invert (&mainh->Width);
102         invert (&mainh->Height);
103         invert (&mainh->Reserved[0]);
104         invert (&mainh->Reserved[1]);
105         invert (&mainh->Reserved[2]);
106         invert (&mainh->Reserved[3]);
107 }
108
109 static void Istreamh (AviStreamHeader *streamh) {
110         invert (&streamh->fcc);
111         invert (&streamh->size);
112         invert (&streamh->Type);
113         invert (&streamh->Handler);
114         invert (&streamh->Flags);
115         sinvert (&streamh->Priority);
116         sinvert (&streamh->Language);
117         invert (&streamh->InitialFrames);
118         invert (&streamh->Scale);
119         invert (&streamh->Rate);
120         invert (&streamh->Start);
121         invert (&streamh->Length);
122         invert (&streamh->SuggestedBufferSize);
123         invert (&streamh->Quality);
124         invert (&streamh->SampleSize);
125         sinvert (&streamh->left);
126         sinvert (&streamh->right);
127         sinvert (&streamh->top);
128         sinvert (&streamh->bottom);
129 }
130
131 static void Ibitmaph (AviBitmapInfoHeader *bitmaph) {
132         invert (&bitmaph->fcc);
133         invert (&bitmaph->size);
134         invert (&bitmaph->Size);
135         invert (&bitmaph->Width);
136         invert (&bitmaph->Height);
137         sinvert (&bitmaph->Planes);
138         sinvert (&bitmaph->BitCount);
139         invert (&bitmaph->Compression);
140         invert (&bitmaph->SizeImage);
141         invert (&bitmaph->XPelsPerMeter);
142         invert (&bitmaph->YPelsPerMeter);
143         invert (&bitmaph->ClrUsed);
144         invert (&bitmaph->ClrImportant);
145 }
146
147 static void Imjpegu (AviMJPEGUnknown *mjpgu) {
148         invert (&mjpgu->a);
149         invert (&mjpgu->b);
150         invert (&mjpgu->c);
151         invert (&mjpgu->d);
152         invert (&mjpgu->e);
153         invert (&mjpgu->f);
154         invert (&mjpgu->g);
155 }
156
157 static void Iindexe (AviIndexEntry *indexe) {
158         invert (&indexe->ChunkId);
159         invert (&indexe->Flags);
160         invert (&indexe->Offset);
161         invert (&indexe->Size);
162 }
163 #endif /* WORDS_BIGENDIAN */
164
165 void awrite (AviMovie *movie, void *datain, int block, int size, FILE *fp, int type) {
166 #ifdef WORDS_BIGENDIAN
167         void *data;
168
169         data = MEM_mallocN (size, "avi endian");
170
171         memcpy (data, datain, size);
172
173         switch (type) {
174         case AVI_RAW:
175                 fwrite (data, block, size, fp);
176                 break;
177         case AVI_CHUNK:
178                 Ichunk ((AviChunk *) data);
179                 fwrite (data, block, size, fp);
180                 break;
181         case AVI_LIST:
182                 Ilist ((AviList *) data);
183                 fwrite (data, block, size, fp);
184                 break;
185         case AVI_MAINH:
186                 Imainh ((AviMainHeader *) data);
187                 fwrite (data, block, size, fp);
188                 break;
189         case AVI_STREAMH:
190                 Istreamh ((AviStreamHeader *) data);
191                 fwrite (data, block, size, fp);
192                 break;
193         case AVI_BITMAPH:
194                 Ibitmaph ((AviBitmapInfoHeader *) data);
195                 if (size==sizeof(AviBitmapInfoHeader) + sizeof(AviMJPEGUnknown)) {
196                         Imjpegu((AviMJPEGUnknown*)((char*)data+sizeof(AviBitmapInfoHeader)));
197                 }
198                 fwrite (data, block, size, fp);
199                 break;
200         case AVI_MJPEGU:
201                 Imjpegu ((AviMJPEGUnknown *) data);
202                 fwrite (data, block, size, fp);
203                 break;
204         case AVI_INDEXE:
205                 Iindexe ((AviIndexEntry *) data);
206                 fwrite (data, block, size, fp);
207                 break;
208         default:
209                 break;
210         }
211
212         MEM_freeN (data);
213 #else /* WORDS_BIGENDIAN */
214         fwrite (datain, block, size, fp);
215 #endif /* WORDS_BIGENDIAN */
216 }