adhearsion 0.7.0

data/lib/servlet_container.rb

@@ -0,0 +1,146 @@
+# Adhearsion, open source technology integrator
+# Copyright 2006 Jay Phillips
+# 
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+
+class ServletContainer
+
+	# TODO: Port Mongrel server here.
+	class NativeServer;end
+
+	require 'gserver'
+	class RubyServer < GServer
+		def initialize(port, *args)
+			@stdlog = $STDOUT
+			log "Starting server on port #{port}"
+			audit = true
+			super(port, *args)
+		end
+		
+    def read_variables io
+      # When debugging, this method could actually not do any IO operations and just
+      # return a development Hash of call variables
+      call_variables = {}
+  		while(line = io.gets.chomp)
+  			break if line.empty? # Empty lines signify no more variables
+  			variable = line.split(/:\s*/)
+  			new_name, new_value = variable.first[4..-1].downcase, variable.last
+  			call_variables["#{new_name}"] = new_value =~ /^\d+$/ ? Integer(new_value) : new_value
+  		end
+  		call_variables
+    end
+		
+		# GServer allows all functionality to be packed into 
+		def serve io
+		  io.sync = true
+		  Thread.current[:io] = io
+		  begin
+        call_variables = read_variables io
+        Thread.current[:VARS] = call_variables
+        Thread.current[:container] = Contexts::Container.new
+        
+        if call_variables.extension == 'h'
+          # We've received a notification that a channel's hung up!
+          Thread.list.each do |thread|
+            if thread[:VARS] && thread[:VARS]['uniqueid'] == call_variables['uniqueid']
+              thread[:hungup?] = true 
+              # Could kill() the Thread here but it may need to finish. We're merciful people.
+              log "Received notification that channel #{call_variables['channel']} has been hung up."
+              return
+            end
+          end
+        elsif ['t', 'failed'].include? call_variables['extension']
+          # Timeout notifications. Not implemented yet...
+          io.close
+          return
+        end
+        
+  			log "Executing call with variables: " + call_variables.inspect
+        
+  			# TODO Will perform cache checking here.
+  			
+  			call_variables.each do |k,v|
+          Thread.current[:container].run_inside do
+            meta_def k do v end
+          end 
+        end
+        
+        # Execute all before_call hooks
+  			[$BEFORE_CALl_HIGH, $BEFORE_CALL, $BEFORE_CALL_LOW].flatten.compact.each &:call
+			  +lambda { answer if CONFIG.answer_before_call }
+			  
+			  # A call hook may decree that the call shouldn't be processed further (e.g. if
+			  # it processed the call itself). This is done be rewriting the context variable.
+			  unless Thread.current[:VARS]['context'] == :interrupted
+			  
+    			begin
+    			  Contexts.new.instance_eval do
+    			    # Interpret the extensions.rb file!
+              eval File.read(File.join(Dir.pwd, "extensions.rb"))
+            end
+    			rescue => detail
+    				log "Exception raised in extensions.rb! " << detail.message
+    				# TODO: Make error reports more intutive. Use notifications DSL?
+            detail.backtrace.each do |msg| log " "*8 << msg end
+    			end
+			
+    			log "Parsing of extensions.rb complete"
+          begin
+    				target_context = call_variables['context']
+            if target_context
+              Thread.current[:container].run_inside do
+                begin
+                  +send(target_context.to_s.to_sym)
+                rescue => e
+                  STDERR.puts e.inspect
+                  +lambda {
+                    play 'were-sorry'
+                    hangup
+                  }
+                end
+              end
+            else
+              io.close
+              log "ASTERISK REQUESTED ROUTING FOR A CONTEXT UNDEFINED IN extensions.rb!!! REQUEST IGNORED!!!"
+              return
+            end
+          rescue => detail
+            log "ERROR: #{detail.class.name} => #{detail.inspect}"
+            detail.backtrace.each do |msg| log " "*8 << msg end
+          end
+    			log "Call routing complete"
+  			end
+      	rescue => detail
+      	   log "Call thread raised an exception! #{detail.message}"
+           detail.backtrace.each do |msg| log " "*8 << msg end
+      	end
+			  
+   			[$AFTER_CALl_HIGH, $AFTER_CALL, $AFTER_CALL_LOW].flatten.compact.each &:call
+   			+lambda { hangup if CONFIG.hangup_after_call }
+		end
+	end
+
+	def initialize(port=4573, native=false)
+		@server = (native ? NativeServer : RubyServer).new port, '0.0.0.0'
+		@server.start
+	end
+
+
+  def shutdown
+    @server.shutdown
+  end
+
+	attr_reader :server
+end

