CONDITION
SRV_RegisterSOPClassXfer(const char *SOPClass, const char* xferSyntax, DUL_SC_ROLE role, DUL_ASSOCIATESERVICEPARAMETERS * params)
{
DUL_PRESENTATIONCONTEXTID contextID = 1;
CONDITION cond;
DUL_PRESENTATIONCONTEXT* ctx;
if (params->requestedPresentationContext == NULL){
params->requestedPresentationContext = LST_Create();
if (params->requestedPresentationContext == NULL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_RegisterSOPClassXfer");
}
ctx = LST_Head(¶ms->requestedPresentationContext);
if (ctx != NULL) (void) LST_Position(¶ms->requestedPresentationContext, ctx);
while (ctx != NULL) {
DUL_TRANSFERSYNTAX* xferItem;
contextID += 2;
xferItem = (DUL_TRANSFERSYNTAX*) LST_Head(&ctx->proposedTransferSyntax);
if ((strcmp(SOPClass, ctx->abstractSyntax) == 0) && (strcmp(xferSyntax, xferItem->transferSyntax) == 0) && (role == ctx->proposedSCRole)) return SRV_NORMAL;
ctx = LST_Next(¶ms->requestedPresentationContext);
}
cond = DUL_MakePresentationCtx(&ctx, role, DUL_SC_ROLE_DEFAULT, contextID, 0, SOPClass, "", xferSyntax, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_RegisterSOPClassXfer");
cond = LST_Enqueue(¶ms->requestedPresentationContext, ctx);
if (cond != LST_NORMAL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_RegisterSOPClassXfer");
return SRV_NORMAL;
}
CONDITION
SRV_RegisterSOPClass(const char *SOPClass, DUL_SC_ROLE role, DUL_ASSOCIATESERVICEPARAMETERS * params)
{
DUL_PRESENTATIONCONTEXTID contextID = 1;
CONDITION cond;
DUL_PRESENTATIONCONTEXT* ctx;
if (params->requestedPresentationContext == NULL) {
params->requestedPresentationContext = LST_Create();
if (params->requestedPresentationContext == NULL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_RegisterSOPClass");
}
ctx = LST_Head(¶ms->requestedPresentationContext);
if (ctx != NULL) (void) LST_Position(¶ms->requestedPresentationContext, ctx);
while (ctx != NULL) {
contextID += 2;
if (strcmp(SOPClass, ctx->abstractSyntax) == 0) return SRV_NORMAL;
ctx = LST_Next(¶ms->requestedPresentationContext);
}
cond = DUL_MakePresentationCtx(&ctx, role, DUL_SC_ROLE_DEFAULT, contextID, 0, SOPClass, "", DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_RegisterSOPClass");
cond = LST_Enqueue(¶ms->requestedPresentationContext, ctx);
if (cond != LST_NORMAL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_RegisterSOPClass");
return SRV_NORMAL;
}
static int
requestAssociation(DUL_NETWORKKEY ** network,
DUL_ASSOCIATIONKEY ** association,
DUL_ASSOCIATESERVICEPARAMETERS * params, char **SOPClasses,
int classCount)
{
CONDITION
cond;
DUL_PRESENTATIONCONTEXT
* ctx;
static DUL_PRESENTATIONCONTEXTID
contextID = 1;
if (params->requestedPresentationContext == NULL) {
params->requestedPresentationContext = LST_Create();
if (params->requestedPresentationContext == NULL) {
return 0;
}
}
while (classCount-- > 0) {
ctx = malloc(sizeof(*ctx));
if (ctx == NULL)
return 0;
cond = DUL_MakePresentationCtx(&ctx, DUL_SC_ROLE_DEFAULT,
DUL_SC_ROLE_DEFAULT,
contextID, 0, *SOPClasses++, "",
DICOM_TRANSFERLITTLEENDIAN,
DICOM_TRANSFERLITTLEENDIANEXPLICIT,
DICOM_TRANSFERBIGENDIANEXPLICIT,
NULL);
if (cond != DUL_NORMAL)
return 0;
else {
cond = LST_Enqueue(¶ms->requestedPresentationContext, ctx);
if (cond != LST_NORMAL)
return 0;
contextID += 2;
}
}
cond = DUL_RequestAssociation(network, params, association);
if (cond != DUL_NORMAL) {
if (cond == DUL_ASSOCIATIONREJECTED) {
fprintf(stderr, "Association Rejected\n");
fprintf(stderr, " Result: %2x Source %2x Reason %2x\n",
params->result, params->resultSource,
params->diagnostic);
}
return 0;
}
(void) printf("Association accepted, parameters:\n");
DUL_DumpParams(params);
return 1;
}
CONDITION
SRV_AcceptSOPClass(DUL_PRESENTATIONCONTEXT * requestedCtx, DUL_SC_ROLE role, DUL_ASSOCIATESERVICEPARAMETERS * params, char** xferSyntaxes,
int xferSyntaxCount, int isStorageClass)
{
CONDITION cond, rtnCond = SRV_NORMAL;
DUL_PRESENTATIONCONTEXT* ctx;
DUL_TRANSFERSYNTAX* transfer;
char* prefix = "ACCEPT/XFER";
if (params->acceptedPresentationContext == NULL) {
params->acceptedPresentationContext = LST_Create();
if (params->acceptedPresentationContext == NULL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_AcceptServiceClass");
}
if (isStorageClass) prefix = "ACCEPT/XFER/STORAGE";
transfer = matchProposedXferSyntax(requestedCtx, prefix, xferSyntaxes, xferSyntaxCount);
if (transfer == NULL) {
DUL_TRANSFERSYNTAX* proposedXfer;
proposedXfer = (DUL_TRANSFERSYNTAX*)LST_Head(&requestedCtx->proposedTransferSyntax);
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, DUL_SC_ROLE_DEFAULT, requestedCtx->presentationContextID,
DUL_PRESENTATION_REJECT_ABSTRACT_SYNTAX, requestedCtx->abstractSyntax, proposedXfer->transferSyntax,
proposedXfer->transferSyntax, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptSOPClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDSERVICE, SRV_Message(SRV_UNSUPPORTEDSERVICE), requestedCtx->abstractSyntax, "SRV_AcceptSOPClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED, SRV_Message(SRV_PRESENTATIONCTXREJECTED), requestedCtx->abstractSyntax, "SRV_AcceptSOPClass");
}else{
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, role, requestedCtx->presentationContextID, DUL_PRESENTATION_ACCEPT,
requestedCtx->abstractSyntax, transfer->transferSyntax, transfer->transferSyntax, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptSOPClass");
}
cond = LST_Enqueue(¶ms->acceptedPresentationContext, ctx);
if (cond != LST_NORMAL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_AcceptSOPClass");
return rtnCond;
}
CONDITION
SRV_RejectServiceClass(DUL_PRESENTATIONCONTEXT * requestedCtx, unsigned short result, DUL_ASSOCIATESERVICEPARAMETERS * params)
{
CONDITION cond;
DUL_PRESENTATIONCONTEXT * ctx;
if (params->acceptedPresentationContext == NULL) {
params->acceptedPresentationContext = LST_Create();
if (params->acceptedPresentationContext == NULL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_RejectServiceClass");
}
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, DUL_SC_ROLE_DEFAULT, requestedCtx->presentationContextID, (unsigned char)result,
requestedCtx->abstractSyntax, DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_RejectServiceClass");
cond = LST_Enqueue(¶ms->acceptedPresentationContext, ctx);
if (cond != LST_NORMAL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_RejectServiceClass");
return SRV_NORMAL;
}
CONDITION
SRV_AcceptServiceClass(DUL_PRESENTATIONCONTEXT * requestedCtx, DUL_SC_ROLE role, DUL_ASSOCIATESERVICEPARAMETERS * params)
{
int index;
CTNBOOLEAN abstractFound = FALSE;
CONDITION cond, rtnCond = SRV_NORMAL;
DUL_PRESENTATIONCONTEXT * ctx;
DUL_TRANSFERSYNTAX * transfer;
if (params->acceptedPresentationContext == NULL) {
params->acceptedPresentationContext = LST_Create();
if (params->acceptedPresentationContext == NULL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_AcceptServiceClass");
}
for (index = 0; index < (int) DIM_OF(syntaxList) && !abstractFound; index++) {
if (strcmp(requestedCtx->abstractSyntax, syntaxList[index]) == 0) abstractFound = TRUE;
}
if (abstractFound){
char* xferSyntaxes[] = { DICOM_TRANSFERLITTLEENDIAN };
transfer = matchProposedXferSyntax(requestedCtx, "ACCEPT/XFER", xferSyntaxes, 1);
if (transfer == NULL) {
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, DUL_SC_ROLE_DEFAULT, requestedCtx->presentationContextID, DUL_PRESENTATION_REJECT_TRANSFER_SYNTAX,
requestedCtx->abstractSyntax, DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptServiceClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDSERVICE, SRV_Message(SRV_UNSUPPORTEDSERVICE), requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED, SRV_Message(SRV_PRESENTATIONCTXREJECTED), requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
} else {
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, role, requestedCtx->presentationContextID, DUL_PRESENTATION_ACCEPT,
requestedCtx->abstractSyntax, transfer->transferSyntax, transfer->transferSyntax, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptServiceClass");
}
#if 0
if ((transfer = LST_Head(&requestedCtx->proposedTransferSyntax)) == NULL)
return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_AcceptServiceClass");
(void) LST_Position(&requestedCtx->proposedTransferSyntax, transfer);
while (!transferFound && (transfer != NULL)) {
if (strcmp(transfer->transferSyntax, DICOM_TRANSFERLITTLEENDIAN) == 0){
transferFound = TRUE;
}else{
transfer = LST_Next(&requestedCtx->proposedTransferSyntax);
}
}
if (transferFound) {
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, role, requestedCtx->presentationContextID, DUL_PRESENTATION_ACCEPT,
requestedCtx->abstractSyntax, DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptServiceClass");
}else{
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, DUL_SC_ROLE_DEFAULT, requestedCtx->presentationContextID, DUL_PRESENTATION_REJECT_TRANSFER_SYNTAX,
requestedCtx->abstractSyntax, DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptServiceClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDTRANSFERSYNTAX, SRV_Message(SRV_UNSUPPORTEDTRANSFERSYNTAX), requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED, SRV_Message(SRV_PRESENTATIONCTXREJECTED), requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
}
#endif
}else{
cond = DUL_MakePresentationCtx(&ctx, requestedCtx->proposedSCRole, DUL_SC_ROLE_DEFAULT, requestedCtx->presentationContextID, DUL_PRESENTATION_REJECT_ABSTRACT_SYNTAX,
requestedCtx->abstractSyntax, DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL) return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR, SRV_Message(SRV_PRESENTATIONCONTEXTERROR), "SRV_AcceptServiceClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDSERVICE, SRV_Message(SRV_UNSUPPORTEDSERVICE), requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED, SRV_Message(SRV_PRESENTATIONCTXREJECTED), requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
}
cond = LST_Enqueue(¶ms->acceptedPresentationContext, ctx);
if (cond != LST_NORMAL) return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE), "SRV_AcceptServiceClass");
/* pdvList.count = 0; */
return rtnCond;
}
CONDITION
SRV_AcceptServiceClassWithOneXferSyntax(DUL_PRESENTATIONCONTEXT * requestedCtx,
DUL_SC_ROLE role, DUL_ASSOCIATESERVICEPARAMETERS * params,
const char* singleXferSyntax)
{
int
index;
CTNBOOLEAN
abstractFound = FALSE,
transferFound = FALSE;
CONDITION
cond,
rtnCond = SRV_NORMAL;
DUL_PRESENTATIONCONTEXT
* ctx;
DUL_TRANSFERSYNTAX
* transfer;
if (params->acceptedPresentationContext == NULL) {
params->acceptedPresentationContext = LST_Create();
if (params->acceptedPresentationContext == NULL) {
return COND_PushCondition(SRV_LISTFAILURE,
SRV_Message(SRV_LISTFAILURE), "SRV_AcceptServiceClass");
}
}
for (index = 0; index < (int) DIM_OF(syntaxList) && !abstractFound; index++) {
if (strcmp(requestedCtx->abstractSyntax, syntaxList[index]) == 0) {
abstractFound = TRUE;
}
}
if (abstractFound) {
#if 0
char* xferSyntaxes[] =
{ "1.2.840.10008.1.2.4.50", /* JPEG Baseline Process 1 */
"1.2.840.10008.1.2.4.51", /* JPEG Extended Process 2 & 4 */
"1.2.840.10008.1.2.1", /* Explicit VR Little Endian */
"1.2.840.10008.1.2.1.99", /* Deflated Explicit VR Little Endian */
"1.2.840.10008.1.2.2", /* Explicit VR Big Endian Endian */
DICOM_TRANSFERLITTLEENDIAN };
#endif
transfer = matchProposedXferSyntax(requestedCtx,
"ACCEPT/XFER", &singleXferSyntax, 1);
if (transfer == NULL) {
cond = DUL_MakePresentationCtx(&ctx,
requestedCtx->proposedSCRole,
DUL_SC_ROLE_DEFAULT,
requestedCtx->presentationContextID,
DUL_PRESENTATION_REJECT_TRANSFER_SYNTAX,
requestedCtx->abstractSyntax,
DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL)
return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR,
SRV_Message(SRV_PRESENTATIONCONTEXTERROR),
"SRV_AcceptServiceClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDSERVICE,
SRV_Message(SRV_UNSUPPORTEDSERVICE),
requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED,
SRV_Message(SRV_PRESENTATIONCTXREJECTED),
requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
} else {
cond = DUL_MakePresentationCtx(&ctx,
requestedCtx->proposedSCRole, role,
requestedCtx->presentationContextID,
DUL_PRESENTATION_ACCEPT,
requestedCtx->abstractSyntax,
transfer->transferSyntax,
transfer->transferSyntax,
NULL);
if (cond != DUL_NORMAL)
return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR,
SRV_Message(SRV_PRESENTATIONCONTEXTERROR),
"SRV_AcceptServiceClass");
}
#if 0
if ((transfer = LST_Head(&requestedCtx->proposedTransferSyntax)) == NULL)
return COND_PushCondition(SRV_LISTFAILURE,
SRV_Message(SRV_LISTFAILURE), "SRV_AcceptServiceClass");
(void) LST_Position(&requestedCtx->proposedTransferSyntax, transfer);
while (!transferFound && (transfer != NULL)) {
if (strcmp(transfer->transferSyntax, DICOM_TRANSFERLITTLEENDIAN) == 0)
transferFound = TRUE;
else
transfer = LST_Next(&requestedCtx->proposedTransferSyntax);
}
if (transferFound) {
cond = DUL_MakePresentationCtx(&ctx,
requestedCtx->proposedSCRole, role,
requestedCtx->presentationContextID,
DUL_PRESENTATION_ACCEPT,
requestedCtx->abstractSyntax,
DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL)
return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR,
SRV_Message(SRV_PRESENTATIONCONTEXTERROR),
"SRV_AcceptServiceClass");
} else {
cond = DUL_MakePresentationCtx(&ctx,
requestedCtx->proposedSCRole,
DUL_SC_ROLE_DEFAULT,
requestedCtx->presentationContextID,
DUL_PRESENTATION_REJECT_TRANSFER_SYNTAX,
requestedCtx->abstractSyntax,
DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL)
return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR,
SRV_Message(SRV_PRESENTATIONCONTEXTERROR),
"SRV_AcceptServiceClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDTRANSFERSYNTAX,
SRV_Message(SRV_UNSUPPORTEDTRANSFERSYNTAX),
requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED,
SRV_Message(SRV_PRESENTATIONCTXREJECTED),
requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
}
#endif
} else {
cond = DUL_MakePresentationCtx(&ctx,
requestedCtx->proposedSCRole,
DUL_SC_ROLE_DEFAULT,
requestedCtx->presentationContextID,
DUL_PRESENTATION_REJECT_ABSTRACT_SYNTAX,
requestedCtx->abstractSyntax,
DICOM_TRANSFERLITTLEENDIAN, DICOM_TRANSFERLITTLEENDIAN, NULL);
if (cond != DUL_NORMAL)
return COND_PushCondition(SRV_PRESENTATIONCONTEXTERROR,
SRV_Message(SRV_PRESENTATIONCONTEXTERROR),
"SRV_AcceptServiceClass");
(void) COND_PushCondition(SRV_UNSUPPORTEDSERVICE,
SRV_Message(SRV_UNSUPPORTEDSERVICE),
requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
rtnCond = COND_PushCondition(SRV_PRESENTATIONCTXREJECTED,
SRV_Message(SRV_PRESENTATIONCTXREJECTED),
requestedCtx->abstractSyntax, "SRV_AcceptServiceClass");
}
cond = LST_Enqueue(¶ms->acceptedPresentationContext, ctx);
if (cond != LST_NORMAL)
return COND_PushCondition(SRV_LISTFAILURE, SRV_Message(SRV_LISTFAILURE),
"SRV_AcceptServiceClass");
/* pdvList.count = 0; */
return rtnCond;
}
