Reformat whole codebase with astyle.options (#128)
[openjpeg.git] / src / lib / openjp2 / thix_manager.c
1 /*
2  * $Id: thix_manager.c 897 2011-08-28 21:43:57Z Kaori.Hagihara@gmail.com $
3  *
4  * Copyright (c) 2002-2014, Universite catholique de Louvain (UCL), Belgium
5  * Copyright (c) 2002-2014, Professor Benoit Macq
6  * Copyright (c) 2003-2004, Yannick Verschueren
7  * Copyright (c) 2010-2011, Kaori Hagihara
8  * All rights reserved.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
20  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
23  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31
32 /*! \file
33  *  \brief Modification of jpip.c from 2KAN indexer
34  */
35
36 #include "opj_includes.h"
37
38
39
40 int opj_write_thix(int coff, opj_codestream_info_t cstr_info,
41                    opj_stream_private_t *cio,
42                    opj_event_mgr_t * p_manager)
43 {
44     OPJ_BYTE l_data_header [4];
45     int i;
46     int tileno;
47     opj_jp2_box_t *box;
48     OPJ_UINT32 len;
49     OPJ_OFF_T lenp;
50
51     lenp = 0;
52     box = (opj_jp2_box_t *)opj_calloc((size_t)(cstr_info.tw * cstr_info.th),
53                                       sizeof(opj_jp2_box_t));
54     if (box == NULL) {
55         return 0;
56     }
57     for (i = 0; i < 2 ; i++) {
58         if (i) {
59             opj_stream_seek(cio, lenp, p_manager);
60         }
61
62         lenp = opj_stream_tell(cio);
63         opj_stream_skip(cio, 4, p_manager);             /* L [at the end] */
64         opj_write_bytes(l_data_header, JPIP_THIX, 4); /* THIX */
65         opj_stream_write_data(cio, l_data_header, 4, p_manager);
66
67         opj_write_manf(i, cstr_info.tw * cstr_info.th, box, cio, p_manager);
68
69         for (tileno = 0; tileno < cstr_info.tw * cstr_info.th; tileno++) {
70             box[tileno].length = (OPJ_UINT32)opj_write_tilemhix(coff, cstr_info, tileno,
71                                  cio, p_manager);
72             box[tileno].type = JPIP_MHIX;
73         }
74
75         len = (OPJ_UINT32)(opj_stream_tell(cio) - lenp);
76         opj_stream_seek(cio, lenp, p_manager);
77         opj_write_bytes(l_data_header, len, 4); /* L              */
78         opj_stream_write_data(cio, l_data_header, 4, p_manager);
79         opj_stream_seek(cio, lenp + len, p_manager);
80
81     }
82
83     opj_free(box);
84
85     return (int)len;
86 }
87
88 /*
89  * Write tile-part headers mhix box
90  *
91  * @param[in] coff      offset of j2k codestream
92  * @param[in] cstr_info codestream information
93  * @param[in] tileno    tile number
94  * @param[in] cio       file output handle
95  * @return              length of mhix box
96  */
97 int opj_write_tilemhix(int coff, opj_codestream_info_t cstr_info, int tileno,
98                        opj_stream_private_t *cio,
99                        opj_event_mgr_t * p_manager)
100 {
101     OPJ_BYTE l_data_header [8];
102     int i;
103     opj_tile_info_t tile;
104     opj_tp_info_t tp;
105     opj_marker_info_t *marker;
106     OPJ_UINT32 len;
107     OPJ_OFF_T lenp;
108
109     lenp = opj_stream_tell(cio);
110     opj_stream_skip(cio, 4,
111                     p_manager);               /* L [at the end]                    */
112     opj_write_bytes(l_data_header, JPIP_MHIX,
113                     4);     /* MHIX                              */
114     opj_stream_write_data(cio, l_data_header, 4, p_manager);
115
116     tile = cstr_info.tile[tileno];
117     tp = tile.tp[0];
118
119     opj_write_bytes(l_data_header,
120                     (OPJ_UINT32)(tp.tp_end_header - tp.tp_start_pos + 1),
121                     8);        /* TLEN                              */
122     opj_stream_write_data(cio, l_data_header, 8, p_manager);
123
124     marker = cstr_info.tile[tileno].marker;
125
126     for (i = 0; i < cstr_info.tile[tileno].marknum;
127             i++) {        /* Marker restricted to 1 apparition */
128         opj_write_bytes(l_data_header, marker[i].type, 2);
129         opj_write_bytes(l_data_header + 2, 0, 2);
130         opj_stream_write_data(cio, l_data_header, 4, p_manager);
131         opj_write_bytes(l_data_header, (OPJ_UINT32)(marker[i].pos - coff), 8);
132         opj_stream_write_data(cio, l_data_header, 8, p_manager);
133         opj_write_bytes(l_data_header, (OPJ_UINT32)marker[i].len, 2);
134         opj_stream_write_data(cio, l_data_header, 2, p_manager);
135     }
136
137     /*  free( marker);*/
138
139     len = (OPJ_UINT32)(opj_stream_tell(cio) - lenp);
140     opj_stream_seek(cio, lenp, p_manager);
141     opj_write_bytes(l_data_header, len, 4); /* L  */
142     opj_stream_write_data(cio, l_data_header, 4, p_manager);
143     opj_stream_seek(cio, lenp + len, p_manager);
144
145     return (int)len;
146 }