erlgen 0.0.1

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2010 Dimitri Krassovski
+
+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.rdoc

@@ -0,0 +1,22 @@
+= erlgen
+
+erlgen is a Erlang application generator. It generates the basic application layout with some simple files to build upon.
+
+== Planned features:
+
+* Include rake tasks (or command line arguments) to generate default gen_server, gen_fsm, etc. modules.
+* Option to choose between Rake/Make/Emake.
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2010 Dimitri Krassovski. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,46 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "erlgen"
+    gem.summary = %Q{Erlang application generator}
+    gem.description = %Q{Erlang application generator}
+    gem.email = "labria@startika.com"
+    gem.homepage = "http://github.com/labria/erlgen"
+    gem.authors = ["Dimitri Krassovski"]
+    gem.add_dependency "git", ">= 1.2.5"
+    gem.add_development_dependency "rspec", ">= 1.2.9"
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+require 'spec/rake/spectask'
+Spec::Rake::SpecTask.new(:spec) do |spec|
+  spec.libs << 'lib' << 'spec'
+  spec.spec_files = FileList['spec/**/*_spec.rb']
+end
+
+Spec::Rake::SpecTask.new(:rcov) do |spec|
+  spec.libs << 'lib' << 'spec'
+  spec.pattern = 'spec/**/*_spec.rb'
+  spec.rcov = true
+end
+
+task :spec => :check_dependencies
+
+task :default => :spec
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "erlgen #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.0.1

data/bin/erlgen

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', 'lib')
+require 'erlgen/generator'
+Erlgen::Generator.new(*ARGV).run

data/erlgen.gemspec

@@ -0,0 +1,66 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{erlgen}
+  s.version = "0.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Dimitri Krassovski"]
+  s.date = %q{2010-04-01}
+  s.default_executable = %q{erlgen}
+  s.description = %q{Erlang application generator}
+  s.email = %q{labria@startika.com}
+  s.executables = ["erlgen"]
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "bin/erlgen",
+     "erlgen.gemspec",
+     "lib/erlgen.rb",
+     "lib/erlgen/generator.rb",
+     "lib/erlgen/templates/Rakefile",
+     "lib/erlgen/templates/application.app",
+     "lib/erlgen/templates/application.erl",
+     "lib/erlgen/templates/application_sup.erl",
+     "spec/erlgen_spec.rb",
+     "spec/spec.opts",
+     "spec/spec_helper.rb"
+  ]
+  s.homepage = %q{http://github.com/labria/erlgen}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.6}
+  s.summary = %q{Erlang application generator}
+  s.test_files = [
+    "spec/erlgen_spec.rb",
+     "spec/spec_helper.rb"
+  ]
+
+  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<git>, [">= 1.2.5"])
+      s.add_development_dependency(%q<rspec>, [">= 1.2.9"])
+    else
+      s.add_dependency(%q<git>, [">= 1.2.5"])
+      s.add_dependency(%q<rspec>, [">= 1.2.9"])
+    end
+  else
+    s.add_dependency(%q<git>, [">= 1.2.5"])
+    s.add_dependency(%q<rspec>, [">= 1.2.9"])
+  end
+end
+

data/lib/erlgen/generator.rb

