erlbox 1.5.1

data/.gitignore

@@ -0,0 +1,5 @@
+pkg
+tmp
+doc
+coverage
+*.tmproj

data/LICENSE

@@ -0,0 +1,19 @@
+Copyright (c) 2008 The Hive http://www.thehive.com/
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.txt

@@ -0,0 +1 @@
+See http://wiki.github.com/toland/erlbox for documentation.

data/Rakefile

@@ -0,0 +1,48 @@
+## -------------------------------------------------------------------
+##
+## Erlang Toolbox: Project rakefile
+## Copyright (c) 2008 The Hive.  All rights reserved.
+##
+## -------------------------------------------------------------------
+
+require 'yaml'
+require 'rake'
+require 'rake/clean'
+
+CLEAN.include 'pkg'
+
+begin
+  require 'jeweler'
+
+  module Git
+    class Lib
+      def tag(tag)
+        # Force an annotated tag
+        command('tag', [tag, '-a', '-m', tag])
+      end
+    end
+  end
+
+  Jeweler::Tasks.new do |s|
+    s.name         = 'erlbox'
+    s.platform     = Gem::Platform::RUBY
+    s.author       = 'Phillip Toland'
+    s.email        = 'phil.toland@gmail.com'
+    s.homepage     = 'http://github.com/toland/erlbox'
+    s.summary      = 'Erlang Toolbox'
+    s.description  = 'Rake tasks and helper scripts for building Erlang applications.'
+    s.require_path = 'lib'
+    s.has_rdoc     = false
+
+    s.rubyforge_project = 'erlbox'
+
+    s.files.include 'lib/erlbox/eunit'
+
+    # Dependencies
+    s.add_dependency 'rake', '>= 0.8.4'
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install jeweler"
+end
+
+task :default => :build

data/VERSION.yml

@@ -0,0 +1,4 @@
+--- 
+:major: 1
+:minor: 5
+:patch: 1

data/bin/erlbox

