+# Black list of images known to break lots of readers (efilm, xmedcon ...):
+SET(BLACK_LIST
+
+ # Multiframe Papyrus format image
+ # Just to remember this format exists, and is gdcm::File compliant
+ # (NOT gdcm::FileHelper ...)
+ # any contribution is welcome
+ "PET-cardio-Multiframe-Papyrus.dcm"
+ # From David Clunie's Compresion Dataset
+ "D_CLUNIE_CT1_JLSN.dcm"
+ "D_CLUNIE_CT1_JLSL.dcm"
+ #Not a Dicom Image, but a RT Object
+ "RS2.16.124.113534.2.3.5.0.120040728.21342.353.12747_anonimized.dcm"
+ #Dicom MPEG image
+ "ETIAM_video_002.dcm"
+ #Something stupid occured in the code for LibIDO images.
+ #I Black list them for a while. JP
+ "gdcm-ACR-LibIDO.acr"
+ "LIBIDO-24-ACR_NEMA-Rectangle.dcm"
+ #16 Bits per pixel images with LUT 16 Bits.
+ #I wait to be 100% sure before releasing them. JP
+ "rle16sti.dcm"
+ "rle16loo.dcm"
+ )
+
+# Don't understand why jasper is segfaulting with borland...I bet a borland bug
+IF(BORLAND)
+ SET(BLACK_LIST
+ ${BLACK_LIST}
+ "D_CLUNIE_CT1_J2KR.dcm"
+ "D_CLUNIE_CT1_J2KI.dcm"
+ )
+ENDIF(BORLAND)
+
+# Add a special test that requires dciodvfy from dicom3tools
+INCLUDE(${GDCM_SOURCE_DIR}/CMake/FindDicom3Tools.cmake)
+
+# This is a GLOB expression, change it into a list separated with a comma and \n
+SET(GDCM_DATA_IMAGES)
+FOREACH(filename ${GDCM_DATA_IMAGES_GLOB})
+ GET_FILENAME_COMPONENT(filename_temp ${filename} NAME)
+ IF(DCIODVFY_FOUND)
+ ADD_TEST("DCIODVFY-INPUT-${filename_temp}" "${DCIODVFY_EXECUTABLE}" "${filename}")
+ ADD_TEST("DCIODVFY-OUTPUT-${filename_temp}" "${DCIODVFY_EXECUTABLE}" "${GDCM_DATA_ROOT}/BaselineDicom/${filename_temp}")
+ ENDIF(DCIODVFY_FOUND)
+ STRING(REGEX MATCH ${filename_temp} bad_dicom ${BLACK_LIST})
+ IF(NOT bad_dicom)
+ SET(GDCM_DATA_IMAGES "${GDCM_DATA_IMAGES}\n\"${filename_temp}\",")
+ ENDIF(NOT bad_dicom)
+ENDFOREACH(filename)
+
+SET(GDCM_DATA_SEQ_IMAGES)
+FOREACH(filename ${GDCM_DATA_SEQ_IMAGES_GLOB})
+ GET_FILENAME_COMPONENT(filename_temp ${filename} NAME)
+ STRING(REGEX MATCH ${filename_temp} bad_dicom ${BLACK_LIST})
+ IF(NOT bad_dicom)
+ STRING(REGEX REPLACE "(.*)FileSeq0(.*)" "\\1FileSeq%d\\2" filename_temp2 ${filename_temp})
+
+ SET(GDCM_DATA_SEQ_IMAGES "${GDCM_DATA_SEQ_IMAGES}\n\"${filename_temp2}\",")
+ ENDIF(NOT bad_dicom)
+ENDFOREACH(filename)
+
+# Populate GDCM_DATA_IMAGES:
+FILE(WRITE "${GDCM_BINARY_DIR}/gdcmDataImages.h"
+ "const char * const gdcmDataImages[] = { ${GDCM_DATA_IMAGES}\n0 };\n"
+)
+
+# Populate GDCM_DATA_SEQ_IMAGES:
+FILE(WRITE "${GDCM_BINARY_DIR}/gdcmDataSeqImages.h"
+ "const char * const gdcmDataSeqImages[] = { ${GDCM_DATA_SEQ_IMAGES}\n0 };\n"
+)