stomp_message 0.1.8 → 0.6.3

data/Manifest.txt

@@ -7,14 +7,18 @@ config/hoe.rb
 config/requirements.rb
 lib/stomp_message.rb
 lib/stomp_message/version.rb
+lib/stomp_message/jms_tools.rb
 lib/stomp_message/stomp_server.rb
 lib/stomp_message/stomp_statistics_server.rb
 lib/stomp_message/stomp_z_active_record_server.rb
 lib/stomp_message/stomp_send_topic.rb
-lib/stomp_message/stomp_participant.rb
 lib/stomp_message/message.rb
 log/debug.log
 bin/stomp_message_send.rb
+bin/jms_server_standalone.rb
+bin/jms_message_send.rb
+bin/jms_ping.rb
+bin/jms_topic_listener.rb
 script/destroy
 script/generate
 script/txt2html

data/README.txt

@@ -1,3 +1,4 @@
+= Stomp Message
 A basic package for sending and receiving stomp messages
 
 Active Record Server Class
@@ -29,4 +30,70 @@ IMPORTANT apachemq or some other messaging platform must be running :)
                 puts "#{m.to_s}"
                 msg=StompMessage::Message.load_xml(m)
                 assert msg.command== 'stomp_REPLY',  "command wrong"
-                }
+                }
+
+JRUBY
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/asm-
+asm-2.2.3.jar          asm-commons-2.2.3.jar  
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/asm*.jar build
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/backport-util-concurrent.jar build
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/jline-0.9.91.jar build
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/jruby build
+jruby-complete.jar  jruby.jar           
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/jruby.jar build
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ cp /Users/scott/Documents/ror/glassfish/jruby/jruby-1_0_3/jruby-1.0.3/lib/mysql-connector-java-5.0.8-bin.jar build
+Scotts-Computer:~/Documents/ror/checkouts/stomp_message scott$ ls build
+asm-2.2.3.jar                           jline-0.9.91.jar
+asm-commons-2.2.3.jar                   jruby.jar
+backport-util-concurrent.jar            mysql-connector-java-5.0.8-bin.jar
+com
+BUILD JAR FILE
+ cd build
+ jar cf ../ficonab.jar .
+
+#COMPILING:
+ javac -cp $JRUBY_HOME/lib/jruby.jar:$GLASSFISH_ROOT/lib/j2ee.jar -d build com/ficonab/FiconabBase.java
+ javac -cp $JRUBY_HOME/lib/jruby.jar:$GLASSFISH_ROOT/lib/j2ee.jar:./build -d build com/ficonab/MessageBean.java
+#BUILD JAR FILE
+ cd build
+ jar cf ../ficonab.ear .
+#INSTALL
+ cd ..
+ asadmin deploy ficonab.ear
+asadmin deploy --host svbalance.cure.com.ph --port 2626 ficonab.ear
+
+AUTODEPLOY
+ cp ficonab.jar ../../glassfish/domains/domain1/autodeploy/
+
+
+war file.
+jar cf smsapp.war -C tmp/war .
+
+jar cf ../ficonab.jar .
+
+IMPORTANT
+Jdbc pools must be non transactional and set to allow non component callers.
+
+
+
+CLASSPATHS
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/j2ee.jar
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/appserv-rt.jar
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/javaee.jar
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/j2ee-svc.jar
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/appserv-ee.jar
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/activation.jar
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/dbschema.jar 
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/appserv-admin.jar 
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/install/applications/jmsra/imqjmx.jar   
+export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/lib/install/applications/jmsra/imqjmsra.jar
+
+ export CLASSPATH=$CLASSPATH:$GLASSFISH_ROOT/imq/lib/fscontext.jar
+
+
+Filesystem context:
+
+CLASSPATH=/Users/scott/Documents/ror/glassfish/lib/install/jmsra/imqjsra.jar:/Users/scott/Documents/ror/glassfish/lib/j2ee.jar:/Users/scott/Documents/ror/glassfish/lib/appserv-rt.jar:/Users/scott/Documents/ror/glassfish/lib/javaee.jar:/Users/scott/Documents/ror/glassfish/lib/j2ee-svc.jar:/Users/scott/Documents/ror/glassfish/lib/appserv-ee.jar:/Users/scott/Documents/ror/glassfish/lib/install/applications/jmsra/imqjmsra.jar:/Users/scott/Documents/ror/glassfish/lib/install/applications/jmsra/imqjmx.jar:/Users/scott/Documents/ror/glassfish/lib/install/applications/jmsra/imqbroker.jar:/Users/scott/Documents/ror/glassfish/lib/dbschema.jar:/Users/scott/Documents/ror/glassfish/lib/appserv-admin.jar
+
+
+