@@ -0,0 +1,202 @@
+#!/usr/bin/env ruby -w
+# -*- ruby -*-
+# Copyright (c) 2009 The Hive http://www.thehive.com/
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+
+require 'yaml'
+require 'uri'
+
+def erl_root(location = nil)
+  cmd = "erl -noshell -eval 'io:format(\"~s\\n\", [code:root_dir()]).' -s erlang halt"
+  if location
+    cmd = File.join(location, "bin", cmd)
+  end
+  `#{cmd}`
+end
+
+def load_yaml(file)
+  filename = File.expand_path(file)
+  return nil if not File.exist?(filename)
+  YAML::load(File.read(filename))
+end
+
+def load_config()
+  # Check for existence of the config file -- we MUST have one
+  config = load_yaml("~/.erlbox.yaml")
+
+  # Load the file and make sure required parameters are present
+  if config.nil? || config.empty?
+    puts "~/.erlbox.yaml does not exist or is empty; basic config required!"
+    exit 1
+  end
+
+  # Fix up default repo URL
+  if config.has_key?('default_repo')
+    url = URI(config['default_repo'])
+    if url.scheme == nil or url.scheme == "file":
+        config['defaut_repo'] = File.expand_path(url.path)
+    end
+  end
+
+  # If erlang repo is specified, expand the path and use that to determine the root
+  if config.has_key?('erlang')
+    config['erlang_root'] = erl_root(File.expand_path(config['erlang'])).strip()
+  else
+    config['erlang_root'] = erl_root().strip()
+  end
+
+  if !config.has_key?('site_dir')
+    config['site_dir'] = File.join(config['erlang_root'], "lib")
+  end
+
+  config
+end
+
+def download_app(appname, appurl)
+  # Work directory will be /tmp/erlbox.<pid>
+  tmpdir = "/tmp/erlbox_#{appname}.#{Process.pid}"
+  
+  # Clone the desired url using GIT
+  # TODO: Support alternative systems
+  cmd = "git clone #{appurl} #{tmpdir}/"
+  puts cmd
+  system cmd
+  if $? != 0
+    exit 1
+  end
+
+  # Handle git submodules
+  if File.exist?("#{tmpdir}/.gitmodules")
+    system "(cd #{tmpdir} && git submodule update --init)"
+  end
+
+  # Return the tmp directory path 
+  puts tmpdir
+  tmpdir
+end
+
+def cleanup(workdir, is_temp)
+  # clean up
+  puts "Cleaning up..."
+  FileUtils.rm_rf workdir if is_temp
+end
+
+def install_deps(workdir, appname = nil, stack = [])
+  # Process any dependencies in workdir/erlbox.yaml
+  app_config = load_yaml("#{workdir}/erlbox.yaml")
+  unless app_config.nil? || app_config.empty?
+    deps = app_config['dependencies'] || []
+    deps.each do |dep|
+      install_app(dep, stack << appname)
+    end
+  end
+end
+
+def install_app(appname, stack = [])
+  # Check for a dependency cycle
+  if stack.include?(appname)
+    puts "#{appname} already scheduled for installation"
+    return
+  end
+
+  # Default workdir is current working directory -- examination of appname may 
+  # override this.
+  workdir = ""
+  is_temp = false
+
+  if appname.nil? || appname.empty?
+    # Appname was not specified -- we'll try to use the current directory
+    workdir = Dir.getwd
+  else
+    # Parse appname as URI
+    appname_uri = URI.parse(appname)
+    if appname_uri.scheme == nil or appname_uri.scheme == "file"
+      # Expand the file path -- however, it may not match anything local; in that
+      # case, prepend the default URL for git repos and try to get it from there.
+      appname_path = File.expand_path(appname_uri.path)
+      if File.directory?(appname_path)
+        workdir = appname_path
+      else
+        workdir = download_app(appname, File.join(CONFIG['default_repo'], appname))
+        is_temp = true
+      end
+    else
+      # Appname is a proper URL -- we'll pass this to git
+      workdir = download_app(appname, appname)
+      is_temp = true
+    end
+  end
+
+  # Now check the work directory for a Rakefile
+  if !File.exist?(File.join(workdir, "Rakefile"))
+    puts "No Rakefile available for #{appname} in #{workdir}; can't install this app!"
+    exit 1
+  end
+
+  appid = `(cd #{workdir} && rake --silent install:appid[#{CONFIG['erlang_root']}])`.strip
+  install_dir = File.join(CONFIG['site_dir'], appid)
+
+  # Check that the target directory doesn't already exist -- bail if it does
+  if File.directory?(install_dir)
+    puts "#{appid} is already installed...skipping"
+    cleanup(workdir, is_temp)
+    return
+  end
+
+  install_deps(workdir, appname, stack)
+
+  # Tell the app to build itself and install in the provided site directory
+  # TODO: Handle downloads of pre-built stuff
+
+  # Run the prepare task in a separate rake process so that computed
+  # dependencies will work out right
+  system "(cd #{workdir} && rake --silent install:prepare)"
+  system "(cd #{workdir} && rake --silent install:build)"
+
+  if $? == 0
+    puts "Installing to #{install_dir}..."
+    FileUtils.mkdir install_dir
+    FileUtils.cp_r "#{workdir}/ebin", install_dir
+    FileUtils.cp_r "#{workdir}/src", install_dir
+    FileUtils.cp_r "#{workdir}/include", install_dir if File.exist?("#{workdir}/include")
+    FileUtils.cp_r "#{workdir}/priv", install_dir if File.exist?("#{workdir}/priv")
+    FileUtils.cp_r "#{workdir}/mibs", install_dir if File.exist?("#{workdir}/mibs")
+
+    puts "Install successful..."
+    cleanup(workdir, is_temp)
+  else
+    puts "Rake failed! Build files are in '#{workdir}'."
+  end
+end
+
+CONFIG = load_config()
+
+action = ARGV[0]
+case action
+when 'install'
+  install_app(ARGV[1])
+when 'cleanup'
+  FileUtils.rm_rf Dir.glob("/tmp/erlbox_*")
+when 'ensure'
+  install_deps(Dir.getwd())
+else
+  puts "Usage: erlbox install ..."
+end

data/erlbox.gemspec

