3 //This is needed when compiling in debug mode
5 // 'type' : forcing value to bool 'true' or 'false' (performance warning)
6 //#pragma warning ( disable : 4800 )
7 // 'identifier' : class 'type' needs to have dll-interface to be used by
8 // clients of class 'type2'
9 #pragma warning ( disable : 4251 )
10 // 'identifier' : identifier was truncated to 'number' characters in the
12 #pragma warning ( disable : 4786 )
18 #define str2num(str, typeNum) *((typeNum *)(str))
20 /////////////////////////////////////////////////////////////////
23 * \brief Parse pixel data from disk and *prints* the result
24 * \ For multi-fragment Jpeg/Rle files checking purpose *only*
25 * \ Allows to 'see' if the file *does* conform
26 * \ (some of them do not)
27 * \ with Dicom Part 3, Annex A (PS 3.5-2003, page 58, page 85)
30 bool gdcmFile::ParsePixelData(void) {
34 if ( !(fp=Header->OpenFile()))
37 if ( fseek(fp, Header->GetPixelOffset(), SEEK_SET) == -1 ) {
42 if ( !Header->IsDicomV3() ||
43 Header->IsImplicitVRLittleEndianTransferSyntax() ||
44 Header->IsExplicitVRLittleEndianTransferSyntax() ||
45 Header->IsExplicitVRBigEndianTransferSyntax() ||
46 Header->IsDeflatedExplicitVRLittleEndianTransferSyntax() ) {
48 printf ("gdcmFile::ParsePixelData : non JPEG/RLE File\n");
53 std::string str_nb=Header->GetPubElValByNumber(0x0028,0x0100);
54 if (str_nb == GDCM_UNFOUND ) {
57 nb = atoi(str_nb.c_str() );
62 int taille = Header->GetXSize() * Header->GetYSize() * Header->GetSamplesPerPixel();
64 printf ("Checking the Dicom-encapsulated Jpeg/RLE Pixels\n");
66 guint16 ItemTagGr,ItemTagEl;
69 char * destination = NULL;
71 // -------------------- for Parsing : Position on begining of Jpeg/RLE Pixels
73 if( !Header->IsRLELossLessTransferSyntax()) {
77 fread(&ItemTagGr,2,1,fp); //Reading (fffe):Basic Offset Table Item Tag Gr
78 fread(&ItemTagEl,2,1,fp); //Reading (e000):Basic Offset Table Item Tag El
79 if(Header->GetSwapCode()) {
80 ItemTagGr=Header->SwapShort(ItemTagGr);
81 ItemTagEl=Header->SwapShort(ItemTagEl);
83 printf ("at %x : ItemTag (should be fffe,e000): %04x,%04x\n",
84 ftellRes,ItemTagGr,ItemTagEl );
87 if(Header->GetSwapCode())
88 ln=Header->SwapLong(ln); // Basic Offset Table Item Lentgh
89 printf("at %x : Basic Offset Table Item Lentgh (??) %d x(%08x)\n",
92 // What is it used for ??
93 char * BasicOffsetTableItemValue= (char *)malloc(ln+1);
94 fread(BasicOffsetTableItemValue,ln,1,fp);
96 for (int i=0;i<ln;i+=4){
97 a=str2num(&BasicOffsetTableItemValue[i],guint32);
98 printf(" x(%08x) %d\n",a,a);
103 fread(&ItemTagGr,2,1,fp); // Reading (fffe) : Item Tag Gr
104 fread(&ItemTagEl,2,1,fp); // Reading (e000) : Item Tag El
105 if(Header->GetSwapCode()) {
106 ItemTagGr=Header->SwapShort(ItemTagGr);
107 ItemTagEl=Header->SwapShort(ItemTagEl);
109 printf ("at %x : ItemTag (should be fffe,e000 or e0dd): %04x,%04x\n",
110 ftellRes,ItemTagGr,ItemTagEl );
112 while ( ( ItemTagGr==0xfffe) && (ItemTagEl!=0xe0dd) ) { // Parse fragments
116 if(Header->GetSwapCode())
117 ln=Header->SwapLong(ln); // length
118 printf(" at %x : fragment length %d x(%08x)\n",
121 // destination += taille * nBytes; // location in user's memory
122 //printf (" Destination will be x(%x) = %d \n",
123 // destination,destination );
125 // ------------------------
126 fseek(fp,ln,SEEK_CUR); // skipping (not reading) fragment pixels
127 // ------------------------
130 fread(&ItemTagGr,2,1,fp); // Reading (fffe) : Item Tag Gr
131 fread(&ItemTagEl,2,1,fp); // Reading (e000) : Item Tag El
132 if(Header->GetSwapCode()) {
133 ItemTagGr=Header->SwapShort(ItemTagGr);
134 ItemTagEl=Header->SwapShort(ItemTagEl);
136 printf ("at %x : ItemTag (should be fffe,e000 or e0dd): %04x,%04x\n",
137 ftellRes,ItemTagGr,ItemTagEl );
143 long RleSegmentLength[15],fragmentLength;
144 guint32 nbRleSegments;
145 guint32 RleSegmentOffsetTable[15];
147 // Basic Offset Table with Item Value
149 fread(&ItemTagGr,2,1,fp); //Reading (fffe):Basic Offset Table Item Tag Gr
150 fread(&ItemTagEl,2,1,fp); //Reading (e000):Basic Offset Table Item Tag El
151 if(Header->GetSwapCode()) {
152 ItemTagGr=Header->SwapShort(ItemTagGr);
153 ItemTagEl=Header->SwapShort(ItemTagEl);
155 printf ("at %x : ItemTag (should be fffe,e000): %04x,%04x\n",
156 ftellRes,ItemTagGr,ItemTagEl );
160 if(Header->GetSwapCode())
161 ln=Header->SwapLong(ln); // Basic Offset Table Item Lentgh
162 printf("at %x : Basic Offset Table Item Lentgh (??) %d x(%08x)\n",
165 // What is it used for ??
166 char * BasicOffsetTableItemValue= (char *)malloc(ln+1);
167 fread(BasicOffsetTableItemValue,ln,1,fp);
169 for (int i=0;i<ln;i+=4){
170 a=str2num(&BasicOffsetTableItemValue[i],guint32);
171 printf(" x(%08x) %d\n",a,a);
176 fread(&ItemTagGr,2,1,fp); // Reading (fffe) : Item Tag Gr
177 fread(&ItemTagEl,2,1,fp); // Reading (e000) : Item Tag El
178 if(Header->GetSwapCode()) {
179 ItemTagGr=Header->SwapShort(ItemTagGr);
180 ItemTagEl=Header->SwapShort(ItemTagEl);
182 printf ("at %x : ItemTag (should be fffe,e000 or e0dd): %04x,%04x\n",
183 ftellRes,ItemTagGr,ItemTagEl );
185 // while 'Sequence Delimiter Item' (fffe,e0dd) not found
186 while ( ( ItemTagGr == 0xfffe) && (ItemTagEl != 0xe0dd) ) {
187 // Parse fragments of the current Fragment (Frame)
189 fread(&fragmentLength,4,1,fp);
190 if(Header->GetSwapCode())
191 fragmentLength=Header->SwapLong(fragmentLength); // length
192 printf(" at %x : 'fragment' length %d x(%08x)\n",
193 ftellRes, fragmentLength,fragmentLength);
195 //------------------ scanning (not reading) fragment pixels
197 fread(&nbRleSegments,4,1,fp); // Reading : Number of RLE Segments
198 if(Header->GetSwapCode())
199 nbRleSegments=Header->SwapLong(nbRleSegments);
200 printf(" Nb of RLE Segments : %d\n",nbRleSegments);
202 for(int k=1; k<=15; k++) { // Reading RLE Segments Offset Table
204 fread(&RleSegmentOffsetTable[k],4,1,fp);
205 if(Header->GetSwapCode())
206 RleSegmentOffsetTable[k]=Header->SwapLong(RleSegmentOffsetTable[k]);
207 printf(" at : %x Offset Segment %d : %d (%x)\n",
208 ftellRes,k,RleSegmentOffsetTable[k],
209 RleSegmentOffsetTable[k]);
212 if (nbRleSegments>1) { // skipping (not reading) RLE Segments
213 for(int k=1; k<=nbRleSegments-1; k++) {
214 RleSegmentLength[k]= RleSegmentOffsetTable[k+1]
215 - RleSegmentOffsetTable[k];
217 printf (" Segment %d : Length = %d x(%x) Start at %x\n",
218 k,RleSegmentLength[k],RleSegmentLength[k], ftellRes);
219 fseek(fp,RleSegmentLength[k],SEEK_CUR);
222 RleSegmentLength[nbRleSegments]= fragmentLength
223 - RleSegmentOffsetTable[nbRleSegments];
225 printf (" Segment %d : Length = %d x(%x) Start at %x\n",
226 nbRleSegments,RleSegmentLength[nbRleSegments],
227 RleSegmentLength[nbRleSegments],ftellRes);
229 fseek(fp,RleSegmentLength[nbRleSegments],SEEK_CUR);
231 // ------------------ end of scanning fragment pixels
234 fread(&ItemTagGr,2,1,fp); // Reading (fffe) : Item Tag Gr
235 fread(&ItemTagEl,2,1,fp); // Reading (e000) : Item Tag El
236 if(Header->GetSwapCode()) {
237 ItemTagGr=Header->SwapShort(ItemTagGr);
238 ItemTagEl=Header->SwapShort(ItemTagEl);
240 printf ("at %x : ItemTag (should be fffe,e000 or e0dd): %04x,%04x\n",
241 ftellRes,ItemTagGr,ItemTagEl );