From: zrinka <zrinka>
Date: Mon, 7 Nov 2005 11:13:18 +0000 (+0000)
Subject: full source documentation for ipv4.tcl file
X-Git-Url: https://git.entuzijast.net/?a=commitdiff_plain;h=9a3fc5c382eba4a2709d37a7ba39a42c6ab0e277;p=imunes.git

full source documentation for ipv4.tcl file

Bug found by:
Submitted by:
Requested by:
Reviewed by:
Approved by:
Obtained from:
---

diff --git a/ipv4.tcl b/ipv4.tcl
index d1df61d..e88ec5c 100755
--- a/ipv4.tcl
+++ b/ipv4.tcl
@@ -77,7 +77,7 @@ proc findFreeIPv4Net { mask } {
 #   autoIPv4addr $node $iface 
 # FUNCTION
 #   automaticaly assignes an IPv4 address to the interface $iface of 
-#   of the node $node 
+#   of the node $node  
 # INPUTS
 #   node  - the node containing the interface to witch a new 
 #           IPv4 address should be assigned
@@ -142,6 +142,19 @@ proc autoIPv4addr { node iface } {
 }
 
 
+#****f* ipv4.tcl/autoIPv4defaultroute 
+# NAME
+#   autoIPvdefaultroute -- automaticaly assign a default route 
+# SYNOPSIS
+#   autoIPv4defaultroute $node $iface 
+# FUNCTION
+#   searches the interface of the node for a router, if a router is found
+#   then it is a new default gateway. 
+# INPUTS
+#   node  - default gateway is provided for this node 
+#   iface - the interface on witch we search for a new default gateway
+#****
+
 proc autoIPv4defaultroute { node iface } {
     if { [[typemodel $node].layer] != "NETWORK" } {
 	#