1 /*=========================================================================
4 Module: $RCSfile: TestMakeIcon.cxx,v $
6 Date: $Date: 2005/07/21 14:05:09 $
7 Version: $Revision: 1.8 $
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 "gdcmDebug.h"
19 #include "gdcmGlobal.h"
20 #include "gdcmCommon.h"
22 #include "gdcmFileHelper.h"
23 #include "gdcmSeqEntry.h"
24 #include "gdcmSQItem.h"
25 #include "gdcmValEntry.h"
26 #include "gdcmBinEntry.h"
28 // 0088 0200 SQ 1 Icon Image Sequence
30 int TestMakeIcon (int argc, char *argv[])
32 // hard coded small image name
33 std::string input = GDCM_DATA_ROOT;
35 input += "LIBIDO-8-ACR_NEMA-Lena_128_128.acr";
37 std::string output = "testIcon.dcm";
39 gdcm::Debug::DebugOn();
48 std::cout << " Usage: " << argv[0]
49 << " input filename.dcm output Filename.dcm" << std::endl;
52 gdcm::File *f = new gdcm::File( );
53 f->SetFileName( input );
56 if ( ! f->IsReadable() )
58 std::cout << " Failed to Open/Parse file" << input << std::endl;
62 gdcm::FileHelper *fh = new gdcm::FileHelper(f);
63 uint8_t *pixels = fh->GetImageData();
64 uint32_t lgth = fh->GetImageDataSize();
66 gdcm::SeqEntry *icon = f->InsertSeqEntry(0x0088, 0x0200);
67 gdcm::SQItem *sqi = new gdcm::SQItem(1);
68 icon->AddSQItem(sqi, 1);
70 // icone is just define like the image
71 // The purpose is NOT to imagine an icon,
72 // just check the stuff works
74 uint16_t binVal[3]={0x52f7,0xf358,0xad9b};
76 sqi->InsertValEntry( "MONOCHROME2", 0x0028,0x0004);
77 sqi->InsertValEntry( "128", 0x0028,0x0010);
78 sqi->InsertValEntry( "8", 0x0028,0x0100);
79 sqi->InsertValEntry( "8", 0x0028,0x0101);
80 sqi->InsertValEntry( "7", 0x0028,0x0102);
81 sqi->InsertValEntry( "0", 0x0028,0x0103);
82 sqi->InsertBinEntry( (uint8_t *)binVal, 3*2, 0x0005,0x0010,"OW");
83 sqi->InsertBinEntry( pixels, lgth, 0x7fe0,0x0010);
84 // just to see if it's stored a the right place
85 sqi->InsertValEntry( "128", 0x0028,0x0011);
87 fh->WriteDcmExplVR(output);
92 f->SetFileName(output);
95 std::cout << "End of Print" << std::endl;
97 icon = f->GetSeqEntry(0x0088, 0x0200);
100 std::cout << "Sequence 0088|0200 not found" << std::endl
101 << " ... Failed" << std::endl;
106 std::cout << "Sequence 0088|0200 found" << std::endl;
108 sqi = icon->GetFirstSQItem();
112 std::cout << "Sequence 0088|0200 has no SQItem" << std::endl
113 << " ... Failed" << std::endl;
119 std::cout << "First Item found" << std::endl;
121 // Test for entry 0028|0010
122 if ( !sqi->GetValEntry(0x0028,0x0010) )
124 std::cout << "ValEntry 0028|0010 not found" << std::endl
125 << " ... Failed" << std::endl;
130 std::cout << "First Item ->ValEntry 0028|0010 found" << std::endl;
131 if ( sqi->GetValEntry(0x0028,0x0010)->GetValue() != "128" )
133 std::cout << "Value 0028|0010 don't match" << std::endl
134 << "Read : " << sqi->GetValEntry(0x0028,0x0010)->GetValue()
135 << " - Expected : 128" << std::endl
136 << " ... Failed" << std::endl;
142 // Test for entry 0028|0011
143 if ( !sqi->GetValEntry(0x0028,0x0011) )
145 std::cout << "ValEntry 0028|0011 not found" << std::endl
146 << " ... Failed" << std::endl;
151 std::cout << "First Item ->ValEntry 0028|0011 found" << std::endl;
152 if ( sqi->GetValEntry(0x0028,0x0011)->GetValue() != "128" )
154 std::cout << "Value 0028|0011 don't match" << std::endl
155 << "Read : " << sqi->GetValEntry(0x0028,0x0011)->GetValue()
156 << " - Expected : 128" << std::endl
157 << " ... Failed" << std::endl;
163 // Test for entry 0028|0100
164 if ( !sqi->GetValEntry(0x0028,0x0100) )
166 std::cout << "ValEntry 0028|0100 not found" << std::endl
167 << " ... Failed" << std::endl;
172 std::cout << "First Item ->ValEntry 0028|0100 found" << std::endl;
173 if ( sqi->GetValEntry(0x0028,0x0100)->GetValue() != "8" )
175 std::cout << "Value 0028|0100 don't match" << std::endl
176 << "Read : " << sqi->GetValEntry(0x0028,0x0100)->GetValue()
177 << " - Expected : 8" << std::endl
178 << " ... Failed" << std::endl;
184 // Test for entry 0028|0101
185 if ( !sqi->GetValEntry(0x0028,0x0101) )
187 std::cout << "ValEntry 0028|0101 not found" << std::endl
188 << " ... Failed" << std::endl;
193 std::cout << "First Item ->ValEntry 0028|0101 found" << std::endl;
194 if ( sqi->GetValEntry(0x0028,0x0101)->GetValue() != "8" )
196 std::cout << "Value 0028|0101 don't match" << std::endl
197 << "Read : " << sqi->GetValEntry(0x0028,0x0101)->GetValue()
198 << " - Expected : 8" << std::endl
199 << " ... Failed" << std::endl;
205 // Test for entry 0028|0102
206 if ( !sqi->GetValEntry(0x0028,0x0102) )
208 std::cout << "ValEntry 0028|0102 not found" << std::endl
209 << " ... Failed" << std::endl;
214 std::cout << "First Item ->ValEntry 0028|0102 found" << std::endl;
215 if ( sqi->GetValEntry(0x0028,0x0102)->GetValue() != "7" )
217 std::cout << "Value 0028|0102 don't match" << std::endl
218 << "Read : " << sqi->GetValEntry(0x0028,0x0102)->GetValue()
219 << " - Expected : 7" << std::endl
220 << " ... Failed" << std::endl;
226 // Test for entry 0028|0103
227 if ( !sqi->GetValEntry(0x0028,0x0103) )
229 std::cout << "ValEntry 0028|0010 not found" << std::endl
230 << " ... Failed" << std::endl;
235 std::cout << "First Item ->ValEntry 0028|0103 found" << std::endl;
236 if ( sqi->GetValEntry(0x0028,0x0103)->GetValue() != "0" )
238 std::cout << "Value 0028|0103 don't match" << std::endl
239 << "Read : " << sqi->GetValEntry(0x0028,0x0103)->GetValue()
240 << " - Expected : 0" << std::endl
241 << " ... Failed" << std::endl;
247 // Test for entry 0005|0010
248 if ( !sqi->GetBinEntry(0x0005,0x0010) )
250 std::cout << "BinEntry 0005|0010 not found" << std::endl
251 << " ... Failed" << std::endl;
256 std::cout << "First Item ->BinEntry 0005|0010 found" << std::endl;
257 if( sqi->GetBinEntry(0x0005,0x0010)->GetLength() != 6 )
259 std::cout << "BinEntry size 0005|0010 don't match" << std::endl
260 << "Read : " << sqi->GetValEntry(0x0005,0x0010)->GetLength()
261 << " - Expected : 6" << std::endl
262 << " ... Failed" << std::endl;
268 std::cout << "Length BinEntry 0005|0010 OK" << std::endl;
270 if( memcmp(sqi->GetBinEntry(0x0005,0x0010)->GetBinArea(),binVal,6)!=0 )
272 std::cout << "Value 0005|0010 don't match (BinEntry)" << std::endl
273 << " ... Failed" << std::endl;
278 std::cout << "Value BinEntry 0005|0010 OK" << std::endl;
282 std::cout << " ... OK" << std::endl;