resin 0.0.1

data/amber/st/Kernel-Transcript.st

@@ -0,0 +1,70 @@
+Smalltalk current createPackage: 'Kernel-Transcript' properties: #{}!
+Object subclass: #Transcript
+	instanceVariableNames: 'textarea'
+	category: 'Kernel-Transcript'!
+
+Transcript class instanceVariableNames: 'current'!
+
+!Transcript class methodsFor: 'instance creation'!
+
+open
+    self current open
+!
+
+new
+    self shouldNotImplement
+!
+
+current
+    ^current
+!
+
+register: aTranscript
+	current := aTranscript
+! !
+
+!Transcript class methodsFor: 'printing'!
+
+show: anObject
+    self current show: anObject
+!
+
+cr
+    self current show: String cr
+!
+
+clear
+    self current clear
+! !
+
+Object subclass: #ConsoleTranscript
+	instanceVariableNames: 'textarea'
+	category: 'Kernel-Transcript'!
+
+!ConsoleTranscript methodsFor: 'actions'!
+
+open
+! !
+
+!ConsoleTranscript methodsFor: 'printing'!
+
+clear
+	"no op"
+!
+
+cr
+	"no op"
+!
+
+show: anObject
+	| string |
+	string := anObject asString.
+	<console.log(String(string))>
+! !
+
+!ConsoleTranscript class methodsFor: 'initialization'!
+
+initialize
+	Transcript register: self new
+! !
+

data/amber/st/SUnit.st

@@ -0,0 +1,172 @@
+Smalltalk current createPackage: 'SUnit' properties: #{}!
+Object subclass: #TestCase
+	instanceVariableNames: 'testSelector'
+	category: 'SUnit'!
+
+!TestCase methodsFor: 'accessing'!
+
+setTestSelector: aSelector
+	testSelector := aSelector
+!
+
+selector
+	^testSelector
+! !
+
+!TestCase methodsFor: 'private'!
+
+signalFailure: aString
+	TestFailure new
+		messageText: aString;
+		signal
+! !
+
+!TestCase methodsFor: 'running'!
+
+setUp
+!
+
+tearDown
+!
+
+runCaseFor: aTestResult
+	self setUp.
+	aTestResult increaseRuns.
+	self performTestFor: aTestResult.
+	self tearDown
+!
+
+performTestFor: aResult
+	[[self perform: self selector]
+		on: TestFailure do: [:ex | aResult addFailure: self]]
+		on: Error do: [:ex | aResult addError: self]
+! !
+
+!TestCase methodsFor: 'testing'!
+
+assert: aBoolean
+	self assert: aBoolean description: 'Assertion failed'
+!
+
+deny: aBoolean
+	self assert: aBoolean not
+!
+
+assert: expected equals: actual
+	^ self assert: (expected = actual) description: 'Expected: ', expected asString, ' but was: ', actual asString
+!
+
+assert: aBoolean description: aString
+	aBoolean ifFalse: [self signalFailure: aString]
+!
+
+should: aBlock
+	self assert: aBlock value
+!
+
+should: aBlock raise: anExceptionClass
+	self assert: ([aBlock value. false] 
+		on: anExceptionClass 
+		do: [:ex | true])
+! !
+
+!TestCase class methodsFor: 'accessing'!
+
+testSelectors
+	^self methodDictionary keys select: [:each | each match: '^test']
+!
+
+selector: aSelector
+	^self new
+		setTestSelector: aSelector;
+		yourself
+!
+
+lookupHierarchyRoot
+	^TestCase
+!
+
+allTestSelectors
+	| selectors |
+	selectors := self testSelectors.
+	self shouldInheritSelectors ifTrue: [
+		selectors addAll: self superclass allTestSelectors].
+	^selectors
+!
+
+buildSuite
+	^self allTestSelectors collect: [:each | self selector: each]
+! !
+
+!TestCase class methodsFor: 'testing'!
+
+shouldInheritSelectors
+	^self ~= self lookupHierarchyRoot
+! !
+
+Error subclass: #TestFailure
+	instanceVariableNames: ''
+	category: 'SUnit'!
+
+Object subclass: #TestResult
+	instanceVariableNames: 'timestamp runs errors failures total'
+	category: 'SUnit'!
+
+!TestResult methodsFor: 'accessing'!
+
+timestamp
+	^timestamp
+!
+
+errors
+	^errors
+!
+
+failures
+	^failures
+!
+
+total
+	^total
+!
+
+total: aNumber
+	total := aNumber
+!
+
+addError: anError
+	self errors add: anError
+!
+
+addFailure: aFailure
+	self failures add: aFailure
+!
+
+runs
+	^runs
+!
+
+increaseRuns
+	runs := runs + 1
+!
+
+status
+	^self errors isEmpty 
+		ifTrue: [
+			self failures isEmpty 
+				ifTrue: ['success']
+				ifFalse: ['failure']]
+		ifFalse: ['error']
+! !
+
+!TestResult methodsFor: 'initialization'!
+
+initialize
+	super initialize.
+	timestamp := Date now.
+	runs := 0.
+	errors := Array new.
+	failures := Array new.
+	total := 0
+! !
+

