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