data/new_projects/Rakefile

@@ -0,0 +1,100 @@
+require 'rubygems'
+require 'rake/testtask'
+require 'rake/rdoctask'
+require 'rake/gempackagetask'
+
+ADHEARSION_VERSION = '0.7.0'
+Summary = 'Adhearsion is a professional integration system for
+integrating anything and everything.'
+
+#task :default => [:test]
+
+#desc "Run the Adhearsion unit tests"
+#task :test do
+#  Dir['test/*.rb'].each do |f| require f end
+#end
+
+gem_spec = Gem::Specification.new do |s|
+  
+  s.name     = 'adhearsion'
+  s.rubyforge_project = 'adhearsion'
+  s.author   = 'Jay Phillips'
+  s.email    = 'admin -at- jicksta dot com'
+  s.version  = ADHEARSION_VERSION
+  s.summary  = Summary
+  s.homepage = 'http://adhearsion.com'
+
+  s.add_dependency 'activerecord', '>= 1.14.4'
+  s.add_dependency 'activesupport', '>= 1.3.1'
+  s.add_dependency 'rake', '>= 0.7.1'
+
+  s.platform = Gem::Platform::RUBY
+  s.require_path = 'lib'
+  s.executables = 'start_adhearsion' # ['start_adhearsion', 'ahn']
+  s.bindir = '.'
+  #s.extra_rdoc_files = ['LICENSE']
+
+  include = Dir['**/*']
+  exclude = Dir['{log,pkg}/**/*']
+  
+  s.files = include - exclude
+  
+  # test_files = Dir['tests/*.rb'] # Will be added when not so buggy
+end
+
+Rake::GemPackageTask.new gem_spec do |pkg|
+  pkg.need_zip = false
+  pkg.need_tar = false
+end
+
+#desc "Generate documentation for Adhearsion"
+#Rake::RDocTask.new do |rdoc|
+#  rdoc.rdoc_dir 'doc'
+#end
+
+desc "Pulls down the entire wiki in HTML format"
+task :wiki => [:rm_wiki] do
+  require 'open-uri'
+  File.open "wiki.zip",'a' do |f|
+    f.write open('http://adhearsion.stikipad.com/codex/export_html').read
+  end
+  Dir.mkdir 'docs' unless File.exists? 'docs'
+  `unzip -d docs/wiki wiki.zip`
+  File.delete 'wiki.zip'
+  puts `find docs/wiki`
+end
+
+desc "Removes all cached compiled RubyInline shared objects"
+task :purge_objects do
+  `rm -rf ~/.ruby_inline/*`
+end
+
+desc "Removes the local copy of the wiki"
+task :rm_wiki do
+  `rm -rf wiki.zip docs/wiki/`
+end
+
+desc "Prepares Adhearsion for a new release"
+task :prepare_release do
+  # Remove log files
+  Dir['log/*.log'].each do |f|
+    puts "Removing file #{f}"
+    File.delete f
+  end
+
+  # Check for unversioned files
+  unversioned_files = `svn st | grep '^\?' | awk '{ print $2 }'`
+  puts "WARNING: These files are not under version control:\n#{unversioned_files}" unless unversioned_files.empty? 
+end
+
+desc "Simply prints the Adhearsion version."
+task :version do puts ADHEARSION_VERSION end
+
+desc 'Create sample databases per the config/migration.rb and database.yml files.'
+task :migrate do
+  require 'config/migration'
+  Module.constants.each do |c|
+    c = Module.const_get(c)
+    c.up if c.respond_to?(:superclass) && c.superclass == ActiveRecord::Migration
+  end
+end