@@ -0,0 +1,61 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{erlbox}
+  s.version = "1.5.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Phillip Toland"]
+  s.date = %q{2009-06-22}
+  s.default_executable = %q{erlbox}
+  s.description = %q{Rake tasks and helper scripts for building Erlang applications.}
+  s.email = %q{phil.toland@gmail.com}
+  s.executables = ["erlbox"]
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.txt"
+  ]
+  s.files = [
+    ".gitignore",
+     "LICENSE",
+     "README.txt",
+     "Rakefile",
+     "VERSION.yml",
+     "bin/erlbox",
+     "erlbox.gemspec",
+     "lib/erlbox.rb",
+     "lib/erlbox/build.rb",
+     "lib/erlbox/dialyzer.rb",
+     "lib/erlbox/driver.rb",
+     "lib/erlbox/edoc.rb",
+     "lib/erlbox/eunit",
+     "lib/erlbox/eunit",
+     "lib/erlbox/eunit.rb",
+     "lib/erlbox/faxien.rb",
+     "lib/erlbox/install.rb",
+     "lib/erlbox/recurse.rb",
+     "lib/erlbox/release.rb",
+     "lib/erlbox/snmp.rb",
+     "lib/erlbox/test.rb",
+     "lib/erlbox/utils.rb"
+  ]
+  s.homepage = %q{http://github.com/toland/erlbox}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{erlbox}
+  s.rubygems_version = %q{1.3.2}
+  s.summary = %q{Erlang Toolbox}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<rake>, [">= 0.8.4"])
+    else
+      s.add_dependency(%q<rake>, [">= 0.8.4"])
+    end
+  else
+    s.add_dependency(%q<rake>, [">= 0.8.4"])
+  end
+end

data/lib/erlbox/build.rb

