Evaluación de Algoritmos de Ruteamiento Multipunto en Redes de ...

El ejemplo 2 es un script OTcl que crea dos objetos de diferentes clases, clase “mom”
(ʺmamaʺ) y clase “kid” (ʺniñoʺ). La clase “kid” es una clase hijo de la clase ʺmomʺ. Además,
este script define una función miembro llamada “greet” (ʺsaludoʺ) en cada clase.
En el ejemplo, después de las definiciones de clases, se establecen los valores de la
variable “age” para cada objeto creado, que se fijará en 45 para el objeto de clase “mom” y en
15 para el objeto de clase “kid”. Luego, se llamará a la función miembro ʺgreetʺ para cada
objeto.
El comando Class es para crear una clase de objeto e instproc es para definir una
función miembro para una clase de objeto. La herencia de clases es especificada usando el
comando superclass. En la definición de funciones miembro, $self actúa como el
puntero ʺthisʺ en C++, e instvar verifica si el nombre de la variable está declarada en su
clase o en la superclase. Si el nombre de la variable ya está declarado, la variable es
referenciada, si es que no se ha declarado nuevamente. Finalmente el comando new se utiliza
para crear un objeto, tal como muestra el ejemplo. Al descargar y ejecutar este ejemplo, que
corresponde al archivo ex‐otcl.tcl, se obtienen los siguientes resultados:
(Recuerde que para correr el ejemplo debe escribir en la línea de comando “ns ex‐
otcl.tclʺ).
3.2 Un ejemplo simple de simulación
Esta sección muestra un script muy simple de una simulación con Ns, aquí se explica lo
que hace cada línea del código. El ejemplo 3 es un script en OTcl que crea una configuración
de red bastante simple, tal como se observa en el esquema de la Figura 6. Para echar a correr
esta simulación, se debe descargar el archivo ns‐simple.tcl y escribir en la línea de comandos
ʺns ns‐simple.tclʺ.
90