@@ -0,0 +1,106 @@
+require 'optparse'
+require 'fileutils'
+require 'erb'
+require 'git'
+
+class Erlgen
+  class Generator
+    attr_accessor :project_name, :options
+    def initialize(*args)
+
+      @options = {}
+      @opts = OptionParser.new do |o|
+        o.banner = "Usage: #{File.basename($0)} [options] appname\ne.g. #{File.basename($0)} superapp"
+        o.on('--with-git', 'initialize git repository') do
+          @options[:with_git] = true
+        end
+
+        o.on_tail('-h', '--help', 'display this help and exit') do
+          @options[:show_help] = true
+        end
+      end
+      @opts.parse!(args)
+      
+      @project_name = args.shift
+
+     
+    end
+
+    def run
+      if @options[:show_help]
+        $stderr.puts @opts
+        return 1
+      end
+
+      if @project_name.nil? || @project_name.squeeze.strip == ""
+        $stderr.puts @opts
+        return 1
+      end
+
+      create_files
+
+      if @options[:with_git]
+        create_version_control
+      end
+    end
+
+    def create_files
+      unless File.exists?(target_dir) || File.directory?(target_dir)
+        FileUtils.mkdir target_dir
+      else
+        raise "The directory #{target_dir} already exists, aborting. Maybe move it out of the way before continuing?"
+      end
+      mkdir_in_target 'src'
+      mkdir_in_target 'ebin'
+      mkdir_in_target 'priv'
+      mkdir_in_target 'include'
+      output_template_in_target 'application.app', File.join('ebin', "#{@project_name}.app")
+      output_template_in_target 'application.erl', File.join('src', "#{@project_name}.erl")
+      output_template_in_target 'application_sup.erl', File.join('src', "#{@project_name}_sup.erl") 
+      output_template_in_target 'Rakefile'
+    end
+    
+    def target_dir
+      @project_name
+    end
+
+    def mkdir_in_target(directory)
+      final_destination = File.join(target_dir, directory)
+      FileUtils.mkdir final_destination
+      $stdout.puts "\tcreate\t#{directory}"
+    end
+    
+    def render_template(source)
+      template_contents = File.read(File.join(template_dir, source))
+      template          = ERB.new(template_contents, nil, '<>')
+
+      # squish extraneous whitespace from some of the conditionals
+      template.result(binding).gsub(/\n\n\n+/, "\n\n")
+    end
+
+    def output_template_in_target(source, destination = source)
+      final_destination = File.join(target_dir, destination)
+      template_result   = render_template(source)
+
+      File.open(final_destination, 'w') {|file| file.write(template_result)}
+
+      $stdout.puts "\tcreate\t#{destination}"
+    end
+
+    def template_dir
+      File.join(File.dirname(__FILE__), 'templates')
+    end
+      
+    def create_version_control
+      Dir.chdir(target_dir) do
+        begin
+          @repo = Git.init()
+        rescue Git::GitExecuteError => e
+          raise GitInitFailed, "Encountered an error during gitification. Maybe the repo already exists, or has already been pushed to?"
+        end
+      end
+    end
+
+
+  end
+end

data/lib/erlgen/templates/Rakefile

@@ -0,0 +1,53 @@
+require 'rake'
+require 'rake/clean'
+
+# Configuration
+START_MODULE = "<%= @project_name%>"
+TEST_MODULE = "test_<%= @project_name%>"
+MNESIA_DIR = "/tmp"
+
+
+# No Need to change
+PWD = `pwd`.strip
+INCLUDE = "include"
+ERLC_FLAGS = "-I#{INCLUDE} +warn_unused_vars +warn_unused_import"
+
+SRC = FileList['src/**/*.erl']
+OBJ = SRC.pathmap("%{src,ebin}X.beam")
+CLEAN.include(['**/*.dump'])
+CLOBBER.include(['**/*.beam'])
+
+directory 'ebin'
+
+
+rule ".beam" =>  ["%{ebin,src}X.erl"] do |t|
+  sh "erlc -pa ebin -W #{ERLC_FLAGS} -o ebin #{t.source}"
+end
+
+desc "Compile all"
+task :compile => ['ebin'] + OBJ
+
+desc "Open up a shell"
+task :shell => [:compile] do
+    sh("erl -sname #{START_MODULE} -pa #{PWD}/ebin")
+end
+
+desc "Open up a shell and run #{START_MODULE}:start()" 
+task :run => [:compile] do
+    sh("erl -sname #{START_MODULE} -pa #{PWD}/ebin -run #{START_MODULE} start")
+end
+
+desc "Run Unit Tests" 
+task :test do
+  sh("erl -noshell -s #{TEST_MODULE} test -s init stop")
+end
+
+
+desc "Generate Documentation"
+task :doc do
+    sh("cd doc && erl -noshell -run edoc files ../#{SRC.join(" ../")} -run init stop")
+end
+
+
+task :default => :compile
+

data/lib/erlgen/templates/application.app

@@ -0,0 +1,9 @@
+{application, <%= @project_name%>,
+  [{description, "<%= @project_name%> application"},
+   {vsn, "0.2"},
+   {modules, [<%= @project_name%>]},
+   {registered, []},
+   {applications, [kernel, stdlib]},
+   {env, []},
+   {mod, {<%= @project_name%>, []}}]}.
+

data/lib/erlgen/templates/application.erl

