Mercurial > hg > orthanc-wsi
annotate Framework/Jpeg2000Reader.cpp @ 43:9621fd6f17c9
sync
author | Sebastien Jodogne <s.jodogne@gmail.com> |
---|---|
date | Wed, 09 Nov 2016 17:34:20 +0100 |
parents | 7a88c614be04 |
children | 7a3853d51c45 |
rev | line source |
---|---|
0 | 1 /** |
2 * Orthanc - A Lightweight, RESTful DICOM Store | |
3 * Copyright (C) 2012-2016 Sebastien Jodogne, Medical Physics | |
4 * Department, University Hospital of Liege, Belgium | |
5 * | |
6 * This program is free software: you can redistribute it and/or | |
7 * modify it under the terms of the GNU Affero General Public License | |
8 * as published by the Free Software Foundation, either version 3 of | |
9 * the License, or (at your option) any later version. | |
10 * | |
11 * This program is distributed in the hope that it will be useful, but | |
12 * WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
14 * Affero General Public License for more details. | |
15 * | |
16 * You should have received a copy of the GNU Affero General Public License | |
17 * along with this program. If not, see <http://www.gnu.org/licenses/>. | |
18 **/ | |
19 | |
20 | |
16
7a88c614be04
preparing for precompiled headers
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
0
diff
changeset
|
21 #include "PrecompiledHeadersWSI.h" |
0 | 22 #include "Jpeg2000Reader.h" |
23 | |
24 #include "Orthanc/Core/OrthancException.h" | |
43 | 25 #include "Orthanc/Core/SystemToolbox.h" |
0 | 26 #include "ImageToolbox.h" |
27 | |
28 #include <cassert> | |
29 #include <string.h> | |
30 #include <openjpeg.h> | |
31 | |
32 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
33 # define OPJ_CLRSPC_GRAY CLRSPC_GRAY | |
34 # define OPJ_CLRSPC_SRGB CLRSPC_SRGB | |
35 # define OPJ_CODEC_J2K CODEC_J2K | |
36 # define OPJ_CODEC_JP2 CODEC_JP2 | |
37 typedef opj_dinfo_t opj_codec_t; | |
38 typedef opj_cio_t opj_stream_t; | |
39 #elif ORTHANC_OPENJPEG_MAJOR_VERSION == 2 | |
40 #else | |
41 #error Unsupported version of OpenJpeg | |
42 #endif | |
43 | |
44 | |
45 namespace OrthancWSI | |
46 { | |
47 namespace | |
48 { | |
49 // Check out opj_dparameters_t::decod_format | |
50 enum InputFormat | |
51 { | |
52 InputFormat_J2K = 0, | |
53 InputFormat_JP2 = 1, | |
54 InputFormat_JPT = 2 | |
55 }; | |
56 | |
57 enum OutputFormat | |
58 { | |
59 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
60 OutputFormat_PGX = 1 | |
61 #else | |
62 OutputFormat_PGX = 11 | |
63 #endif | |
64 }; | |
65 | |
66 class OpenJpegDecoder : public boost::noncopyable | |
67 { | |
68 private: | |
69 opj_dparameters_t parameters_; | |
70 opj_codec_t* dinfo_; | |
71 | |
72 void SetupParameters(InputFormat format) | |
73 { | |
74 opj_set_default_decoder_parameters(¶meters_); | |
75 | |
76 parameters_.decod_format = format; | |
77 parameters_.cod_format = OutputFormat_PGX; | |
78 | |
79 #if OPENJPEG_MAJOR_VERSION == 1 | |
80 parameters_.cp_layer = 0; | |
81 parameters_.cp_reduce = 0; | |
82 #endif | |
83 } | |
84 | |
85 void Finalize() | |
86 { | |
87 if (dinfo_ != NULL) | |
88 { | |
89 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
90 opj_destroy_decompress(dinfo_); | |
91 #else | |
92 opj_destroy_codec(dinfo_); | |
93 #endif | |
94 dinfo_ = NULL; | |
95 } | |
96 } | |
97 | |
98 public: | |
99 OpenJpegDecoder(Jpeg2000Format format) : dinfo_(NULL) | |
100 { | |
101 switch (format) | |
102 { | |
103 case Jpeg2000Format_J2K: | |
104 SetupParameters(InputFormat_J2K); | |
105 dinfo_ = opj_create_decompress(OPJ_CODEC_J2K); | |
106 break; | |
107 | |
108 case Jpeg2000Format_JP2: | |
109 SetupParameters(InputFormat_JP2); | |
110 dinfo_ = opj_create_decompress(OPJ_CODEC_JP2); | |
111 break; | |
112 | |
113 default: | |
114 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
115 } | |
116 | |
117 if (!dinfo_) | |
118 { | |
119 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
120 } | |
121 | |
122 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
123 opj_setup_decoder(dinfo_, ¶meters_); | |
124 #else | |
125 if (!opj_setup_decoder(dinfo_, ¶meters_)) | |
126 { | |
127 Finalize(); | |
128 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
129 } | |
130 #endif | |
131 } | |
132 | |
133 ~OpenJpegDecoder() | |
134 { | |
135 Finalize(); | |
136 } | |
137 | |
138 opj_codec_t* GetObject() | |
139 { | |
140 return dinfo_; | |
141 } | |
142 | |
143 const opj_dparameters_t& GetParameters() const | |
144 { | |
145 return parameters_; | |
146 } | |
147 }; | |
148 | |
149 | |
150 class OpenJpegInput : public boost::noncopyable | |
151 { | |
152 private: | |
153 opj_stream_t* cio_; | |
154 | |
155 const uint8_t* buffer_; | |
156 size_t size_; | |
157 size_t position_; | |
158 | |
159 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 2 | |
160 static void Free(void *userData) | |
161 { | |
162 } | |
163 | |
164 static OPJ_SIZE_T Read(void *target, | |
165 OPJ_SIZE_T size, | |
166 void *userData) | |
167 { | |
168 OpenJpegInput& that = *reinterpret_cast<OpenJpegInput*>(userData); | |
169 assert(that.position_ >= 0 && that.position_ <= that.size_); | |
170 assert(size >= 0); | |
171 | |
172 if (that.position_ == that.size_) | |
173 { | |
174 // End of file | |
175 return -1; | |
176 } | |
177 else | |
178 { | |
179 if (that.position_ + size > that.size_) | |
180 { | |
181 size = that.size_ - that.position_; | |
182 } | |
183 | |
184 if (size > 0) | |
185 { | |
186 memcpy(target, that.buffer_ + that.position_, size); | |
187 } | |
188 | |
189 that.position_ += size; | |
190 return size; | |
191 } | |
192 } | |
193 | |
194 static OPJ_OFF_T Skip(OPJ_OFF_T skip, | |
195 void *userData) | |
196 { | |
197 assert(skip >= 0); | |
198 OpenJpegInput& that = *reinterpret_cast<OpenJpegInput*>(userData); | |
199 | |
200 if (that.position_ == that.size_) | |
201 { | |
202 // End of file | |
203 return -1; | |
204 } | |
205 else if (that.position_ + skip > that.size_) | |
206 { | |
207 size_t offset = that.size_ - that.position_; | |
208 that.position_ = that.size_; | |
209 return offset; | |
210 } | |
211 else | |
212 { | |
213 that.position_ += skip; | |
214 return skip; | |
215 } | |
216 } | |
217 | |
218 static OPJ_BOOL Seek(OPJ_OFF_T position, | |
219 void *userData) | |
220 { | |
221 assert(position >= 0); | |
222 OpenJpegInput& that = *reinterpret_cast<OpenJpegInput*>(userData); | |
223 | |
224 if (static_cast<size_t>(position) > that.size_) | |
225 { | |
226 that.position_ = that.size_; | |
227 return false; | |
228 } | |
229 else | |
230 { | |
231 that.position_ = position; | |
232 return true; | |
233 } | |
234 } | |
235 #endif | |
236 | |
237 public: | |
238 OpenJpegInput(OpenJpegDecoder& decoder, | |
239 const void* buffer, | |
240 size_t size) : | |
241 buffer_(reinterpret_cast<const uint8_t*>(buffer)), | |
242 size_(size), | |
243 position_(0) | |
244 { | |
245 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
246 cio_ = opj_cio_open(reinterpret_cast<opj_common_ptr>(decoder.GetObject()), | |
247 reinterpret_cast<unsigned char*>(const_cast<void*>(buffer)), | |
248 size); | |
249 #else | |
250 cio_ = opj_stream_create(size_, 1 /* input stream */); | |
251 if (!cio_) | |
252 { | |
253 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
254 } | |
255 | |
256 // http://openjpeg.narkive.com/zHqG2fMe/opj-stream-set-user-data-length | |
257 // "I'd suggest to precise in the documentation that the skip | |
258 // and read callback functions should return -1 on end of | |
259 // stream, and the seek callback function should return false | |
260 // on end of stream." | |
261 | |
262 opj_stream_set_user_data(cio_, this, Free); | |
263 opj_stream_set_user_data_length(cio_, size); | |
264 opj_stream_set_read_function(cio_, Read); | |
265 opj_stream_set_skip_function(cio_, Skip); | |
266 opj_stream_set_seek_function(cio_, Seek); | |
267 #endif | |
268 } | |
269 | |
270 ~OpenJpegInput() | |
271 { | |
272 if (cio_) | |
273 { | |
274 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
275 opj_cio_close(cio_); | |
276 #else | |
277 opj_stream_destroy(cio_); | |
278 #endif | |
279 cio_ = NULL; | |
280 } | |
281 } | |
282 | |
283 opj_stream_t* GetObject() | |
284 { | |
285 return cio_; | |
286 } | |
287 }; | |
288 | |
289 | |
290 class OpenJpegImage | |
291 { | |
292 private: | |
293 opj_image_t* image_; | |
294 | |
295 void CopyChannel(Orthanc::ImageAccessor& target, | |
296 unsigned int channel, | |
297 unsigned int targetIncrement) | |
298 { | |
299 int32_t* q = image_->comps[channel].data; | |
300 assert(q != NULL); | |
301 | |
302 for (unsigned int y = 0; y < target.GetHeight(); y++) | |
303 { | |
304 uint8_t *p = reinterpret_cast<uint8_t*>(target.GetRow(y)) + channel; | |
305 | |
306 for (unsigned int x = 0; x < target.GetWidth(); x++, p += targetIncrement) | |
307 { | |
308 *p = *q; | |
309 q++; | |
310 } | |
311 } | |
312 } | |
313 | |
314 public: | |
315 OpenJpegImage(OpenJpegDecoder& decoder, | |
316 OpenJpegInput& input) : | |
317 image_(NULL) | |
318 { | |
319 #if ORTHANC_OPENJPEG_MAJOR_VERSION == 1 | |
320 image_ = opj_decode(decoder.GetObject(), input.GetObject()); | |
321 if (image_ == NULL) | |
322 { | |
323 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
324 } | |
325 #else | |
326 if (!opj_read_header(input.GetObject(), decoder.GetObject(), &image_) || | |
327 image_ == NULL) | |
328 { | |
329 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
330 } | |
331 | |
332 if (!opj_set_decode_area(decoder.GetObject(), image_, | |
333 static_cast<int32_t>(decoder.GetParameters().DA_x0), | |
334 static_cast<int32_t>(decoder.GetParameters().DA_y0), | |
335 static_cast<int32_t>(decoder.GetParameters().DA_x1), | |
336 static_cast<int32_t>(decoder.GetParameters().DA_y1)) || // Decode the whole image | |
337 !opj_decode(decoder.GetObject(), input.GetObject(), image_) || | |
338 !opj_end_decompress(decoder.GetObject(), input.GetObject())) | |
339 { | |
340 opj_image_destroy(image_); | |
341 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
342 } | |
343 #endif | |
344 } | |
345 | |
346 ~OpenJpegImage() | |
347 { | |
348 if (image_ != NULL) | |
349 { | |
350 opj_image_destroy(image_); | |
351 image_ = NULL; | |
352 } | |
353 } | |
354 | |
355 Orthanc::ImageAccessor* ProvideImage() | |
356 { | |
357 if (image_->x1 < 0 || | |
358 image_->y1 < 0) | |
359 { | |
360 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
361 } | |
362 | |
363 if (image_->x0 != 0 || | |
364 image_->y0 != 0) | |
365 { | |
366 throw Orthanc::OrthancException(Orthanc::ErrorCode_NotImplemented); | |
367 } | |
368 | |
369 for (unsigned int c = 0; c < static_cast<unsigned int>(image_->numcomps); c++) | |
370 { | |
371 if (image_->comps[c].dx != 1 || | |
372 image_->comps[c].dy != 1 || | |
373 image_->comps[c].x0 != 0 || | |
374 image_->comps[c].y0 != 0 || | |
375 image_->comps[c].w != image_->x1 || | |
376 image_->comps[c].h != image_->y1 || | |
377 image_->comps[c].prec != 8 || | |
378 image_->comps[c].sgnd != 0) | |
379 { | |
380 throw Orthanc::OrthancException(Orthanc::ErrorCode_NotImplemented); | |
381 } | |
382 } | |
383 | |
384 unsigned int width = static_cast<unsigned int>(image_->x1); | |
385 unsigned int height = static_cast<unsigned int>(image_->y1); | |
386 | |
387 Orthanc::PixelFormat format; | |
388 if (image_->numcomps == 1 && image_->color_space != OPJ_CLRSPC_GRAY) | |
389 { | |
390 format = Orthanc::PixelFormat_Grayscale8; | |
391 } | |
392 else if (image_->numcomps == 3 && image_->color_space != OPJ_CLRSPC_SRGB) | |
393 { | |
394 format = Orthanc::PixelFormat_RGB24; | |
395 } | |
396 else | |
397 { | |
398 throw Orthanc::OrthancException(Orthanc::ErrorCode_NotImplemented); | |
399 } | |
400 | |
401 std::auto_ptr<Orthanc::ImageAccessor> image(ImageToolbox::Allocate(format, width, height)); | |
402 | |
403 switch (format) | |
404 { | |
405 case Orthanc::PixelFormat_Grayscale8: | |
406 { | |
407 CopyChannel(*image, 0, 1); | |
408 break; | |
409 } | |
410 | |
411 case Orthanc::PixelFormat_RGB24: | |
412 { | |
413 CopyChannel(*image, 0, 3); | |
414 CopyChannel(*image, 1, 3); | |
415 CopyChannel(*image, 2, 3); | |
416 break; | |
417 } | |
418 | |
419 default: | |
420 throw Orthanc::OrthancException(Orthanc::ErrorCode_InternalError); | |
421 } | |
422 | |
423 return image.release(); | |
424 } | |
425 | |
426 }; | |
427 } | |
428 | |
429 | |
430 void Jpeg2000Reader::ReadFromMemory(const void* buffer, | |
431 size_t size) | |
432 { | |
433 OpenJpegDecoder decoder(DetectFormatFromMemory(buffer, size)); | |
434 OpenJpegInput input(decoder, buffer, size); | |
435 OpenJpegImage image(decoder, input); | |
436 | |
437 image_.reset(image.ProvideImage()); | |
438 AssignReadOnly(image_->GetFormat(), | |
439 image_->GetWidth(), | |
440 image_->GetHeight(), | |
441 image_->GetPitch(), | |
442 image_->GetConstBuffer()); | |
443 } | |
444 | |
445 | |
446 void Jpeg2000Reader::ReadFromMemory(const std::string& buffer) | |
447 { | |
448 if (buffer.empty()) | |
449 { | |
450 ReadFromMemory(NULL, 0); | |
451 } | |
452 else | |
453 { | |
454 ReadFromMemory(buffer.c_str(), buffer.size()); | |
455 } | |
456 } | |
457 | |
458 void Jpeg2000Reader::ReadFromFile(const std::string& filename) | |
459 { | |
460 // TODO Use opj_stream_create_file_stream() ? | |
461 | |
462 std::string content; | |
43 | 463 Orthanc::SystemToolbox::ReadFile(content, filename); |
0 | 464 } |
465 | |
466 | |
467 Jpeg2000Format Jpeg2000Reader::DetectFormatFromMemory(const void* buffer, | |
468 size_t size) | |
469 { | |
470 static const char JP2_RFC3745_HEADER[] = "\x00\x00\x00\x0c\x6a\x50\x20\x20\x0d\x0a\x87\x0a"; | |
471 static const char JP2_HEADER[] = "\x0d\x0a\x87\x0a"; | |
472 static const char J2K_HEADER[] = "\xff\x4f\xff\x51"; | |
473 | |
474 if (size < sizeof(JP2_RFC3745_HEADER) - 1) | |
475 { | |
476 return Jpeg2000Format_Unknown; | |
477 } | |
478 | |
479 if (memcmp(buffer, JP2_RFC3745_HEADER, sizeof(JP2_RFC3745_HEADER) - 1) == 0 || | |
480 memcmp(buffer, JP2_HEADER, sizeof(JP2_HEADER) - 1) == 0) | |
481 { | |
482 return Jpeg2000Format_JP2; | |
483 } | |
484 else if (memcmp(buffer, J2K_HEADER, sizeof(J2K_HEADER) - 1) == 0) | |
485 { | |
486 return Jpeg2000Format_J2K; | |
487 } | |
488 | |
489 return Jpeg2000Format_Unknown; | |
490 } | |
491 } |