Messaging and Directory Server software used around the world in the Government, Military, Aviation and Commercial sectors. Section Contents Main Page Modules File List File Members

Documentation Isode X.400 Gateway API     examples/x400_mtrcv.c This is an example program which transfers messages and reports out of the MTA. /* Copyright (c) 2003-2007, Isode Limited, London, England. * All rights reserved. * * Acquisition and use of this software and related materials for any * purpose requires a written licence agreement from Isode Limited, * or a written licence from an organisation licenced by Isode Limited * to grant such a licence. * */ /* $RCSfile: x400_mtrcv.c,v $ $Revision: 1.30 $ $Date: 2007/09/25 14:16:14 $ $State: Exp $ * * $Log: x400_mtrcv.c,v $ * Revision 1.30 2007/09/25 14:16:14 paga * T070925E - #define out dl expansion history and security label code. * * Revision 1.29 2007/08/31 07:22:23 paga * T070830J - Add example security label calls to x400mt api * * Revision 1.28 2007/08/28 15:29:53 paga * T070828E - No longer delete the DL Expansion list structure explicity. * (It's now deleted when the message is deleted). * * Revision 1.27 2007/07/31 16:25:34 paga * T070730F - Add example DL history expansion code * * Revision 1.26 2007/07/24 12:45:40 dbw * T070724D - Fix warnings * * Revision 1.25 2007/07/11 11:02:43 kurt * T070615E - %* requires int * * Revision 1.24 2007/05/15 13:11:10 dbw * T070515D - Update/Add copyright * * Revision 1.23 2007/05/09 16:22:59 ir * T070509W - Pass in reason/diag not as manifest constants into X400mtMsgGetFinish(). * * Revision 1.22 2007/05/09 15:57:09 ir * T070509P - Replace deprecated call to X400mtMsgGet() with X400mtMsgGetStart() * and X400mtMsgFinish(). * Add code under conditional comp to NDR message. * * Revision 1.21 2007/04/05 12:46:00 brs * T070405A - Fix some warnings. * * Revision 1.20 2006/09/11 09:43:30 ir * T060825A - Add switch which accepts defaults (as overridden on the command line) * stopping the prompts so that the programs can be run unattended. * * Revision 1.19 2006/07/28 09:05:20 ir * T060728A - Add -u switch to example progs to accept cmd line args without * prompting. * * Revision 1.18 2006/02/25 17:00:36 brs * T060224E - Change types to conform to function prototypes (between char* * and u_char*, and int* and size_t*, primarily). * * Revision 1.17 2005/12/14 11:23:47 tc * T051214C - Get arrival time from reported-recipients. * * Revision 1.16 2005/11/03 11:55:05 tc * T051103A - Delete unnecessary Doxygen text. * * Revision 1.15 2005/10/12 10:42:57 ir * T051012A - Remove unused variables. * Include <stdlib.h> for exit() prototype. * * Revision 1.14 2005/10/10 07:57:14 ir * T051007C - Call get_args() to parse cmdline args. * * Revision 1.13 2005/09/08 14:05:49 tc * T050908C - Add example of use of X400_S_CONTENT_FILE_PATH attribute. * Add code to get and print out external content type. * * Revision 1.12 2005/05/25 16:23:36 dbw * T050525C - Files updated in 2004 * * Revision 1.11 2004/06/30 09:31:17 ldv * T040625G - Improve the examples to use the new API functionality * * Revision 1.10 2004/05/27 12:01:42 dbw * T040527A - Use OR_ADDRESS rather than ORIGINATOR for originator address * * Revision 1.9 2004/05/06 09:26:35 tc * T040505C - Replace use of X400Message with X400msMessage. * Call common 'do_tailoring' function to get data from x400tailor file. * Call common 'set_defaults' routine. * Add loop to retrieve all messages. * * Revision 1.8 2004/02/06 15:23:39 ir * T040205A - Add return values for functions not void. * * Revision 1.7 2003/12/11 10:06:14 ir * T031210A - Remove password prompt. Pick up originator using X400_S_ORIGINATOR. * Check for expected error when reading report originator. * * Revision 1.6 2003/10/20 09:14:51 tc-local * T031017B - Rename amhs->x400 throughout. * * Revision 1.5 2003/10/16 15:32:22 ir * T031016A - Add ability to get report and display report info. * * Revision 1.4 2003/10/02 15:49:15 ir * T031002A - Enable main code to be called more than once. * * Revision 1.3 2003/09/29 16:36:31 ir * T030929C - Add use of all possible attributes. * * Revision 1.2 2003/09/11 11:01:21 ir * T030911A - Use AMHSMessage and AMHSRecipient over AMHS API. * * Revision 1.1 2003/09/04 12:30:30 ir * T030904B - Add amhs-common and initial MT support files. * * * Simple example program for transferring a message out of the MTA */ #include <stdio.h> #include <stdlib.h> #include <x400_mtapi.h> #include <seclabel_api.h> /* For security labels */ #include "example.h" /* to get NDR values */ /* #include "esc.h" */ static int get_msg ( int argc, char **argv ) ; static int do_msg_env( struct X400mtMessage *mp ); static int do_msg_headers( struct X400mtMessage *mp ); static void do_msg_content( struct X400mtMessage *mp ); static int get_a_msg ( struct X400mtSession *sp ) ; static int get_recips( struct X400mtMessage *mp, int recip_type, char *recip_str ); static int get_exempted_recips ( struct X400mtMessage *mp ); static int do_rep_env( struct X400mtMessage *mp ); static int do_rep_content( struct X400mtMessage *mp ); static int do_rep_retcontent( struct X400mtMessage *mp ); static void usage(void); static int do_dl_hist ( struct X400mtMessage *mp ); static int do_trace_info ( struct X400mtMessage *mp ); static int do_internal_trace_info ( struct X400mtMessage *mp ); static int do_redirection_hist ( struct X400Recipient *recip ); static int do_redirection_hist_env ( struct X400mtMessage *msg ); static int get_ALI ( struct X400mtMessage *mp ); static int get_hi ( struct X400mtMessage *mp ); static int get_mi ( struct X400mtMessage *mp ); static int get_dist_codes_sic( struct X400mtMessage *mp ); static int get_other_recips( struct X400mtMessage *mp ); static int get_acp127_ali ( struct X400ACP127Resp *resp ); static char *optstr = "uo:O:r:c:l:E"; static int get_body_parts( struct X400mtMessage *mp ); static int do_orig_and_dl ( struct X400mtMessage *mp ); int num_atts = 0; int main ( int argc, char **argv ) { int retval; if (x400_channel == NULL) { fprintf (stderr, "No x400_channel value set in x400tailor file"); exit(1); } retval = get_msg(argc, argv); /* while (retval == X400_E_NOERROR || retval == X400_E_NO_MESSAGE) { retval = get_msg(argc, argv); } */ retval = get_msg(argc, argv); fprintf (stderr, "Error in X400mtMsgGet: %s\n", X400mtError (retval)); return(retval); } static int get_msg ( int argc, char **argv ) { int status; struct X400mtSession *sp; char *filepath = "/var/isode"; if (get_args(argc, argv, optstr)) { usage(); exit(-1); } /* open our X400 session */ status = X400mtOpen (x400_channel, &sp); if ( status != X400_E_NOERROR ) { fprintf (stderr, "Error in Open: %s\n", X400mtError (status)); return (status); } X400mtSetStrDefault(sp, X400_S_CONTENT_FILE_PATH, filepath, strlen(filepath)); X400mtSetStrDefault(sp, X400_ADATP3_SEP,"\r\n",-1); get_a_msg(sp); if ( status != X400_E_NOERROR ) { /* close API session */ status = X400mtClose (sp); if ( status != X400_E_NOERROR ) { printf("X400mtClose returned error %d\n", status); fprintf (stderr, "Error in X400mtClose: %s\n", X400mtError (status)); } return status; } do { get_a_msg(sp); if ( status != X400_E_NOERROR ) { /* close API session */ status = X400mtClose (sp); if ( status != X400_E_NOERROR ) { printf("X400mtClose returned error %d\n", status); fprintf (stderr, "Error in X400mtClose: %s\n", X400mtError (status)); } return status; } } while (until_no_more_msgs); /* close API session */ status = X400mtClose (sp); if ( status != X400_E_NOERROR ) { printf("X400mtClose returned error %d\n", status); fprintf (stderr, "Error in X400mtClose: %s\n", X400mtError (status)); } return (status); } static int get_a_msg ( struct X400mtSession *sp ) { struct X400mtMessage *mp; int type; int status; static int reported_none = 0; /* get the message */ status = X400mtMsgGetStart (sp, &mp, &type); if ( status != X400_E_NOERROR ) { if ( status == X400_E_NO_MESSAGE ) { if (reported_none == 0) { printf("No messages ...\n"); reported_none = 1; } return (X400_E_NO_MESSAGE); } printf("Error getting message (%d) %s\n", status, X400mtError(status)); fprintf (stderr, "Error in X400mtMsgGet: %s\n", X400mtError (status)); return (status); } /* process the message */ switch ( type) { case X400_MSG_MESSAGE: printf("Message waiting\n\n"); /* display message attributes */ do_msg_env(mp); do_msg_headers(mp); do_msg_content(mp); break; case X400_MSG_REPORT: printf("Report waiting\n\n"); /* display message attributes */ do_rep_env(mp); do_rep_content(mp); do_rep_retcontent(mp); break; case X400_MSG_PROBE: /* Not handling a Probe here */ printf ("Got a probe, ignoring ...\n"); /* Delete internal copy */ status = X400mtMsgDelete (mp); if ( status != X400_E_NOERROR ) { printf("X400mtMsgDelete returned error %d\n", status); fprintf (stderr, "Error in X400mtMsgDelete: %s\n", X400mtError (status)); } return (status); } #ifdef always_dr_msg #define DRD_UNRECOGNISED_OR 0 #define DRR_UNABLE_TO_TRANSFER 1 /* finish transfer - NDR */ status = X400mtMsgGetFinish (mp, X400_E_ADDRESS_ERROR, DRR_UNABLE_TO_TRANSFER, DRD_UNRECOGNISED_OR, "Unable to transfer"); #endif /* finish transfer - accept: no DR */ status = X400mtMsgGetFinish (mp, X400_E_NOERROR, -1, -1, ""); if ( status != X400_E_NOERROR ) { printf("X400mtMsgFinish returned error %d\n", status); fprintf (stderr, "Error in X400mtMsgFinish: %s\n", X400mtError (status)); } printf("X400mtMsgFinish returned success %d\n", status); /* Delete internal copy */ status = X400mtMsgDelete (mp); if ( status != X400_E_NOERROR ) { printf("X400mtMsgDelete returned error %d\n", status); fprintf (stderr, "Error in X400mtMsgDelete: %s\n", X400mtError (status)); } return status; } /* * Message functions */ static int do_msg_env( struct X400mtMessage *mp ) { char buffer[BUFSIZ]; int status; size_t length; int int_param = 0; /* Envelope Attributes */ /* string attributes */ /* The ORADDRESS in the message is the (envelope) originator */ status = X400mtMsgGetStrParam (mp, X400_S_OR_ADDRESS, buffer, sizeof buffer , &length); if ( status != X400_E_NOERROR ) { printf("error getting originator address\n"); fprintf (stderr, "Error in X400mtMsgGetStrParam: %s\n", X400mtError (status)); return (status); } printf ("Originator: %.*s\n", (int)length, buffer); /* Envelope message IDentifier */ status = X400mtMsgGetStrParam (mp, X400_S_MESSAGE_IDENTIFIER, buffer, sizeof buffer , &length); if ( status != X400_E_NOERROR ) { printf("error getting message identifier\n"); fprintf (stderr, "Error in X400mtMsgGetStrParam: %s\n", X400mtError (status)); return (status); } printf ("MessageID: %.*s\n", (int)length, buffer); /* Content Identifier */ status = X400mtMsgGetStrParam (mp, X400_S_CONTENT_IDENTIFIER, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Content Identifier: %.*s\n", (int)length, buffer); /* Content Correlator */ status = X400mtMsgGetStrParam (mp, X400_S_CONTENT_CORRELATOR, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Content Correlator: %.*s\n", (int)length, buffer); /* Original EITs */ status = X400mtMsgGetStrParam (mp, X400_S_ORIGINAL_ENCODED_INFORMATION_TYPES, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Original EITs: %.*s\n", (int)length, buffer); /* Message Submission Time */ status = X400mtMsgGetStrParam (mp, X400_S_MESSAGE_SUBMISSION_TIME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Message Submission Time: %.*s\n", (int)length, buffer); /* Message Delivery Time */ status = X400mtMsgGetStrParam (mp, X400_S_MESSAGE_DELIVERY_TIME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Message Delivery Time: %.*s\n", (int)length, buffer); /* Latest Delivery Time */ status = X400mtMsgGetStrParam (mp, X400_S_LATEST_DELIVERY_TIME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Latest Delivery Time: %.*s\n", (int)length, buffer); /* Originator Return Address */ status = X400mtMsgGetStrParam (mp, X400_S_ORIGINATOR_RETURN_ADDRESS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Originator Return Address : %.*s\n", (int)length, buffer); status = X400mtMsgGetStrParam (mp, X400_S_EXTERNAL_CONTENT_TYPE, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("External Content Type : %.*s\n", (int)length, buffer); /* Integer parameters */ /* Content Type */ status = X400mtMsgGetIntParam (mp, X400_N_CONTENT_TYPE, &int_param); if ( status == X400_E_NOERROR ) printf ("Content type : P%d\n", int_param); if ( status == X400_E_NOERROR ) printf ("Content type : P%d\n", int_param); /* Content Length */ status = X400mtMsgGetIntParam (mp, X400_N_CONTENT_LENGTH, &int_param); if ( status == X400_E_NOERROR ) printf ("Content length: %d\n", int_param); /* Priority */ status = X400mtMsgGetIntParam (mp, X400_N_PRIORITY, &int_param); if ( status == X400_E_NOERROR ) printf ("Priority: %d\n", int_param); /* Disclosure of recips prohibited */ status = X400mtMsgGetIntParam (mp, X400_N_DISCLOSURE, &int_param); if ( status == X400_E_NOERROR ) printf ("Disclosure of recips prohibited %s\n", int_param == 0 ? "No": "Yes"); /* Implicit conversion prohibited */ status = X400mtMsgGetIntParam (mp, X400_N_IMPLICIT_CONVERSION_PROHIBITED, &int_param); if ( status == X400_E_NOERROR ) printf ("Implicit conversion prohibited %s\n", int_param == 0 ? "No": "Yes"); /* Alternate recipient allowed */ status = X400mtMsgGetIntParam (mp, X400_N_ALTERNATE_RECIPIENT_ALLOWED, &int_param); if ( status == X400_E_NOERROR ) printf (" Alternate recipient allowed: %s\n", int_param == 0 ? "No": "Yes"); /* Content return request */ status = X400mtMsgGetIntParam (mp, X400_N_CONTENT_RETURN_REQUEST, &int_param); if ( status == X400_E_NOERROR ) printf (" Content return request: %s\n", int_param == 0 ? "No": "Yes"); /* Recipient reassignment prohibited */ status = X400mtMsgGetIntParam (mp, X400_N_RECIPIENT_REASSIGNMENT_PROHIBITED, &int_param); if ( status == X400_E_NOERROR ) printf ("Recipient reassignment prohibited: %s\n", int_param == 0 ? "No": "Yes"); /* Distribution List expansion prohibited */ status = X400mtMsgGetIntParam (mp, X400_N_DL_EXPANSION_PROHIBITED, &int_param); if ( status == X400_E_NOERROR ) printf ("Distribution List expansion prohibited: %s\n", int_param == 0 ? "No": "Yes"); /* Conversion with loss prohibited */ status = X400mtMsgGetIntParam (mp, X400_N_CONVERSION_WITH_LOSS_PROHIBITED, &int_param); if ( status == X400_E_NOERROR ) printf ("Conversion with loss prohibited: %s\n", int_param == 0 ? "No": "Yes"); /* Get the envelope recipients */ status = get_recips(mp, X400_RECIP_ENVELOPE, "envelope"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } /* Get X.411 exempted recipients */ status = get_recips(mp, X400_DL_EXEMPTED_RECIP, "DL Exempted recips"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } #ifdef WANT_DL_EXP_HIST /* DL Expansion history */ { /*Process the DL Expansion History object */ status = do_dl_hist(mp); if ( status != X400_E_NO_VALUE ) { /* There has been an error fetching the DL expansion history*/ printf("error getting DL Expansion History\n"); fprintf (stderr, "Error in X400mtDLExpHistGet: %s\n", X400mtError (status)); return status; } } #endif /* Security Label */ #ifdef USE_SEC_LABEL #define XML_BUFSIZE 1024 { char xml_buffer[XML_BUFSIZE]; unsigned char slab_buffer[XML_BUFSIZE]; status = X400mtMsgGetStrParam(mp, X400_S_SECURITY_LABEL, (char*)slab_buffer, XML_BUFSIZE, &length); if (status == X400_E_NO_VALUE) { printf("No security label\n"); } else if (status != X400_E_NOERROR) { fprintf(stderr,"Failed to fetch security label: %d",status); exit(1); } else { int sec_status = 0; sec_status = SecLabelInit("Example program"); if (status != SECLABEL_E_NOERROR) { fprintf(stderr, "SecLabelInit returned error %d\n", status); exit(1); } status = SecLabelPrint(slab_buffer, length, xml_buffer, XML_BUFSIZE); if (status != SECLABEL_E_NOERROR) { fprintf(stderr, "SecLabelParse returned error %d\n", status); exit(1); } /* You could now write out the XML file, or parse it in memory..*/ printf("Got security label:%s\n",xml_buffer); } } #endif #define WANT_TRACE_INFO 1 #ifdef WANT_TRACE_INFO { status = do_trace_info(mp); if ( status == X400_E_NO_VALUE) { } else if (status == X400_E_MISSING_ATTR ) { printf("There is no Trace Info\n"); } else { printf("error getting Trace Info\n"); fprintf (stderr, "Error fetching trace info: %s\n", X400mtError (status)); return status; } } #endif #define USE_INTERNAL_TRACE_INFO 1 #ifdef USE_INTERNAL_TRACE_INFO { status = do_internal_trace_info(mp); if ( status == X400_E_NO_VALUE) { /* do nothing */ } else if (status == X400_E_MISSING_ATTR ) { printf("There is no internal Trace Info\n"); } else { printf("error getting Trace Info\n"); fprintf (stderr, "Error fetching trace info: %s\n", X400mtError (status)); return status; } } #endif /* NB: Originator cert is just being treated as a binary blob */ status = X400mtMsgGetStrParam (mp, X400_S_ORIG_CERT, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Originator Cert got %i bytes\n", (int)length); /* NB: Originator cert is just being treated as a binary blob */ status = X400mtMsgGetStrParam (mp, X400_S_MOAC, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("MOAC got %i bytes\n", (int)length); return X400_E_NOERROR; } static int do_dl_hist ( struct X400mtMessage *mp ) { struct X400DLExpHist *hist = NULL; char DLORAddress[BUFSIZ]; char DLORDN[BUFSIZ]; char DLExpTime[BUFSIZ]; size_t length; int n; int status; /* Loop through the entries, pulling out the OR Address, DN, and expansion * time for each entry. * Stop looping when there is no n entry */ for ( n=1; ;n++ ) { status = X400mtDLExpHistGet (mp,n,&hist); if (status != X400_E_NOERROR) { return status; } status = X400DLGetStrParam (hist, X400_S_OR_ADDRESS, DLORAddress, BUFSIZ , &length); if (status == X400_E_NO_VALUE) { return X400_E_NO_VALUE; } if ( status == X400_E_NOERROR ) { DLORAddress[length] = '\0'; printf ("DLExpansion List entry %d OR Address:%s\n", n,DLORAddress); } else { fprintf (stderr, "Error in :X400DLGetStrParam OR %s\n", X400mtError (status)); } status = X400DLGetStrParam (hist,X400_S_DIRECTORY_NAME, DLORDN, BUFSIZ , &length); if ( status == X400_E_NOERROR ) { DLORDN[length] = '\0'; printf ("DLExpansion List entry %d DN :%s\n",n,DLORDN); } else { fprintf (stderr, "Error in :X400DLGetStrParam DN %s\n", X400mtError (status)); } status = X400DLGetStrParam (hist,X400_S_DLEXP_TIME, DLExpTime, BUFSIZ , &length); if ( status == X400_E_NOERROR ) { DLExpTime[length] = '\0'; printf ("DLExpansion List entry %d Time :%s\n",n,DLExpTime); } else { fprintf (stderr, "Error in :X400DLGetStrParam Time %s\n", X400mtError (status)); } } return X400_E_NOERROR; } static int do_msg_headers( struct X400mtMessage *mp ) { char buffer[BUFSIZ]; int status; size_t length; int int_param; /* Message Headers */ printf("\nContent:\n"); /* Get the primary recipients */ status = get_recips(mp, X400_RECIP_PRIMARY, "primary"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } /* Get the cc recipients */ status = get_recips(mp, X400_RECIP_CC, "cc"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } /* Get the bcc recipients */ status = get_recips(mp, X400_RECIP_BCC, "bcc"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } /* Get the reply recipients */ status = get_recips(mp, X400_AUTH_ORIG, "auth-orig"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } /* Get the reply recipients */ status = get_recips(mp, X400_RECIP_REPLY, "reply"); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { printf("error getting recipients\n"); fprintf (stderr, "Error in getting recipient: %s\n", X400mtError (status)); return (status); } /* Get the Exempted recipients */ status = get_exempted_recips(mp); if ( status != X400_E_NOERROR && status != X400_E_NO_RECIP) { fprintf (stderr, "Error in getting exempted recipient: %s\n", X400mtError (status)); return (status); } /* string parameters */ /* IPM IDentifier */ status = X400mtMsgGetStrParam (mp, X400_S_IPM_IDENTIFIER, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("IPM IDentifier: %.*s\n", (int)length, buffer); /* Subject */ status = X400mtMsgGetStrParam (mp, X400_S_SUBJECT, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Subject: %.*s\n", (int)length, buffer); /* Replied-to-identifier */ status = X400mtMsgGetStrParam (mp, X400_S_REPLIED_TO_IDENTIFIER, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Replied-to-identifier: %.*s\n", (int)length, buffer); /* Obsoleted IPMs */ status = X400mtMsgGetStrParam (mp, X400_S_OBSOLETED_IPMS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Obsoleted IPMs: %.*s\n", (int)length, buffer); /* Related IPMs */ status = X400mtMsgGetStrParam (mp, X400_S_RELATED_IPMS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Related IPMs: %.*s\n", (int)length, buffer); /* Expiry Time */ status = X400mtMsgGetStrParam (mp, X400_S_EXPIRY_TIME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Expiry Time: %.*s\n", (int)length, buffer); /* Reply Time */ status = X400mtMsgGetStrParam (mp, X400_S_REPLY_TIME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Reply Time: %.*s\n", (int)length, buffer); /* Authorisation Time */ status = X400mtMsgGetStrParam (mp, X400_S_AUTHORIZATION_TIME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Authorisation Time: %.*s\n", (int)length, buffer); /* Originator's Reference */ status = X400mtMsgGetStrParam (mp, X400_S_ORIGINATORS_REFERENCE, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("Originator's Reference: %.*s\n", (int)length, buffer); /* integer arguments */ /* Importance */ status = X400mtMsgGetIntParam (mp, X400_N_IMPORTANCE, &int_param); if ( status == X400_E_NOERROR ) printf ("Importance: %d\n", int_param); /* Sensitivity: 1 - personal, 2 - private, 3 - company-confidential */ status = X400mtMsgGetIntParam (mp, X400_N_SENSITIVITY, &int_param); if ( status == X400_E_NOERROR ) printf ("Sensitivity: %d\n", int_param); /* Autoforwarded */ status = X400mtMsgGetIntParam (mp, X400_N_AUTOFORWARDED, &int_param); if ( status == X400_E_NOERROR ) printf ("Autoforwarded: %s\n", int_param ? "false" : "true"); /* number of attachments apart from main body part */ status = X400mtMsgGetIntParam (mp, X400_N_NUM_ATTACHMENTS, &num_atts); if ( status == X400_E_NOERROR ) printf ("number of attachments: %d\n", num_atts); /* Fetch P772 Extended Auth Info */ status = X400mtMsgGetStrParam (mp, X400_S_EXT_AUTH_INFO, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("P772 Ext Auth Info Time: %.*s\n", (int)length, buffer); /* Fetch P772 Codress value */ status = X400mtMsgGetIntParam (mp, X400_N_EXT_CODRESS, &int_param); if ( status == X400_E_NOERROR ) printf ("P772 Codress value: %d\n", int_param); /* Fetch P772 Message type value */ status = X400mtMsgGetIntParam (mp, X400_N_EXT_MSG_TYPE, &int_param); if ( status == X400_E_NOERROR ) printf ("P772 Message Type: %d\n", int_param); /* Fetch P772 Primary Precedence */ status = X400mtMsgGetIntParam (mp, X400_N_EXT_PRIM_PREC, &int_param); if ( status == X400_E_NOERROR ) printf ("P772 Primary Precedence: %d\n", int_param); /* Fetch P772 Copy Precedence */ status = X400mtMsgGetIntParam (mp, X400_N_EXT_COPY_PREC, &int_param); if ( status == X400_E_NOERROR ) printf ("P772 Copy Precedence: %d\n", int_param); /* Fetch P772 Address List Indicators*/ get_ALI(mp); /* Fetch handling instructions */ get_hi(mp); /* Fetch message instructions */ get_mi(mp); /* Fetch distribution codes sic */ get_dist_codes_sic(mp); /* Fetch Other Recipients */ get_other_recips(mp); status = X400mtMsgGetStrParam (mp, X400_S_ORIG_REF, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("P772 Originator Reference: %.*s\n", (int)length, buffer); status = X400mtMsgGetStrParam (mp, X400_S_ORIG_PLAD, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("P772 Originator PLAD: %.*s\n", (int)length, buffer); status = X400mtMsgGetStrParam (mp, X400_S_ACP127_MSG_ID, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("P772 ACP127 Msg ID: %.*s\n", (int)length, buffer); /* NB: Pilot forwarding info is just being treated as a binary blob */ status = X400mtMsgGetStrParam (mp, X400_S_PILOT_FWD_INFO, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("P772 Pilot Forwarding Info got %i bytes\n", (int)length); /* NB: information security label is just being treated as a binary blob */ status = X400mtMsgGetStrParam (mp, X400_S_INFO_SEC_LABEL, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) printf ("P772 Information Security Label got %i bytes\n", (int)length); return X400_E_NOERROR; } static void do_msg_content( struct X400mtMessage *mp ) { char buffer[30000]; int status; size_t length; memset(buffer,0,30000); status = X400mtMsgGetStrParam (mp, X400_S_CONTENT_FILENAME, buffer, sizeof buffer , &length); printf("Read raw content into file %s\n", buffer); /* Message Body */ /* And now get message text (or it could be another type - ie not IA5) */ status = X400mtMsgGetStrParam (mp, X400_T_IA5TEXT, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("Text:\n%.*s\n", (int)length, buffer); num_atts--; /* The IA5text bodypart is infact the first "attachment" * So there is one less to fetch */ } /* Go through message bodyparts */ status = get_body_parts(mp); return; } static int get_exempted_recips ( struct X400mtMessage *mp ) { struct X400Recipient *rp; int n; char buffer[BUFSIZ]; size_t length; int status; for ( n = 1; ; n++ ) { status = X400mtRecipGet (mp,X400_EXEMPTED_ADDRESS , n, &rp); if ( status == X400_E_NO_RECIP ) break; if ( status != X400_E_NOERROR ) { fprintf (stderr, "Error in X400mtRecipGet: %s\n", X400mtError (status)); return (status); } status = X400mtRecipGetStrParam (rp, X400_S_IOB_OR_ADDRESS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("Exempted recipient OR address %d: %.*s\n", n, (int)length, buffer); } status = X400mtRecipGetStrParam (rp, X400_S_IOB_DN_ADDRESS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("Exempted recipient DN address %d: %.*s\n", n, (int)length, buffer); } status = X400mtRecipGetStrParam (rp, X400_S_IOB_FREE_FORM_NAME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("Exempted recipient free form name %d: %.*s\n", n, (int)length, buffer); } status = X400mtRecipGetStrParam (rp, X400_S_IOB_TEL, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("Exempted recipient Tel number %d: %.*s\n", n, (int)length, buffer); } } return X400_E_NOERROR; } static int get_ALI ( struct X400mtMessage *mp ) { struct X400ALI *ali = NULL; int n; char buffer[BUFSIZ]; size_t length; int status; int int_param; for ( n = 1; ; n++ ) { status = X400mtALIGet (mp,n,&ali); if ( status != X400_E_NOERROR ) return status; status = X400ALIGetStrParam (ali,X400_S_IOB_OR_ADDRESS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 ALI recipient OR address %d: %.*s\n", n, (int)length, buffer); } else if ( status == X400_E_NO_VALUE) { return X400_E_NO_VALUE; } status = X400ALIGetStrParam (ali,X400_S_IOB_DN_ADDRESS, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 ALI recipient DN address %d: %.*s\n", n, (int)length, buffer); } status = X400ALIGetStrParam (ali,X400_S_IOB_FREE_FORM_NAME, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 ALI recipient free form name %d: %.*s\n", n, (int)length, buffer); } status = X400ALIGetStrParam (ali, X400_S_IOB_TEL, buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 ALI recipient Tel number %d: %.*s\n", n, (int)length, buffer); } status = X400ALIGetIntParam (ali,X400_N_ALI_TYPE , &int_param); if ( status == X400_E_NOERROR ) { printf ("P772 ALI Type %d\n", int_param); } status = X400ALIGetIntParam (ali,X400_N_ALI_NOTIFICTAION_REQUEST , &int_param); if ( status == X400_E_NOERROR ) { printf ("P772 ALI Notification Request %d\n", int_param); } status = X400ALIGetIntParam (ali,X400_N_ALI_REPLY_REQUEST ,&int_param); if ( status == X400_E_NOERROR ) { printf ("P772 ALI Notification Request %d\n", int_param); } } } static int get_hi ( struct X400mtMessage *mp ) { struct X400PSS *pss = NULL; int n; char buffer[BUFSIZ]; size_t length; int status; for ( n = 1; ; n++ ) { status = X400mtPSSGet (mp,X400_S_HANDLING_INSTRUCTIONS,n,&pss); if ( status != X400_E_NOERROR ) return status; status = X400PSSGetStrParam (pss,buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 Handling instruction %d: %.*s\n", n, (int)length, buffer); } else if ( status == X400_E_NO_VALUE) { return X400_E_NO_VALUE; } } } static int get_mi ( struct X400mtMessage *mp ) { struct X400PSS *pss = NULL; int n; char buffer[BUFSIZ]; size_t length; int status; for ( n = 1; ; n++ ) { status = X400mtPSSGet (mp,X400_S_MESSAGE_INSTRUCTIONS,n,&pss); if ( status != X400_E_NOERROR ) return status; status = X400PSSGetStrParam (pss,buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 Message instruction %d: %.*s\n", n, (int)length, buffer); } else if ( status == X400_E_NO_VALUE) { return X400_E_NO_VALUE; } } } static int get_dist_codes_sic( struct X400mtMessage *mp ) { struct X400PSS *pss = NULL; struct X400DistField *distfield = NULL; int n; char buffer[BUFSIZ]; size_t length; int status; for ( n = 1; ; n++ ) { status = X400mtPSSGet (mp,X400_S_DIST_CODES_SIC,n,&pss); if (status == X400_E_NO_VALUE) { break; /* Now try the extension fields*/ } else if ( status != X400_E_NOERROR ) { return status; } status = X400PSSGetStrParam (pss,buffer, sizeof buffer , &length); if ( status == X400_E_NOERROR ) { printf ("P772 Distribution code SIC %d: %.*s\n", n, (int)length, buffer); } } for ( n = 1; ; n++ ) { status = X400mtDistFieldGet (mp,n,&distfield); if (status == X400_E_NO_VALUE) { break; /* Now try the extension fields*/ } else if ( status != X400_E_NOERROR ) { return status; } status = X400DistFieldGetStrParam ( distfield, X400_S_DIST_CODES_EXT_OID, buffer, sizeof buffer, &length ); if ( status == X400_E_NOERROR ) { printf ("P772 Distribution code Field Extension OID %d: %.*s\n", n, (int)length, buffer); } status = X400DistFieldGetStrParam ( distfield, X400_S_DIST_CODES_EXT_VALUE, buffer, sizeof buffer, &length ); if ( status == X400_E_NOERROR ) { printf ("P772 Distribution code Field Extension OID %d: %.*s\n", n, (int)length, buffer); } } return X400_E_NOERROR; }