###############################################################################
# Set up variables to store "mangled names" and proper C++ type names for the
# basic types.
###############################################################################

set(ITKT_UC "unsigned char") # Type
set(ITKM_UC "UC") # Mangle

set(ITKT_US "unsigned short") # Type
set(ITKM_US "US") # Mangle

set(ITKT_UI "unsigned int") # Type
set(ITKM_UI "UI") # Mangle

set(ITKT_UL "unsigned long") # Type
set(ITKM_UL "UL") # Mangle

set(ITKT_ULL "unsigned long long") # Type
set(ITKM_ULL "ULL") # Mangle

set(ITKT_SC "signed char") # Type
set(ITKM_SC "SC") # Mangle

set(ITKT_SS "signed short") # Type
set(ITKM_SS "SS") # Mangle

set(ITKT_SI "signed int") # Type
set(ITKM_SI "SI") # Mangle

set(ITKT_SL "signed long") # Type
set(ITKM_SL "SL") # Mangle

set(ITKT_SLL "signed long long") # Type
set(ITKM_SLL "SLL") # Mangle

set(ITKT_F "float") # Type
set(ITKM_F "F") # Mangle

set(ITKT_D "double") # Type
set(ITKM_D "D") # Mangle

set(ITKT_LD "long double") # Type
set(ITKM_LD "LD") # Mangle

set(ITKT_B "bool") # Type
set(ITKM_B "B") # Mangle

###############################################################################
# A list of the union of ${ITK_WRAP_IMAGE_DIMS} and incremented ITK_WRAP_IMAGE_DIMS.  This
# is needed for the VelocityFieldTransform related classes
###############################################################################
set(ITK_WRAP_IMAGE_DIMS_INCREMENTED "")
foreach(d ${ITK_WRAP_IMAGE_DIMS})
  # For VelocityFieldTranform
  increment(d_inc ${d})
  list(
    APPEND
    ITK_WRAP_IMAGE_DIMS_INCREMENTED
    ${d}
    ${d_inc}
  )
endforeach()
list(REMOVE_DUPLICATES ITK_WRAP_IMAGE_DIMS_INCREMENTED)

# Needed for itkMatrix, itkPoint, ...
set(ITK_WRAP_VECTOR_COMPONENTS_INCREMENTED "")
foreach(d ${ITK_WRAP_VECTOR_COMPONENTS})
  increment(d_inc ${d})
  list(
    APPEND
    ITK_WRAP_VECTOR_COMPONENTS_INCREMENTED
    ${d}
    ${d_inc}
  )
endforeach()
list(REMOVE_DUPLICATES ITK_WRAP_VECTOR_COMPONENTS_INCREMENTED)

intersection(_vector_dims_intersection "${ITK_WRAP_VECTOR_COMPONENTS}" "${ITK_WRAP_IMAGE_DIMS}")
list(LENGTH ITK_WRAP_IMAGE_DIMS _num_dims)
list(LENGTH _vector_dims_intersection _num_vector_dims_intersection)
if(NOT _num_dims EQUAL _num_vector_dims_intersection)
  message(
    FATAL_ERROR
    "ITK_WRAP_VECTOR_COMPONENTS must include ITK_WRAP_IMAGE_DIMS"
  )
endif()

###############################################################################
# Create some variable which can be used later
###############################################################################
set(WRAP_ITK_USIGN_INT "")
if(ITK_WRAP_unsigned_char)
  list(APPEND WRAP_ITK_USIGN_INT "UC")
endif()
if(ITK_WRAP_unsigned_long)
  list(APPEND WRAP_ITK_USIGN_INT "UL")
endif()
if(ITK_WRAP_unsigned_long_long)
  list(APPEND WRAP_ITK_USIGN_INT "ULL")
endif()
if(ITK_WRAP_unsigned_short)
  list(APPEND WRAP_ITK_USIGN_INT "US")
endif()

set(WRAP_ITK_SIGN_INT "")
if(ITK_WRAP_signed_char)
  list(APPEND WRAP_ITK_SIGN_INT "SC")
endif()
if(ITK_WRAP_signed_long)
  list(APPEND WRAP_ITK_SIGN_INT "SL")
endif()
if(ITK_WRAP_signed_long_long)
  list(APPEND WRAP_ITK_SIGN_INT "SLL")
endif()
if(ITK_WRAP_signed_short)
  list(APPEND WRAP_ITK_SIGN_INT "SS")
endif()

set(WRAP_ITK_REAL "")
if(ITK_WRAP_float)
  list(APPEND WRAP_ITK_REAL "F")
endif()
if(ITK_WRAP_double)
  list(APPEND WRAP_ITK_REAL "D")
endif()

set(WRAP_ITK_RGB "")
if(ITK_WRAP_rgb_unsigned_char)
  list(APPEND WRAP_ITK_RGB "RGBUC")
endif()
if(ITK_WRAP_rgb_unsigned_short)
  list(APPEND WRAP_ITK_RGB "RGBUS")
