ctn-3.0.6

/* Copyright (C) 1993, 1994, RSNA and Washington University The software and supporting documentation for the Radiological Society of North America (RSNA) 1993, 1994 Digital Imaging and Communications in Medicine (DICOM) Demonstration were developed at the Electronic Radiology Laboratory Mallinckrodt Institute of Radiology Washington University School of Medicine 510 S. Kingshighway Blvd. St. Louis, MO 63110 as part of the 1993, 1994 DICOM Central Test Node project for, and under contract with, the Radiological Society of North America. THIS SOFTWARE IS MADE AVAILABLE, AS IS, AND NEITHER RSNA NOR WASHINGTON UNIVERSITY MAKE ANY WARRANTY ABOUT THE SOFTWARE, ITS PERFORMANCE, ITS MERCHANTABILITY OR FITNESS FOR ANY PARTICULAR USE, FREEDOM FROM ANY COMPUTER DISEASES OR ITS CONFORMITY TO ANY SPECIFICATION. THE ENTIRE RISK AS TO QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH THE USER. Copyright of the software and supporting documentation is jointly owned by RSNA and Washington University, and free access is hereby granted as a license to use this software, copy this software and prepare derivative works based upon this software. However, any distribution of this software source code or supporting documentation or derivative works (source code and supporting documentation) must include the three paragraphs of the copyright notice. */ /* Copyright marker. Copyright will be inserted above. Do not remove */ /* ** DICOM 93 ** Electronic Radiology Laboratory ** Mallinckrodt Institute of Radiology ** Washington University School of Medicine ** ** Module Name(s): DCM_OpenFile ** DCM_CreateObject ** DCM_CloseObject ** DCM_AddElement ** DCM_AddSequenceElement ** DCM_RemoveElement ** DCM_GetElementValue ** DCM_GetElementSize ** DCM_ScanParseObject ** DCM_ImportStream ** DCM_ExportStream ** DCM_GetObjectSize ** DCM_DumpElements ** DCM_Debug ** DCM_WriteFile ** DCM_ModifyElements ** DCM_ParseObject ** DCM_RemoveGroup ** DCM_GetSequenceList ** DCM_ComputeExportSize ** private functions ** newElementItem ** findCreateGroup ** insertNewElement ** updateObjectType ** updateSpecialElements ** exportFixedFields ** exportData ** fileSize ** swapInPlace ** checkObject ** writeFile ** countBytes ** exportStream ** verifyFormat ** readFile ** Author, Date: Stephen M. Moore, 26-Apr-93 ** Intent: ** This file contains the routines which implement a facility for ** manipulating DICOM V3 information objects. These routines parse ** and construct NEMA objects (or streams). Users are able to ** read/write/examine individual attributes. The package uses those ** individual elements to construct an internal memory representation of ** an object. This representation is a linked list of the individual ** attributes. The user of the package can add attributes to an object, ** remove an element from an object, query the object about an attribute, ** and convert the object to and from its "stream" representation. ** In addition, the package can parse a file which contains a stream ** and create its internal object. ** Last Update: $Author: smm $, $Date: 2002/12/13 15:11:24 $ ** Source File: $RCSfile: dcm.c,v $ ** Revision: $Revision: 1.161 $ ** Status: $State: Exp $ */ static char rcsid[] = "$Revision: 1.161 $ $RCSfile: dcm.c,v $"; #include "ctn_os.h" #include "dicom.h" #include "condition.h" #include "lst.h" #include "dicom_uids.h" #include "dicom_objects.h" #include "dcmprivate.h" #define BYTEORDER_SAME 1 #define BYTEORDER_REVERSE 2 #define NATIVE_ORDER BYTEORDER_SAME #ifdef BIG_ENDIAN_ARCHITECTURE #define LITTLE_ORDER BYTEORDER_REVERSE #define BIG_ORDER BYTEORDER_SAME #endif #ifdef LITTLE_ENDIAN_ARCHITECTURE #define LITTLE_ORDER BYTEORDER_SAME #define BIG_ORDER BYTEORDER_REVERSE #endif static CTNBOOLEAN debug = FALSE;/* Flag for debugging messages to stdout */ /* Prototypes for internal functions */ static CONDITION newElementItem(DCM_ELEMENT * src, CTNBOOLEAN allocateData, PRV_ELEMENT_ITEM ** dst); static CONDITION findCreateGroup(PRIVATE_OBJECT ** object, unsigned short group, PRV_GROUP_ITEM ** groupPtr); static CONDITION insertNewElement(PRIVATE_OBJECT ** object, DCM_ELEMENT * element); static CONDITION updateObjectType(PRIVATE_OBJECT ** object, DCM_ELEMENT * element); static CONDITION updateSpecialElements(PRIVATE_OBJECT ** object, PRV_ELEMENT_ITEM * item); static void exportFixedFields(DCM_ELEMENT * element, unsigned char *b, U32 length, int byteOrder, CTNBOOLEAN explicitVR, U32 * rtnLength); static CONDITION exportData(PRIVATE_OBJECT ** object, PRV_ELEMENT_ITEM * item, unsigned char *src, unsigned char *dst, U32 length, int byteOrder, U32 * rtnLength); #ifdef MACOS static long fileSize(int fd); #else static int fileSize(int fd); #endif static void swapInPlace(PRIVATE_OBJECT ** object, DCM_ELEMENT * e); static CONDITION checkObject(PRIVATE_OBJECT ** object, char *caller); static CONDITION writeFile(void *buffer, U32 length, int flag, void /* int */ *fd); static CONDITION countBytes(void *buffer, U32 length, int flag, void /* unsigned long */ *sizePtr); static CONDITION exportStream(DCM_OBJECT ** callerObject, unsigned long opt, void *buffer, U32 bufferlength, CONDITION(*callback) (), void *ctx, int sequenceLevel); static CONDITION verifyFormat(PRV_ELEMENT_ITEM * item); #if 0 static CONDITION readFile(char *name, unsigned char *callerBuf, int fd, long size, off_t fileOffset, int recursionLevel, unsigned long opt, DCM_OBJECT ** callerObject, U32 * scannedLength, CTNBOOLEAN * remainOpenFlag, void *ctx, CONDITION(*rd) (void *ctx, void *buf, int toRead, int *bytesRead), CONDITION(*sk) (void *ctx, int offset, int flag)); #endif static CONDITION readFile1(const char *name, unsigned char *callerBuf, int fd, U32 size, off_t * fileOffset, int recursionLevel, unsigned long opt, PRIVATE_OBJECT ** parentObject, DCM_OBJECT ** callerObject, U32 * scannedLength, CTNBOOLEAN * remainOpenFlag, void *ctx, CONDITION(*rd) (void *ctx, void *buf, int toRead, int *bytesRead), CONDITION(*sk) (void *ctx, int offset, int flag)); static PRV_ELEMENT_ITEM *locateElement(PRIVATE_OBJECT ** obj, DCM_TAG tag); static void computeVM(PRIVATE_OBJECT ** object, DCM_ELEMENT * element); static void ctxSensitiveLookup(PRIVATE_OBJECT ** object, DCM_ELEMENT * element); static CONDITION copyData(PRIVATE_OBJECT ** object, PRV_ELEMENT_ITEM * item, DCM_ELEMENT * to, U32 * rtnLength); static CONDITION readLengthToEnd(int fd, const char *fileName, unsigned long opt, U32 * lengthToEnd); #ifdef LITTLE_ENDIAN_ARCHITECTURE static void swapATGroupElement(DCM_ELEMENT * e); #endif static void dumpBinaryData(void *d, DCM_VALUEREPRESENTATION vr, long vm, long vmLimit); static void compareGroup(PRV_GROUP_ITEM * g1, PRV_GROUP_ITEM * g2, void (*callback) (const DCM_ELEMENT * e1, const DCM_ELEMENT * e2, void *ctx), void *ctx); static void remapFileName(const char *name, char *mapName); /* DCM_OpenFile ** ** Purpose: ** This function opens a file that conforms to the DICOM V3 standard. ** The file is parsed and an internal representation of the data is created. ** A handle is returned to the caller to allow access to the data. ** ** Parameter Dictionary: ** name ASCIZ string giving path name to file to be opened. ** opt BITMASK giving options used when opening file and **