samples/rm_amqp/rm_echo_dual_1_1/rm_echo_1_1.c - axis-axis2-c-sandesha - Git at Google

 /*
  * Copyright 2004,2005 The Apache Software Foundation.
  *
  * Licensed under the Apache License, Version 2.0 (the "License");
  * you may not use this file except in compliance with the License.
  * You may obtain a copy of the License at
  *
  *      http://www.apache.org/licenses/LICENSE-2.0
  *
  * Unless required by applicable law or agreed to in writing, software
  * distributed under the License is distributed on an "AS IS" BASIS,
  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  * See the License for the specific language governing permissions and
  * limitations under the License.
  */

 #include "echo_util.h"
 #include <axis2_util.h>
 #include <axiom_soap.h>
 #include <axis2_client.h>
 #include <axis2_svc_ctx.h>
 #include <axis2_conf_ctx.h>
 #include <axis2_op_client.h>
 #include <axis2_callback_recv.h>
 #include <axis2_svc_client.h>
 #include <sandesha2_client_constants.h>
 #include <sandesha2_constants.h>
 #include <sandesha2_client.h>
 #include <axis2_addr.h>
 #include <platforms/axutil_platform_auto_sense.h>
 #include <ctype.h>
 #include <neethi_util.h>
 #include <neethi_policy.h>

 #define SANDESHA2_MAX_COUNT 4

 /* on_complete callback function */
 axis2_status_t AXIS2_CALL
 rm_echo_callback_on_complete(
     struct axis2_callback *callback,
     const axutil_env_t *env);

 /* on_error callback function */
 axis2_status_t AXIS2_CALL
 rm_echo_callback_on_error(
     struct axis2_callback *callback,
     const axutil_env_t *env,
     int exception);

 void wait_on_callback(
     const axutil_env_t *env,
     axis2_callback_t *callback);

 static void
 usage(
     axis2_char_t *prog_name);

 int main(int argc, char** argv)
 {
     const axutil_env_t *env = NULL;
     const axis2_char_t *address = NULL;
     axis2_endpoint_ref_t* endpoint_ref = NULL;
     axis2_endpoint_ref_t* reply_to = NULL;
     axis2_options_t *options = NULL;
     const axis2_char_t *client_home = NULL;
     axis2_svc_client_t* svc_client = NULL;
     axiom_node_t *payload = NULL;
     axis2_callback_t *callback = NULL;
     axis2_callback_t *callback2 = NULL;
     axis2_callback_t *callback3 = NULL;
     axutil_property_t *property = NULL;
     axis2_char_t *offered_seq_id = NULL;
     axis2_bool_t offer = AXIS2_TRUE;
     axis2_char_t *seq_key = NULL;
     int c;
     extern char *optarg;
     extern int optopt;
     neethi_policy_t *policy = NULL;
     axis2_status_t status = AXIS2_FAILURE;

     /* Set up the environment */
     env = axutil_env_create_all("rm_echo_1_1_amqp.log", AXIS2_LOG_LEVEL_TRACE);

     /* Set end point reference of echo service */
     address = "amqp://127.0.0.1:5672/axis2/services/RM11SampleService";
     while ((c = AXIS2_GETOPT(argc, argv, ":a:o:")) != -1)
     {

         switch (c)
         {
             case 'a':
                 address = optarg;
                 break;
             case 'o': /* Sequence Offer */
                 offer = AXIS2_ATOI(optarg);
                 break;
             case ':':
                 fprintf(stderr, "\nOption -%c requires an operand\n", optopt);
                 usage(argv[0]);
                 return -1;
             case '?':
                 if (isprint(optopt))
                 {
                     fprintf(stderr, "\nUnknown option `-%c'.\n", optopt);
                 }

                 usage(argv[0]);
                 return -1;
         }
     }

     if (axutil_strcmp(address, "-h") == 0)
     {
         printf("Usage : %s [endpoint_url] [offer]\n", argv[0]);
         printf("use -h for help\n");
         return 0;
     }

     printf ("Using endpoint : %s\n", address);

     /* Create EPR with given address */
     endpoint_ref = axis2_endpoint_ref_create(env, address);

     /* Setup options */
     options = axis2_options_create(env);
     axis2_options_set_to(options, env, endpoint_ref);
     axis2_options_set_use_separate_listener(options, env, AXIS2_TRUE);

     /* Seperate listner needs addressing, hence addressing stuff in options */
     /*axis2_options_set_action(options, env,
         "http://127.0.0.1:8080/axis2/services/RM11SampleService/anonOutInOp");*/
     axis2_options_set_action(options, env, "urn:wsrm:EchoString");
     reply_to = axis2_endpoint_ref_create(env,
             "amqp://localhost:5672/axis2/services/__ANONYMOUS_SERVICE__");
     axis2_options_set_reply_to(options, env, reply_to);

 	axis2_options_set_transport_in_protocol(options, env, AXIS2_TRANSPORT_ENUM_AMQP);

     /* Set up deploy folder. It is from the deploy folder, the configuration is
      * picked up using the axis2.xml file.
      * In this sample client_home points to the Axis2/C default deploy folder.
      * The client_home can be different from this folder on your system. For
      * example, you may have a different folder (say, my_client_folder) with its
      * own axis2.xml file. my_client_folder/modules will have the modules that
      * the client uses
      */
     client_home = AXIS2_GETENV("AXIS2C_HOME");
     if (!client_home)
     {
         client_home = "../../..";
     }

     /* Create service client */
     svc_client = axis2_svc_client_create(env, client_home);
     if (!svc_client)
     {
         printf("Error creating service client\n");
         AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Stub invoke FAILED: Error code: %d :: %s",
                 env->error->error_number, AXIS2_ERROR_GET_MESSAGE(env->error));
         return -1;
     }

     /*Create the policy, from file*/
     policy = neethi_util_create_policy_from_file(env, "../policy/rm11-policy.xml");
     if(!policy)
     {
         printf("\nPolicy creation failed from the file");
         return 0;
     }

     status = axis2_svc_client_set_policy(svc_client, env, policy);

     if(status == AXIS2_FAILURE)
     {
         printf("Policy setting failed\n");
     }


     /* Set service client options */
     axis2_svc_client_set_options(svc_client, env, options);

     axis2_svc_client_engage_module(svc_client, env, AXIS2_MODULE_ADDRESSING);
     axis2_svc_client_engage_module(svc_client, env, "sandesha2");

     /* Offer sequence */
     if(offer)
     {
         offered_seq_id = axutil_uuid_gen(env);
         property = axutil_property_create(env);
         if(property)
         {
             axutil_property_set_value(property, env, axutil_strdup(env, offered_seq_id));
             axis2_options_set_property(options, env, SANDESHA2_CLIENT_OFFERED_SEQ_ID, property);
         }
     }

     /* RM Version 1.1 */
     property = axutil_property_create_with_args(env, 3, 0, 0, SANDESHA2_SPEC_VERSION_1_1);
     if(property)
     {
         axis2_options_set_property(options, env, SANDESHA2_CLIENT_RM_SPEC_VERSION, property);
     }
     seq_key = axutil_uuid_gen(env);
     property = axutil_property_create_with_args(env, 3, 0, 0, seq_key);
     if(property)
     {
         axis2_options_set_property(options, env, SANDESHA2_CLIENT_SEQ_KEY, property);
     }

     payload = build_om_payload_for_echo_svc(env, "echo1", seq_key);
     callback = axis2_callback_create(env);
     axis2_callback_set_on_complete(callback, rm_echo_callback_on_complete);
     axis2_callback_set_on_error(callback, rm_echo_callback_on_error);
     axis2_svc_client_send_receive_non_blocking(svc_client, env, payload, callback);
     wait_on_callback(env, callback);

     payload = build_om_payload_for_echo_svc(env, "echo2", seq_key);
     callback2 = axis2_callback_create(env);
     axis2_callback_set_on_complete(callback2, rm_echo_callback_on_complete);
     axis2_callback_set_on_error(callback2, rm_echo_callback_on_error);
     axis2_svc_client_send_receive_non_blocking(svc_client, env, payload, callback2);
     wait_on_callback(env, callback2);

     AXIS2_SLEEP(SANDESHA2_MAX_COUNT);
     callback3 = axis2_callback_create(env);
     axis2_callback_set_on_complete(callback3, rm_echo_callback_on_complete);
     axis2_callback_set_on_error(callback3, rm_echo_callback_on_error);
     sandesha2_client_terminate_seq_with_svc_client(env, svc_client, callback3);

     AXIS2_SLEEP(SANDESHA2_MAX_COUNT);

     AXIS2_FREE(env->allocator, seq_key);
     if (svc_client)
     {
         axis2_svc_client_free(svc_client, env);
         svc_client = NULL;
     }

     return 0;
 }

 axis2_status_t AXIS2_CALL
 rm_echo_callback_on_complete(
     struct axis2_callback *callback,
     const axutil_env_t *env)
 {
    /** SOAP response has arrived here; get the soap envelope
      from the callback object and do whatever you want to do with it */

    axiom_soap_envelope_t *soap_envelope = NULL;
    axiom_node_t *ret_node = NULL;
    axis2_status_t status = AXIS2_SUCCESS;

    soap_envelope = axis2_callback_get_envelope(callback, env);

    if (!soap_envelope)
    {
        AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Stub invoke FAILED: Error code:"
                      " %d :: %s", env->error->error_number,
                      AXIS2_ERROR_GET_MESSAGE(env->error));
       printf("echo stub invoke FAILED!\n");
       status = AXIS2_FAILURE;
    }
     else
     {
         ret_node = axiom_soap_envelope_get_base_node(soap_envelope, env);

         if(!ret_node)
         {
             AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI,
                 "Stub invoke FAILED: Error code:%d :: %s",
                 env->error->error_number,
                 AXIS2_ERROR_GET_MESSAGE(env->error));
             printf("echo stub invoke FAILED!\n");
             status = AXIS2_FAILURE;
         }
         else
         {
             axis2_char_t *om_str = NULL;
             om_str = axiom_node_to_string(ret_node, env);
             if (om_str)
                 printf("\nReceived OM : %s\n", om_str);
             printf("\necho client invoke SUCCESSFUL!\n");
         }
     }
     return status;
 }

 axis2_status_t AXIS2_CALL
 rm_echo_callback_on_error(
     struct axis2_callback *callback,
     const axutil_env_t *env,
     int exception)
 {
     /** take necessary action on error */
     printf("\nEcho client invoke FAILED. Error code:%d ::%s", exception,
         AXIS2_ERROR_GET_MESSAGE(env->error));
     return AXIS2_SUCCESS;
 }

 void wait_on_callback(
     const axutil_env_t *env,
     axis2_callback_t *callback)
 {
     /** Wait till callback is complete. Simply keep the parent thread running
        until our on_complete or on_error is invoked */
     int count = 30;
     while(count-- > 0)
     {
         if (axis2_callback_get_complete(callback, env))
         {
             /* We are done with the callback */
             return;
         }
         AXIS2_SLEEP(1);
     }
     return;
 }

 static void
 usage(
     axis2_char_t *prog_name)
 {
     fprintf(stdout, "\n Usage : %s", prog_name);
     fprintf(stdout, " [-a ADDRESS]");
     fprintf(stdout, " [-o OFFER]");
     fprintf(stdout, " Options :\n");
     fprintf(stdout, "\t-o OFFER \t seq offer value.. Type 1 for sequence offer" \
         "feature. The default behaviour is no offer(0). \n");
     fprintf(stdout, "\t-a ADDRESS \t endpoint address.. The" \
         " default is amqp://127.0.0.1:5672/axis2/services/RM11SampleService \n");
     fprintf(stdout, " Help :\n\t-h \t display this help screen.\n\n");
 }
	/*
	* Copyright 2004,2005 The Apache Software Foundation.
	*
	* Licensed under the Apache License, Version 2.0 (the "License");
	* you may not use this file except in compliance with the License.
	* You may obtain a copy of the License at
	*
	* http://www.apache.org/licenses/LICENSE-2.0
	*
	* Unless required by applicable law or agreed to in writing, software
	* distributed under the License is distributed on an "AS IS" BASIS,
	* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
	* See the License for the specific language governing permissions and
	* limitations under the License.
	*/

	#include "echo_util.h"
	#include <axis2_util.h>
	#include <axiom_soap.h>
	#include <axis2_client.h>
	#include <axis2_svc_ctx.h>
	#include <axis2_conf_ctx.h>
	#include <axis2_op_client.h>
	#include <axis2_callback_recv.h>
	#include <axis2_svc_client.h>
	#include <sandesha2_client_constants.h>
	#include <sandesha2_constants.h>
	#include <sandesha2_client.h>
	#include <axis2_addr.h>
	#include <platforms/axutil_platform_auto_sense.h>
	#include <ctype.h>
	#include <neethi_util.h>
	#include <neethi_policy.h>

	#define SANDESHA2_MAX_COUNT 4

	/* on_complete callback function */
	axis2_status_t AXIS2_CALL
	rm_echo_callback_on_complete(
	struct axis2_callback *callback,
	const axutil_env_t *env);

	/* on_error callback function */
	axis2_status_t AXIS2_CALL
	rm_echo_callback_on_error(
	struct axis2_callback *callback,
	const axutil_env_t *env,
	int exception);

	void wait_on_callback(
	const axutil_env_t *env,
	axis2_callback_t *callback);

	static void
	usage(
	axis2_char_t *prog_name);

	int main(int argc, char** argv)
	{
	const axutil_env_t *env = NULL;
	const axis2_char_t *address = NULL;
	axis2_endpoint_ref_t* endpoint_ref = NULL;
	axis2_endpoint_ref_t* reply_to = NULL;
	axis2_options_t *options = NULL;
	const axis2_char_t *client_home = NULL;
	axis2_svc_client_t* svc_client = NULL;
	axiom_node_t *payload = NULL;
	axis2_callback_t *callback = NULL;
	axis2_callback_t *callback2 = NULL;
	axis2_callback_t *callback3 = NULL;
	axutil_property_t *property = NULL;
	axis2_char_t *offered_seq_id = NULL;
	axis2_bool_t offer = AXIS2_TRUE;
	axis2_char_t *seq_key = NULL;
	int c;
	extern char *optarg;
	extern int optopt;
	neethi_policy_t *policy = NULL;
	axis2_status_t status = AXIS2_FAILURE;

	/* Set up the environment */
	env = axutil_env_create_all("rm_echo_1_1_amqp.log", AXIS2_LOG_LEVEL_TRACE);

	/* Set end point reference of echo service */
	address = "amqp://127.0.0.1:5672/axis2/services/RM11SampleService";
	while ((c = AXIS2_GETOPT(argc, argv, ":a:o:")) != -1)
	{

	switch (c)
	{
	case 'a':
	address = optarg;
	break;
	case 'o': /* Sequence Offer */
	offer = AXIS2_ATOI(optarg);
	break;
	case ':':
	fprintf(stderr, "\nOption -%c requires an operand\n", optopt);
	usage(argv[0]);
	return -1;
	case '?':
	if (isprint(optopt))
	{
	fprintf(stderr, "\nUnknown option `-%c'.\n", optopt);
	}

	usage(argv[0]);
	return -1;
	}
	}

	if (axutil_strcmp(address, "-h") == 0)
	{
	printf("Usage : %s [endpoint_url] [offer]\n", argv[0]);
	printf("use -h for help\n");
	return 0;
	}

	printf ("Using endpoint : %s\n", address);

	/* Create EPR with given address */
	endpoint_ref = axis2_endpoint_ref_create(env, address);

	/* Setup options */
	options = axis2_options_create(env);
	axis2_options_set_to(options, env, endpoint_ref);
	axis2_options_set_use_separate_listener(options, env, AXIS2_TRUE);

	/* Seperate listner needs addressing, hence addressing stuff in options */
	/*axis2_options_set_action(options, env,
	"http://127.0.0.1:8080/axis2/services/RM11SampleService/anonOutInOp");*/
	axis2_options_set_action(options, env, "urn:wsrm:EchoString");
	reply_to = axis2_endpoint_ref_create(env,
	"amqp://localhost:5672/axis2/services/__ANONYMOUS_SERVICE__");
	axis2_options_set_reply_to(options, env, reply_to);

	axis2_options_set_transport_in_protocol(options, env, AXIS2_TRANSPORT_ENUM_AMQP);

	/* Set up deploy folder. It is from the deploy folder, the configuration is
	* picked up using the axis2.xml file.
	* In this sample client_home points to the Axis2/C default deploy folder.
	* The client_home can be different from this folder on your system. For
	* example, you may have a different folder (say, my_client_folder) with its
	* own axis2.xml file. my_client_folder/modules will have the modules that
	* the client uses
	*/
	client_home = AXIS2_GETENV("AXIS2C_HOME");
	if (!client_home)
	{
	client_home = "../../..";
	}

	/* Create service client */
	svc_client = axis2_svc_client_create(env, client_home);
	if (!svc_client)
	{
	printf("Error creating service client\n");
	AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Stub invoke FAILED: Error code: %d :: %s",
	env->error->error_number, AXIS2_ERROR_GET_MESSAGE(env->error));
	return -1;
	}

	/Create the policy, from file/
	policy = neethi_util_create_policy_from_file(env, "../policy/rm11-policy.xml");
	if(!policy)
	{
	printf("\nPolicy creation failed from the file");
	return 0;
	}

	status = axis2_svc_client_set_policy(svc_client, env, policy);

	if(status == AXIS2_FAILURE)
	{
	printf("Policy setting failed\n");
	}


	/* Set service client options */
	axis2_svc_client_set_options(svc_client, env, options);

	axis2_svc_client_engage_module(svc_client, env, AXIS2_MODULE_ADDRESSING);
	axis2_svc_client_engage_module(svc_client, env, "sandesha2");

	/* Offer sequence */
	if(offer)
	{
	offered_seq_id = axutil_uuid_gen(env);
	property = axutil_property_create(env);
	if(property)
	{
	axutil_property_set_value(property, env, axutil_strdup(env, offered_seq_id));
	axis2_options_set_property(options, env, SANDESHA2_CLIENT_OFFERED_SEQ_ID, property);
	}
	}

	/* RM Version 1.1 */
	property = axutil_property_create_with_args(env, 3, 0, 0, SANDESHA2_SPEC_VERSION_1_1);
	if(property)
	{
	axis2_options_set_property(options, env, SANDESHA2_CLIENT_RM_SPEC_VERSION, property);
	}
	seq_key = axutil_uuid_gen(env);
	property = axutil_property_create_with_args(env, 3, 0, 0, seq_key);
	if(property)
	{
	axis2_options_set_property(options, env, SANDESHA2_CLIENT_SEQ_KEY, property);
	}

	payload = build_om_payload_for_echo_svc(env, "echo1", seq_key);
	callback = axis2_callback_create(env);
	axis2_callback_set_on_complete(callback, rm_echo_callback_on_complete);
	axis2_callback_set_on_error(callback, rm_echo_callback_on_error);
	axis2_svc_client_send_receive_non_blocking(svc_client, env, payload, callback);
	wait_on_callback(env, callback);

	payload = build_om_payload_for_echo_svc(env, "echo2", seq_key);
	callback2 = axis2_callback_create(env);
	axis2_callback_set_on_complete(callback2, rm_echo_callback_on_complete);
	axis2_callback_set_on_error(callback2, rm_echo_callback_on_error);
	axis2_svc_client_send_receive_non_blocking(svc_client, env, payload, callback2);
	wait_on_callback(env, callback2);

	AXIS2_SLEEP(SANDESHA2_MAX_COUNT);
	callback3 = axis2_callback_create(env);
	axis2_callback_set_on_complete(callback3, rm_echo_callback_on_complete);
	axis2_callback_set_on_error(callback3, rm_echo_callback_on_error);
	sandesha2_client_terminate_seq_with_svc_client(env, svc_client, callback3);

	AXIS2_SLEEP(SANDESHA2_MAX_COUNT);

	AXIS2_FREE(env->allocator, seq_key);
	if (svc_client)
	{
	axis2_svc_client_free(svc_client, env);
	svc_client = NULL;
	}

	return 0;
	}

	axis2_status_t AXIS2_CALL
	rm_echo_callback_on_complete(
	struct axis2_callback *callback,
	const axutil_env_t *env)
	{
	/** SOAP response has arrived here; get the soap envelope
	from the callback object and do whatever you want to do with it */

	axiom_soap_envelope_t *soap_envelope = NULL;
	axiom_node_t *ret_node = NULL;
	axis2_status_t status = AXIS2_SUCCESS;

	soap_envelope = axis2_callback_get_envelope(callback, env);

	if (!soap_envelope)
	{
	AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI, "Stub invoke FAILED: Error code:"
	" %d :: %s", env->error->error_number,
	AXIS2_ERROR_GET_MESSAGE(env->error));
	printf("echo stub invoke FAILED!\n");
	status = AXIS2_FAILURE;
	}
	else
	{
	ret_node = axiom_soap_envelope_get_base_node(soap_envelope, env);

	if(!ret_node)
	{
	AXIS2_LOG_ERROR(env->log, AXIS2_LOG_SI,
	"Stub invoke FAILED: Error code:%d :: %s",
	env->error->error_number,
	AXIS2_ERROR_GET_MESSAGE(env->error));
	printf("echo stub invoke FAILED!\n");
	status = AXIS2_FAILURE;
	}
	else
	{
	axis2_char_t *om_str = NULL;
	om_str = axiom_node_to_string(ret_node, env);
	if (om_str)
	printf("\nReceived OM : %s\n", om_str);
	printf("\necho client invoke SUCCESSFUL!\n");
	}
	}
	return status;
	}

	axis2_status_t AXIS2_CALL
	rm_echo_callback_on_error(
	struct axis2_callback *callback,
	const axutil_env_t *env,
	int exception)
	{
	/** take necessary action on error */
	printf("\nEcho client invoke FAILED. Error code:%d ::%s", exception,
	AXIS2_ERROR_GET_MESSAGE(env->error));
	return AXIS2_SUCCESS;
	}

	void wait_on_callback(
	const axutil_env_t *env,
	axis2_callback_t *callback)
	{
	/** Wait till callback is complete. Simply keep the parent thread running
	until our on_complete or on_error is invoked */
	int count = 30;
	while(count-- > 0)
	{
	if (axis2_callback_get_complete(callback, env))
	{
	/* We are done with the callback */
	return;
	}
	AXIS2_SLEEP(1);
	}
	return;
	}

	static void
	usage(
	axis2_char_t *prog_name)
	{
	fprintf(stdout, "\n Usage : %s", prog_name);
	fprintf(stdout, " [-a ADDRESS]");
	fprintf(stdout, " [-o OFFER]");
	fprintf(stdout, " Options :\n");
	fprintf(stdout, "\t-o OFFER \t seq offer value.. Type 1 for sequence offer" \
	"feature. The default behaviour is no offer(0). \n");
	fprintf(stdout, "\t-a ADDRESS \t endpoint address.. The" \
	" default is amqp://127.0.0.1:5672/axis2/services/RM11SampleService \n");
	fprintf(stdout, " Help :\n\t-h \t display this help screen.\n\n");
	}