Mercurial > hg > orthanc-wsi
annotate Framework/Jpeg2000Reader.cpp @ 59:7a3853d51c45
Move "Framework/Orthanc/" as "Resources/Orthanc/"
| author | Sebastien Jodogne <s.jodogne@gmail.com> |
|---|---|
| date | Fri, 25 Nov 2016 16:34:34 +0100 |
| parents | 9621fd6f17c9 |
| children | ff0ef01c332c |
| 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 | |
|
59
7a3853d51c45
Move "Framework/Orthanc/" as "Resources/Orthanc/"
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
43
diff
changeset
|
24 #include "../Resources/Orthanc/Core/OrthancException.h" |
|
7a3853d51c45
Move "Framework/Orthanc/" as "Resources/Orthanc/"
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
43
diff
changeset
|
25 #include "../Resources/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 } |