data/bin/jms_message_send.rb

@@ -0,0 +1,69 @@
+#!/usr/bin/env jruby -S
+# == Synopsis
+#   Send a message to a jms server and wait for result if requested
+# == Usage
+#  jms_message_send.rb -T topic -M command -b body -h host -p port " 
+#   Debug: to turn on debug: stomp_message_send.rb -T '/topic/sms' -M stomp_DEBUG -b nil
+#   Statistics:  stomp_message_send.rb -T '/topic/sms' -M stomp_REPORT -b nil -A true
+#    Reconnect: stomp_message_send.rb -T '/topic/sms' -M stomp_RECONNECT -b nil -A true  ---- NOT USED OFTEN
+# Ping:  for ping test: stomp_message_send.rb -T '/topic/sms' -M stomp_PING -b nil -A true
+# Ping: for email ping test: stomp_message_send.rb -T '/topic/sms' -M stomp_PING -b nil -A true -D comma_separated_email_addresses"
+# Note -a flag for response  --- eg true or false
+# == Useful commands
+#  jruby -S jms_message_send.rb  -M stomp_PING -b nil -A true -T sms
+#  jruby -S jms_message_send.rb  -M stomp_DEBUG -b nil -d  -T sms
+# jruby -S  jms_message_send.rb -M stomp_REPORT -b nil -A true -D email@com  -T sms
+# == Author
+#   Scott Sproule  --- Ficonab.com (scott.sproule@ficonab.com)
+# == Copyright
+#    Copyright (c) 2007 Ficonab Pte. Ltd.
+#     See license for license details
+require 'yaml'
+require 'rubygems'
+gem 'stomp'
+require 'stomp'
+require 'optparse'
+gem 'stomp_message'
+require 'stomp_message'
+require 'rdoc/usage'
+require 'java'
+include StompMessage::JmsTools
+#Hashtable=java.util.Hashtable
+#Context=javax.naming.Context
+#InitialContext = javax.naming.InitialContext
+#Session = javax.jms.Session
+
+
+ arg_hash=StompMessage::Options.parse_options(ARGV)
+ RDoc::usage if  arg_hash[:topic]==nil || arg_hash[:command]==nil || arg_hash[:help]==true
+require 'pp'
+  options = arg_hash
+   # set up variables using hash
+   
+   jms_start("TopicConnectionFactory")
+   jms_set_debug(arg_hash[:debug])
+   tdest, tconn= jms_create_destination_connection( arg_hash[:topic])
+   tproducer, tsession= jms_create_producer_session(tdest,tconn)
+   tconsumer, consumer_session = jms_create_consumer_session(tdest,tconn) 
+   msg=StompMessage::Message.new(options[:command],options[:body])
+  # msg=StompMessage::Message(arg_hash[:command],'hello body there')
+     count = arg_hash[:count]==nil ? 1 : arg_hash[:count].to_i
+ 
+     result =jms_send_ack(tsession,tproducer,msg.to_xml) 
+  #   consumer_session.close
+     puts "#{result}"
+ #  sleep(1)
+   
+  
+    
+    puts  '-------------finished processing!!!'
+   # sleep(15)
+   # puts "producer id #{producer.getProducerID}"
+    jms_shutdown(tdest, tconn, tsession, tproducer, tconsumer )
+      StompMessage::StompSendTopic.send_email_stomp("scott.sproule@cure.com.ph","STOMP MSG", options[:email],
+                      "#{options[:topic]}: #{msg.command}", result) if  options[:email]!=nil
+  
+    
+   # Thread.exit
+    exit!
+  

