gdouble slave_getLatency(Slave* slave, GQuark sourceNodeID, GQuark destinationNodeID) { MAGIC_ASSERT(slave); Host* sourceNode = _slave_getHost(slave, sourceNodeID); Host* destinationNode = _slave_getHost(slave, destinationNodeID); Address* sourceAddress = host_getDefaultAddress(sourceNode); Address* destinationAddress = host_getDefaultAddress(destinationNode); return topology_getLatency(slave->topology, sourceAddress, destinationAddress); }
void worker_schedulePacket(Packet* packet) { /* get our thread-private worker */ Worker* worker = _worker_getPrivate(); if(slave_isKilled(worker->slave)) { /* the simulation is over, don't bother */ return; } in_addr_t srcIP = packet_getSourceIP(packet); in_addr_t dstIP = packet_getDestinationIP(packet); Address* srcAddress = dns_resolveIPToAddress(worker_getDNS(), (guint32) srcIP); Address* dstAddress = dns_resolveIPToAddress(worker_getDNS(), (guint32) dstIP); if(!srcAddress || !dstAddress) { error("unable to schedule packet because of null addresses"); return; } /* check if network reliability forces us to 'drop' the packet */ gdouble reliability = topology_getReliability(worker_getTopology(), srcAddress, dstAddress); Random* random = host_getRandom(worker_getCurrentHost()); gdouble chance = random_nextDouble(random); /* don't drop control packets with length 0, otherwise congestion * control has problems responding to packet loss */ if(chance <= reliability || packet_getPayloadLength(packet) == 0) { /* the sender's packet will make it through, find latency */ gdouble latency = topology_getLatency(worker_getTopology(), srcAddress, dstAddress); SimulationTime delay = (SimulationTime) ceil(latency * SIMTIME_ONE_MILLISECOND); PacketArrivedEvent* event = packetarrived_new(packet); worker_scheduleEvent((Event*)event, delay, (GQuark)address_getID(dstAddress)); packet_addDeliveryStatus(packet, PDS_INET_SENT); } else { packet_addDeliveryStatus(packet, PDS_INET_DROPPED); } }
gdouble master_getLatency(Master* master, Address* srcAddress, Address* dstAddress) { MAGIC_ASSERT(master); return topology_getLatency(master->topology, srcAddress, dstAddress); }