skelerl 0.0.5

data/History.txt

@@ -0,0 +1,4 @@
+== 0.0.1 2009-01-21
+
+* 1 major enhancement:
+  * Initial release

data/README.txt

@@ -0,0 +1,48 @@
+= skelerl
+
+== SYNOPSIS:
+
+Skeleton Erlang application
+
+This is a basic skeleton for erlang applications.
+
+This skeleton app takes care of everything you'd need in an erlang application, hopefully!
+
+h2. Building an application
+1. Include the source code in the src/ directory. 
+2. Add your .app file to the ebin/ directory.
+3. Type: ./bin/build-app [name] [version]
+4. There is no fourth step
+
+Erlang start script in ruby
+
+Example coming shortly
+
+== INSTALL:
+
+sudo gem install auser-skelerl
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2009 Ari Lerner
+
+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/Rakefile

@@ -0,0 +1,11 @@
+require 'config/requirements'
+
+begin
+  require 'hanna/rdoctask'
+rescue LoadError => e
+  require "rake/rdoctask"
+end
+
+require 'config/jeweler' # setup gem configuration
+
+Dir['tasks/**/*.rake'].each { |rake| load rake }

data/VERSION.yml

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

data/bin/gen_server

@@ -0,0 +1,17 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'rubigen'
+
+if %w(-v --version).include? ARGV.first
+  require 'gen_server/version'
+  puts "#{File.basename($0)} #{GenServer::VERSION::STRING}"
+  exit(0)
+end
+
+require 'rubigen/scripts/generate'
+source = RubiGen::PathSource.new(:application, 
+  File.join(File.dirname(__FILE__), "../app_generators"))
+RubiGen::Base.reset_sources
+RubiGen::Base.append_sources source
+RubiGen::Scripts::Generate.new.run(ARGV, :generator => 'gen_server')

data/bin/makefile

@@ -0,0 +1,17 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'rubigen'
+
+if %w(-v --version).include? ARGV.first
+  require 'makefile/version'
+  puts "#{File.basename($0)} #{GenServer::VERSION::STRING}"
+  exit(0)
+end
+
+require 'rubigen/scripts/generate'
+source = RubiGen::PathSource.new(:application, 
+  File.join(File.dirname(__FILE__), "../generators"))
+RubiGen::Base.reset_sources
+RubiGen::Base.append_sources source
+RubiGen::Scripts::Generate.new.run(ARGV, :generator => 'makefile')

data/bin/skelerl

@@ -0,0 +1,60 @@
+#!/usr/bin/env ruby
+Dir[File.dirname(__FILE__) + "/../vendor/gems/*"].each {|lib| $:.unshift( File.expand_path(lib + "/lib") )}
+require "git-style-binary"
+require "colors"
+require 'git-style-binary/command'
+
+GitStyleBinary.primary do  
+  @theme = :short
+  
+  config = YAML.load(File.read(File.dirname(__FILE__) + '/../VERSION.yml'))
+  version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  
+  version "Skelerl release: #{version}"
+  banner <<-EOS
+Usage: #{$0} #{all_options_string} COMMAND [ARGS]
+
+The skelerl subcommands commands are:
+  \#{GitStyleBinary.pretty_known_subcommands(:short).join("  ")}
+
+See 'skelerl help COMMAND' for more information on a specific command.
+EOS
+  
+  run do |command|
+    subcommands = GitStyleBinary.list_subcommands
+    
+    puts "Usage: skelerl COMMAND [ARGS]
+    
+    The skelerl subcommands commands are:
+      #{subcommands}
+
+    See 'skelerl help COMMAND' for more information on a specific command"
+  end
+end
+
+# #!/usr/bin/env ruby
+# $:.unshift(File.dirname(__FILE__) + "/../lib")
+# 
+# require 'rubygems'
+# require 'rubigen'
+# require "skelerl"
+# 
+# if %w(-v --version).include? ARGV.first
+#   puts "#{File.basename($0)} #{Skelerl::VERSION::STRING}"
+#   exit(0)
+# end
+# 
+# require 'rubigen/scripts/generate'
+# source = RubiGen::PathSource.new(:application, 
+#   File.join(File.dirname(__FILE__), "../generators"))
+# RubiGen::Base.reset_sources
+# RubiGen::Base.append_sources source
+# 
+# # Different generators
+# if ARGV.contains_similar_elements? %w(--gen_server gen_server gs)
+#   RubiGen::Scripts::Generate.new.run(ARGV, :generator => 'gen_server')
+# elsif ARGV.contains_similar_elements? %w(--makefile make mf makefile)
+#   RubiGen::Scripts::Generate.new.run(ARGV, :generator => 'makefile')
+# else
+#   RubiGen::Scripts::Generate.new.run(ARGV, :generator => 'skeleton')
+# end

data/bin/skelerl-gen_server