@@ -0,0 +1,56 @@
+%%%-------------------------------------------------------------------
+%%% Author  : Author Name 
+%%% @doc The entry point into our application.
+%%% @end
+%%%-------------------------------------------------------------------
+-module(<%= @project_name%>).
+
+-behaviour(application).
+%%--------------------------------------------------------------------
+%% Include files
+%%--------------------------------------------------------------------
+-include("<%= @project_name%>.hrl").
+
+%%--------------------------------------------------------------------
+%% External exports
+%%--------------------------------------------------------------------
+-export([
+     start/2,
+     shutdown/0,
+     stop/1
+     ]).
+
+%%====================================================================
+%% External functions
+%%====================================================================
+%%--------------------------------------------------------------------
+%% @doc The starting point for an erlang application.
+%% @spec start(Type, StartArgs) -> {ok, Pid} | {ok, Pid, State} | {error, Reason}
+%% @end
+%%--------------------------------------------------------------------
+start(Type, StartArgs) ->
+    case <%= @project_name%>_sup:start_link(StartArgs) of
+    {ok, Pid} ->
+        {ok, Pid};
+    Error ->
+        Error
+    end.
+
+%%--------------------------------------------------------------------
+%% @doc Called to shudown the <%= @project_name%> application.
+%% @spec shutdown() -> ok
+%% @end
+%%--------------------------------------------------------------------
+shutdown() ->
+    application:stop(<%= @project_name%>).
+
+%%====================================================================
+%% Internal functions
+%%====================================================================
+
+%%--------------------------------------------------------------------
+%% Called upon the termination of an application.
+%%--------------------------------------------------------------------
+stop(State) ->
+    ok.
+

data/lib/erlgen/templates/application_sup.erl

@@ -0,0 +1,63 @@
+%%%-------------------------------------------------------------------
+%%% Author  : Author Name 
+%%% @doc The top level supervisor for our application.
+%%% @end
+%%%-------------------------------------------------------------------
+-module(<%= @project_name%>_sup).
+
+-behaviour(supervisor).
+
+%%--------------------------------------------------------------------
+%% External exports
+%%--------------------------------------------------------------------
+-export([start_link/1]).
+
+%%--------------------------------------------------------------------
+%% Internal exports
+%%--------------------------------------------------------------------
+-export([init/1]).
+
+%%--------------------------------------------------------------------
+%% Macros
+%%--------------------------------------------------------------------
+-define(SERVER, ?MODULE).
+
+%%====================================================================
+%% External functions
+%%====================================================================
+%%--------------------------------------------------------------------
+%% @doc Starts the supervisor.
+%% @spec start_link(StartArgs) -> {ok, pid()} | Error
+%% @end
+%%--------------------------------------------------------------------
+start_link(StartArgs) ->
+    supervisor:start_link({local, ?SERVER}, ?MODULE, []).
+
+%%====================================================================
+%% Server functions
+%%====================================================================
+%%--------------------------------------------------------------------
+%% Func: init/1
+%% Returns: {ok,  {SupFlags,  [ChildSpec]}} |
+%%          ignore                          |
+%%          {error, Reason}
+%%--------------------------------------------------------------------
+init([]) ->
+    RestartStrategy    = one_for_one,
+    MaxRestarts        = 1000,
+    MaxTimeBetRestarts = 3600,
+
+    SupFlags = {RestartStrategy, MaxRestarts, MaxTimeBetRestarts},
+    
+    %% Replace <%= @project_name%>_server with your actual module
+    ChildSpecs =
+    [
+     {<%= @project_name%>_server,
+      {<%= @project_name%>_server, start_link, []},
+      permanent,
+      1000,
+      worker,
+      [<%= @project_name%>_server]}
+     ],
+    {ok,{SupFlags, ChildSpecs}}.
+

data/lib/erlgen.rb

@@ -0,0 +1,3 @@
+class Erlgen
+
+end

data/spec/erlgen_spec.rb

@@ -0,0 +1,7 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Erlgen" do
+  it "fails" do
+    fail "hey buddy, you should probably rename this file and start specing for real"
+  end
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--color

data/spec/spec_helper.rb

@@ -0,0 +1,9 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'erlgen'
+require 'spec'
+require 'spec/autorun'
+
+Spec::Runner.configure do |config|
+  
+end

metadata

@@ -0,0 +1,107 @@
+--- !ruby/object:Gem::Specification 
+name: erlgen
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Dimitri Krassovski
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-04-01 00:00:00 +03:00
+default_executable: erlgen
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: git
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 2
+        - 5
+        version: 1.2.5
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 2
+        - 9
+        version: 1.2.9
+  type: :development
+  version_requirements: *id002
+description: Erlang application generator
+email: labria@startika.com
+executables: 
+- erlgen
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- bin/erlgen
+- erlgen.gemspec
+- lib/erlgen.rb
+- lib/erlgen/generator.rb
+- lib/erlgen/templates/Rakefile
+- lib/erlgen/templates/application.app
+- lib/erlgen/templates/application.erl
+- lib/erlgen/templates/application_sup.erl
+- spec/erlgen_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/labria/erlgen
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Erlang application generator
+test_files: 
+- spec/erlgen_spec.rb
+- spec/spec_helper.rb