data/bin/jms_ping.rb

@@ -0,0 +1,62 @@
+#!/usr/bin/env jruby -S
+# == Synopsis
+#   Send a  ping message to a jms server and wait for result 
+# == Usage
+#  jms_ping.rb -T topic -d " 
+# Ping:  for ping test: stomp_message_send.rb -T '/topic/sms' -M stomp_PING -b nil -A true
+# Ping: for email ping test: stomp_message_send.rb -T '/topic/sms' -M stomp_PING -b nil -A true -D comma_separated_email_addresses"
+# Note -a flag for response  --- eg true or false
+# == Useful commands
+#  jruby -S jms_ping.rb  -T sms
+#  jruby -S jms_ping   -d  -T sms
+# == Author
+#   Scott Sproule  --- Ficonab.com (scott.sproule@ficonab.com)
+# == Copyright
+#    Copyright (c) 2007 Ficonab Pte. Ltd.
+#     See license for license details
+require 'yaml'
+require 'rubygems'
+gem 'stomp'
+require 'stomp'
+require 'optparse'
+gem 'stomp_message'
+require 'stomp_message'
+require 'rdoc/usage'
+require 'java'
+include StompMessage::JmsTools
+#Hashtable=java.util.Hashtable
+#Context=javax.naming.Context
+#InitialContext = javax.naming.InitialContext
+#Session = javax.jms.Session
+
+
+ arg_hash=StompMessage::Options.parse_options(ARGV)
+ RDoc::usage if  arg_hash[:topic]==nil || arg_hash[:help]==true
+require 'pp'
+  options = arg_hash
+   # set up variables using hash
+   
+   jms_start("TopicConnectionFactory")
+   jms_set_debug(arg_hash[:debug])
+   tdest, tconn= jms_create_destination_connection( arg_hash[:topic])
+   tproducer, tsession= jms_create_producer_session(tdest,tconn)
+   tconsumer, consumer_session = jms_create_consumer_session(tdest,tconn) 
+   msg=StompMessage::Message.new('stomp_PING',"#{Time.now}")
+  # msg=StompMessage::Message(arg_hash[:command],'hello body there')
+ 
+     result =jms_send_ack(tsession,tproducer,msg.to_xml) 
+  #   consumer_session.close
+     puts "#{result}"
+ #  sleep(1)
+   
+  
+    
+    puts  '-------------finished processing!!!'
+   # sleep(15)
+   # puts "producer id #{producer.getProducerID}"
+    jms_shutdown(tdest, tconn, tsession, tproducer, tconsumer )
+     
+    
+   # Thread.exit
+    exit!
+  

data/bin/jms_server_standalone.rb

@@ -0,0 +1,50 @@
+#!/usr/bin/env ruby
+# == Synopsis
+# jruby -S jms_server_standalone.rb -T topic
+#   start up the server standalone.  This is the key component for listening to subscription message
+# == Usage
+#   jruby -S jms_server_standalone.rb -T test
+# == Author
+#   Scott Sproule  --- Ficonab.com (scott.sproule@ficonab.com)
+# == Copyright
+#    Copyright (c) 2007 Ficonab Pte. Ltd.
+#     See license for license details
+
+require 'yaml'
+require 'rubygems'
+gem 'stomp'
+require 'stomp'
+require 'optparse'
+gem 'stomp_message'
+require 'stomp_message'
+require 'rdoc/usage'
+require 'java'
+include StompMessage::JmsTools
+ # env_setting = ARGV[1] || "production"
+ #   path_setting = ARGV[0] || "/opt/local/rails_apps/subscriptions/current/"
+  arg_hash=StompMessage::Options.parse_options(ARGV)
+  RDoc::usage if  arg_hash[:topic]==nil || arg_hash[:help]==true
+ require 'pp'
+   options = arg_hash
+ @my_topic = arg_hash[:topic]
+    # set up variables using hash
+
+    jms_start("TopicConnectionFactory")
+    jms_set_debug(arg_hash[:debug])
+    tdest, tconn= jms_create_destination_connection( arg_hash[:topic])
+    tproducer, tsession= jms_create_producer_session(tdest,tconn)
+    tconsumer, consumer_session = jms_create_consumer_session(tdest,tconn) 
+    
+  #  begin
+      topic=arg_hash[:topic]
+      s=StompMessage::StompServer.new({:topic => "#{topic}", :standalone => 'true', :jms_source => 'msgserver'}) 
+        tlistener=StompMessage::MySpecialListener.new(s)
+        tconsumer.setMessageListener(tlistener)
+       #.run
+   #   sms_listener.join
+   # rescue Exception => e
+    #  puts "exception found #{e.backtrace}" 
+  #  end
+   
+   
+    