@@ -0,0 +1,29 @@
+#!/usr/bin/env ruby
+Dir[File.dirname(__FILE__) + "/../vendor/gems/*"].each {|lib| $:.unshift( File.expand_path(lib + "/lib") )}
+require 'git-style-binary/command'
+require "rubigen"
+require 'rubigen/scripts/generate'
+
+GitStyleBinary.command do
+  banner <<-EOS
+Usage: #{$0} #{all_options_string}
+
+  Create a gen_server skeleton
+EOS
+
+  short_desc "Create a gen_server skeleton"
+  
+  opt :name, "The basename of the gen_server to generate", :type => :string
+
+  run do |command|
+        
+    source = RubiGen::PathSource.new(:application, File.join(File.dirname(__FILE__), "../generators"))
+    RubiGen::Base.reset_sources
+    RubiGen::Base.append_sources source
+    
+    argv = [command[:name]]
+    
+    RubiGen::Scripts::Generate.new.run(argv, :generator => 'gen_server')
+    
+  end
+end

data/bin/skelerl-makefile

@@ -0,0 +1,29 @@
+#!/usr/bin/env ruby
+Dir[File.dirname(__FILE__) + "/../vendor/gems/*"].each {|lib| $:.unshift( File.expand_path(lib + "/lib") )}
+require 'git-style-binary/command'
+require "rubigen"
+require 'rubigen/scripts/generate'
+
+GitStyleBinary.command do
+  banner <<-EOS
+Usage: #{$0} #{all_options_string}
+
+  Create a Makefile and application skeleton
+EOS
+
+  short_desc "Create a makefile"
+  
+  opt :name, "The basename of the makefile application to generate", :type => :string
+
+  run do |command|
+        
+    source = RubiGen::PathSource.new(:application, File.join(File.dirname(__FILE__), "../generators"))
+    RubiGen::Base.reset_sources
+    RubiGen::Base.append_sources source
+    
+    argv = [command[:name]]
+    
+    RubiGen::Scripts::Generate.new.run(argv, :generator => 'makefile')
+    
+  end
+end

data/config/jeweler.rb

@@ -0,0 +1,41 @@
+# You also need to setup your name and email for git if you haven't already done so.
+# Info at http://github.com/guides/tell-git-your-user-name-and-email-address
+
+begin
+class Array
+  def one_of_regex
+    option_list = join "|"
+    Regexp.new "(#{option_list})"
+  end
+end
+  require 'rubygems'
+  require 'jeweler'
+  Jeweler::Tasks.new do |s|
+    s.name = "skelerl"
+    s.description = "Erlang skeleton application"
+    s.summary = <<-EOM      
+      The most awesomenest erlang skeleton and generator!
+    EOM
+    
+    s.homepage = "http://poolpartyrb.com"
+    s.email = "arilerner@mac.com"
+    s.authors = ["Ari Lerner", "Michael Fairchild", "Nate Murray"]
+    
+    s.test_files = Dir["test/**/test_*.rb"]
+
+    s.files = (%w(Rakefile README.rdoc License.txt VERSION.yml) + Dir["{config,tasks,script,generators,bin}/**/*"])
+    
+    s.files.exclude '**/*.beam'
+    s.files.exclude "**/*/erl_crash.dump"
+    
+    s.has_rdoc = true
+    s.extra_rdoc_files = ["README.txt", "License.txt", 'History.txt']
+    s.rdoc_options = ['--quiet', '--title', 'Skelerl documentation',
+        # "index.html",
+        "--line-numbers",
+        "--main", "README"
+        ]
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com"
+end

data/config/requirements.rb

@@ -0,0 +1,15 @@
+require 'fileutils'
+include FileUtils
+
+require 'rubygems'
+%w[rake hoe newgem rubigen].each do |req_gem|
+  begin
+    require req_gem
+  rescue LoadError
+    # puts "This Rakefile requires the '#{req_gem}' RubyGem."
+    # puts "Installation: gem install #{req_gem} -y"
+    # exit
+  end
+end
+
+$:.unshift(File.join(File.dirname(__FILE__), %w[.. lib]))

data/generators/appfile/USAGE

@@ -0,0 +1,5 @@
+Description:
+  Create a basic .app file for erlang. This is just a quick generator to help get your .app file built
+  
+Usage:
+  ./script/generate appfile <name>

data/generators/appfile/appfile_generator.rb

