# ----------------------------------
# - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
# - /home/davila/Creatis/C8/creatools_source/bbtk/packages/gdcmvtk/bbs/boxes/DicomSerieInfoDir.bbs
# ----------------------------------

include std
include itkvtk
include std
include gdcmvtk
include creaImageIO

define DicomSerieInfoDir gdcmvtk

author "Author ??"
description "Description ??"

category "<VOID>"

new std:FilesFromDirectory Box03
  set Box03.Type "0"

new std:GetVectorStringElement Box04
  set Box04.I "0"

new std:GetVectorStringElement Box05
  set Box05.I "0"

new gdcmvtk:GetXCoherentInfoGdcmReader Box06
  set Box06.DicomTags "D0028_0030"

new creaImageIO:GetDicomAttributesFromMaps Box07
  set Box07.KeyDicom "D0028_0030"

new std:ConcatStrings Box08
  set Box08.In1 "D0008_103e"

new std:ConcatStrings Box09
  set Box09.In2 "  "
  set Box09.In4 "  ("
  set Box09.In6 "imgs)"

new std:GetVectorStringElement Box10
  set Box10.I "0"

new std:GetDoubleVectorSize Box11

new std:ReplaceCleanString Box13
  set Box13.Replace "_"
  set Box13.Search " "

new std:MagicBox Box15

new std:ReplaceCleanString Box16
  set Box16.Search "____(0imgs)"

new std:ReplaceCleanString Box17
  set Box17.Search ","


connect Box04.Out Box03.In
connect Box03.Out Box05.In
connect Box05.Out Box06.In
connect Box06.DicomInfo Box07.In
connect Box08.Out Box06.DicomTags
connect Box08.Out Box07.KeyDicom
connect Box07.Out Box09.In3
connect Box03.OutSimple Box11.In
connect Box11.VectorSize Box09.In5
connect Box09.Out Box13.In
connect Box10.Out Box09.In1
connect Box15.Out Box10.I
connect Box15.Out Box04.I
connect Box13.Out Box17.In
connect Box17.Out Box16.In

# Complex input ports
input LstPaths Box04.In " "
input LstSimpleDirName Box10.In " "
input idDir Box15.In " "

# Complex output ports
output OutString Box16.Out " "


endefine