00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039 #include <oasys/util/StringBuffer.h>
00040
00041 #include "bundling/BundleEvent.h"
00042 #include "contacts/Contact.h"
00043 #include "routing/RouteTable.h"
00044 #include "routing/BundleRouter.h"
00045 #include "SimEvent.h"
00046 #include "Simulator.h"
00047 #include "Simdtn2Command.h"
00048 #include "SimConvergenceLayer.h"
00049
00050 namespace dtnsim {
00051
00052 Simdtn2Command Simdtn2Command::instance_;
00053
00054 Simdtn2Command::Simdtn2Command()
00055 : AutoTclCommand("simdtn2")
00056 {}
00057
00058 void
00059 Simdtn2Command::at_reg()
00060 {
00061 bind_s("type", &BundleRouter::type_, "static");
00062 }
00063
00064 const char*
00065 Simdtn2Command::help_string()
00066 {
00067 return "simdtn2 <time> addroute <src> <dest> <contact_id> \n";
00068
00069 }
00070
00071 int
00072 Simdtn2Command::exec(int argc, const char** argv, Tcl_Interp* interp)
00073 {
00074 if (argc < 6) {
00075 wrong_num_args(argc, argv, 2, 6, INT_MAX);
00076 return TCL_ERROR;
00077 }
00078
00079 long time = atoi(argv[1]) ;
00080 const char* cmd = argv[2];
00081 const char* src_str = argv[3];
00082 const char* dest_str = argv[4];
00083 const char* next_hop_str = argv[5];
00084
00085 if (strcmp(cmd, "addroute") == 0) {
00086
00087 int cid = atoi(next_hop_str);
00088 SimContact* link = Topology::contact(cid);
00089 Contact* contact = SimConvergenceLayer::simlink2ct(link);
00090 ASSERT(contact != NULL);
00091
00092 std::string dest_str_full =
00093 SimConvergenceLayer::id2node(atoi(dest_str));
00094 EndpointIDPattern dest(dest_str_full);
00095 RouteEntry* entry = new RouteEntry(dest, contact,
00096 ForwardingInfo::COPY_ACTION);
00097
00098 log_info("addroute to dest %s using contact id %d",
00099 dest_str_full.c_str(), cid);
00100
00101 int src = atoi(src_str);
00102 Event_for_br* e =
00103 new Event_for_br(time,Topology::node(src),new RouteAddEvent(entry));
00104 Simulator::post(e);
00105
00106 }
00107 else {
00108 PANIC("unimplemented command");
00109 }
00110
00111 return TCL_OK;
00112 }
00113
00114 }