endif()

set(WRAP_ITK_RGBA "")
if(ITK_WRAP_rgba_unsigned_char)
  list(APPEND WRAP_ITK_RGBA "RGBAUC")
endif()
if(ITK_WRAP_rgba_unsigned_short)
  list(APPEND WRAP_ITK_RGBA "RGBAUS")
endif()

set(WRAP_ITK_VECTOR_REAL "")
if(ITK_WRAP_vector_double)
  list(APPEND WRAP_ITK_VECTOR_REAL "VD")
endif()
if(ITK_WRAP_vector_float)
  list(APPEND WRAP_ITK_VECTOR_REAL "VF")
endif()

set(WRAP_ITK_COV_VECTOR_REAL "")
if(ITK_WRAP_covariant_vector_double)
  list(APPEND WRAP_ITK_COV_VECTOR_REAL "CVD")
endif()
if(ITK_WRAP_covariant_vector_float)
  list(APPEND WRAP_ITK_COV_VECTOR_REAL "CVF")
endif()

set(WRAP_ITK_COMPLEX_REAL "")
if(ITK_WRAP_complex_double)
  list(APPEND WRAP_ITK_COMPLEX_REAL "CD")
endif()
if(ITK_WRAP_complex_float)
  list(APPEND WRAP_ITK_COMPLEX_REAL "CF")
endif()

set(
  WRAP_ITK_INT
  ${WRAP_ITK_SIGN_INT}
  ${WRAP_ITK_USIGN_INT}
)
set(
  WRAP_ITK_SCALAR
  ${WRAP_ITK_INT}
  ${WRAP_ITK_REAL}
)
set(
  WRAP_ITK_VECTOR
  ${WRAP_ITK_VECTOR_REAL}
  ${WRAP_ITK_COV_VECTOR_REAL}
)
set(
  WRAP_ITK_COLOR
  ${WRAP_ITK_RGB}
  ${WRAP_ITK_RGBA}
)
set(
  WRAP_ITK_ALL_TYPES
  ${WRAP_ITK_RGB}
  ${WRAP_ITK_RGBA}
  ${WRAP_ITK_VECTOR}
  ${WRAP_ITK_SCALAR}
  ${WRAP_ITK_COMPLEX_REAL}
)

# Make a list of all the RGB Pixel types which are wrapped.
set(WRAP_ITK_RGB_PIXEL_TYPES "D;F")
if(ITK_WRAP_rgb_unsigned_char)
  list(APPEND WRAP_ITK_RGB_PIXEL_TYPES UC)
endif()
if(ITK_WRAP_rgb_unsigned_short)
  list(APPEND WRAP_ITK_RGB_PIXEL_TYPES US)
endif()

# Make a list of all the RGBA Pixel types which are wrapped.
set(WRAP_ITK_RGBA_PIXEL_TYPES "D;F")
if(ITK_WRAP_rgba_unsigned_char)
  list(APPEND WRAP_ITK_RGBA_PIXEL_TYPES UC)
endif()
if(ITK_WRAP_rgba_unsigned_short)
  list(APPEND WRAP_ITK_RGBA_PIXEL_TYPES US)
endif()

# Make a list of all selected types "smaller than" a given type
intersection(SMALLER_THAN_D "F;UL;US;UC;SL;SS;SC" "${WRAP_ITK_SCALAR}")
intersection(SMALLER_THAN_F "UL;US;UC;SL;SS;SC" "${WRAP_ITK_SCALAR}")
intersection(SMALLER_THAN_UL "US;UC;SL;SS;SC" "${WRAP_ITK_INT}")
intersection(SMALLER_THAN_ULL "US;UC;SL;SS;SC" "${WRAP_ITK_INT}")
intersection(SMALLER_THAN_US "UC;SC" "${WRAP_ITK_INT}")
intersection(SMALLER_THAN_SL "US;UC;SS;SC" "${WRAP_ITK_INT}")
intersection(SMALLER_THAN_SLL "US;UC;SS;SC" "${WRAP_ITK_INT}")
intersection(SMALLER_THAN_SS "UC;SC" "${WRAP_ITK_INT}")

# Types that correspond itk::SizeValueType, itk::IdentifierType, and itk::OffsetValueType
if(WIN32 AND ITK_USE_64BITS_IDS)
  set(ITKM_ST ${ITKM_ULL})
  set(ITKT_ST "${ITKT_ULL}")
  set(ITKM_IT ${ITKM_ULL})
  set(ITKT_IT "${ITKT_ULL}")
  set(ITKM_OT ${ITKM_SLL})
  set(ITKT_OT "${ITKT_SLL}")
else()
  set(ITKM_ST ${ITKM_UL})
  set(ITKT_ST "${ITKT_UL}")
  set(ITKM_IT ${ITKM_UL})
  set(ITKT_IT "${ITKT_UL}")
  set(ITKM_OT ${ITKM_SL})
  set(ITKT_OT "${ITKT_SL}")
endif()