data/bin/runresin

@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+
+begin
+  require 'resin/app/app.rb'
+rescue LoadError => e
+  require 'rubygems'
+  path = File.expand_path '../../lib', __FILE__
+  $:.unshift(path) if File.directory?(path) && !$:.include?(path)
+  require 'resin/app/app.rb'
+end
+
+Resin::Server.run!

data/lib/resin/app/app.rb

@@ -0,0 +1,121 @@
+require 'rubygems'
+require 'sinatra/base'
+require 'haml'
+
+AMBER_PATH = File.expand_path('../../../../amber', __FILE__)
+
+module Resin
+  def env
+    ENV['RACK_ENV']
+  end
+  module_function :env
+
+  def development?
+    !(env == 'production')
+  end
+  module_function :development?
+
+  class Server < Sinatra::Base
+    set :dump_errors, true
+    set :views,  File.expand_path('../views', __FILE__)
+
+    set :views, [File.join(Dir.pwd, 'views'), File.expand_path('../views', __FILE__)]
+
+    helpers do
+      def find_template(views, name, engine, &block)
+        Array(views).each do |view|
+          super(view, name, engine, &block)
+        end
+      end
+
+      def embed_amber
+        return <<-END
+          <script type="text/javascript" src="/js/amber.js"></script>
+          <script type="text/javascript">
+            loadAmber({
+              files : [#{javascript_files}],
+              ready : function() { }
+            });
+          </script>
+        END
+      end
+    end
+
+    def javascript_files
+      files = []
+      Dir.glob("#{Dir.pwd}/js/*.js") do |filename|
+        unless filename.include? 'deploy'
+          files << "\"#{File.basename(filename)}\""
+        end
+      end
+      files.join(',')
+    end
+
+    get '/' do
+      haml :index
+    end
+
+    get '/:view' do |view|
+      begin
+        haml view.to_sym
+      rescue ::Errno::ENOENT
+        halt 404, 'Not found'
+      end
+    end
+
+    def load_resource(prefix, filename)
+      # A file in our working directory will take precedence over the
+      # Amber-bundled files. This should allow custom Kernel-Objects.js files
+      # for example.
+      local_file = File.join(Dir.pwd, "#{prefix}/", filename)
+      amber_file = File.join(AMBER_PATH, "/#{prefix}/", filename)
+
+      if File.exists? local_file
+        File.open(local_file, 'r').read
+      elsif File.exists? amber_file
+        File.open(amber_file, 'r').read
+      else
+        nil
+      end
+    end
+
+    def content_type_for_ext(filename)
+      if File.extname(filename) == '.js'
+        content_type 'application/javascript'
+      elsif File.extname(filename) == '.css'
+        content_type 'text/css'
+      else
+        content_type 'text/plain'
+      end
+    end
+
+    ['js', 'css', 'images'].each do |path|
+      get "/#{path}/*" do |filename|
+        content_type_for_ext filename
+        data = load_resource(path, filename)
+        if data.nil?
+          halt 404, 'Not found'
+        end
+        data
+      end
+    end
+
+    if Resin.development?
+      set :logging, true
+      disable :protection
+
+      # Only enable the saving mechanism in test/development
+      put '*' do
+        unless request.body.nil?
+          path = File.join(Dir.pwd, request.path)
+          puts ">> Commiting changes to #{path}"
+          File.open(path, 'w') do |fd|
+            request.body.each do |line|
+              fd.write(line)
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/resin/app/views/index.haml

@@ -0,0 +1,10 @@
+%html
+  %head
+    %title
+      Resin
+    = embed_amber
+  %body
+    - if Resin.development?
+      %div{:style => 'float: right; clear: all'}
+        %button{:onclick => "smalltalk.Browser._open();"}
+          Run IDE

metadata

@@ -0,0 +1,216 @@
+--- !ruby/object:Gem::Specification
+name: resin
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- R. Tyler Croy
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-26 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: &7546660 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 1.0.0
+  type: :development
+  prerelease: false
+  version_requirements: *7546660
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &7546180 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *7546180
+- !ruby/object:Gem::Dependency
+  name: shotgun
+  requirement: &7545440 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *7545440
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &7544940 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *7544940
+- !ruby/object:Gem::Dependency
+  name: rack-test
+  requirement: &7544520 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *7544520
+- !ruby/object:Gem::Dependency
+  name: thin
+  requirement: &7544100 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *7544100
+- !ruby/object:Gem::Dependency
+  name: haml
+  requirement: &7543660 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *7543660
+- !ruby/object:Gem::Dependency
+  name: sinatra
+  requirement: &7543220 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: *7543220
+description: 
+email: tyler@linux.com
+executables:
+- runresin
+extensions: []
+extra_rdoc_files:
+- README.markdown
+files:
+- bin/runresin
+- lib/resin/app/app.rb
+- lib/resin.rb
+- lib/resin/app/views/index.haml
+- amber/css/amber.css
+- amber/css/style.css
+- amber/css/documentation.css
+- amber/css/profstef.css
+- amber/js/Kernel-Tests.js
+- amber/js/Additional-Examples.deploy.js
+- amber/js/Kernel-Transcript.deploy.js
+- amber/js/Canvas.deploy.js
+- amber/js/Kernel-Announcements.js
+- amber/js/Examples.js
+- amber/js/lib/showdown.js
+- amber/js/lib/peg-0.6.2.min.js
+- amber/js/lib/CodeMirror/smalltalk.js
+- amber/js/lib/CodeMirror/codemirror.css
+- amber/js/lib/CodeMirror/amber.css
+- amber/js/lib/CodeMirror/codemirror.js
+- amber/js/lib/CodeMirror/LICENSE
+- amber/js/lib/jQuery/jquery.textarea.js
+- amber/js/lib/jQuery/jquery-1.4.4.min.js
+- amber/js/lib/jQuery/jquery-ui-1.8.16.custom.min.js
+- amber/js/lib/jQuery/jquery-1.6.4.min.js
+- amber/js/Compiler.js
+- amber/js/Kernel-Classes.deploy.js
+- amber/js/init.js
+- amber/js/amber.js
+- amber/js/parser.pegjs
+- amber/js/SUnit.js
+- amber/js/Kernel-Objects.deploy.js
+- amber/js/IDE.deploy.js
+- amber/js/Kernel-Classes.js
+- amber/js/Kernel-Objects.js
+- amber/js/Kernel-Transcript.js
+- amber/js/SUnit.deploy.js
+- amber/js/Kernel-Tests.deploy.js
+- amber/js/parser.js
+- amber/js/Kernel-Methods.deploy.js
+- amber/js/Canvas.js
+- amber/js/Benchfib.js
+- amber/js/Compiler.deploy.js
+- amber/js/boot.js
+- amber/js/Kernel-Methods.js
+- amber/js/Documentation.js
+- amber/js/Kernel-Collections.js
+- amber/js/Additional-Examples.js
+- amber/js/Kernel-Announcements.deploy.js
+- amber/js/IDE.js
+- amber/js/Examples.deploy.js
+- amber/js/compat.js
+- amber/js/Documentation.deploy.js
+- amber/js/Kernel-Exceptions.js
+- amber/js/Kernel-Exceptions.deploy.js
+- amber/js/Benchfib.deploy.js
+- amber/js/Kernel-Collections.deploy.js
+- amber/st/Kernel-Classes.st
+- amber/st/Examples.st
+- amber/st/Documentation.st
+- amber/st/SUnit.st
+- amber/st/Canvas.st
+- amber/st/Kernel-Tests.st
+- amber/st/Compiler.st
+- amber/st/Kernel-Objects.st
+- amber/st/Kernel-Methods.st
+- amber/st/IDE.st
+- amber/st/Benchfib.st
+- amber/st/Kernel-Collections.st
+- amber/st/Kernel-Transcript.st
+- amber/st/Kernel-Announcements.st
+- amber/st/Kernel-Exceptions.st
+- amber/images/tinylogo.png
+- amber/images/sprite.png
+- amber/images/profstef.png
+- amber/images/twitterwall.png
+- amber/images/presentation.png
+- amber/images/off.png
+- amber/images/amber.png
+- amber/images/offHover.png
+- amber/images/amber_small.png
+- README.markdown
+homepage: https://github.com/rtyler/resin
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: A tool for building Amber applications with Ruby
+test_files: []