X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/0efc36f77ddd89b292a280c204a6b7341f1a9f89..2b1ec461e8edc3e49d545abe907fe1ffc995ea47:/examples/msg/masterslave/masterslave_bypass.c diff --git a/examples/msg/masterslave/masterslave_bypass.c b/examples/msg/masterslave/masterslave_bypass.c index ef9ef2320b..35e3d93b12 100644 --- a/examples/msg/masterslave/masterslave_bypass.c +++ b/examples/msg/masterslave/masterslave_bypass.c @@ -1,159 +1,151 @@ -/* $Id$ */ - -/* Copyright (c) 2002,2003,2004 Arnaud Legrand. All rights reserved. */ +/* Copyright (c) 2007-2013. The SimGrid Team. + * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ #include -#include "msg/msg.h" /* Yeah! If you want to use msg, you need to include msg/msg.h */ -#include "surf/surfxml_parse.h" /* to override surf_parse */ -#include "surf/surfxml.h" /* to hijack surf_parse_lex */ +#include "msg/msg.h" /* Yeah! If you want to use msg, you need to include msg/msg.h */ +#include "surf/surfxml_parse.h" /* to override surf_parse and bypass the parser */ /* Create a log channel to have nice outputs. */ #include "xbt/log.h" -XBT_LOG_NEW_DEFAULT_CATEGORY(msg_test,"Messages specific for this msg example"); -#define FINALIZE ((void*)221297) /* a magic number to tell people to stop working */ +XBT_LOG_NEW_DEFAULT_CATEGORY(msg_test, + "Messages specific for this msg example"); +#define FINALIZE ((void*)221297) /* a magic number to tell people to stop working */ -#define SURFXML_BUFFER_SET(key,val) do { \ - AX_surfxml_##key=AX_ptr; \ - strcpy(A_surfxml_##key,val); \ - AX_ptr+=strlen(val)+1; } while(0) +static int surf_parse_bypass_platform(void) +{ + static int AX_ptr = 0; + static int surfxml_bufferstack_size = 2048; + static int surfxml_buffer_stack_stack_ptr = 0; + static int surfxml_buffer_stack_stack[1024]; + /* allocating memory for the buffer, I think 2kB should be enough */ + surfxml_bufferstack = xbt_new0(char, surfxml_bufferstack_size); -#define SURFXML_BUFFER_RESET() do { \ - AX_ptr = 0; \ - memset(surfxml_bufferstack,0,surfxml_bufferstack_size); } while(0) + XBT_DEBUG(""); + SURFXML_BUFFER_SET(platform_version, "3"); + SURFXML_START_TAG(platform); + + XBT_DEBUG(""); + SURFXML_BUFFER_SET(AS_id, "AS0"); + A_surfxml_AS_routing = A_surfxml_AS_routing_Full; + SURFXML_START_TAG(AS); + + XBT_DEBUG(""); + SURFXML_BUFFER_SET(host_id, "host A"); + SURFXML_BUFFER_SET(host_power, "100000000.00"); + SURFXML_BUFFER_SET(host_pstate, "0"); + SURFXML_BUFFER_SET(host_availability, "1.0"); + SURFXML_BUFFER_SET(host_availability___file, ""); + SURFXML_BUFFER_SET(host_core, "1"); + A_surfxml_host_state = A_surfxml_host_state_ON; + SURFXML_BUFFER_SET(host_state___file, ""); + SURFXML_BUFFER_SET(host_coordinates, ""); + SURFXML_START_TAG(host); + SURFXML_END_TAG(host); + + XBT_DEBUG(""); + SURFXML_BUFFER_SET(host_id, "host B"); + SURFXML_BUFFER_SET(host_power, "100000000.00"); + SURFXML_BUFFER_SET(host_pstate, "0"); + SURFXML_BUFFER_SET(host_availability, "1.0"); + SURFXML_BUFFER_SET(host_availability___file, ""); + SURFXML_BUFFER_SET(host_core, "1"); + A_surfxml_host_state = A_surfxml_host_state_ON; + SURFXML_BUFFER_SET(host_state___file, ""); + SURFXML_BUFFER_SET(host_coordinates, ""); + SURFXML_START_TAG(host); + SURFXML_END_TAG(host); + + XBT_DEBUG(""); + SURFXML_BUFFER_SET(link_id, "LinkA"); + SURFXML_BUFFER_SET(link_bandwidth, "10000000.0"); + SURFXML_BUFFER_SET(link_bandwidth___file, ""); + SURFXML_BUFFER_SET(link_latency, "0.2"); + SURFXML_BUFFER_SET(link_latency___file, ""); + A_surfxml_link_state = A_surfxml_link_state_ON; + SURFXML_BUFFER_SET(link_state___file, ""); + A_surfxml_link_sharing___policy = A_surfxml_link_sharing___policy_SHARED; + SURFXML_START_TAG(link); + SURFXML_END_TAG(link); + + XBT_DEBUG(""); + SURFXML_BUFFER_SET(route_src, "host A"); + SURFXML_BUFFER_SET(route_dst, "host B"); + A_surfxml_route_symmetrical = A_surfxml_route_symmetrical_YES; + SURFXML_START_TAG(route); + XBT_DEBUG(" "); + SURFXML_BUFFER_SET(link___ctn_id, "LinkA"); + A_surfxml_link___ctn_direction = A_surfxml_link___ctn_direction_NONE; + SURFXML_START_TAG(link___ctn); + SURFXML_END_TAG(link___ctn); + XBT_DEBUG(""); + SURFXML_END_TAG(route); + + XBT_DEBUG(""); + SURFXML_END_TAG(AS); + XBT_DEBUG(""); + SURFXML_END_TAG(platform); -#define STAG(tag) STag_surfxml_##tag(); -#define ETAG(tag) do { ETag_surfxml_##tag(); SURFXML_BUFFER_RESET(); } while(0) + free(surfxml_bufferstack); + return 0; +} -static int surf_parse_bypass(void) +static int surf_parse_bypass_application(void) { static int AX_ptr; static int surfxml_bufferstack_size = 2048; - + static int surfxml_buffer_stack_stack_ptr = 0; + static int surfxml_buffer_stack_stack[1024]; /* allocating memory to the buffer, I think 2MB should be enough */ surfxml_bufferstack = xbt_new0(char, surfxml_bufferstack_size); - - /* */ - SURFXML_BUFFER_SET(platform_description_version,"1"); - - STAG(platform_description); - -/* */ - SURFXML_BUFFER_SET(cpu_name,"Cpu A"); - SURFXML_BUFFER_SET(cpu_power, "100000000.00"); - SURFXML_BUFFER_SET(cpu_availability, "1.0"); - SURFXML_BUFFER_SET(cpu_availability_file, ""); - A_surfxml_cpu_state = A_surfxml_cpu_state_ON; - SURFXML_BUFFER_SET(cpu_state_file, ""); - SURFXML_BUFFER_SET(cpu_interference_send, "1.0"); - SURFXML_BUFFER_SET(cpu_interference_recv, "1.0"); - SURFXML_BUFFER_SET(cpu_interference_send_recv, "1.0"); - SURFXML_BUFFER_SET(cpu_max_outgoing_rate, "-1.0"); - - STAG(cpu); - ETAG(cpu); - -/* */ - SURFXML_BUFFER_SET(cpu_name, "Cpu B"); - SURFXML_BUFFER_SET(cpu_power, "100000000.00"); - SURFXML_BUFFER_SET(cpu_availability, "1.0"); - SURFXML_BUFFER_SET(cpu_availability_file, ""); - A_surfxml_cpu_state = A_surfxml_cpu_state_ON; - SURFXML_BUFFER_SET(cpu_state_file, ""); - SURFXML_BUFFER_SET(cpu_interference_send, "1.0"); - SURFXML_BUFFER_SET(cpu_interference_recv, "1.0"); - SURFXML_BUFFER_SET(cpu_interference_send_recv, "1.0"); - SURFXML_BUFFER_SET(cpu_max_outgoing_rate, "-1.0"); - - STAG(cpu); - ETAG(cpu); - -/* */ - SURFXML_BUFFER_SET(network_link_name, "LinkA"); - SURFXML_BUFFER_SET(network_link_bandwidth, "10000000.0"); - SURFXML_BUFFER_SET(network_link_bandwidth_file, ""); - SURFXML_BUFFER_SET(network_link_latency, "0.2"); - SURFXML_BUFFER_SET(network_link_latency_file, ""); - A_surfxml_network_link_state = A_surfxml_network_link_state_ON; - SURFXML_BUFFER_SET(network_link_state_file, ""); - A_surfxml_network_link_sharing_policy = A_surfxml_network_link_sharing_policy_SHARED; - STAG(network_link); - ETAG(network_link); - -/* */ - SURFXML_BUFFER_SET(route_src, "Cpu A"); - SURFXML_BUFFER_SET(route_dst, "Cpu B"); - SURFXML_BUFFER_SET(route_impact_on_src, "0.0"); - SURFXML_BUFFER_SET(route_impact_on_dst, "0.0"); - SURFXML_BUFFER_SET(route_impact_on_src_with_other_recv, "0.0"); - SURFXML_BUFFER_SET(route_impact_on_dst_with_other_send, "0.0"); - - STAG(route); - - SURFXML_BUFFER_SET(route_element_name, "LinkA"); - STAG(route_element); - ETAG(route_element); - - ETAG(route); - -/* */ - SURFXML_BUFFER_SET(route_src, "Cpu B"); - SURFXML_BUFFER_SET(route_dst, "Cpu A"); - SURFXML_BUFFER_SET(route_impact_on_src, "0.0"); - SURFXML_BUFFER_SET(route_impact_on_dst, "0.0"); - SURFXML_BUFFER_SET(route_impact_on_src_with_other_recv, "0.0"); - SURFXML_BUFFER_SET(route_impact_on_dst_with_other_send, "0.0"); - - STAG(route); - - SURFXML_BUFFER_SET(route_element_name, "LinkA"); - STAG(route_element); - ETAG(route_element); - - ETAG(route); - -/* */ - SURFXML_BUFFER_SET(process_host, "Cpu A"); + + /* */ + SURFXML_BUFFER_SET(platform_version, "3"); + + SURFXML_START_TAG(platform); + +/* */ + SURFXML_BUFFER_SET(process_host, "host A"); SURFXML_BUFFER_SET(process_function, "master"); - SURFXML_BUFFER_SET(process_start_time, "-1.0"); - SURFXML_BUFFER_SET(process_kill_time, "-1.0"); - STAG(process); + SURFXML_BUFFER_SET(process_start___time, "-1.0"); + SURFXML_BUFFER_SET(process_kill___time, "-1.0"); + SURFXML_START_TAG(process); /* */ SURFXML_BUFFER_SET(argument_value, "20"); - STAG(argument); - ETAG(argument); + SURFXML_START_TAG(argument); + SURFXML_END_TAG(argument); /* */ SURFXML_BUFFER_SET(argument_value, "5000000"); - STAG(argument); - ETAG(argument); + SURFXML_START_TAG(argument); + SURFXML_END_TAG(argument); /* */ SURFXML_BUFFER_SET(argument_value, "100000"); - STAG(argument); - ETAG(argument); + SURFXML_START_TAG(argument); + SURFXML_END_TAG(argument); -/* */ - SURFXML_BUFFER_SET(argument_value, "Cpu B"); - STAG(argument); - ETAG(argument); +/* */ + SURFXML_BUFFER_SET(argument_value, "host B"); + SURFXML_START_TAG(argument); + SURFXML_END_TAG(argument); /* */ - ETAG(process); + SURFXML_END_TAG(process); -/* */ - SURFXML_BUFFER_SET(process_host, "Cpu B"); +/* */ + SURFXML_BUFFER_SET(process_host, "host B"); SURFXML_BUFFER_SET(process_function, "slave"); - SURFXML_BUFFER_SET(process_start_time, "-1.0"); - SURFXML_BUFFER_SET(process_kill_time, "-1.0"); - STAG(process); - ETAG(process); + SURFXML_BUFFER_SET(process_start___time, "-1.0"); + SURFXML_BUFFER_SET(process_kill___time, "-1.0"); + SURFXML_START_TAG(process); + SURFXML_END_TAG(process); -/* */ - ETAG(platform_description); +/* */ + SURFXML_END_TAG(platform); free(surfxml_bufferstack); return 0; @@ -161,147 +153,142 @@ static int surf_parse_bypass(void) int master(int argc, char *argv[]); int slave(int argc, char *argv[]); -MSG_error_t test_all(void); - -typedef enum { - PORT_22 = 0, - MAX_CHANNEL -} channel_t; +msg_error_t test_all(void); /** Emitter function */ int master(int argc, char *argv[]) { int slaves_count = 0; - m_host_t *slaves = NULL; - m_task_t *todo = NULL; + msg_host_t *slaves = NULL; + msg_task_t *todo = NULL; int number_of_tasks = 0; double task_comp_size = 0; double task_comm_size = 0; - - int i; + _XBT_GNUC_UNUSED int read; - xbt_assert1(sscanf(argv[1],"%d", &number_of_tasks), - "Invalid argument %s\n",argv[1]); - xbt_assert1(sscanf(argv[2],"%lg", &task_comp_size), - "Invalid argument %s\n",argv[2]); - xbt_assert1(sscanf(argv[3],"%lg", &task_comm_size), - "Invalid argument %s\n",argv[3]); + read = sscanf(argv[1], "%d", &number_of_tasks); + xbt_assert(read, "Invalid argument %s\n", argv[1]); + read = sscanf(argv[2], "%lg", &task_comp_size); + xbt_assert(read, "Invalid argument %s\n", argv[2]); + read = sscanf(argv[3], "%lg", &task_comm_size); + xbt_assert(read, "Invalid argument %s\n", argv[3]); - { /* Task creation */ + { /* Task creation */ char sprintf_buffer[64]; - todo = calloc(number_of_tasks, sizeof(m_task_t)); + todo = xbt_new0(msg_task_t, number_of_tasks); for (i = 0; i < number_of_tasks; i++) { sprintf(sprintf_buffer, "Task_%d", i); - todo[i] = MSG_task_create(sprintf_buffer, task_comp_size, task_comm_size, NULL); + todo[i] = + MSG_task_create(sprintf_buffer, task_comp_size, task_comm_size, + NULL); } } - { /* Process organisation */ + { /* Process organisation */ slaves_count = argc - 4; - slaves = calloc(slaves_count, sizeof(m_host_t)); - + slaves = xbt_new0(msg_host_t, slaves_count); + for (i = 4; i < argc; i++) { - slaves[i-4] = MSG_get_host_by_name(argv[i]); - if(slaves[i-4]==NULL) { - INFO1("Unknown host %s. Stopping Now! ", argv[i]); - abort(); + slaves[i - 4] = MSG_get_host_by_name(argv[i]); + if (slaves[i - 4] == NULL) { + XBT_INFO("Unknown host %s. Stopping Now! ", argv[i]); + abort(); } } } - INFO1("Got %d slave(s) :", slaves_count); + XBT_INFO("Got %d slave(s) :", slaves_count); for (i = 0; i < slaves_count; i++) - INFO1("\t %s", slaves[i]->name); + XBT_INFO("\t %s", MSG_host_get_name(slaves[i])); - INFO1("Got %d task to process :", number_of_tasks); + XBT_INFO("Got %d task to process :", number_of_tasks); for (i = 0; i < number_of_tasks; i++) - INFO1("\t\"%s\"", todo[i]->name); + XBT_INFO("\t\"%s\"", todo[i]->name); for (i = 0; i < number_of_tasks; i++) { - INFO2("Sending \"%s\" to \"%s\"", - todo[i]->name, - slaves[i % slaves_count]->name); - if(MSG_host_self()==slaves[i % slaves_count]) { - INFO0("Hey ! It's me ! :)"); + XBT_INFO("Sending \"%s\" to \"%s\"", + todo[i]->name, MSG_host_get_name(slaves[i % slaves_count])); + if (MSG_host_self() == slaves[i % slaves_count]) { + XBT_INFO("Hey ! It's me ! :)"); } - MSG_task_put(todo[i], slaves[i % slaves_count], - PORT_22); - INFO0("Send completed"); + MSG_task_send(todo[i], MSG_host_get_name(slaves[i % slaves_count])); + XBT_INFO("Send completed"); } - - INFO0("All tasks have been dispatched. Let's tell everybody the computation is over."); - for (i = 0; i < slaves_count; i++) - MSG_task_put(MSG_task_create("finalize", 0, 0, FINALIZE), - slaves[i], PORT_22); - - INFO0("Goodbye now!"); + + XBT_INFO + ("All tasks have been dispatched. Let's tell everybody the computation is over."); + for (i = 0; i < slaves_count; i++) + MSG_task_send(MSG_task_create("finalize", 0, 0, FINALIZE), + MSG_host_get_name(slaves[i])); + + XBT_INFO("Goodbye now!"); free(slaves); free(todo); return 0; -} /* end_of_master */ +} /* end_of_master */ /** Receiver function */ int slave(int argc, char *argv[]) { - while(1) { - m_task_t task = NULL; + XBT_INFO("I'm a slave"); + while (1) { + msg_task_t task = NULL; int a; - a = MSG_task_get(&(task), PORT_22); + a = MSG_task_receive(&task, MSG_host_get_name(MSG_host_self())); if (a == MSG_OK) { - INFO1("Received \"%s\" ", MSG_task_get_name(task)); - if(MSG_task_get_data(task)==FINALIZE) { - MSG_task_destroy(task); - break; + XBT_INFO("Received \"%s\" ", MSG_task_get_name(task)); + if (MSG_task_get_data(task) == FINALIZE) { + MSG_task_destroy(task); + break; } - INFO1("Processing \"%s\" ", MSG_task_get_name(task)); + XBT_INFO("Processing \"%s\" ", MSG_task_get_name(task)); MSG_task_execute(task); - INFO1("\"%s\" done ", MSG_task_get_name(task)); + XBT_INFO("\"%s\" done ", MSG_task_get_name(task)); MSG_task_destroy(task); } else { - INFO0("Hey ?! What's up ? "); - xbt_assert0(0,"Unexpected behavior"); + XBT_INFO("Hey ?! What's up ? "); + xbt_die( "Unexpected behavior"); } } - INFO0("I'm done. See you!"); + XBT_INFO("I'm done. See you!"); return 0; -} /* end_of_slave */ +} /* end_of_slave */ /** Test function */ -MSG_error_t test_all(void) +msg_error_t test_all(void) { - MSG_error_t res = MSG_OK; + msg_error_t res = MSG_OK; + + /* Simulation setting */ + surf_parse = surf_parse_bypass_platform; + MSG_create_environment(NULL); + + /* Application deployment */ + MSG_function_register("master", master); + MSG_function_register("slave", slave); + surf_parse = surf_parse_bypass_application; + MSG_launch_application(NULL); - { /* Simulation setting */ - MSG_set_channel_number(MAX_CHANNEL); - MSG_paje_output("msg_test.trace"); - surf_parse = surf_parse_bypass; - MSG_create_environment(NULL); - } - { /* Application deployment */ - MSG_function_register("master", master); - MSG_function_register("slave", slave); - MSG_launch_application(NULL); - } res = MSG_main(); - - INFO1("Simulation time %g",MSG_get_clock()); + + XBT_INFO("Simulation time %g", MSG_get_clock()); return res; -} /* end_of_test_all */ +} /* end_of_test_all */ /** Main function */ int main(int argc, char *argv[]) { - MSG_error_t res = MSG_OK; + msg_error_t res = MSG_OK; - MSG_global_init(&argc,argv); + MSG_init(&argc, argv); res = test_all(); - MSG_clean(); - - if(res==MSG_OK) return 0; - else return 1; -} /* end_of_main */ + if (res == MSG_OK) + return 0; + else + return 1; +} /* end_of_main */