]> Creatis software - gdcm.git/blob - src/gdcmopenjpeg/libopenjpeg/jpt.c
Add IsParsable() method, to avoid confusion with IsReadable()
[gdcm.git] / src / gdcmopenjpeg / libopenjpeg / jpt.c
1 /*
2  * Copyright (c) 2004, Yannick Verschueren
3  * Copyright (c) 2004, Communications and remote sensing Laboratory, Universite catholique de Louvain, Belgium
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS `AS IS'
16  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
19  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
20  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
21  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
22  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
23  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
24  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
25  * POSSIBILITY OF SUCH DAMAGE.
26  */
27
28 #include <stdio.h>
29 #include <stdlib.h>
30
31 #include "jpt.h"
32 #include "j2k.h"
33 #include "cio.h"
34
35
36 /*
37  * Read the information contains in VBAS [JPP/JPT stream message header]
38  * Store information (7 bits) in value
39  *
40  */
41 unsigned int jpt_read_VBAS_info(unsigned int value)
42 {
43   unsigned char elmt;
44
45   elmt = cio_read(1);
46   while ((elmt >> 7) == 1) {
47     value = (value << 7);
48     value |= (elmt & 0x7f);
49     elmt = cio_read(1);
50   }
51   value = (value << 7);
52   value |= (elmt & 0x7f);
53
54   return value;
55 }
56
57 /*
58  * Initialize the value of the message header structure 
59  *
60  */
61 void jpt_init_Msg_Header(jpt_msg_header_struct_t * header)
62 {
63   header->Id = 0;      /* In-class Identifier    */
64   header->last_byte = 0;   /* Last byte information  */
65   header->Class_Id = 0;      /* Class Identifier       */
66   header->CSn_Id = 0;      /* CSn : index identifier */
67   header->Msg_offset = 0;   /* Message offset         */
68   header->Msg_length = 0;   /* Message length         */
69   header->Layer_nb = 0;      /* Auxiliary for JPP case */
70 }
71
72 /*
73  * Re-initialize the value of the message header structure
74  *
75  * Only parameters always present in message header
76  *
77  */
78 void jpt_reinit_Msg_Header(jpt_msg_header_struct_t * header)
79 {
80   header->Id = 0;      /* In-class Identifier    */
81   header->last_byte = 0;   /* Last byte information  */
82   header->Msg_offset = 0;   /* Message offset         */
83   header->Msg_length = 0;   /* Message length         */
84 }
85
86 /*
87  * Read the message header for a JPP/JPT - stream
88  *
89  */
90 void jpt_read_Msg_Header(jpt_msg_header_struct_t * header)
91 {
92   unsigned char elmt, Class = 0, CSn = 0;
93   jpt_reinit_Msg_Header(header);
94
95   /* ------------- */
96   /* VBAS : Bin-ID */
97   /* ------------- */
98   elmt = cio_read(1);
99
100   /* See for Class and CSn */
101   switch ((elmt >> 5) & 0x03) {
102   case 0:
103     fprintf(stderr, "Forbidden value encounter in message header !!\n");
104     break;
105   case 1:
106     Class = 0;
107     CSn = 0;
108     break;
109   case 2:
110     Class = 1;
111     CSn = 0;
112     break;
113   case 3:
114     Class = 1;
115     CSn = 1;
116     break;
117   default:
118     break;
119   }
120
121   /* see information on bits 'c' [p 10 : A.2.1 general, ISO/IEC FCD 15444-9] */
122   if (((elmt >> 4) & 0x01) == 1)
123     header->last_byte = 1;
124
125   /* In-class identifier */
126   header->Id |= (elmt & 0x0f);
127   if ((elmt >> 7) == 1)
128     header->Id = jpt_read_VBAS_info(header->Id);
129
130   /* ------------ */
131   /* VBAS : Class */
132   /* ------------ */
133   if (Class == 1) {
134     header->Class_Id = 0;
135     header->Class_Id = jpt_read_VBAS_info(header->Class_Id);
136   }
137
138   /* ---------- */
139   /* VBAS : CSn */
140   /* ---------- */
141   if (CSn == 1) {
142     header->CSn_Id = 0;
143     header->CSn_Id = jpt_read_VBAS_info(header->CSn_Id);
144   }
145
146   /* ----------------- */
147   /* VBAS : Msg_offset */
148   /* ----------------- */
149   header->Msg_offset = jpt_read_VBAS_info(header->Msg_offset);
150
151   /* ----------------- */
152   /* VBAS : Msg_length */
153   /* ----------------- */
154   header->Msg_length = jpt_read_VBAS_info(header->Msg_length);
155
156   /* ---------- */
157   /* VBAS : Aux */
158   /* ---------- */
159   if ((header->Class_Id & 0x01) == 1) {
160     header->Layer_nb = 0;
161     header->Layer_nb = jpt_read_VBAS_info(header->Layer_nb);
162   }
163 }