1 /*=========================================================================
4 Module: $RCSfile: TestMakeDicomDir.cxx,v $
6 Date: $Date: 2005/02/02 10:41:10 $
7 Version: $Revision: 1.1 $
9 Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
10 l'Image). All rights reserved. See Doc/License.txt or
11 http://www.creatis.insa-lyon.fr/Public/Gdcm/License.html for details.
13 This software is distributed WITHOUT ANY WARRANTY; without even
14 the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15 PURPOSE. See the above copyright notices for more information.
17 =========================================================================*/
18 #include "gdcmDocEntry.h"
19 #include "gdcmDicomDir.h"
20 #include "gdcmDicomDirPatient.h"
21 #include "gdcmDirList.h"
22 #include "gdcmDebug.h"
25 void StartMethod(void *startMethod)
28 std::cout<<"Start parsing"<<std::endl;
31 void EndMethod(void *endMethod)
34 std::cout<<"End parsing"<<std::endl;
39 * \brief - Explores recursively the given directory
40 * (or GDCM_DATA_ROOT by default)
41 * - Orders the gdcm-readable found Files
42 * according their Patient/Study/Serie/Image characteristics
43 * - Makes the gdcm::DicomDir.
44 * - Writes a file named "NewDICOMDIR".
45 * - Reads "NewDICOMDIR" file.
48 int TestMakeDicomDir(int argc, char *argv[])
50 // gdcm::Debug::DebugOn();
59 dirName = GDCM_DATA_ROOT;
62 // we ask for Directory parsing
63 gdcm::DicomDir *dcmdir = new gdcm::DicomDir(dirName, true);
65 dcmdir->SetStartMethod(StartMethod, (void *) NULL);
66 dcmdir->SetEndMethod(EndMethod);
68 if ( !dcmdir->GetFirstPatient() )
70 std::cout << "makeDicomDir: no patient found. Exiting."
77 // Create the corresponding DicomDir
78 dcmdir->WriteDicomDir("NewDICOMDIR");
81 // Read from disc the just written DicomDir
82 gdcm::DicomDir *newDicomDir = new gdcm::DicomDir("NewDICOMDIR");
83 if( !newDicomDir->IsReadable() )
85 std::cout<<" Written DicomDir 'NewDICOMDIR'"
86 <<" is not readable"<<std::endl
87 <<" ...Failed"<<std::endl;
93 if( !newDicomDir->GetFirstPatient() )
95 std::cout<<" Written DicomDir 'NewDICOMDIR'"
96 <<" has no patient"<<std::endl
97 <<" ...Failed"<<std::endl;
103 std::cout<<std::flush;