data/new_projects/config/adhearsion.yml

@@ -0,0 +1,11 @@
+answer_before_call: true
+hangup_after_call: true
+
+info:
+  name: Codemecca LLC
+  main_number: 409/767-2813
+  street_address:
+  city:
+  state:
+  zip:
+  country: United States

data/new_projects/config/database.rb

@@ -0,0 +1,50 @@
+# Place any database customizations here. There are several ways you may desire enabling
+# database connectivity:
+#
+#   * Daemons (MySQL/PostgreSQL/etc)
+#     |
+#     |  If you're running sophisticated applications for your VoIP server 
+#     |  and desire performance or integration, you'll want a daemon database
+#     |  management system. MySQL is recommended.
+#     '____________________________________________________________
+#   * File-based (Sqlite/Sqlite3)
+#     | 
+#     | If you have little desire to integrate your VoIP application's
+#     | user and group data with other apps, sqlite/3 is a very
+#     | easy solution to get running.
+#     '____________________________________________________________
+#   * No database
+#     | 
+#     | If you simply have no use for keeping any information about
+#     | users, groups, or anything else, you can leave this entire
+#     | file commented. You don't even need ActiveRecord installed.
+#     '____________________________________________________________
+#
+### SETTING UP YOUR DATABASE WITH A SAMPLE SCHEMA
+#
+# If you would like run
+#
+# ActiveRecord resources:
+#  * http://slash7.com/cheats/activerecord_cheatsheet.pdf
+#
+#
+# Uncomment the =begin/=end blocks to enable database access.
+#=begin
+
+require 'active_record'
+ActiveRecord::Base.logger = Logger.new 'logs/database.log', 10, 1.megabyte
+ActiveRecord::Base.establish_connection YAML.load_file('config/database.yml')
+
+# When Adhearsion first encounters this Group class, it will automatically associate it
+# to the "groups" database. 
+class Group < ActiveRecord::Base
+  has_many :user
+end
+
+class User < ActiveRecord::Base
+  validates_uniqueness_of :name
+  validates_presence_of :name
+  belongs_to :group
+end
+
+#=end

data/new_projects/config/database.yml

@@ -0,0 +1,10 @@
+adapter: sqlite3 # can also be "sqlite" for sqlite v2
+dbfile: config/adhearsion.sqlite3
+
+#### If you want to use MySQL, use these settings instead:
+# adapter: mysql
+# host: localhost
+# database: adhearsion
+# username: root
+# password:
+# # socket: /var/run/mysqld/mysqld.sock # May not be required

data/new_projects/config/helpers/drb_server.yml

@@ -0,0 +1,43 @@
+enabled: false
+host: 127.0.0.1
+port: 9050
+
+deny: all
+allow:
+ - 127.0.0.1
+ - 192.168.1.*
+
+# Set your access control permissions above.
+# Values for deny and allow can be several
+# things:
+#
+#  * The 'all' keyword can be used to match
+#    everything.
+#  * A single IP can be given right after
+#    the colon.
+#  * A single IP with wildcards can be given
+#  * Or, combining all of these, a YAML list
+#    can be used to specify many policies.
+#    See the comments below for more examples.
+#
+# Also note, the "host" field above may also
+# affect the ability for DRb clients to connect
+# to the server. If you wish you receive
+# connections from the 192.168.1.*, listen on
+# the IP associated with this machine on that
+# subnet.
+#
+#
+# USING YAML LISTS
+#
+# YAML allows lists of items to be created by
+# prepending a hyphen to each list element.
+# These lists can be used to refine your
+# access control list better. Example:
+#
+# deny: all
+# allow:
+#   - 192.168.1.123
+#   - 192.168.1.99
+#   - 66.199.34.44
+

