OFCondition RetrieveDICOMFilesFromPACS::acceptSubAssociation(T_ASC_Network *associationNetwork, T_ASC_Association **association)
{
const char *knownAbstractSyntaxes[] = { UID_VerificationSOPClass };
const char *transferSyntaxes[] = { NULL, NULL, NULL, NULL };
int numTransferSyntaxes;
OFCondition condition = ASC_receiveAssociation(associationNetwork, association, ASC_DEFAULTMAXPDU);
if (condition.good())
{
#ifndef DISABLE_COMPRESSION_EXTENSION
// Si disposem de compressió la demanem, i podrem accelerar el temps de descàrrega considerablement
// De moment demanem la compressió lossless que tot PACS que suporti compressió ha
// de proporcionar: JPEGLossless:Non-Hierarchical-1stOrderPrediction
transferSyntaxes[0] = UID_JPEGProcess14SV1TransferSyntax;
transferSyntaxes[1] = UID_LittleEndianExplicitTransferSyntax;
transferSyntaxes[2] = UID_BigEndianExplicitTransferSyntax;
transferSyntaxes[3] = UID_LittleEndianImplicitTransferSyntax;
numTransferSyntaxes = 4;
#else
// Defined in dcxfer.h
if (gLocalByteOrder == EBO_LittleEndian)
{
transferSyntaxes[0] = UID_LittleEndianExplicitTransferSyntax;
transferSyntaxes[1] = UID_BigEndianExplicitTransferSyntax;
}
else
{
transferSyntaxes[0] = UID_BigEndianExplicitTransferSyntax;
transferSyntaxes[1] = UID_LittleEndianExplicitTransferSyntax;
}
transferSyntaxes[2] = UID_LittleEndianImplicitTransferSyntax;
numTransferSyntaxes = 3;
#endif
// Accept the Verification SOP Class if presented
condition = ASC_acceptContextsWithPreferredTransferSyntaxes((*association)->params, knownAbstractSyntaxes, DIM_OF(knownAbstractSyntaxes),
transferSyntaxes, numTransferSyntaxes);
if (condition.good())
{
// The array of Storage SOP Class UIDs comes from dcuid.h
condition = ASC_acceptContextsWithPreferredTransferSyntaxes((*association)->params, dcmAllStorageSOPClassUIDs, numberOfAllDcmStorageSOPClassUIDs,
transferSyntaxes, numTransferSyntaxes);
}
}
if (condition.good())
{
condition = ASC_acknowledgeAssociation(*association);
}
else
{
ASC_dropAssociation(*association);
ASC_destroyAssociation(association);
}
return condition;
}
void Association::Destroy() {
OFCondition cond = ASC_destroyAssociation(&assoc);
dcmNet = NULL;
assoc = NULL;
msgId = 0;
presId = 0;
sopClass[0] = 0;
sopInstance[0] = 0;
}
void
Association
::abort()
{
if(!this->is_associated())
{
throw Exception("Not associated");
}
ASC_abortAssociation(this->_association);
ASC_destroyAssociation(&this->_association);
this->_association = NULL;
}
void
Association
::release()
{
if(!this->is_associated())
{
throw Exception("Not associated");
}
ASC_releaseAssociation(this->_association);
ASC_destroyAssociation(&this->_association);
this->_association = NULL;
}
void
Association
::drop()
{
if(!this->is_associated())
{
throw Exception("Not associated");
}
ASC_acknowledgeRelease(this->_association);
ASC_dropSCPAssociation(this->_association);
ASC_destroyAssociation(&this->_association);
this->_association = NULL;
}
OFCondition AssociationCleanup(T_ASC_Association *assoc)
{
OFString temp_str;
OFCondition cond = ASC_dropSCPAssociation(assoc);
if (cond.bad())
{
LOG(FATAL) << cond.text();
return cond;
}
cond = ASC_destroyAssociation(&assoc);
if (cond.bad())
{
LOG(FATAL) << cond.text();
return cond;
}
return cond;
}
void PACSConnection::disconnect()
{
OFCondition condition = ASC_releaseAssociation(m_dicomAssociation);
if (condition.bad())
{
ERROR_LOG("No s'ha pogut desconnectar del PACS, descripcio error: " + QString(condition.text()));
}
condition = ASC_destroyAssociation(&m_dicomAssociation);
if (condition.bad())
{
ERROR_LOG("Error al destruir la connexio amb el PACS, descripcio error: " + QString(condition.text()));
}
// Destrueix l'objecte i tanca el socket obert, fins que no es fa el drop de l'objecte no es tanca el socket
condition = ASC_dropNetwork(&m_associationNetwork);
if (condition.bad())
{
ERROR_LOG("Error al tancar el port de connexions entrants, descripcio error: " + QString(condition.text()));
}
}
OFCondition RetrieveDICOMFilesFromPACS::subOperationSCP(T_ASC_Association **subAssociation)
{
// Ens convertim com en un servei. El PACS ens fa peticions que nosaltres hem de respondre, ens pot demanar descarregar una imatge o fer un echo
T_DIMSE_Message dimseMessage;
T_ASC_PresentationContextID presentationContextID;
if (!ASC_dataWaiting(*subAssociation, 0))
{
return DIMSE_NODATAAVAILABLE;
}
OFCondition condition = DIMSE_receiveCommand(*subAssociation, DIMSE_BLOCKING, 0, &presentationContextID, &dimseMessage, NULL);
if (condition == EC_Normal)
{
switch (dimseMessage.CommandField)
{
case DIMSE_C_STORE_RQ:
condition = storeSCP(*subAssociation, &dimseMessage, presentationContextID);
break;
case DIMSE_C_ECHO_RQ:
condition = echoSCP(*subAssociation, &dimseMessage, presentationContextID);
break;
default:
ERROR_LOG("El PACS ens ha sol.licitat un tipus d'operacio invalida");
condition = DIMSE_BADCOMMANDTYPE;
break;
}
}
// Clean up on association termination
if (condition == DUL_PEERREQUESTEDRELEASE)
{
INFO_LOG("El PACS sol.licita tancar la connexio per on ens ha enviat els fitxers");
condition = ASC_acknowledgeRelease(*subAssociation);
ASC_dropSCPAssociation(*subAssociation);
ASC_destroyAssociation(subAssociation);
return condition;
}
else if (condition == DUL_PEERABORTEDASSOCIATION)
{
INFO_LOG("El PACS ha abortat la connexió");
}
else if (condition != EC_Normal)
{
ERROR_LOG("S'ha produit un error reben la peticio d'una suboperacio, descripcio error: " + QString(condition.text()));
condition = ASC_abortAssociation(*subAssociation);
}
else if (m_abortIsRequested)
{
INFO_LOG("Abortarem les connexions amb el PACS, perque han sol.licitant cancel.lar la descarrega");
condition = ASC_abortAssociation(*subAssociation);
if (!condition.good())
{
ERROR_LOG("Error al abortar la connexio pel qual rebem les imatges" + QString(condition.text()));
}
// Tanquem la connexió amb el PACS perquè segons indica la documentació DICOM al PS 3.4 (Baseline Behavior of SCP) C.4.2.3.1 si abortem
// la connexió per la qual rebem les imatges, el comportament del PACS és desconegut, per exemple DCM4CHEE tanca la connexió amb el PACS, però
// el RAIM_Server no la tanca i la manté fent que no sortim mai d'aquesta classe. Degut a que no es pot saber en aquesta situació com actuaran
// els PACS es tanca aquí la connexió amb el PACS.
condition = ASC_abortAssociation(m_pacsConnection->getConnection());
if (!condition.good())
{
ERROR_LOG("Error al abortar la connexio pel amb el PACS" + QString(condition.text()));
}
else
{
INFO_LOG("Abortada la connexio amb el PACS");
}
}
if (condition != EC_Normal)
{
ASC_dropAssociation(*subAssociation);
ASC_destroyAssociation(subAssociation);
}
return condition;
}
void QtDcmServersDicomSettingsWidget::sendEcho()
{
if ( !treeWidget->currentItem() ) {
return;
}
QtDcmPreferences* prefs = QtDcmPreferences::instance();
const QString aet = prefs->aetitle();
const QString serverAet = treeWidget->currentItem()->data ( 1, 1 ).toString();
const QString hostname = prefs->hostname();
const QString serverHostname = treeWidget->currentItem()->data ( 3, 1 ).toString();
const QString serverPort = treeWidget->currentItem()->data ( 2, 1 ).toString();
T_ASC_Network *net = 0; // network struct, contains DICOM upper layer FSM etc.
OFCondition cond = ASC_initializeNetwork ( NET_REQUESTOR, 0, 30 /* timeout */, &net );
if ( cond != EC_Normal ) {
QMessageBox msgBox( QApplication::activeWindow() );
msgBox.setIcon ( QMessageBox::Critical );
msgBox.setText ( "Cannot initialize network" );
msgBox.exec();
ASC_dropNetwork ( &net );
return;
}
QTcpSocket * socket = new QTcpSocket(this);
socket->connectToHost(serverHostname, serverPort.toInt());
if (!socket->waitForConnected(1000)) {
QMessageBox msgBox( QApplication::activeWindow() );
msgBox.setIcon ( QMessageBox::Information );
msgBox.setText ( "Cannot connect to server " + serverHostname + " on port " + serverPort + " !" );
msgBox.exec();
ASC_dropNetwork ( &net );
return;
}
socket->disconnectFromHost();
delete socket;
T_ASC_Parameters *params; // parameters of association request
cond = ASC_createAssociationParameters ( ¶ms, ASC_DEFAULTMAXPDU );
// set calling and called AE titles
cond = ASC_setAPTitles ( params, aet.toUtf8().data(), serverAet.toUtf8().data(), NULL );
// the DICOM server accepts connections at server.nowhere.com port 104
cond = ASC_setPresentationAddresses ( params, hostname.toUtf8().data(), QString ( serverHostname + ":" + serverPort ).toLatin1().data() );
// list of transfer syntaxes, only a single entry here
const char* ts[] = { UID_LittleEndianImplicitTransferSyntax };
// add presentation context to association request
cond = ASC_addPresentationContext ( params, 1, UID_VerificationSOPClass, ts, 1 );
// request DICOM association
T_ASC_Association *assoc = 0;
if ( ASC_requestAssociation ( net, params, &assoc ).good() ) {
if ( ASC_countAcceptedPresentationContexts ( params ) == 1 ) {
// the remote SCP has accepted the Verification Service Class
DIC_US id = assoc->nextMsgID++; // generate next message ID
DIC_US status; // DIMSE status of C-ECHO-RSP will be stored here
DcmDataset *sd = NULL; // status detail will be stored here
// send C-ECHO-RQ and handle response
DIMSE_echoUser ( assoc, id, DIMSE_BLOCKING, 0, &status, &sd );
delete sd; // we don't care about status detail
QMessageBox msgBox( QApplication::activeWindow() );
msgBox.setIcon ( QMessageBox::Information );
msgBox.setText ( "Echo request successful !" );
msgBox.exec();
}
else {
QMessageBox msgBox( QApplication::activeWindow() );
msgBox.setIcon ( QMessageBox::Critical );
msgBox.setText ( "Wrong presentation context, echo request failed" );
msgBox.exec();
}
}
else {
QMessageBox msgBox( QApplication::activeWindow() );
msgBox.setIcon ( QMessageBox::Critical );
msgBox.setText ( "Wrong dicom association, echo request failed" );
msgBox.exec();
}
ASC_releaseAssociation ( assoc ); // release association
ASC_destroyAssociation ( &assoc ); // delete assoc structure
ASC_dropNetwork ( &net ); // delete net structure
net = 0;
assoc = 0;
}
bool echoscu(const QString &peerTitle, const QString &ourTitle,
const QString &hostname, int port,
QString &msg)
{
T_ASC_Network *net;
T_ASC_Parameters *params;
T_ASC_Association *assoc;
OFString temp_str;
bool ret = false;
#ifdef HAVE_WINSOCK_H
WSAData winSockData;
/* we need at least version 1.1 */
WORD winSockVersionNeeded = MAKEWORD( 1, 1 );
WSAStartup(winSockVersionNeeded, &winSockData);
#endif
/* initialize network, i.e. create an instance of T_ASC_Network*. */
OFCondition cond = ASC_initializeNetwork(NET_REQUESTOR, 0, 6, &net);
if (cond.bad()) {
DimseCondition::dump(temp_str, cond);
msg = QString::fromLatin1(temp_str.c_str());
goto cleanup;
}
/* initialize asscociation parameters, i.e. create an instance of T_ASC_Parameters*. */
cond = ASC_createAssociationParameters(¶ms, ASC_DEFAULTMAXPDU);
if (cond.bad()) {
DimseCondition::dump(temp_str, cond);
msg = QString::fromLatin1(temp_str.c_str());
goto cleanup;
}
ASC_setAPTitles(params, ourTitle.toLocal8Bit().data(), peerTitle.toLocal8Bit().data(), NULL);
/* Set the transport layer type (type of network connection) in the params */
/* strucutre. The default is an insecure connection; where OpenSSL is */
/* available the user is able to request an encrypted,secure connection. */
cond = ASC_setTransportLayerType(params, OFFalse);
if (cond.bad()) {
DimseCondition::dump(temp_str, cond);
msg = QString::fromLatin1(temp_str.c_str());
goto cleanup;
}
/* Figure out the presentation addresses and copy the */
/* corresponding values into the association parameters.*/
DIC_NODENAME localHost;
DIC_NODENAME peerHost;
gethostname(localHost, sizeof(localHost) - 1);
sprintf(peerHost, "%s:%d", hostname.toLocal8Bit().data(), port);
ASC_setPresentationAddresses(params, localHost, peerHost);
/* Set the presentation contexts which will be negotiated */
/* when the network connection will be established */
int presentationContextID = 1; /* odd byte value 1, 3, 5, .. 255 */
for (unsigned long ii=0; ii<1; ii++)
{
cond = ASC_addPresentationContext(params, presentationContextID, UID_VerificationSOPClass,
transferSyntaxes, 3);
presentationContextID += 2;
if (cond.bad())
{
DimseCondition::dump(temp_str, cond);
msg = QString::fromLatin1(temp_str.c_str());
goto cleanup;
}
}
/* create association, i.e. try to establish a network connection to another */
/* DICOM application. This call creates an instance of T_ASC_Association*. */
cond = ASC_requestAssociation(net, params, &assoc);
if (cond.bad()) {
if (cond == DUL_ASSOCIATIONREJECTED)
{
T_ASC_RejectParameters rej;
ASC_getRejectParameters(params, &rej);
ASC_printRejectParameters(temp_str, &rej);
msg = QString("Association Rejected: %1").arg(temp_str.c_str());
goto cleanup;
} else {
DimseCondition::dump(temp_str, cond);
msg = QString("Association Request Failed: %1").arg(temp_str.c_str());
goto cleanup;
}
}
/* count the presentation contexts which have been accepted by the SCP */
/* If there are none, finish the execution */
if (ASC_countAcceptedPresentationContexts(params) == 0) {
msg = QString("No Acceptable Presentation Contexts");
goto cleanup;
}
/* do the real work, i.e. send a number of C-ECHO-RQ messages to the DICOM application */
/* this application is connected with and handle corresponding C-ECHO-RSP messages. */
DIC_US msgId = assoc->nextMsgID++;
DIC_US status;
DcmDataset *statusDetail = NULL;
/* send C-ECHO-RQ and handle response */
cond = DIMSE_echoUser(assoc, msgId, DIMSE_BLOCKING, 0, &status, &statusDetail);
/* check for status detail information, there should never be any */
if (statusDetail != NULL) {
delete statusDetail;
}
/* tear down association, i.e. terminate network connection to SCP */
if (cond == EC_Normal)
{
cond = ASC_releaseAssociation(assoc);
ret = true;
}
else if (cond == DUL_PEERABORTEDASSOCIATION)
{
}
else
{
DimseCondition::dump(temp_str, cond);
msg = QString::fromLatin1(temp_str.c_str());
cond = ASC_abortAssociation(assoc);
}
cleanup:
/* destroy the association, i.e. free memory of T_ASC_Association* structure. This */
/* call is the counterpart of ASC_requestAssociation(...) which was called above. */
cond = ASC_destroyAssociation(&assoc);
/* drop the network, i.e. free memory of T_ASC_Network* structure. This call */
/* is the counterpart of ASC_initializeNetwork(...) which was called above. */
cond = ASC_dropNetwork(&net);
#ifdef HAVE_WINSOCK_H
WSACleanup();
#endif
return ret;
}