Program: gdcm
Module: $RCSfile: gdcmDicomDir.cxx,v $
Language: C++
- Date: $Date: 2005/06/24 10:55:58 $
- Version: $Revision: 1.142 $
+ Date: $Date: 2005/07/12 17:08:12 $
+ Version: $Revision: 1.148 $
Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
l'Image). All rights reserved. See Doc/License.txt or
// PS 3.3-2003, pages 731-750
//-----------------------------------------------------------------------------
#include "gdcmDicomDir.h"
+#include "gdcmDicomDirObject.h"
#include "gdcmDicomDirStudy.h"
#include "gdcmDicomDirSerie.h"
+#include "gdcmDicomDirVisit.h"
#include "gdcmDicomDirImage.h"
#include "gdcmDicomDirPatient.h"
#include "gdcmDicomDirMeta.h"
:Document( )
{
Initialize(); // sets all private fields to NULL
+ ParseDir = false;
NewMeta();
}
//-----------------------------------------------------------------------------
// Public
+/**
+ * \brief Loader. use SetLoadMode(), SetFileName() before !
+ * @return false if file cannot be open or no swap info was found,
+ * or no tag was found.
+ */
+bool DicomDir::Load( )
+{
+ // We should clean out anything that already exists.
+ Initialize(); // sets all private fields to NULL
+
+ if (!ParseDir)
+ {
+ if ( ! this->Document::Load( ) )
+ return false;
+ }
+ return DoTheLoadingJob( );
+}
+
+/**
+ * \brief Loader. (DEPRECATED : not to break the API)
+ * @param fileName file to be open for parsing
+ * @return false if file cannot be open or no swap info was found,
+ * or no tag was found.
+ */
bool DicomDir::Load(std::string const &fileName )
{
- Filename = fileName;
// We should clean out anything that already exists.
+ Initialize(); // sets all private fields to NULL
+
+ SetFileName( fileName );
+ if (!ParseDir)
+ {
+ if ( ! this->Document::Load( ) )
+ return false;
+ }
+ return DoTheLoadingJob( );
+}
+/**
+ * \brief Does the Loading Job (internal use only)
+ * @return false if file cannot be open or no swap info was found,
+ * or no tag was found.
+ */
+bool DicomDir::DoTheLoadingJob( )
+{
+ // We should clean out anything that already exists.
Initialize(); // sets all private fields to NULL
if (!ParseDir)
{
return false;
}
- Document::Load(fileName);
+ if (!Document::Load() )
+ {
+ return false;
+ }
+
if ( GetFirstEntry() == 0 ) // when user passed a Directory to parse
{
- gdcmWarningMacro( "Entry HT empty for file: "<< fileName);
+ gdcmWarningMacro( "Entry HT empty for file: "<< GetFileName());
return false;
}
// Directory record sequence
if ( !e )
{
gdcmWarningMacro( "NO 'Directory record sequence' (0x0004,0x1220)"
- << " in file " << fileName);
+ << " in file " << GetFileName());
return false;
}
else
{
// Only if user passed a root directory
// ------------------------------------
- if ( fileName == "." )
+ if ( GetFileName() == "." )
{
// user passed '.' as Name
// we get current directory name
SetFileName( dummy ); // will be converted into a string
}
NewMeta();
- gdcmWarningMacro( "Parse directory and create the DicomDir : " << Filename );
-
+ gdcmWarningMacro( "Parse directory and create the DicomDir : "
+ << GetFileName() );
ParseDirectory();
}
return true;
}
f = new File( );
- f->SetLoadMode(LoadMode); // we allow user not to load Sequences...
+ f->SetLoadMode(LoadMode); // we allow user not to load Sequences, or Shadow
+ // groups, or ......
f->Load( it->c_str() );
// if ( !f )
continue;
}
- if ( v == "PATIENT " )
+ // A decent DICOMDIR has much more images than series,
+ // more series than studies, and so on.
+ // This is the right order to preform the tests
+
+ if ( v == "IMAGE " )
{
- si = new DicomDirPatient(true);
- if ( !AddPatientToEnd( static_cast<DicomDirPatient *>(si)) )
+ si = new DicomDirImage(true);
+ if ( !AddImageToEnd( static_cast<DicomDirImage *>(si)) )
{
delete si;
si = NULL;
- gdcmErrorMacro( "Add PatientToEnd failed");
+ gdcmErrorMacro( "Add AddImageToEnd failed");
}
}
- else if ( v == "STUDY " )
+ else if ( v == "SERIES" )
{
- si = new DicomDirStudy(true);
- if ( !AddStudyToEnd( static_cast<DicomDirStudy *>(si)) )
+ si = new DicomDirSerie(true);
+ if ( !AddSerieToEnd( static_cast<DicomDirSerie *>(si)) )
{
delete si;
si = NULL;
- gdcmErrorMacro( "Add AddStudyToEnd failed");
+ gdcmErrorMacro( "Add AddSerieToEnd failed");
}
}
- else if ( v == "SERIES" )
+ else if ( v == "VISIT " )
{
- si = new DicomDirSerie(true);
- if ( !AddSerieToEnd( static_cast<DicomDirSerie *>(si)) )
+ si = new DicomDirVisit(true);
+ if ( !AddVisitToEnd( static_cast<DicomDirVisit *>(si)) )
{
delete si;
si = NULL;
- gdcmErrorMacro( "Add AddSerieToEnd failed");
+ gdcmErrorMacro( "Add AddVisitToEnd failed");
}
}
- else if ( v == "IMAGE " )
+ else if ( v == "STUDY " )
{
- si = new DicomDirImage(true);
- if ( !AddImageToEnd( static_cast<DicomDirImage *>(si)) )
+ si = new DicomDirStudy(true);
+ if ( !AddStudyToEnd( static_cast<DicomDirStudy *>(si)) )
{
delete si;
si = NULL;
- gdcmErrorMacro( "Add AddImageToEnd failed");
+ gdcmErrorMacro( "Add AddStudyToEnd failed");
+ }
+ }
+ else if ( v == "PATIENT " )
+ {
+ si = new DicomDirPatient(true);
+ if ( !AddPatientToEnd( static_cast<DicomDirPatient *>(si)) )
+ {
+ delete si;
+ si = NULL;
+ gdcmErrorMacro( "Add PatientToEnd failed");
}
}
else
{
- // It was not a 'PATIENT', nor a 'STUDY', nor a 'SERIE',
- // neither an 'IMAGE' SQItem. Skip to next item.
- continue;
+ // It was neither a 'PATIENT', nor a 'STUDY', nor a 'SERIE',
+ // nor an 'IMAGE' SQItem. Skip to next item.
+ gdcmWarningMacro( " -------------------------------------------"
+ << "a non PATIENT/STUDY/SERIE/IMAGE SQItem was found : "
+ << v);
+
+ // FIXME : deal with other item types !
+ tmpSI=s->GetNextSQItem(); // To avoid infinite loop
+ continue;
}
if ( si )
- MoveSQItem(si,tmpSI);
+ //MoveSQItem(si,tmpSI); // Old code : Copies each Entry
+ // -and then removes the source-
+ si->MoveObject(tmpSI); // New code : Copies the List
tmpSI=s->GetNextSQItem();
}
return false;
}
+/**
+ * \brief AddVisitToEnd
+ * @param dd SQ Item to enqueue to the DicomDirVisit chained List
+ */
+bool DicomDir::AddVisitToEnd(DicomDirVisit *dd)
+{
+ if ( Patients.size() > 0 )
+ {
+ ListDicomDirPatient::iterator itp = Patients.end();
+ itp--;
+
+ DicomDirStudy *study = (*itp)->GetLastStudy();
+ if ( study )
+ {
+ study->AddVisit(dd);
+ return true;
+ }
+ }
+ return false;
+}
/**
* \brief AddImageToEnd
* @param dd SQ Item to enqueue to the DicomDirImage chained List
first = true;
}
- // if new Study Deal with 'STUDY' Elements
+ // if new Study, deal with 'STUDY' Elements
if ( studCurInstanceUID != studPrevInstanceUID || studCurID != studPrevID
|| first )
{
first = true;
}
- // if new Serie Deal with 'SERIE' Elements
+ // if new Serie, deal with 'SERIE' Elements
if ( serCurInstanceUID != serPrevInstanceUID || serCurID != serPrevID
|| first )
{
* @param src source SQItem
*/
void DicomDir::MoveSQItem(DocEntrySet *dst,DocEntrySet *src)
-{
+{
DocEntry *entry;
entry = src->GetFirstEntry();