data/bin/jms_topic_listener.rb

@@ -0,0 +1,72 @@
+#!/usr/bin/env jruby -S
+# == Synopsis
+#   Listen to topic and print it out.... ctrl -c to end
+# == Usage
+#  jms_message_send.rb -T topic 
+# == Useful commands
+#  jruby -S jms_topic_listener.rb  -T sms
+# == Author
+#   Scott Sproule  --- Ficonab.com (scott.sproule@ficonab.com)
+# == Copyright
+#    Copyright (c) 2007 Ficonab Pte. Ltd.
+#     See license for license details
+require 'yaml'
+require 'rubygems'
+gem 'stomp'
+require 'stomp'
+require 'optparse'
+gem 'stomp_message'
+require 'stomp_message'
+require 'rdoc/usage'
+require 'java'
+include StompMessage::JmsTools
+#Hashtable=java.util.Hashtable
+#Context=javax.naming.Context
+#InitialContext = javax.naming.InitialContext
+#Session = javax.jms.Session
+
+
+ arg_hash=StompMessage::Options.parse_options(ARGV)
+ RDoc::usage if  arg_hash[:topic]==nil || arg_hash[:help]==true
+require 'pp'
+  options = arg_hash
+@my_topic = arg_hash[:topic]
+   # set up variables using hash
+class MySpecialListener
+         include javax.jms.MessageListener if RUBY_PLATFORM =~ /java/
+       def set_self(meth)
+         @to_call=meth
+       end
+       def onMessage(msg)
+         #puts "----> consumer in on msg #{msg.inspect}"
+         puts "message received #{@my_topic} msg: #{msg.inspect}"
+        # puts "<--- consumer on message"
+       end
+ end   
+   jms_start("TopicConnectionFactory")
+   jms_set_debug(arg_hash[:debug])
+   tdest, tconn= jms_create_destination_connection( arg_hash[:topic])
+   tproducer, tsession= jms_create_producer_session(tdest,tconn)
+   tconsumer, consumer_session = jms_create_consumer_session(tdest,tconn) 
+    tlistener=MySpecialListener.new
+    tconsumer.setMessageListener(tlistener)
+  puts "listener set"
+    while true  
+      sleep(0.25)
+     end
+  #   consumer_session.close
+     #puts "#{result}"
+ #  sleep(1)
+   
+  
+    
+    puts  '-------------finished processing!!!'
+   # sleep(15)
+   # puts "producer id #{producer.getProducerID}"
+    jms_shutdown(tdest, tconn, tsession, tproducer, tconsumer )
+   
+  
+    
+   # Thread.exit
+    exit!
+  

data/bin/stomp_message_send.rb

@@ -1,3 +1,4 @@
+#!/usr/bin/env ruby
 # == Synopsis
 #   Send a message to a stomp server and wait for result if requested
 # == Usage
@@ -34,7 +35,8 @@ require 'pp'
   options = arg_hash
    # set up variables using hash
     msg_sender=StompMessage::StompSendTopic.new(options) 
-    msg_sender.setup_auto_close  
+    msg_sender.jms_set_debug(true) if arg_hash[:debug]
+    #msg_sender.setup_auto_close  if !msg_sender.java?
     m=StompMessage::Message.new(options[:command],options[:body])
     puts "message is: #{m.to_xml}"
    # billing_sender.send_topic(m.body,  arg_hash[:msisdn]) 