data/new_projects/config/helpers/factorial.alien.c.yml

@@ -0,0 +1 @@
+enabled: false

data/new_projects/config/helpers/manager_proxy.yml

@@ -0,0 +1,7 @@
+enabled: false
+host: 192.168.1.2
+username: jicksta
+secret: jicksta
+#port: 5038
+#console: 0
+#event_cache: 100

data/new_projects/config/helpers/micromenus.yml

@@ -0,0 +1 @@
+port: 1337

data/new_projects/config/helpers/micromenus/collab.rb

@@ -0,0 +1,55 @@
+heading "Adhearsion Micromenus Home"
+
+# A simple example of a helper used in a Micromenu.
+item oscar_wilde_quote + ' - Oscar Wilde'
+
+# Use dial plan logic here in the Micromenu!
+call "Check your voicemail!" do
+  check_voicemail
+end
+
+# If you have Adhearsion's Asterisk Manager Interface configured
+# properly, you can use the guess_sip_user feature.
+item "My User!" do
+  guess = guess_sip_user
+  item guess ? guess : "Sorry, you're behind a NAT or on a PC."
+end
+
+item "Employee Collaboration" do
+  item "View SIP users" do
+    sip_users = PBX.sip_users
+    items sip_users.collect(&:ip)
+  end
+  
+  item "Add someone to the conference" do
+    # Originate a call into the user
+  end
+  item "Have Tweedledum call Tweedledee" do
+    x = PBX.rami_client.originate 'Context' => 'internal', 'Exten' => '11', 'Priority' => '1', 'Channel' => 'SIP/tweedledum'
+    item x.inspect
+  end
+end
+
+item 'Adhearsion Server Statistics' do
+  item 'View Registered SIP Users' do
+    PBX.sip_users.each do |u|
+      item %(SIP user "#{u.username}" on IP #{u.ip})
+    end
+  end
+  item 'View System Uptime' do
+     item `uptime`
+  end
+  item 'Network' do
+    heading 'Network Interface Info'
+    `ifconfig eth1`.each_line do |line|
+      item line
+    end
+  end
+end
+
+item 'View Users' do
+  item 'Select a user to call below.'
+  User.find(:all).each { |user| call user.ivr_extension, user.name }
+end
+
+image 'tux'

data/new_projects/config/helpers/micromenus/javascripts/builder.js

@@ -0,0 +1,131 @@
+// script.aculo.us builder.js v1.6.5, Wed Nov 08 14:17:49 CET 2006
+
+// Copyright (c) 2005, 2006 Thomas Fuchs (http://script.aculo.us, http://mir.aculo.us)
+//
+// script.aculo.us is freely distributable under the terms of an MIT-style license.
+// For details, see the script.aculo.us web site: http://script.aculo.us/
+
+var Builder = {
+  NODEMAP: {
+    AREA: 'map',
+    CAPTION: 'table',
+    COL: 'table',
+    COLGROUP: 'table',
+    LEGEND: 'fieldset',
+    OPTGROUP: 'select',
+    OPTION: 'select',
+    PARAM: 'object',
+    TBODY: 'table',
+    TD: 'table',
+    TFOOT: 'table',
+    TH: 'table',
+    THEAD: 'table',
+    TR: 'table'
+  },
+  // note: For Firefox < 1.5, OPTION and OPTGROUP tags are currently broken,
+  //       due to a Firefox bug
+  node: function(elementName) {
+    elementName = elementName.toUpperCase();
+    
+    // try innerHTML approach
+    var parentTag = this.NODEMAP[elementName] || 'div';
+    var parentElement = document.createElement(parentTag);
+    try { // prevent IE "feature": http://dev.rubyonrails.org/ticket/2707
+      parentElement.innerHTML = "<" + elementName + "></" + elementName + ">";
+    } catch(e) {}
+    var element = parentElement.firstChild || null;
+      
+    // see if browser added wrapping tags
+    if(element && (element.tagName != elementName))
+      element = element.getElementsByTagName(elementName)[0];
+    
+    // fallback to createElement approach
+    if(!element) element = document.createElement(elementName);
+    
+    // abort if nothing could be created
+    if(!element) return;
+
+    // attributes (or text)
+    if(arguments[1])
+      if(this._isStringOrNumber(arguments[1]) ||
+        (arguments[1] instanceof Array)) {
+          this._children(element, arguments[1]);
+        } else {
+          var attrs = this._attributes(arguments[1]);
+          if(attrs.length) {
+            try { // prevent IE "feature": http://dev.rubyonrails.org/ticket/2707
+              parentElement.innerHTML = "<" +elementName + " " +
+                attrs + "></" + elementName + ">";
+            } catch(e) {}
+            element = parentElement.firstChild || null;
+            // workaround firefox 1.0.X bug
+            if(!element) {
+              element = document.createElement(elementName);
+              for(attr in arguments[1]) 
+                element[attr == 'class' ? 'className' : attr] = arguments[1][attr];
+            }
+            if(element.tagName != elementName)
+              element = parentElement.getElementsByTagName(elementName)[0];
+            }
+        } 
+
+    // text, or array of children
+    if(arguments[2])
+      this._children(element, arguments[2]);
+
+     return element;
+  },
+  _text: function(text) {
+     return document.createTextNode(text);
+  },
+
+  ATTR_MAP: {
+    'className': 'class',
+    'htmlFor': 'for'
+  },
+
+  _attributes: function(attributes) {
+    var attrs = [];
+    for(attribute in attributes)
+      attrs.push((attribute in this.ATTR_MAP ? this.ATTR_MAP[attribute] : attribute) +
+          '="' + attributes[attribute].toString().escapeHTML() + '"');
+    return attrs.join(" ");
+  },
+  _children: function(element, children) {
+    if(typeof children=='object') { // array can hold nodes and text
+      children.flatten().each( function(e) {
+        if(typeof e=='object')
+          element.appendChild(e)
+        else
+          if(Builder._isStringOrNumber(e))
+            element.appendChild(Builder._text(e));
+      });
+    } else
+      if(Builder._isStringOrNumber(children)) 
+         element.appendChild(Builder._text(children));
+  },
+  _isStringOrNumber: function(param) {
+    return(typeof param=='string' || typeof param=='number');
+  },
+  build: function(html) {
+    var element = this.node('div');
+    $(element).update(html.strip());
+    return element.down();
+  },
+  dump: function(scope) { 
+    if(typeof scope != 'object' && typeof scope != 'function') scope = window; //global scope 
+  
+    var tags = ("A ABBR ACRONYM ADDRESS APPLET AREA B BASE BASEFONT BDO BIG BLOCKQUOTE BODY " +
+      "BR BUTTON CAPTION CENTER CITE CODE COL COLGROUP DD DEL DFN DIR DIV DL DT EM FIELDSET " +
+      "FONT FORM FRAME FRAMESET H1 H2 H3 H4 H5 H6 HEAD HR HTML I IFRAME IMG INPUT INS ISINDEX "+
+      "KBD LABEL LEGEND LI LINK MAP MENU META NOFRAMES NOSCRIPT OBJECT OL OPTGROUP OPTION P "+
+      "PARAM PRE Q S SAMP SCRIPT SELECT SMALL SPAN STRIKE STRONG STYLE SUB SUP TABLE TBODY TD "+
+      "TEXTAREA TFOOT TH THEAD TITLE TR TT U UL VAR").split(/\s+/);
+  
+    tags.each( function(tag){ 
+      scope[tag] = function() { 
+        return Builder.node.apply(Builder, [tag].concat($A(arguments)));  
+      } 
+    });
+  }
+}