@@ -0,0 +1,61 @@
+class AppfileGenerator < RubiGen::Base
+
+  DEFAULT_SHEBANG = File.join(Config::CONFIG['bindir'],
+                              Config::CONFIG['ruby_install_name'])
+
+  default_options :author => nil
+
+  attr_reader :name
+
+  def initialize(runtime_args, runtime_options = {})
+    super
+    usage if args.empty?
+    @app_name = args.shift
+    @destination_root = File.expand_path(".")
+    @name = base_name    
+    extract_options
+  end
+
+  def manifest
+    record do |m|
+      m.template "appfile.app", "ebin/#{@app_name}.app"
+
+      # m.dependency "install_rubigen_scripts", [destination_root, 'appfile'], :shebang => options[:shebang], :collision => :force
+    end
+  end
+
+  protected
+    def banner
+      <<-EOS
+Creates a basic .app file
+
+USAGE: #{spec.name} name
+EOS
+    end
+
+    def add_options!(opts)
+      opts.separator ''
+      opts.separator 'Options:'
+      # For each option below, place the default
+      # at the top of the file next to "default_options"
+      # opts.on("-a", "--author=\"Your Name\"", String,
+      #         "Some comment about this option",
+      #         "Default: none") { |options[:author]| }
+      opts.on("-n", "--name", "Name the app") { |options[:app_name]| }
+      opts.on("-d", "--desc", "Description of the app") { |options[:description]| }
+      opts.on("-m", "--modules", "Modules used in the application") { |options[:modules]| }
+      opts.on("-r", "--registered", "Modules registered in the application") { |options[:registered]| }
+      opts.on("-v", "--version", "Show the #{File.basename($0)} version number and quit.")
+    end
+
+    def extract_options
+      # for each option, extract it into a local variable (and create an "attr_reader :author" at the top)
+      # Templates can access these value via the attr_reader-generated methods, but not the
+      # raw instance variable value.
+      # @author = options[:author]
+      @description = options[:desc] || "Description of your project"
+      @version = options[:version] || "0.1"
+      @modules = options[:modules] || "#{@name}_app"
+      @registered = options[:registered] || ""
+    end
+end

data/generators/appfile/templates/appfile.app

@@ -0,0 +1,19 @@
+{application, APPNAME,
+  [
+		% Quick description of the server
+		{description, "Description of the application"},
+		% Version
+		{vsn, "0.0.1"},
+		% All modules used by the application.  
+		{modules, []},
+		% All the registered names in the application
+		{registered, []},
+		% These must be started for application to run
+		{applications, [kernel, stdlib]},
+		% Environment vars
+		{env, []},
+		% Module and Args used to start
+		{mod, {[]}},
+		{start_phases, []}
+	]
+}.

data/generators/gen_server/USAGE

@@ -0,0 +1,7 @@
+Description:
+
+Create a skeleton erlang directory with eunit tests and config helpers
+
+Usage:
+  
+skelerl gen_server <name>

data/generators/gen_server/gen_server_generator.rb

@@ -0,0 +1,65 @@
+require 'rbconfig'
+
+class GenServerGenerator < RubiGen::Base
+  DEFAULT_SHEBANG = File.join(Config::CONFIG['bindir'],
+                              Config::CONFIG['ruby_install_name'])
+                              
+  default_options   :shebang => DEFAULT_SHEBANG,
+                    :an_option => 'some_default'
+  
+  attr_reader :app_name, :module_name
+  
+  def initialize(runtime_args, runtime_options = {})
+    super
+    usage if args.empty?
+    @destination_root = args.shift
+    @app_name     = File.basename(File.expand_path(@destination_root))
+    @module_name  = app_name.camelize
+    extract_options
+  end
+    
+  def manifest
+    # Use /usr/bin/env if no special shebang was specified
+    script_options     = { :chmod => 0755, :shebang => options[:shebang] == DEFAULT_SHEBANG ? nil : options[:shebang] }
+    windows            = (RUBY_PLATFORM =~ /dos|win32|cygwin/i) || (RUBY_PLATFORM =~ /(:?mswin|mingw)/)
+    
+    record do |m|
+      m.directory File.join("src")
+      m.template "gen_server.erl", "src/#{gen_server_file_name}"
+    end
+  end
+
+  def gen_server_file_name
+    "#{module_name}.erl"
+  end
+
+  def module_name
+    "#{app_name}_srv"
+  end
+
+  protected
+    def banner
+      <<-EOS
+Create a stub for #{File.basename $0} to get started.
+
+Usage: #{File.basename $0} gen_server_name [options]"
+EOS
+    end
+
+    def add_options!(opts)
+      opts.separator ''
+      opts.separator "#{File.basename $0} options:"
+      opts.on("-v", "--version", "Show the #{File.basename($0)} version number and quit.")
+    end
+    
+    def extract_options
+      # for each option, extract it into a local variable (and create an "attr_reader :author" at the top)
+      # Templates can access these value via the attr_reader-generated methods, but not the
+      # raw instance variable value.
+      @author = options[:author]
+      @description = options[:desc] || "Description of your project"
+    end
+
+  BASEDIRS = %w()
+  BASEFILES = %w()
+end

data/generators/gen_server/templates/README.txt

@@ -0,0 +1 @@
+Your app description

data/generators/gen_server/templates/Rakefile

@@ -0,0 +1 @@
+require "skelerl"