@@ -45,38 +47,17 @@ require 'pp'
       msg_data=nil
       case options[:ack].downcase
       when   'true'
-          msg_sender.send_topic_acknowledge(m,header,50)  {   |msg| # puts 'in handle action block' 
-                                puts 'MESSAGE RECEIVED ----'
-                                msg_received_flag=true
-                                msg_data=msg
-                          puts "handle action block msg is #{msg.to_s}"  }
-                            begin
-                           Timeout::timeout(100) {
-                                 while true  
-                                    putc '.'
-                                    exit(0) if msg_received_flag
-                                    sleep(1)
-                                    end  }
-                              rescue SystemExit
-
-                              rescue Exception => e
-                               puts "exception #{e.message} class: #{e.class}"
-                               puts  "no receipt"
-                            #   raise "timeout" 
-                              #ensure
-                               # msg_sender.setup_auto_close
-                              end
-                          
-   
+         msg_data= msg_sender.send_topic_ack(m,header,50)  
       else
           msg_sender.send_topic(m,header)
        
       end
           
      msg_sender.send_email_stomp("scott.sproule@cure.com.ph","STOMP MSG", options[:email],
-                    m.command, msg_data) if msg_received_flag and options[:email]!=nil
+                    "#{options[:topic]}: #{m.command}", msg_data) if msg_received_flag and options[:email]!=nil
    
-  
+     msg_sender.send_topic_jms_shutdown if msg_sender.java?
     
     puts  '-------------finished processing!!!'
+    exit!
   

data/lib/stomp_message/jms_tools.rb

