From: John Hodge <tpg@mutabah.net>
Date: Tue, 17 Aug 2010 01:41:33 +0000 (+0800)
Subject: Updated sample scripts (and included a static version)
X-Git-Tag: rel0.06~54
X-Git-Url: https://git.ucc.asn.au/?a=commitdiff_plain;h=0868b3d6f171438446e93469b09e77771897bf00;p=tpg%2Facess2.git

Updated sample scripts (and included a static version)
---

diff --git a/Usermode/Libraries/libspiderscript.so_src/Scripts/sample.isc b/Usermode/Libraries/libspiderscript.so_src/Scripts/sample.isc
index 7e9a866f..d9ec0205 100644
--- a/Usermode/Libraries/libspiderscript.so_src/Scripts/sample.isc
+++ b/Usermode/Libraries/libspiderscript.so_src/Scripts/sample.isc
@@ -1,3 +1,4 @@
+#<?php
 
 # Should I use brackets in this language?
 # Well, considering that all whitespace is ignored, it might be an idea
@@ -23,6 +24,7 @@ Sys.IO.Close($fp);
 #  Sys.Mem.MakeStruct( "L*B", $len, $len, $str );
 # Hmm.. that would mean I will need arrays... fuck it, do them later
 
+/*
 function SetIPv4($ifaceName, $addr)
 {
 	$fp = Sys.IO.Open( "/Devices/ipstack/$ifaceName" );
@@ -34,3 +36,9 @@ function SetIPv4($ifaceName, $addr)
 }
 
 SetIPv4( $ifname, Lang.Array(10, 0, 2, 55) );
+*/
+
+
+return 42;	// Script return value
+
+#?>
diff --git a/Usermode/Libraries/libspiderscript.so_src/Scripts/sample_static.ssc b/Usermode/Libraries/libspiderscript.so_src/Scripts/sample_static.ssc
new file mode 100644
index 00000000..f490fb82
--- /dev/null
+++ b/Usermode/Libraries/libspiderscript.so_src/Scripts/sample_static.ssc
@@ -0,0 +1,29 @@
+#<?php
+
+Object	$fp;
+Integer	$ifname;
+
+$fp = Sys.IO.Open( "/Devices/ipstack" );
+$ifname = Sys.IO.IOCtl( $fp, 4, "/Devices/ne2k/0" );
+Sys.IO.Close($fp);
+
+
+// Set the IPv4 address of an interface
+//void SetIPv4(String $ifaceName, Integer $addr[4])
+void SetIPv4(String $ifaceName, Integer $addr0, Integer $addr1, Integer $addr2, Integer $addr3)
+{
+	Object	$fp;
+	Object	$data;
+	$fp = Sys.IO.Open( "/Devices/ipstack/"+$ifaceName );
+	$data = Lang.Struct( "l", 4 );
+	Sys.IO.IOCtl( $fp, 4, $data );
+	//$data = Lang.Struct( "BBBB", $addr[0],  $addr[1],  $addr[2], $addr[3] );
+	$data = Lang.Struct( "BBBB", $addr0,  $addr1,  $addr2, $addr3 );
+	Sys.IO.IOCtl( $fp, 6, $data );
+	Sys.IO.Close( $fp );
+}
+
+//SetIPv4( $ifname, Lang.IntArray(10, 0, 2, 55) );
+SetIPv4( $ifname, 10, 0, 2, 55 );
+
+#?>