torquebox-stompbox 0.1.0

data/bin/stompbox

@@ -0,0 +1,130 @@
+#!/usr/bin/env jruby
+#-*-ruby-*-
+#
+# Copyright 2011 Red Hat, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+require 'thor'
+require 'torquebox-rake-support'
+
+class StompBoxCommand < Thor
+
+  DEPLOYMENT_NAME = 'torquebox-stompbox-knob.yml'
+  DATABASE_URL    = 'postgres://stompbox:stompbox@localhost/stompbox'
+  DEPLOYMENTS     = '/opt/deployments'
+
+  desc "deploy [--secure=username:password[,username:password]*] [--setup-db] [--auto-migrate] [--db-url=url] [--deployments=/path/to/deployments] [--api-key=yourapikey]", "Deploys StompBox to $TORQUEBOX_HOME/apps"
+  method_option :secure,           :type => :hash,      :default => nil
+  method_option :'setup-db',       :type => :boolean,   :default => false
+  method_option :'auto-migrate',   :type => :boolean,   :default => false
+  method_option :'db-url',         :type => :string,    :default => DATABASE_URL
+  method_option :'deployments',    :type => :string,    :default => DEPLOYMENTS
+  method_option :'api-key',        :type => :string
+  def deploy
+    check
+    root = File.expand_path( File.join( File.dirname( __FILE__ ), '..' ) )
+    descriptor = TorqueBox::DeployUtils.basic_deployment_descriptor( :root => root,
+                                                                     :env => 'production' )
+    descriptor['environment'] = {}
+    descriptor['web']         = {'context'=>'/stompbox'}
+
+    if options[:secure]
+      descriptor['environment']['REQUIRE_AUTHENTICATION'] = true 
+      credentials = []
+      options[:secure].each do |user, pass|
+        credentials << [user, pass]
+      end
+      prop_file = TorqueBox::DeployUtils.write_credentials( credentials )
+      puts ">> INFO: Wrote user/password entries to #{prop_file}"
+    else
+      puts ">> WARNING: deploying StompBox with no security - use the --secure=username:password option to secure it"
+    end
+
+    if options[:'setup-db']
+      setup
+      puts ">> INFO: Setting up database."
+    end
+
+    if options[:'auto-migrate']
+      descriptor['environment']['AUTO_MIGRATE'] = true
+      puts ">> INFO: Configuring database for auto-migrations."
+    else
+      puts ">> WARNING: database not configured for auto-migration."
+    end
+
+    if options[:'db-url']
+      descriptor['environment']['DATABASE_URL'] = options[:'db-url']
+      puts ">> INFO: Using database URL: #{options[:'db-url']}"
+    else
+      puts ">> INFO: Using default database URL: #{DATABASE_URL}"
+    end
+
+    if options[:deployments]
+      descriptor['environment']['DEPLOYMENTS'] = options[:deployments]
+      puts ">> INFO: Using deployments path: #{options[:deployments]}"
+    else
+      puts ">> INFO: Using default deployments path: #{DEPLOYMENTS}"
+    end
+
+    if options[:'api-key']
+      descriptor['environment']['API_KEY'] = options[:'api-key']
+      puts ">> INFO: Using user-supplied API Key"
+    else
+      descriptor['environment']['API_KEY'] = generate_api_key
+      puts ">> INFO: Generated random API key."
+    end
+
+    name, dir = TorqueBox::DeployUtils.deploy_yaml( descriptor, DEPLOYMENT_NAME )
+    
+    puts ">> Deployed #{name} to #{dir}"
+  end
+
+  desc "setup", "Sets up the StompBox database. Use on a new installation before deploying."
+  def setup
+    check
+    setup_script = File.expand_path( File.join( File.dirname( __FILE__ ), '..', 'bin', 'dbsetup'  ) )
+    sh "#{setup_script} install"
+  end
+
+  desc "undeploy", "Removes StompBox from $TORQUEBOX_HOME/apps"
+  def undeploy
+    check
+    name, dir = TorqueBox::DeployUtils.undeploy( DEPLOYMENT_NAME )
+    puts ">> Undeployed #{name} from #{dir}"
+  end
+
+  desc "info", "Prints info about StompBox's status"
+  def info
+    check
+    path = File.join( ENV['TORQUEBOX_HOME'], 'apps', DEPLOYMENT_NAME )
+    if File.exists?( path )
+      puts ">> StompBox deployed to #{path}"
+    else
+      puts ">> StompBox is not deployed"
+    end
+  end
+
+  protected
+  def check
+    raise Exception.new("$TORQUEBOX_HOME must be set") unless ENV['TORQUEBOX_HOME']
+  end
+
+  def generate_api_key(size = 40)
+    charset = %w{ 2 3 4 6 7 9 A C D E F G H J K L M N P Q R T V W X Y Z}
+    (0...size).map{ charset.to_a[rand(charset.size)] }.join
+  end
+  
+end
+
+StompBoxCommand.start

data/config.ru

@@ -0,0 +1,5 @@
+require 'stompbox'
+
+require 'sinatra/reloader'
+
+run StompBox::Application

data/spec/auth_spec.rb

@@ -0,0 +1,50 @@
+#
+# Copyright 2011 Red Hat, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+ENV['REQUIRE_AUTHENTICATION'] = 'true'
+ENV['RACK_ENV'] = 'test'
+
+require 'spec_helper'
+      
+module StompBox 
+
+  describe 'application with authentication' do
+
+    it "should redirect to login if credentials are not supplied" do
+      get '/'
+      last_response.should be_redirect
+    end
+
+    it "should redirect to login if credentials are incorrect" do
+      authenticator = Object.new
+      TorqueBox::Authentication.stub!(:default).and_return(authenticator)
+      authenticator.stub!(:authenticate).and_return(false)
+      post '/login', {:user=>:foo, :password=>:bar}
+      last_response.should be_redirect
+    end
+
+    it "should allow access when authorized" do
+      rack_mock_session.stub!('authenticated?').and_return(true)
+      get "/"
+#      last_response.should be_ok
+      puts "TODO: This test is incorrect"
+    end
+
+  end
+
+end
+
+