@@ -0,0 +1,315 @@
+if RUBY_PLATFORM =~ /java/
+require 'java'
+#module Java
+#include_class 'java.lang.String'
+#end
+import java.util.Hashtable
+import javax.naming.Context
+import javax.naming.InitialContext
+import javax.jms.Message
+import javax.jms.MessageListener
+import javax.jms.Session
+import javax.jms.ConnectionFactory
+import javax.jms.TopicConnectionFactory
+#import javax.jms.MessageListener
+end
+
+
+module StompMessage
+  module JmsTools
+    
+class MyListener
+      include javax.jms.MessageListener if RUBY_PLATFORM =~ /java/
+    def set_self(meth)
+      @to_call=meth
+    end
+    def onMessage(msg)
+      #puts "----> consumer in on msg #{msg.inspect}"
+      @to_call.send('jms_on_message',msg)
+     # puts "<--- consumer on message"
+    end
+end
+    def jms_next_transaction_id
+       puts "--- before trans id #{@transaction_id}"  if  @JmsTools_debug
+       @my_jms_guard_tx.synchronize {
+             @transaction_id+=1 }
+       puts "--- after increment trans id #{@transaction_id}"  if  @JmsTools_debug
+       @transaction_id
+    end
+    def define_source_id
+      # maybe should user producer id
+       @source_id=rand*10000 + rand*400+1 #if @source_id==0
+       @source_id=@source_id.to_i.to_s
+       puts "--- source id #{@source_id}"  if  @JmsTools_debug
+    end
+    def unique_source_id      
+         @source_id
+    end
+    def jms_my_id      
+           @source_id
+    end
+    
+     def jms_set_debug(val)    
+             val=false if val==nil
+             @JmsTools_debug = val
+      end
+    def jms_start(factory,src_id=nil)
+      jms_set_debug(false)
+      @my_jms_guard    = Mutex.new  
+      @my_jms_guard2    = Mutex.new  
+        @my_jms_guard3    = Mutex.new 
+          @my_jms_guard_tx    = Mutex.new  
+     # @source_id=0   # DEFINE SOURCE ID IF MULTIPLE INSTANCES
+      @source_id=src_id
+      define_source_id if src_id==nil
+       puts "-----> JMSTools start #{Time.now}" #if  @JmsTools_debug
+      jms_kill_logging if  !@JmsTools_debug
+     
+      @JmsTools_current_id=0
+      properties=Hashtable.new(2)
+      #properties.put(Context::PROVIDER_URL, "iiop://127.0.0.1:3700")
+      #properties.put(Context::INITIAL_CONTEXT_FACTORY, "com.sun.appserv.naming.S1ASCtxFactory")
+      properties.put(Context::PROVIDER_URL, "file:///opt/local/imqobjects")
+        properties.put(Context::INITIAL_CONTEXT_FACTORY, "com.sun.jndi.fscontext.RefFSContextFactory")
+      
+      @JmsTools_ctx=InitialContext.new(properties)
+      puts "after initial context #{@JmsTools_ctx.inspect}" if  @JmsTools_debug
+      @JmsTools_conn_factory=@JmsTools_ctx.lookup(factory) 
+      puts "PROBLEM jms_start context:  #{@JmsTools_ctx.inspect} factory: #{@JmsTools_conn_factory} "  if @JmsTools_ctx==nil || @JmsTools_conn_factory==nil
+     
+      temp_tx_id=   rand*400+1 # set up random start id
+       @transaction_id=temp_tx_id.to_i
+      @response_block_list = {}
+      puts "<------ ending start #{Time.now}" if  @JmsTools_debug
+      
+    end
+    def jms_manage_headers(headers)
+             headers.each do |k, value|
+               key=k.to_s
+               if ['correlation-id', 'JMSCorrelationID'].include? key
+                    headers['JMSCorrelationID']= value.to_s
+                  elsif ['expires', 'JMSExpiration'].include? key
+                    headers['JMSExpiration']= value.to_i
+                  elsif ['persistent', 'JMSDeliveryMode'].include? key
+                    headers['JMSDeliveryMode'] = value ? 2 : 1
+                  elsif ['priority', 'JMSPriority'].include? key
+                     headers['JMSPriority']= value.to_i
+                 # elsif ['reply-to', 'JMSReplyTo'].include? key
+                  #   headers['JMSReplyTo']= nil
+                  elsif ['type', 'JMSType'].include? key
+                     headers['JMSType']= value.to_s
+                  else #is this the most appropriate thing to do here?
+                    headers[key] = value.to_s
+                  end
+              end
+              # need to turn off persistence, and reply to fix
+            # if headers['JMSReplyTo']==nil
+                # headers['JMSReplyTo']= @source_id
+                # CHECK headers['reply-to']= @source_id
+            # end
+              headers['JMSOrigin']=unique_source_id.to_s
+              puts " --- headers reply #{ headers['JMSReplyTo']} source #{@source_id} id #{headers['JMSMessageID']}"  if  @JmsTools_debug
+              puts "--- headers #{headers.to_s}" if  @JmsTools_debug
+              headers
+      
+    end
+    def jms_kill_logging
+      puts "in disabling logging" if  @JmsTools_debug
+      enm=java.util.logging.LogManager.log_manager.logger_names
+      while enm.hasMoreElements do
+        t_logger= java.util.logging.Logger.getLogger(enm.nextElement)
+        puts "logger is: #{t_logger.inspect}" if  @JmsTools_debug
+        t_logger.level = java.util.logging.Level::OFF if ENV==nil
+      end
+      enm=nil  # free for GC
+    end
+    def jms_persistent
+      1  #2 is persistent
+    end
+    # use the raw flag to get the whole message back
+    def jms_send_ack(session,producer,tmp_text,ttimeout=75, rawflag=false)
+       # scott new comment  msg=session.create_text_message
+        jms_temp_result =''
+      @my_jms_guard.synchronize {
+       #  jms_next_transaction_id
+         jms_tmp_header={}
+         jms_temp_result=''
+         begin 
+         count =0;
+         Timeout::timeout(ttimeout) {
+               tmp_msg_recv_flag=false
+               jms_send_message(session,producer,jms_tmp_header,tmp_text)  { |t2msg|
+                          #puts "message recieved: #{t2msg.inspect}" 
+                          temp_m=StompMessage::Message.load_xml(t2msg.get_text())
+                          jms_temp_result = temp_m.body 
+                          jms_temp_result = temp_m if rawflag
+                           tmp_msg_recv_flag=true
+                           }
+                        #  sleep(0.05)
+                           while true  
+                           #    putc '.'
+                               count +=1
+                               break if tmp_msg_recv_flag
+                               sleeptime=count*0.01
+                               count= 5 if count > 100  #don't let count get too big
+                               sleep(sleeptime) 
+                              # puts "----sleeptime is: #{sleeptime} count: #{count}" 
+                               end
+          }
+
+          rescue Timeout::Error
+            jms_temp_result="timeout waiting for response"
+          end
+         }
+          return jms_temp_result
+    end
+    def jms_send_message(session,producer,initial_headers,txt, &block)    
+    @my_jms_guard3.synchronize {
+      msg=session.create_text_message
+      jms_next_transaction_id
+      headers={}
+      # puts "initail headers #{initial_headers.inspect} reply to: #{initial_headers['JMSReplyTo']}"
+      if initial_headers['JMSReplyTo']==nil
+         initial_headers['id']=@transaction_id.to_s
+      else 
+        puts "reply message id is #{initial_headers['id']}" if  @JmsTools_debug
+      end
+      headers=jms_manage_headers(initial_headers)
+      #msg.setIntProperty("id", next_transaction_id)
+       if block_given?
+          puts "----> adding #{@transaction_id} to my block list msg txt #{txt}"  if  @JmsTools_debug
+          headers['JMSReplyTo']= unique_source_id
+          @response_block_list[@transaction_id.to_s]=block
+        end
+      headers['JMSOrigin']= unique_source_id.to_s
+      headers.each do |k,v|
+        #key=Java::java.lang.String.new(k.to_s)
+        msg.setStringProperty(k.to_s,v.to_s)
+      end
+       msg.setJMSDeliveryMode(jms_persistent)   #2 is persistent
+      msg.set_text(txt)
+      producer.send(msg)
+       msg=nil
+      puts "---> jms_send_message sending #{txt}" if  @JmsTools_debug
+      puts " ----> jms_send_message" }
+      
+    end
+     def jms_create_producer(session,dest)
+        puts "----> in create producer #{Time.now}" if  @JmsTools_debug
+        producer=session.create_producer(dest)
+        puts "<----- returning create producer #{Time.now}" if  @JmsTools_debug
+        return  producer
+    end
+    def jms_message_for_me(msg)
+      @my_jms_guard2.synchronize {
+      if msg.getStringProperty('JMSReplyTo')==unique_source_id
+          puts "message for ME...YAHOO"  if  @JmsTools_debug
+          tx_id= msg.getStringProperty('id')
+       # puts "id is #{tx_id} size is: #{@response_block_list.size} inspect #{@response_block_list.inspect}"
+          block=@response_block_list[tx_id.to_s]
+         # puts "calling block for #{tx_id}"  if block!=nil
+           block.call(msg) if block!=nil
+           @response_block_list.delete(tx_id.to_s) if block!=nil
+           puts "NO BLOCK FOUND FOR MY MESSAGE #{tx_id}" if block==nil
+       else
+        puts "found message for another person---discard"  if  @JmsTools_debug
+      end
+    }
+    end
+    def jms_on_message(msg)
+      puts "-----> jms on message" if  @JmsTools_debug
+       if msg.getStringProperty('JMSOrigin')!=jms_my_id
+         jms_message_for_me(msg)
+       else
+         puts "received message from myself--- discard"  if  @JmsTools_debug
+       end
+        puts "<----- jms on message" if  @JmsTools_debug
+    end
+     def jms_create_consumer(session,dest)
+        puts "----> in create consumer" if  @JmsTools_debug
+        consumer=session.create_consumer(dest)
+        listener=MyListener.new
+        listener.set_self(self)
+         consumer.setMessageListener(listener)
+         @my_conn.start
+        puts "<----- returning create consumer" if  @JmsTools_debug
+        return  consumer
+    end
+     def jms_create_consumer_session(tdest,cconn)
+        puts "----> in create consumer session" if  @JmsTools_debug
+         ctsession = cconn.create_session(false,Session::AUTO_ACKNOWLEDGE)  # CHEcK AUTo ACK
+        consumer=ctsession.create_consumer(tdest)
+        listener=MyListener.new
+        listener.set_self(self)
+         consumer.setMessageListener(listener)
+         @my_conn=cconn
+         @my_conn.start
+        puts "<----- returning create consumer session" if  @JmsTools_debug
+        return  consumer, ctsession
+    end
+    def jms_create_producer_session(tdest,cconn)
+      puts "----> in create producer session #{Time.now}" if  @JmsTools_debug
+           session = cconn.create_session(false,Session::AUTO_ACKNOWLEDGE)  # CHEcK AUTo ACK
+           producer= session.create_producer(tdest)
+       puts "<----- returning create session #{Time.now}" if  @JmsTools_debug
+        return producer, session
+    end
+     def jms_close_producer_session(tprod,tsession)
+           puts "----> in jms close producer session #{Time.now}" if  @JmsTools_debug
+         # tsession.commit
+          tprod.close if tprod!=nil
+          tsession.close if tsession!=nil
+           puts "<--- in jms close producer session #{Time.now}" if  @JmsTools_debug
+      end
+     def jms_create_destination_connection(name)
+        puts "----> in create destination connection #{Time.now}" if  @JmsTools_debug
+        tdest=@JmsTools_ctx.lookup(name)
+        tconn=@JmsTools_conn_factory.create_connection
+       # @my_conn=tconn
+         puts "----- dest #{tdest.inspect} conn #{tconn.inspect}" if  @JmsTools_debug
+        puts "<----- destination connection #{Time.now}" if  @JmsTools_debug
+        return tdest, tconn
+      end
+     
+    def jms_create_session(name)
+      puts "----> in create session #{Time.now}" if  @JmsTools_debug
+      dest=@JmsTools_ctx.lookup(name)
+      conn=@JmsTools_conn_factory.create_connection
+      @my_conn=conn
+      # SET CONNECTION PARAMETERS TO OPTIMIZE THROUGHPUT HERE
+     #  conn.setStringProperty('imqJMSDeliveryMode','1')
+   #  conn.setimqJMSDeliveryMode(jms_persistent)
+     session = conn.create_session(false,Session::AUTO_ACKNOWLEDGE)  # CHEcK AUTo ACK
+   #   session = conn.create_session(false,Session::DUPS_OK_ACKNOWLEDGE)  # CHEcK AUTo ACK
+    #  conn.start
+       puts "----- dest #{dest.inspect} conn #{conn.inspect}" if  @JmsTools_debug
+      puts "<----- returning create session #{Time.now}" if  @JmsTools_debug
+      return dest, conn, session
+    end
+   
+    def jms_shutdown(tdest, tconn, tsession, tproducer, tconsumer=nil)
+      puts "----> in shutdown " if  @JmsTools_debug
+      #dest.shutdown
+     # puts "shutdown #{dest.methods.join(',').to_s}" if  @JmsTools_debug
+      puts "conn: #{tconn.inspect} session #{tsession.inspect} producer #{tproducer.inspect}" if  @JmsTools_debug
+      @my_conn=nil
+      tproducer.close if tproducer != nil
+      tconsumer.close if tconsumer != nil
+    
+      tsession.close if tsession!=nil
+      tconn.stop if tconn!=nil
+      tconn.close() if tconn!=nil
+       tconn.close if tconn!=nil
+       @JmsTools_ctx.close
+       tdest=tconn=tsession=tproducer= @JmsTools_ctx=nil
+         @response_block_list=nil
+           @my_jms_guard = @my_jms_guard2 = @my_jms_guard3    =    @my_jms_guard_tx=nil
+         
+
+     # puts "---CLOSED conn: #{tconn.inspect} session #{tsession.inspect} producer #{tproducer.inspect} conn factory: #{@JmsTools_conn_factory}" if  @JmsTools_debug
+      puts "<----- returning shutdown " if  @JmsTools_debug
+
+    end
+    
+  end
+end