@@ -0,0 +1,99 @@
+## -------------------------------------------------------------------
+##
+## Erlang Toolbox: Included tasks for building Erlang sources
+## Copyright (c) 2008 The Hive http://www.thehive.com/
+##
+## Permission is hereby granted, free of charge, to any person obtaining a copy
+## of this software and associated documentation files (the "Software"), to deal
+## in the Software without restriction, including without limitation the rights
+## to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+## copies of the Software, and to permit persons to whom the Software is
+## furnished to do so, subject to the following conditions:
+##
+## The above copyright notice and this permission notice shall be included in
+## all copies or substantial portions of the Software.
+##
+## THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+## IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+## FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+## AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+## LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+## OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+## THE SOFTWARE.
+##
+## -------------------------------------------------------------------
+
+puts "WARNING: Debugging is enabled." if debug?
+
+## -------------------------------------------------------------------
+## Constants
+
+PWD = Dir.getwd
+
+ERL_SRC = FileList['src/**/*.erl']
+ERL_BEAM = ERL_SRC.pathmap("%{src,ebin}X.beam")
+ERL_PATH = FileList.new
+APP_FILE = FileList["#{PWD}/ebin/*.app"][0]
+APP_NAME = File.basename(APP_FILE, ".app")
+
+unless APP_FILE && File.exists?(APP_FILE)
+  fail "ERROR: No app file found."
+end
+
+ERL_INCLUDE = "./include"
+ERLC_FLAGS = %W( -I#{ERL_INCLUDE} -W )
+ERLC_FLAGS << '+debug_info' if debug?
+
+CLEAN.include %w( **/*.beam **/erl_crash.dump )
+
+## -------------------------------------------------------------------
+## Rules
+
+directory 'ebin'
+
+rule(%r(^ebin/.*\.beam$) => ["%{ebin,src}X.erl"]) do |t|
+  puts "compiling #{t.source}..."
+  sh "erlc #{print_flags(ERLC_FLAGS)} #{expand_path(ERL_PATH)} -o ebin #{t.source}"
+end
+
+## -------------------------------------------------------------------
+## Tasks
+
+namespace :build do
+
+  desc "Verify that all application modules are listed in the app file"
+  task :validate_app do
+    # Setup app name and build sets of modules from the .app as well as
+    # beams that got compiled
+    modules = Set.new(erl_app_modules(APP_NAME))
+    beams = Set.new(ERL_BEAM.pathmap("%n").to_a)
+
+    puts "validating #{APP_NAME}.app..."
+
+    # Identify .beam files which are listed in the .app, but not present in ebin/
+    missing_beams = (modules - beams)
+    if not missing_beams.empty?
+      msg = "One or more modules listed in #{APP_NAME}.app do not exist as .beam:\n"
+      missing_beams.each { |m| msg << " * #{m}\n" }
+      fail msg
+    end
+
+    # Identify modules which are not listed in the .app, but are present in ebin/
+    missing_modules = (beams - modules)
+    if not missing_modules.empty?
+      msg = "One or more .beam files exist that are not listed in #{APP_NAME}.app:\n"
+      missing_modules.each { |m| msg << "  * #{m}\n" }
+      fail msg
+    end
+  end
+
+  desc "Compile Erlang sources to .beam files"
+  task :compile => ['ebin'] + ERL_BEAM + [:validate_app]
+
+  desc "Do a fresh build from scratch"
+  task :rebuild => [:clean, :compile]
+
+end
+
+task :compile => 'build:compile'
+task :default => [:compile]

data/lib/erlbox/dialyzer.rb

@@ -0,0 +1,81 @@
+## -------------------------------------------------------------------
+##
+## Erlang Toolbox: Included tasks for running Dialyzer
+## Copyright (c) 2008 The Hive http://www.thehive.com/
+##
+## Permission is hereby granted, free of charge, to any person obtaining a copy
+## of this software and associated documentation files (the "Software"), to deal
+## in the Software without restriction, including without limitation the rights
+## to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+## copies of the Software, and to permit persons to whom the Software is
+## furnished to do so, subject to the following conditions:
+##
+## The above copyright notice and this permission notice shall be included in
+## all copies or substantial portions of the Software.
+##
+## THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+## IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+## FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+## AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+## LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+## OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+## THE SOFTWARE.
+##
+## -------------------------------------------------------------------
+require 'pathname'
+
+## -------------------------------------------------------------------
+## Constants
+
+PLT_LIBS = %w( kernel stdlib )
+PLT_FILE = "#{ENV['HOME']}/.dialyzer_plt"
+
+CLEAN.include 'dialyzer.log'
+
+## -------------------------------------------------------------------
+## Rules
+
+rule PLT_FILE do
+  puts "generating base PLT file..."
+  `dialyzer --build_plt -r #{erl_where('kernel', 'ebin')} --plt #{PLT_FILE}`
+end
+
+## -------------------------------------------------------------------
+## Tasks
+
+namespace :dialyzer do
+
+  desc "Update your PLT file with the libraries required by this application"
+  task :update_plt => PLT_FILE do
+    PLT_LIBS.each do |lib|
+      puts "adding #{lib} to plt..."
+      `dialyzer --add_to_plt -r #{erl_where(lib, 'ebin')} --plt #{PLT_FILE}`
+    end
+
+    ERL_PATH.each do |app_path|
+      path = abspath(app_path)
+      puts "adding #{path} to plt..."
+      `dialyzer --add_to_plt -r #{path} --plt #{PLT_FILE}`
+    end
+  end
+
+  task :prepare do
+    ERLC_FLAGS << '+debug_info'
+  end
+
+  desc "Run Dialyzer on the compiled beam files"
+  task :run => [:prepare] + ERL_BEAM do
+    warnings = ENV['WARN']
+    if !warnings.nil? && !warnings.empty?
+      warn_opts = ' -W' + warnings.split(',').join(' -W')
+    else
+      warn_opts = ''
+    end
+
+    sh "dialyzer -Iinclude -r ebin --plt #{PLT_FILE}\
+                 -Werror_handling -Wunmatched_returns #{warn_opts} | tee dialyzer.log"
+  end
+
+end
+
+task :dialyzer => 'dialyzer:run'

data/lib/erlbox/driver.rb

@@ -0,0 +1,98 @@
+## -------------------------------------------------------------------
+##
+## Erlang Toolbox: Optional tasks for building C extensions
+## Copyright (c) 2008 The Hive http://www.thehive.com/
+##
+## Permission is hereby granted, free of charge, to any person obtaining a copy
+## of this software and associated documentation files (the "Software"), to deal
+## in the Software without restriction, including without limitation the rights
+## to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+## copies of the Software, and to permit persons to whom the Software is
+## furnished to do so, subject to the following conditions:
+##
+## The above copyright notice and this permission notice shall be included in
+## all copies or substantial portions of the Software.
+##
+## THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+## IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+## FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+## AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+## LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+## OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+## THE SOFTWARE.
+##
+## -------------------------------------------------------------------
+
+if !defined?(APP_NAME)
+  fail "You must require 'erlbox' before requiring this file"
+end
+
+## -------------------------------------------------------------------
+## Helpers
+
+def dflag()
+  debug? ? "-DDEBUG" : ""
+end
+
+def erts_dir()
+  script = <<-ERL
+      io:format("~s\n", [lists:concat([code:root_dir(), "/erts-", erlang:system_info(version)])])
+      ERL
+  erl_run(script)
+end
+
+def ei_dir()
+  script = <<-ERL
+      io:format("~s\n", [code:lib_dir(erl_interface)])
+      ERL
+  erl_run(script)
+end
+
+def erts_link_cflags()
+  if darwin?
+    %w(-bundle -flat_namespace -undefined suppress)
+  else
+    %w(-shared)
+  end
+end
+
+## -------------------------------------------------------------------
+## Constants
+
+SRC_DIR = 'c_src'
+C_SRCS  = FileList["#{SRC_DIR}/*.c"]
+C_OBJS  = C_SRCS.pathmap("%X.o")
+
+DRV_DIR = 'priv'
+DRIVER  = "#{DRV_DIR}/#{APP_NAME}_drv.so"
+
+CC_FLAGS = %W(-g -c -Wall -fPIC -fno-common #{dflag()} -I#{SRC_DIR} -I#{erts_dir()}/include -I#{ei_dir()}/include)
+LD_FLAGS = erts_link_cflags()
+EI_LIBS  = %W(-L#{ei_dir()}/lib -lerl_interface -lei)
+LD_LIBS  = EI_LIBS
+
+CLEAN.include %W( #{SRC_DIR}/*.o #{DRV_DIR}/*.so  )
+
+## -------------------------------------------------------------------
+## Rules
+
+directory SRC_DIR
+directory DRV_DIR
+
+rule '.o' => ['.c'] do |t|
+  puts "compiling #{t.source}..."
+  sh "gcc #{print_flags(CC_FLAGS)} #{t.source} -o #{t.name}", :verbose => verbose?
+end
+
+file DRIVER => [SRC_DIR, DRV_DIR] + C_OBJS do
+  puts "linking #{DRIVER}..."
+  sh "gcc -g #{print_flags(LD_FLAGS)} #{C_OBJS.join(' ')} #{print_flags(LD_LIBS)} -o #{DRIVER}", :verbose => verbose?
+end
+
+## -------------------------------------------------------------------
+## Tasks
+
+desc "Compile and link the C port driver"
+task :driver => DRIVER
+
+task :compile => :driver

data/lib/erlbox/edoc.rb

@@ -0,0 +1,43 @@
+## -------------------------------------------------------------------
+##
+## Erlang Toolbox: Included tasks for building edoc documentation
+## Copyright (c) 2008 The Hive http://www.thehive.com/
+##
+## Permission is hereby granted, free of charge, to any person obtaining a copy
+## of this software and associated documentation files (the "Software"), to deal
+## in the Software without restriction, including without limitation the rights
+## to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+## copies of the Software, and to permit persons to whom the Software is
+## furnished to do so, subject to the following conditions:
+##
+## The above copyright notice and this permission notice shall be included in
+## all copies or substantial portions of the Software.
+##
+## THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+## IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+## FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+## AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+## LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+## OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+## THE SOFTWARE.
+##
+## -------------------------------------------------------------------
+
+## -------------------------------------------------------------------
+## Constants
+
+CLOBBER.include 'doc'
+
+## -------------------------------------------------------------------
+## Tasks
+
+namespace :edoc do
+
+  desc "Generate Edoc documentation"
+  task :run do
+    sh %Q(erl -noshell -run edoc_run application #{APP_NAME} '"."' "[]"  -s init stop)
+  end
+
+end
+
+task :edoc => 'edoc:run'