data/spec/spec_helper.rb

@@ -0,0 +1,30 @@
+#
+# Copyright 2011 Red Hat, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+require 'rack/test'
+require 'stompbox'
+
+ENV['DATABASE_URL'] = 'postgres://stompbox:stompbox@localhost/stompbox'
+
+def app
+  @app ||= StompBox::Application.new
+end
+
+RSpec.configure do |conf|
+  conf.include Rack::Test::Methods
+end
+
+

data/spec/stompbox_spec.rb

@@ -0,0 +1,50 @@
+#
+# Copyright 2011 Red Hat, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+require 'spec_helper'
+
+module StompBox 
+
+  describe 'routes' do
+
+    it "should respond to GET /" do
+      get '/'
+      last_response.should be_ok
+    end
+
+    it "should respond to GET /repositories" do
+      get '/repositories'
+      last_response.should be_ok
+    end
+
+    it "should respond to POST /repositories" do
+      post '/repositories'
+      last_response.should be_redirect
+    end
+
+    it "should respond to PUT /repositories" do
+      put '/repositories/1'
+      last_response.should be_redirect
+    end
+
+    it "should respond to DELETE /repositories/:id" do
+      delete '/repositories/1'
+      last_response.should be_redirect
+    end
+      
+  end
+
+end

data/stompbox.rb

@@ -0,0 +1,148 @@
+#
+# Copyright 2011 Red Hat, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+$: << File.join(File.dirname(__FILE__), 'app')
+
+require 'rubygems'
+require 'sinatra/base'
+require 'rack-flash'
+
+require 'haml'
+require 'sass'
+require 'yaml'
+
+require 'authentication'
+require 'deployer'
+require 'helpers'
+require 'models'
+
+
+if ENV['RACK_ENV'].to_s == 'development'
+  puts "StompBox: DATABASE_URL = #{ENV['DATABASE_URL']}"
+  puts "StompBox: DEPLOYMENTS  = #{ENV['DEPLOYMENTS']}"
+  puts "StompBox: AUTO_MIGRATE = #{ENV['AUTO_MIGRATE']}"
+  puts "StompBox: API_KEY      = #{ENV['API_KEY']}"
+end
+
+module StompBox
+
+  class Application < Sinatra::Base 
+    include StompBox::Authentication
+    use Rack::Flash 
+
+
+    enable :sessions, :logging, :method_override, :static
+    set :public, Proc.new { File.join(root, "public") }
+    set :root,   Proc.new { File.expand_path(File.dirname(__FILE__)) }
+    set :views,  Proc.new { File.join(File.dirname(__FILE__), "app", "views") } 
+  
+    if ENV['REQUIRE_AUTHENTICATION']
+      ['*/push/*','*/login','*/logout', '*.js', '/*.css' ].each do |p|
+        before p do 
+          skip_authentication 
+        end
+      end
+      
+      before do 
+        require_authentication 
+      end
+    else
+      puts "StompBox: REQUIRE_AUTHENTICATION is not set, *disabling* authentication" if ENV['REQUIRE_AUTHENTICATION'].nil?
+    end
+  
+    post '/deploy' do
+      if (params[:id] && (push = Push.get(params[:id])))
+        Deployer.deploy(push)
+      end
+      redirect to('/')
+    end
+    
+    post '/undeploy' do
+      if (params[:id] && (push = Push.get(params[:id])))
+        Deployer.undeploy(push)
+      end
+      redirect to('/')
+    end
+    
+    # Post a deployment
+    post '/push/:api_key' do
+      if params[:payload] && (params[:api_key] == config('API_KEY'))
+        push = Push.create(:payload=>params[:payload], :created_at=>Time.now)
+        push.save if push
+      end
+      redirect to('/')
+    end
+    
+    # List all deployments
+    get '/' do
+      @pushes = Push.all(:order => [ :created_at.desc ])
+      haml :'pushes/index'
+    end
+  
+    get '/repositories' do
+      repositories 
+      haml :'repositories/index'
+    end
+    
+    post '/repositories' do
+      if params[:repository]
+        repo = Repository.create(params[:repository])
+        flash[:error] = repo.errors unless repo.save
+      end
+      redirect to("/repositories")
+    end
+  
+    delete '/repositories/:id' do
+      if repo = Repository.get(params[:id])
+        repo.destroy 
+      end
+      redirect to("/repositories")
+    end
+    
+    put '/repositories/:id' do
+      if repo = Repository.get(params[:id])
+        repo.update(params[:repository])
+        repo.save
+      end
+      redirect to("repositories")
+    end
+    
+    # Stylesheets - reset
+    get '/css/html5reset.css' do
+      sass :'/css/html5reset'
+    end
+    
+    # App stylesheet
+    get '/css/styles.css' do
+      scss :'/css/styles'
+    end
+  
+    get '/login' do
+      haml :'sessions/new'
+    end
+  
+    post '/login' do
+      flash[:notice] = "Bad credentials. Try again?" unless authenticate( params[:user], params[:password] )
+      redirect to('/')
+    end
+  
+    get '/logout' do
+      logout
+    end
+    
+    run! if app_file == $0
+  end
+end