From 729b6da8a74a6ddba6539f641e4faf8d6de44d16 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@anytun.org>
Date: Wed, 6 Feb 2008 19:11:45 +0000
Subject: added wireshakr lua script for satp

---
 anytun.cpp             | 16 ++++++++--------
 wireshark-lua/satp.lua | 32 ++++++++++++++++++++++++++++++++
 2 files changed, 40 insertions(+), 8 deletions(-)
 create mode 100644 wireshark-lua/satp.lua

diff --git a/anytun.cpp b/anytun.cpp
index dafc7bf..a55145e 100644
--- a/anytun.cpp
+++ b/anytun.cpp
@@ -90,7 +90,6 @@ void createConnection(const std::string & remote_host , u_int16_t remote_port, C
 	ConnectionParam connparam ( (*kd),  (*seq), seq_nr_, remote_host,  remote_port);
  	cl.addConnection(connparam,0);
   SyncCommand sc (cl,0);
-
 	queue.push(sc);
 }
 
@@ -294,16 +293,19 @@ void* receiver(void* p)
 
 void initLibGCrypt()
 {
+  // make libgcrypt thread safe
+  gcry_control( GCRYCTL_SET_THREAD_CBS, &gcry_threads_pthread );
+
   gcry_error_t err;
       // No other library has already initialized libgcrypt.
   if( !gcry_control(GCRYCTL_ANY_INITIALIZATION_P) )
   {
     if( !gcry_check_version( MIN_GCRYPT_VERSION ) ) {
-      cLog.msg(Log::PRIO_ERR) << "KeyDerivation::init: Invalid Version of libgcrypt, should be >= " << MIN_GCRYPT_VERSION;
+      cLog.msg(Log::PRIO_ERR) << "initLibGCrypt: Invalid Version of libgcrypt, should be >= " << MIN_GCRYPT_VERSION;
       return;
     }
     
-        // do NOT allocate a pool of secure memory!
+    // do NOT allocate a pool of secure memory!
     // this is NOT thread safe!
     
     /* Allocate a pool of 16k secure memory.  This also drops priviliges
@@ -318,10 +320,10 @@ void initLibGCrypt()
         /* Tell Libgcrypt that initialization has completed. */
     err = gcry_control(GCRYCTL_INITIALIZATION_FINISHED);
     if( err ) {
-      cLog.msg(Log::PRIO_ERR) << "KeyDerivation::init: Failed to finish the initialization of libgcrypt: " << gpg_strerror( err );
+      cLog.msg(Log::PRIO_ERR) << "initLibGCrypt: Failed to finish the initialization of libgcrypt: " << gpg_strerror( err );
       return;
     } else {
-      cLog.msg(Log::PRIO_NOTICE) << "KeyDerivation::init: libgcrypt init finished";
+      cLog.msg(Log::PRIO_NOTICE) << "initLibGCrypt: libgcrypt init finished";
     }
   }
 }
@@ -367,8 +369,6 @@ int main(int argc, char* argv[])
   cLog.msg(Log::PRIO_NOTICE) << "dev opened - actual name is '" << p.dev.getActualName() << "'";
   cLog.msg(Log::PRIO_NOTICE) << "dev type is '" << p.dev.getTypeString() << "'";
 
-  // make libgcrypt thread safe
-  gcry_control( GCRYCTL_SET_THREAD_CBS, &gcry_threads_pthread );
   initLibGCrypt();
 
   pthread_t senderThread;
@@ -396,7 +396,7 @@ int main(int argc, char* argv[])
 	  pthread_cancel(syncListenerThread);  
 	for( std::list<pthread_t>::iterator it = connectThreads.begin() ;it != connectThreads.end(); ++it)
 		pthread_cancel(*it);
-
+  
   pthread_join(senderThread, NULL);
   pthread_join(receiverThread, NULL);
 	if ( opt.getLocalSyncPort())
diff --git a/wireshark-lua/satp.lua b/wireshark-lua/satp.lua
new file mode 100644
index 0000000..e10cdba
--- /dev/null
+++ b/wireshark-lua/satp.lua
@@ -0,0 +1,32 @@
+do
+ -- satp example
+ -- declare our protocol
+ 
+ satp_proto = Proto("SATP","Secure Anycast Tunneling Protocol")
+
+ -- create a function to dissect it
+ function satp_proto.dissector(buffer,pinfo,tree)
+    pinfo.cols.protocol = "SATP"
+    local subtree = tree:add(satp_proto,buffer(),"SATP Protocol Data")
+    subtree:add(buffer(0,4),"Sequence Number: " .. buffer(0,4):uint())
+    subtree:add(buffer(4,2),"Sender ID: " .. buffer(4,2):uint())
+    subtree:add(buffer(6,2),"Mux: " .. buffer(6,2):uint())
+    subtree:add(buffer(8,2),"Payload Type: " .. buffer(8,2):uint())
+
+    local data_dis = Dissector.get("data")
+    local payload_dis = Dissector.get("ip")
+    
+    if payload_dis ~= nil then
+      payload_dis:call(buffer(10):tvb(),pinfo,tree)
+    else
+      data_dis:call(buffer(10):tvb(),pinfo,tree)
+    end
+ end
+
+ -- load the udp.port table
+
+ udp_table = DissectorTable.get("udp.port")
+ 
+ -- register our protocol to handle udp port 4444
+ udp_table:add(4444,satp_proto)
+end
-- 
cgit v1.2.3