Initial revision
[blender.git] / source / blender / imbuf / intern / writeimage.c
1 /**
2  *
3  * ***** BEGIN GPL/BL DUAL LICENSE BLOCK *****
4  *
5  * This program is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU General Public License
7  * as published by the Free Software Foundation; either version 2
8  * of the License, or (at your option) any later version. The Blender
9  * Foundation also sells licenses for use in proprietary software under
10  * the Blender License.  See http://www.blender.org/BL/ for information
11  * about this.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software Foundation,
20  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
21  *
22  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
23  * All rights reserved.
24  *
25  * The Original Code is: all of this file.
26  *
27  * Contributor(s): none yet.
28  *
29  * ***** END GPL/BL DUAL LICENSE BLOCK *****
30  * writeimage.c
31  *
32  * $Id$
33  */
34
35 #include "BLI_blenlib.h"
36
37 #include "imbuf.h"
38 #include "imbuf_patch.h"
39
40 #include "IMB_imbuf_types.h"
41 #include "IMB_imbuf.h"
42
43 #include "IMB_allocimbuf.h"
44
45 #include "IMB_targa.h"
46 #include "IMB_jpeg.h"
47 #include "IMB_iris.h"
48 #include "IMB_ham.h"
49 #include "IMB_hamx.h"
50 #include "IMB_amiga.h"
51
52 #include "IMB_iff.h"
53 #include "IMB_bitplanes.h"
54 #include "IMB_divers.h"
55
56
57 short (*IMB_fp_png_encode)(struct ImBuf *ibuf, int file, int flags) = 0;
58
59 short IMB_saveiff(struct ImBuf *ibuf,char *naam,int flags)
60 {       
61         short ok=TRUE,delpl=FALSE;
62         int file = -1;
63
64         if (ibuf==0) return (FALSE);
65         ibuf->flags = flags;
66
67         if (IS_jpg(ibuf)) {
68                 if (imb_save_jpeg(naam, ibuf, flags)) return (0);
69                 else return (TRUE);
70         }
71         file = open(naam, O_BINARY | O_RDWR | O_CREAT | O_TRUNC, 0666);
72         if (file < 0) return (FALSE);
73
74         if (flags & IB_rect){
75                 if (ibuf->cmap){
76                         imb_checkncols(ibuf);
77                 }
78         }
79
80         if (IS_png(ibuf) && IMB_fp_png_encode) {
81                 ok = IMB_fp_png_encode(ibuf,file,flags);
82                 if (ok) {
83                         close (file);
84                         return (ok);
85                 }
86         }
87
88         if (IS_tga(ibuf) || IS_png(ibuf)) {
89                 ok = imb_savetarga(ibuf,file,flags);
90                 if (ok) {
91                         close (file);
92                         return (ok);
93                 }
94         }
95         
96         if (IS_iris(ibuf)) {
97                 ok = imb_saveiris(ibuf,file,flags);
98                 if (ok) {
99                         close (file);
100                         return (ok);
101                 }
102         }
103         
104         if (ok) ok = imb_start_iff(ibuf,file);
105
106         if (IS_amiga(ibuf)){
107                 IMB_flipy(ibuf);
108                 if (flags & IB_rect){
109                         if ((flags & IB_cmap) == 0) {
110                                 if (IS_ham(ibuf)){
111                                         if (ok) ok = imb_converttoham(ibuf);
112                                 }else if (ibuf->cmap){
113                                         if (ok) ok = IMB_converttocmap(ibuf);
114                                 }
115                         }
116                         if (ok){
117                                 if (ibuf->planes==0){
118                                         delpl=TRUE;
119                                         ok=imb_addplanesImBuf(ibuf);
120                                 }
121                                 imb_longtobp(ibuf);
122                         }
123                 }
124
125                 if (flags & IB_vert){
126                         if (ok) ok = imb_encodebodyv(ibuf,file);
127                 }
128                 else{
129                         if (ok) ok = imb_encodebodyh(ibuf,file);
130                 }
131                 if (ok) ok = imb_update_iff(file,BODY);
132         }else if (IS_anim(ibuf)) {
133                 if (ok) ok = imb_enc_anim(ibuf, file);
134                 if (ok) ok = imb_update_iff(file, BODY);
135         }
136         close(file);
137
138         if (ok==FALSE) {
139                 fprintf(stderr,"Couldn't save picture.\n");
140         }       
141         if (delpl) imb_freeplanesImBuf(ibuf);
142
143         return (ok);
144 }
145