1 /* save to rad
2 *
3 * 2/12/11
4 * - wrap a class around the rad writer
5 * 23/5/16
6 * - split into file and buffer save classes
7 */
8
9 /*
10
11 This file is part of VIPS.
12
13 VIPS is free software; you can redistribute it and/or modify
14 it under the terms of the GNU Lesser General Public License as published by
15 the Free Software Foundation; either version 2 of the License, or
16 (at your option) any later version.
17
18 This program is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 GNU Lesser General Public License for more details.
22
23 You should have received a copy of the GNU Lesser General Public License
24 along with this program; if not, write to the Free Software
25 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
26 02110-1301 USA
27
28 */
29
30 /*
31
32 These files are distributed with VIPS - http://www.vips.ecs.soton.ac.uk
33
34 */
35
36 /*
37 #define DEBUG_VERBOSE
38 #define DEBUG
39 */
40
41 #ifdef HAVE_CONFIG_H
42 #include <config.h>
43 #endif /*HAVE_CONFIG_H*/
44 #include <vips/intl.h>
45
46 #include <stdio.h>
47 #include <stdlib.h>
48 #include <string.h>
49
50 #include <vips/vips.h>
51
52 #include "pforeign.h"
53
54 #ifdef HAVE_RADIANCE
55
56 typedef struct _VipsForeignSaveRad {
57 VipsForeignSave parent_object;
58
59 } VipsForeignSaveRad;
60
61 typedef VipsForeignSaveClass VipsForeignSaveRadClass;
62
63 G_DEFINE_ABSTRACT_TYPE( VipsForeignSaveRad, vips_foreign_save_rad,
64 VIPS_TYPE_FOREIGN_SAVE );
65
66 /* Save a bit of typing.
67 */
68 #define UC VIPS_FORMAT_UCHAR
69 #define C VIPS_FORMAT_CHAR
70 #define US VIPS_FORMAT_USHORT
71 #define S VIPS_FORMAT_SHORT
72 #define UI VIPS_FORMAT_UINT
73 #define I VIPS_FORMAT_INT
74 #define F VIPS_FORMAT_FLOAT
75 #define X VIPS_FORMAT_COMPLEX
76 #define D VIPS_FORMAT_DOUBLE
77 #define DX VIPS_FORMAT_DPCOMPLEX
78
79 static int vips_foreign_save_rad_format_table[10] = {
80 /* UC C US S UI I F X D DX */
81 F, F, F, F, F, F, F, F, F, F
82 };
83
84 static void
vips_foreign_save_rad_class_init(VipsForeignSaveRadClass * class)85 vips_foreign_save_rad_class_init( VipsForeignSaveRadClass *class )
86 {
87 VipsObjectClass *object_class = (VipsObjectClass *) class;
88 VipsForeignClass *foreign_class = (VipsForeignClass *) class;
89 VipsForeignSaveClass *save_class = (VipsForeignSaveClass *) class;
90
91 object_class->nickname = "radsave_base";
92 object_class->description = _( "save Radiance" );
93
94 foreign_class->suffs = vips__rad_suffs;
95
96 save_class->saveable = VIPS_SAVEABLE_RGB;
97 save_class->format_table = vips_foreign_save_rad_format_table;
98 save_class->coding[VIPS_CODING_NONE] = FALSE;
99 save_class->coding[VIPS_CODING_RAD] = TRUE;
100
101 }
102
103 static void
vips_foreign_save_rad_init(VipsForeignSaveRad * rad)104 vips_foreign_save_rad_init( VipsForeignSaveRad *rad )
105 {
106 }
107
108 typedef struct _VipsForeignSaveRadFile {
109 VipsForeignSaveRad parent_object;
110
111 char *filename;
112 } VipsForeignSaveRadFile;
113
114 typedef VipsForeignSaveRadClass VipsForeignSaveRadFileClass;
115
116 G_DEFINE_TYPE( VipsForeignSaveRadFile, vips_foreign_save_rad_file,
117 vips_foreign_save_rad_get_type() );
118
119 static int
vips_foreign_save_rad_file_build(VipsObject * object)120 vips_foreign_save_rad_file_build( VipsObject *object )
121 {
122 VipsForeignSave *save = (VipsForeignSave *) object;
123 VipsForeignSaveRadFile *file = (VipsForeignSaveRadFile *) object;
124
125 VipsTarget *target;
126
127 if( VIPS_OBJECT_CLASS( vips_foreign_save_rad_file_parent_class )->
128 build( object ) )
129 return( -1 );
130
131 if( !(target = vips_target_new_to_file( file->filename )) )
132 return( -1 );
133 if( vips__rad_save( save->ready, target ) ) {
134 VIPS_UNREF( target );
135 return( -1 );
136 }
137 VIPS_UNREF( target );
138
139 return( 0 );
140 }
141
142 static void
vips_foreign_save_rad_file_class_init(VipsForeignSaveRadFileClass * class)143 vips_foreign_save_rad_file_class_init( VipsForeignSaveRadFileClass *class )
144 {
145 GObjectClass *gobject_class = G_OBJECT_CLASS( class );
146 VipsObjectClass *object_class = (VipsObjectClass *) class;
147
148 gobject_class->set_property = vips_object_set_property;
149 gobject_class->get_property = vips_object_get_property;
150
151 object_class->nickname = "radsave";
152 object_class->description = _( "save image to Radiance file" );
153 object_class->build = vips_foreign_save_rad_file_build;
154
155 VIPS_ARG_STRING( class, "filename", 1,
156 _( "Filename" ),
157 _( "Filename to save to" ),
158 VIPS_ARGUMENT_REQUIRED_INPUT,
159 G_STRUCT_OFFSET( VipsForeignSaveRadFile, filename ),
160 NULL );
161 }
162
163 static void
vips_foreign_save_rad_file_init(VipsForeignSaveRadFile * file)164 vips_foreign_save_rad_file_init( VipsForeignSaveRadFile *file )
165 {
166 }
167
168 typedef struct _VipsForeignSaveRadTarget {
169 VipsForeignSaveRad parent_object;
170
171 VipsTarget *target;
172 } VipsForeignSaveRadTarget;
173
174 typedef VipsForeignSaveRadClass VipsForeignSaveRadTargetClass;
175
176 G_DEFINE_TYPE( VipsForeignSaveRadTarget, vips_foreign_save_rad_target,
177 vips_foreign_save_rad_get_type() );
178
179 static int
vips_foreign_save_rad_target_build(VipsObject * object)180 vips_foreign_save_rad_target_build( VipsObject *object )
181 {
182 VipsForeignSave *save = (VipsForeignSave *) object;
183 VipsForeignSaveRadTarget *target = (VipsForeignSaveRadTarget *) object;
184
185 if( VIPS_OBJECT_CLASS( vips_foreign_save_rad_target_parent_class )->
186 build( object ) )
187 return( -1 );
188
189 if( vips__rad_save( save->ready, target->target ) )
190 return( -1 );
191
192 return( 0 );
193 }
194
195 static void
vips_foreign_save_rad_target_class_init(VipsForeignSaveRadTargetClass * class)196 vips_foreign_save_rad_target_class_init( VipsForeignSaveRadTargetClass *class )
197 {
198 GObjectClass *gobject_class = G_OBJECT_CLASS( class );
199 VipsObjectClass *object_class = (VipsObjectClass *) class;
200
201 gobject_class->set_property = vips_object_set_property;
202 gobject_class->get_property = vips_object_get_property;
203
204 object_class->nickname = "radsave_target";
205 object_class->description = _( "save image to Radiance target" );
206 object_class->build = vips_foreign_save_rad_target_build;
207
208 VIPS_ARG_OBJECT( class, "target", 1,
209 _( "Target" ),
210 _( "Target to save to" ),
211 VIPS_ARGUMENT_REQUIRED_INPUT,
212 G_STRUCT_OFFSET( VipsForeignSaveRadTarget, target ),
213 VIPS_TYPE_TARGET );
214
215 }
216
217 static void
vips_foreign_save_rad_target_init(VipsForeignSaveRadTarget * target)218 vips_foreign_save_rad_target_init( VipsForeignSaveRadTarget *target )
219 {
220 }
221
222 typedef struct _VipsForeignSaveRadBuffer {
223 VipsForeignSaveRad parent_object;
224
225 VipsArea *buf;
226 } VipsForeignSaveRadBuffer;
227
228 typedef VipsForeignSaveRadClass VipsForeignSaveRadBufferClass;
229
230 G_DEFINE_TYPE( VipsForeignSaveRadBuffer, vips_foreign_save_rad_buffer,
231 vips_foreign_save_rad_get_type() );
232
233 static int
vips_foreign_save_rad_buffer_build(VipsObject * object)234 vips_foreign_save_rad_buffer_build( VipsObject *object )
235 {
236 VipsForeignSave *save = (VipsForeignSave *) object;
237
238 VipsTarget *target;
239 VipsBlob *blob;
240
241 if( VIPS_OBJECT_CLASS( vips_foreign_save_rad_buffer_parent_class )->
242 build( object ) )
243 return( -1 );
244
245 if( !(target = vips_target_new_to_memory()) )
246 return( -1 );
247
248 if( vips__rad_save( save->ready, target ) ) {
249 VIPS_UNREF( target );
250 return( -1 );
251 }
252
253 g_object_get( target, "blob", &blob, NULL );
254 g_object_set( save, "buffer", blob, NULL );
255 vips_area_unref( VIPS_AREA( blob ) );
256
257 VIPS_UNREF( target );
258
259 return( 0 );
260 }
261
262 static void
vips_foreign_save_rad_buffer_class_init(VipsForeignSaveRadBufferClass * class)263 vips_foreign_save_rad_buffer_class_init( VipsForeignSaveRadBufferClass *class )
264 {
265 GObjectClass *gobject_class = G_OBJECT_CLASS( class );
266 VipsObjectClass *object_class = (VipsObjectClass *) class;
267
268 gobject_class->set_property = vips_object_set_property;
269 gobject_class->get_property = vips_object_get_property;
270
271 object_class->nickname = "radsave_buffer";
272 object_class->description = _( "save image to Radiance buffer" );
273 object_class->build = vips_foreign_save_rad_buffer_build;
274
275 VIPS_ARG_BOXED( class, "buffer", 1,
276 _( "Buffer" ),
277 _( "Buffer to save to" ),
278 VIPS_ARGUMENT_REQUIRED_OUTPUT,
279 G_STRUCT_OFFSET( VipsForeignSaveRadBuffer, buf ),
280 VIPS_TYPE_BLOB );
281 }
282
283 static void
vips_foreign_save_rad_buffer_init(VipsForeignSaveRadBuffer * buffer)284 vips_foreign_save_rad_buffer_init( VipsForeignSaveRadBuffer *buffer )
285 {
286 }
287
288 #endif /*HAVE_RADIANCE*/
289
290 /**
291 * vips_radsave: (method)
292 * @in: image to save
293 * @filename: file to write to
294 * @...: %NULL-terminated list of optional named arguments
295 *
296 * Write a VIPS image in Radiance (HDR) format.
297 *
298 * Sections of this reader from Greg Ward and Radiance with kind permission.
299 *
300 * See also: vips_image_write_to_file().
301 *
302 * Returns: 0 on success, -1 on error.
303 */
304 int
vips_radsave(VipsImage * in,const char * filename,...)305 vips_radsave( VipsImage *in, const char *filename, ... )
306 {
307 va_list ap;
308 int result;
309
310 va_start( ap, filename );
311 result = vips_call_split( "radsave", ap, in, filename );
312 va_end( ap );
313
314 return( result );
315 }
316
317 /**
318 * vips_radsave_buffer: (method)
319 * @in: image to save
320 * @buf: (array length=len) (element-type guint8): return output buffer here
321 * @len: (type gsize): return output length here
322 * @...: %NULL-terminated list of optional named arguments
323 *
324 * As vips_radsave(), but save to a memory buffer.
325 *
326 * The address of the buffer is returned in @buf, the length of the buffer in
327 * @len. You are responsible for freeing the buffer with g_free() when you
328 * are done with it.
329 *
330 * See also: vips_radsave(), vips_image_write_to_file().
331 *
332 * Returns: 0 on success, -1 on error.
333 */
334 int
vips_radsave_buffer(VipsImage * in,void ** buf,size_t * len,...)335 vips_radsave_buffer( VipsImage *in, void **buf, size_t *len, ... )
336 {
337 va_list ap;
338 VipsArea *area;
339 int result;
340
341 area = NULL;
342
343 va_start( ap, len );
344 result = vips_call_split( "radsave_buffer", ap, in, &area );
345 va_end( ap );
346
347 if( !result &&
348 area ) {
349 if( buf ) {
350 *buf = area->data;
351 area->free_fn = NULL;
352 }
353 if( len )
354 *len = area->length;
355
356 vips_area_unref( area );
357 }
358
359 return( result );
360 }
361
362 /**
363 * vips_radsave_target: (method)
364 * @in: image to save
365 * @target: save image to this target
366 * @...: %NULL-terminated list of optional named arguments
367 *
368 * As vips_radsave(), but save to a target.
369 *
370 * See also: vips_radsave().
371 *
372 * Returns: 0 on success, -1 on error.
373 */
374 int
vips_radsave_target(VipsImage * in,VipsTarget * target,...)375 vips_radsave_target( VipsImage *in, VipsTarget *target, ... )
376 {
377 va_list ap;
378 int result;
379
380 va_start( ap, target );
381 result = vips_call_split( "radsave_target", ap, in, target );
382 va_end( ap );
383
384 return( result );
385 }
386