data/generators/gen_server/templates/gen_server.erl

@@ -0,0 +1,107 @@
+%%%-------------------------------------------------------------------
+%%% File    : <%= gen_server_file_name %>
+%%% Author  : <%= ENV["USER"] %>
+%%% Description : desc
+%%% Created     : <%= Time.now.strftime("%F") %>
+%%%-------------------------------------------------------------------
+
+-module (<%= module_name %>).
+-behaviour(gen_server).
+
+%% API
+-export([start_link/0]).
+
+%% gen_server callbacks
+-export([init/1, handle_call/3, handle_cast/2, handle_info/2,
+         terminate/2, code_change/3]).
+
+-record(state, {
+        
+        }).
+
+%% Macros
+-define(SERVER, ?MODULE).
+-define(DEFAULT_CONFIG, {}).
+
+%%====================================================================
+%% API
+%%====================================================================
+%%--------------------------------------------------------------------
+%% Function: start() -> {ok,Pid} | ignore | {error,Error}
+%% Description: Alias for start_link
+%%--------------------------------------------------------------------
+start_link() ->
+    start_link(?DEFAULT_CONFIG). 
+
+%%--------------------------------------------------------------------
+%% Function: start_link() -> {ok,Pid} | ignore | {error,Error}
+%% Description: Starts the server
+%%--------------------------------------------------------------------
+start_link(Config) ->
+    gen_server:start_link({local, ?SERVER}, ?MODULE, [Config], []).
+
+%%====================================================================
+%% gen_server callbacks
+%%====================================================================
+
+%%--------------------------------------------------------------------
+%% Function: init(Args) -> {ok, State} |
+%%                         {ok, State, Timeout} |
+%%                         ignore               |
+%%                         {stop, Reason}
+%% Description: Initiates the server
+%%--------------------------------------------------------------------
+init([]) ->
+  {ok, #state{}}.
+
+%%--------------------------------------------------------------------
+%% Function: %% handle_call(Request, From, State) -> {reply, Reply, State} |
+%%                                      {reply, Reply, State, Timeout} |
+%%                                      {noreply, State} |
+%%                                      {noreply, State, Timeout} |
+%%                                      {stop, Reason, Reply, State} |
+%%                                      {stop, Reason, State}
+%% Description: Handling call messages
+%%--------------------------------------------------------------------
+handle_call(_Request, _From, State) ->
+  Reply = ok,
+  {reply, Reply, State}.
+
+%%--------------------------------------------------------------------
+%% Function: handle_cast(Msg, State) -> {noreply, State} |
+%%                                      {noreply, State, Timeout} |
+%%                                      {stop, Reason, State}
+%% Description: Handling cast messages
+%%--------------------------------------------------------------------
+handle_cast(_Msg, State) ->
+  {noreply, State}.
+
+%%--------------------------------------------------------------------
+%% Function: handle_info(Info, State) -> {noreply, State} |
+%%                                       {noreply, State, Timeout} |
+%%                                       {stop, Reason, State}
+%% Description: Handling all non call/cast messages
+%%--------------------------------------------------------------------
+handle_info(_Info, State) ->
+  {noreply, State}.
+
+%%--------------------------------------------------------------------
+%% Function: terminate(Reason, State) -> void()
+%% Description: This function is called by a gen_server when it is about to
+%% terminate. It should be the opposite of Module:init/1 and do any necessary
+%% cleaning up. When it returns, the gen_server terminates with Reason.
+%% The return value is ignored.
+%%--------------------------------------------------------------------
+terminate(_Reason, _State) ->
+  ok.
+
+%%--------------------------------------------------------------------
+%% Func: code_change(OldVsn, State, Extra) -> {ok, NewState}
+%% Description: Convert process state when code is changed
+%%--------------------------------------------------------------------
+code_change(_OldVsn, State, _Extra) ->
+  {ok, State}.
+
+%%--------------------------------------------------------------------
+%%% Internal functions
+%%--------------------------------------------------------------------

data/generators/gen_server/templates/gitignore

@@ -0,0 +1,3 @@
+*.beam
+erl_crash.dump
+test/include

data/generators/makefile/USAGE

@@ -0,0 +1,5 @@
+Description:
+  Creates a makefile project with a bootscript generator
+  
+Usage:
+  ./script/generate makefile <name>

data/generators/makefile/makefile_generator.rb

@@ -0,0 +1,68 @@
+class MakefileGenerator < RubiGen::Base
+
+  DEFAULT_SHEBANG = File.join(Config::CONFIG['bindir'],
+                              Config::CONFIG['ruby_install_name'])
+
+  default_options :author => nil
+
+  attr_reader :app_name, :version
+
+  def initialize(runtime_args, runtime_options = {})
+    super
+    usage if args.empty?
+    # @app_name = args.shift
+    # @destination_root = File.expand_path(".")
+    @destination_root = args.shift
+    @app_name     = File.basename(File.expand_path(@destination_root))
+    
+    @name = base_name    
+    extract_options
+  end
+
+  def manifest    
+    record do |m|
+      m.template "Makefile", "Makefile"
+      m.template "Emakefile", "Emakefile"
+      m.directory "ebin"
+      m.template "appfile.app.erb", "ebin/#{@app_name}.app"
+      m.template "start.sh", "start.sh", { :chmod => 0755 }
+      m.directory "src"
+      m.template "make_boot.erl.erb", "src/make_boot.erl"
+    end
+  end
+
+  protected
+    def banner
+      <<-EOS
+Creates a makefile project with a bootscript generator
+
+USAGE: #{spec.name} name
+EOS
+    end
+
+    def add_options!(opts)
+      opts.separator ''
+      opts.separator 'Options:'
+      # For each option below, place the default
+      # at the top of the file next to "default_options"
+      # opts.on("-a", "--author=\"Your Name\"", String,
+      #         "Some comment about this option",
+      #         "Default: none") { |options[:author]| }
+      opts.on("-n", "--name", "Name the app") { |options[:app_name]| }
+      opts.on("-d", "--desc", "Description of the app") { |options[:description]| }
+      opts.on("-m", "--modules", "Modules used in the application") { |options[:modules]| }
+      opts.on("-r", "--registered", "Modules registered in the application") { |options[:registered]| }
+      opts.on("-v", "--version", "Show the #{File.basename($0)} version number and quit.")
+    end
+
+    def extract_options
+      # for each option, extract it into a local variable (and create an "attr_reader :author" at the top)
+      # Templates can access these value via the attr_reader-generated methods, but not the
+      # raw instance variable value.
+      # @author = options[:author]
+      @description = options[:desc] || "Description of your project"
+      @version = options[:version] || "0.1"
+      @modules = options[:modules] || "#{@name}_app"
+      @registered = options[:registered] || ""
+    end
+end

data/generators/makefile/templates/Emakefile

@@ -0,0 +1,5 @@
+{ ['./src/*', 'src/*/*', 'src/*/*/*'], [
+  {i, "./include"},
+  {outdir, "./ebin"},
+  debug_info
+]}.

data/generators/makefile/templates/Makefile

@@ -0,0 +1,31 @@
+LIBDIR					= `erl -eval 'io:format("~s~n", [code:lib_dir()])' -s init stop -noshell`
+VERSION					= <%= version -%>
+CC							= erlc
+ERL							= erl
+EBIN						= ebin
+CFLAGS					= -I include -pa $(EBIN)
+COMPILE					= $(CC) $(CFLAGS) -o $(EBIN)
+EBIN_DIRS				= $(wildcard deps/*/ebin)
+WEB_DIR					= web/
+APP							= <%= app_name %>
+
+all: ebin compile boot
+
+compile:
+	@$(ERL) -pa $(EBIN_DIRS) -noinput +B -eval 'case make:all() of up_to_date -> halt(0); error -> halt(1) end.'
+
+edoc:
+	@echo Generating $(APP) documentation from srcs
+	@$(ERL) -noinput -eval 'edoc:application($(APP), "./", [{doc, "doc/"}, {files, "src/"}])' -s erlang halt
+	
+boot:
+	(cd ebin; erl -pa ebin -noshell -run make_boot write_scripts $(APP))
+
+start_all:
+	(cd ebin; erl -pa ebin -noshell -boot $(APP))
+
+ebin:
+	@mkdir ebin
+
+clean:
+	rm -rf ebin/*.beam ebin/erl_crash.dump erl_crash.dump ebin/*.boot ebin/*.rel ebin/*.script 

data/generators/makefile/templates/appfile.app.erb

@@ -0,0 +1,19 @@
+{application, <%= app_name %>,
+  [
+		% Quick description of the server
+		{description, "Description of the application"},
+		% Version
+		{vsn, "<%= version -%>"},
+		% All modules used by the application.  
+		{modules, []},
+		% All the registered names in the application
+		{registered, []},
+		% These must be started for application to run
+		{applications, [kernel, stdlib]},
+		% Environment vars
+		{env, []},
+		% Module and Args used to start
+		{mod, {<%= app_name -%>, []}},
+		{start_phases, []}
+	]
+}.

data/generators/makefile/templates/make_boot.erl.erb

@@ -0,0 +1,29 @@
+-module(make_boot).
+-export([write_scripts/1]).
+
+write_scripts(Args) -> 
+  [Name] = Args,
+  io:format("write_scripts for ~p~n", [Name]),
+  Erts = erlang:system_info(version),
+  application:load(sasl),
+  Version = "0.1",
+  {value, {kernel, _, Kernel}} = lists:keysearch(kernel, 1,
+          application:loaded_applications()),
+  {value, {stdlib, _, Stdlib}} = lists:keysearch(stdlib, 1,
+          application:loaded_applications()),
+  {value, {sasl, _, Sasl}} = lists:keysearch(sasl, 1,
+          application:loaded_applications()),
+
+  Rel = "{release, {\"~s\", \"~s\"}, {erts, \"~s\"}, ["
+         "{kernel, \"~s\"}, {stdlib, \"~s\"}, {sasl, \"~s\"}, {~s, \"~s\"}]}.",
+  Lowername = string:to_lower(Name),
+
+  Filename = lists:flatten(Lowername ++ ".rel"),
+  io:format("Writing to ~p (as ~s)~n", [Filename, Lowername]),
+  {ok, Fs} = file:open(Filename, [write]),
+
+  io:format(Fs, Rel, [Name, Version, Erts, Kernel, Stdlib, Sasl, Lowername, Version]),
+  file:close(Fs),
+
+  systools:make_script(Lowername, [local]),
+  halt().

data/generators/makefile/templates/start.sh

@@ -0,0 +1,4 @@
+#!/bin/sh
+# start.sh
+cd `dirname $0`
+erl -pa $PWD/ebin -pa $PWD/deps/*/ebin -name <%= app_name -%> -s reloader -boot <%= app_name -%> $1

data/generators/skeleton/USAGE

@@ -0,0 +1,7 @@
+Description:
+
+Create a skeleton erlang directory with eunit tests and config helpers
+
+Usage:
+  
+./script/generate skeleton <name>

data/generators/skeleton/skeleton_generator.rb

@@ -0,0 +1,91 @@
+require 'rbconfig'
+
+class SkeletonGenerator < RubiGen::Base
+  DEFAULT_SHEBANG = File.join(Config::CONFIG['bindir'],
+                              Config::CONFIG['ruby_install_name'])
+                              
+  default_options   :shebang => DEFAULT_SHEBANG,
+                    :an_option => 'some_default'
+  
+  attr_reader :app_name, :module_name
+  
+  def initialize(runtime_args, runtime_options = {})
+    super
+    usage if args.empty?
+    @destination_root = args.shift
+    @app_name     = File.basename(File.expand_path(@destination_root))
+    @module_name  = app_name.camelize
+    extract_options
+  end
+    
+  def manifest
+    # Use /usr/bin/env if no special shebang was specified
+    script_options     = { :chmod => 0755, :shebang => options[:shebang] == DEFAULT_SHEBANG ? nil : options[:shebang] }
+    windows            = (RUBY_PLATFORM =~ /dos|win32|cygwin/i) || (RUBY_PLATFORM =~ /(:?mswin|mingw)/)
+    
+    record do |m|
+      # Root directory and all subdirectories.
+      m.directory ''
+      BASEDIRS.each { |path| m.directory path }
+      
+      # Root
+      m.template_copy_each %w( Rakefile )
+      m.file_copy_each     %w( README.txt )
+
+      # Test helper
+      m.template   "gitignore",        ".gitignore"
+      
+      # Tests
+      %w(ebin include src).each do |directory|
+        m.directory "test/#{directory}"
+      end
+      
+      include_eunit
+      include_configerl
+         
+    end
+  end
+  
+  def include_eunit
+    cmds = [
+      "svn co http://svn.process-one.net/contribs/trunk/eunit #{@destination_root}/test/include/eunit",
+      "cd #{@destination_root}/test/include/eunit",
+      "make"
+    ]
+    Kernel.system cmds.join(" && ")
+  end
+  def include_configerl
+    cmds = [
+      "git submodule add git://github.com/auser/configerl.git #{@destination_root}/deps/configerl",
+      "git submodule init",
+      "git submodule update"
+    ]
+    Kernel.system cmds.join(" && ")
+  end
+
+  protected
+    def banner
+      <<-EOS
+Create a stub for #{File.basename $0} to get started.
+
+Usage: #{File.basename $0} /path/to/your/app [options]"
+EOS
+    end
+
+    def add_options!(opts)
+      opts.separator ''
+      opts.separator "#{File.basename $0} options:"
+      opts.on("-v", "--version", "Show the #{File.basename($0)} version number and quit.")
+    end
+    
+    def extract_options
+      # for each option, extract it into a local variable (and create an "attr_reader :author" at the top)
+      # Templates can access these value via the attr_reader-generated methods, but not the
+      # raw instance variable value.
+      @author = options[:author]
+      @description = options[:desc] || "Description of your project"
+    end
+
+  BASEDIRS = %w(deps doc ebin include priv scripts src support)
+  BASEFILES = %w(README.txt Rakefile)
+end

data/generators/skeleton/templates/README.txt

@@ -0,0 +1 @@
+Your app description

data/generators/skeleton/templates/Rakefile

@@ -0,0 +1 @@
+require "skelerl"

data/generators/skeleton/templates/gitignore

@@ -0,0 +1,3 @@
+*.beam
+erl_crash.dump
+test/include

data/script/generate

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/generate'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:appfile, :test_unit]
+RubiGen::Scripts::Generate.new.run(ARGV)

data/tasks/build.rake

@@ -0,0 +1,152 @@
+# modified from http://21ccw.blogspot.com/2008/04/using-rake-for-erlang-unit-testing.html
+require 'rake/clean'
+require 'pp'
+
+deps_dir   = Dir.pwd + "/deps"
+
+INCLUDE    = File.dirname(__FILE__) + "/include"
+
+DEPS       = Dir["#{deps_dir}/*"].select {|d| d if File.directory? d }
+DEPS_FILES = DEPS.map {|d| "./deps/#{File.basename(d)}" }
+EXTRA_ERLC = DEPS_FILES.map {|a| "-pa #{a}/ebin" }.join(" ")
+
+ERLC_FLAGS = "-I#{INCLUDE} +warn_unused_vars +warn_unused_import -o ebin -W0 #{EXTRA_ERLC}"
+
+SRC        = FileList["src/**/*.erl"]
+SRC_OBJ    = SRC.pathmap("%{src,ebin}X.beam")
+
+DEP        = DEPS_FILES.map {|d| FileList["#{d}/src/*.erl"]}
+DEP_OBJ    = DEP.map {|d| d.pathmap("%{src,ebin}X.beam")}
+
+TEST       = FileList['test/src/*.erl']
+TEST_OBJ   = TEST.pathmap("%{src,ebin}X.beam")
+
+CLEAN.include("ebin/*.beam", "test/ebin/*.beam")
+
+directory 'ebin'
+directory 'test/ebin'
+
+rule( ".beam" => ["%{ebin,src}X.erl"] ) do |t|
+  testing  = t.source =~ /test\// ? true : false
+  eunit    = testing ? "-D EUNIT "  : ""
+  ebin_dir = testing ? "test/ebin"  : "ebin"
+  cmd = "erlc #{eunit}-pa ebin -W #{ERLC_FLAGS} -o #{ebin_dir} #{t.source}"
+  puts cmd
+  sh cmd
+end
+
+desc "Compile everything"
+task :compile   => ["src:compile", "test:compile"]
+task :recompile => ["clean", "src:compile", "test:compile"]
+
+namespace :src do
+  desc "Compile src"
+  task :compile => ['ebin'] + SRC_OBJ
+end
+
+namespace :test do
+  desc "Compile tests"
+  task :compile => ['test/ebin'] + TEST_OBJ
+end
+
+desc "Run all tests"
+task :run_tests => :compile do
+  puts "Modules under test:"
+  TEST_OBJ.each do |obj|
+    obj[%r{.*/(.*).beam}]
+    mod = $1
+    test_cmd = "erl -pa ebin -pa test/ebin -run #{mod} test -run init stop"
+    test_output = `#{test_cmd}`
+    
+    puts test_output if Rake.application.options.trace
+
+    if /\*failed\*/ =~ test_output
+      test_output[/(Failed.*Aborted.*Skipped.*Succeeded.*$)/]
+    else
+      test_output[/1>\s*(.*)\n/]
+    end
+
+    puts "#{mod}: #{$1}"
+  end
+end
+
+desc "Clean the beams from the ebin directory"
+task :clean do
+  # cmd = "rm #{::File.dirname(__FILE__)}/ebin/*.beam"
+  # Kernel.system cmd
+end
+
+desc "Recompile the sources"
+task :recompile => [:clean, :compile]
+
+desc "Compile with the DEBUG flag set to true"
+task :compile_debug do
+  Dir["#{::File.dirname(__FILE__)}/src/*.erl"].each do |t|
+    Kernel.system "erlc -pa ebin -W #{ERLC_FLAGS} -Ddebug -o ebin #{t}"
+  end
+end
+
+desc "Rebuild the boot scripts"
+task :build_boot_scripts => [:recompile] do
+  puts "Rebuilding boot scripts"
+  
+  root_dir = ::File.expand_path( ::File.join(::File.dirname(__FILE__)) )
+  @version = ENV["VERSION"] || ENV["V"] || "0.1"
+  @name = ENV["NAME"] || ::File.basename(::File.dirname( root_dir ))
+  
+  cmd = "erl -pa ./ebin/ -run packager start #{@name} #{@version} -run init stop -noshell"
+  Kernel.system cmd
+end
+
+desc "Rebuild and repackage"
+task :repackage => [:build_boot_scripts] do  
+  cmd = "erl -pa ./ebin -s packager start -s init stop"
+  Kernel.system cmd
+end
+
+desc "Shell command"
+task :shell do
+  cmd = "erl -pa ./ebin #{EXTRA_ERLC} -boot start_sasl"
+  puts cmd if Rake.application.options.trace
+  Kernel.system cmd
+end
+
+namespace(:deps) do
+  desc "Compile deps"
+  task :compile do
+    DEPS_FILES.each do |dir|
+      Kernel.system "cd #{dir} && rake compile"
+    end
+  end
+  
+  desc "Update deps/"
+  task :update do
+    update_cmd = "git remote update && git merge origin/master" # "git fetch && git rebase origin/master"
+    DEPS_FILES.each do |dir|
+      cmd = "cd #{dir} && #{update_cmd}"
+      puts cmd if Rake.application.options.trace
+      Kernel.system cmd
+    end  
+  end
+  
+  desc "Update and compile deps/"
+  task :up => [:update, :compile]
+  
+  desc "Clean the deps"
+  task :clean do
+    DEPS_FILES.each do |dir|
+      cmd = "cd #{dir}/ebin && rm *.beam"
+      puts cmd if Rake.application.options.trace
+      Kernel.system cmd
+    end
+  end
+end
+
+desc "Build eunit"
+task :build_eunit do
+  cmd =  "cd test/include/eunit && make"
+  Kernel.system cmd
+end
+
+desc "Compile and get a shell"
+task :compile_shell => [:compile, :shell]

data/tasks/environment.rake

@@ -0,0 +1,7 @@
+task :ruby_env do
+  RUBY_APP = if RUBY_PLATFORM =~ /java/
+    "jruby"
+  else
+    "ruby"
+  end unless defined? RUBY_APP
+end

data/tasks/generate.rake

@@ -0,0 +1,5 @@
+desc "Generate a basic app file"
+task :appfile do
+  @name = ENV["NAME"].empty? ? ::File.basename(::File.dirname( root_dir )) : ENV["NAME"]
+  Kernel.system "#{::File.dirname(__FILE__)}/../bin/appfile #{@name}"
+end

data/tasks/website.rake

@@ -0,0 +1,17 @@
+desc 'Generate website files'
+task :website_generate => :ruby_env do
+  (Dir['website/**/*.txt'] - Dir['website/version*.txt']).each do |txt|
+    sh %{ #{RUBY_APP} script/txt2html #{txt} > #{txt.gsub(/txt$/,'html')} }
+  end
+end
+
+desc 'Upload website files to rubyforge'
+task :website_upload do
+  host = "#{rubyforge_username}@rubyforge.org"
+  remote_dir = "/var/www/gforge-projects/#{PATH}/"
+  local_dir = 'website'
+  sh %{rsync -aCv #{local_dir}/ #{host}:#{remote_dir}}
+end
+
+desc 'Generate and upload website files'
+task :website => [:website_generate, :website_upload, :publish_docs]

metadata

@@ -0,0 +1,103 @@
+--- !ruby/object:Gem::Specification 
+name: skelerl
+version: !ruby/object:Gem::Version 
+  version: 0.0.5
+platform: ruby
+authors: 
+- Ari Lerner
+- Michael Fairchild
+- Nate Murray
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-08-17 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: Erlang skeleton application
+email: arilerner@mac.com
+executables: 
+- gen_server
+- makefile
+- skelerl
+- skelerl-gen_server
+- skelerl-makefile
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- README.txt
+files: 
+- Rakefile
+- VERSION.yml
+- bin/gen_server
+- bin/makefile
+- bin/skelerl
+- bin/skelerl-gen_server
+- bin/skelerl-makefile
+- config/jeweler.rb
+- config/requirements.rb
+- generators/appfile/USAGE
+- generators/appfile/appfile_generator.rb
+- generators/appfile/templates/appfile.app
+- generators/gen_server/USAGE
+- generators/gen_server/gen_server_generator.rb
+- generators/gen_server/templates/README.txt
+- generators/gen_server/templates/Rakefile
+- generators/gen_server/templates/gen_server.erl
+- generators/gen_server/templates/gitignore
+- generators/makefile/USAGE
+- generators/makefile/makefile_generator.rb
+- generators/makefile/templates/Emakefile
+- generators/makefile/templates/Makefile
+- generators/makefile/templates/appfile.app.erb
+- generators/makefile/templates/make_boot.erl.erb
+- generators/makefile/templates/start.sh
+- generators/skeleton/USAGE
+- generators/skeleton/skeleton_generator.rb
+- generators/skeleton/templates/README.txt
+- generators/skeleton/templates/Rakefile
+- generators/skeleton/templates/gitignore
+- script/generate
+- tasks/build.rake
+- tasks/environment.rake
+- tasks/generate.rake
+- tasks/website.rake
+- History.txt
+- README.txt
+has_rdoc: true
+homepage: http://poolpartyrb.com
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --quiet
+- --title
+- Skelerl documentation
+- --line-numbers
+- --main
+- README
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.4
+signing_key: 
+specification_version: 3
+summary: The most awesomenest erlang skeleton and generator!
+test_files: []
+