gator-as3-robotlegs 0.0.2.pre

data/lib/gator/as3/robotlegs/generators/model.as.tt

@@ -0,0 +1,12 @@
+package <%= package_name %>
+{
+	import org.robotlegs.mvcs.Actor;
+
+	public class <%= class_name %> extends Actor
+	{
+		public function <%= class_name %>()
+		{
+			super();
+		}
+	}
+}

data/lib/gator/as3/robotlegs/generators/model.rb

@@ -0,0 +1,57 @@
+module Gator
+  module AS3
+    module RobotLegs
+
+      class ModelGenerator < Task
+        include Gator::Project
+
+        define :command => "model",
+               :usage => "generate as3 rl model CLASS_NAME", :description => "Creates RobotLegs Model class."
+
+        argument :classname
+
+        class_option :test, :default => false
+
+        def self.source_root
+          File.dirname __FILE__
+        end
+
+        def generate
+          src = project.path(:source, :main, :as3)
+          @package_name, @class_name = split_class_name(classname)
+          @class_name += "Model"
+          src = File.join(src, @package_name.split(".").join(File::SEPARATOR)) unless @package_name == ""
+          template "model.as.tt", File.join(src, "#{@class_name}.as")
+        end
+
+        def generate_test
+          return unless options[:test]
+          invoke resolve_subcommand(["test", "model"],["test","klass"])
+        end
+
+        no_tasks {
+
+          def package_name
+            @package_name
+          end
+
+          def class_name
+            @class_name
+          end
+
+        }
+
+        protected
+
+        def split_class_name(class_name)
+          pieces = class_name.split "."
+          class_name = pieces.pop
+          package_name = pieces.join "."
+          return package_name, class_name
+        end
+
+      end
+
+    end
+  end
+end

data/lib/gator/as3/robotlegs/generators/service.as.tt

@@ -0,0 +1,12 @@
+package <%= package_name %>
+{
+	import org.robotlegs.mvcs.Actor;
+
+	public class <%= class_name %> extends Actor
+	{
+		public function <%= class_name %>()
+		{
+			super();
+		}
+	}
+}

data/lib/gator/as3/robotlegs/generators/service.rb

@@ -0,0 +1,57 @@
+module Gator
+  module AS3
+    module RobotLegs
+
+      class ServiceGenerator < Task
+        include Gator::Project
+
+        define :command => "service",
+               :usage => "generate as3 rl service CLASS_NAME", :description => "Creates RobotLegs Service class."
+
+        argument :classname
+
+        class_option :test, :default => false
+
+        def self.source_root
+          File.dirname __FILE__
+        end
+
+        def generate
+          src = project.path(:source, :main, :as3)
+          @package_name, @class_name = split_class_name(classname)
+          @class_name += "Service"
+          src = File.join(src, @package_name.split(".").join(File::SEPARATOR)) unless @package_name == ""
+          template "service.as.tt", File.join(src, "#{@class_name}.as")
+        end
+
+        def generate_test
+          return unless options[:test]
+          invoke resolve_subcommand(["test", "service"],["test","klass"])
+        end
+
+        no_tasks {
+
+          def package_name
+            @package_name
+          end
+
+          def class_name
+            @class_name
+          end
+
+        }
+
+        protected
+
+        def split_class_name(class_name)
+          pieces = class_name.split "."
+          class_name = pieces.pop
+          package_name = pieces.join "."
+          return package_name, class_name
+        end
+
+      end
+
+    end
+  end
+end

data/lib/gator/as3/robotlegs/generators/test/asunit4.rb

@@ -0,0 +1,3 @@
+require File.dirname(__FILE__) + '/asunit4/collection'
+
+Gator::AS3::RobotLegs::GeneratorCollection.register_subcommand Gator::AS3::RobotLegs::ASUnit4::TestGeneratorCollection

data/lib/gator/as3/robotlegs/generators/test/asunit4/collection.rb

@@ -0,0 +1,25 @@
+require File.dirname(__FILE__) + '/command'
+require File.dirname(__FILE__) + '/mediator'
+require File.dirname(__FILE__) + '/view'
+require File.dirname(__FILE__) + '/suite'
+
+module Gator
+  module AS3
+    module RobotLegs
+      module ASUnit4
+
+        class TestGeneratorCollection < Gator::Command
+
+          define :command => "test",
+                 :usage => "generate as3 robotlegs test GENERATOR", :description => "TestGenerators for robotlegs with ASUnit4"
+
+          register_subcommand CommandTestGenerator
+          register_subcommand MediatorTestGenerator
+          register_subcommand ViewTestGenerator
+          register_subcommand SuiteGenerator
+          
+        end
+      end
+    end
+  end
+end

data/lib/gator/as3/robotlegs/generators/test/asunit4/command.as.tt

@@ -0,0 +1,35 @@
+package <%= package_name %>
+{
+	import asunit.asserts.*;
+	
+	public class <%= class_name %>
+	{
+		private var instance:<%= instance_name %>;
+		
+		[Before]
+		public function setUp():void
+		{
+		    instance=new <%= instance_name %>();
+		    instance.eventDispatcher=new EventDispatcher();
+		}
+		
+		[After]
+		public function tearDown():void
+		{
+			instance=null;
+    	}
+
+		[Test]
+		public function should_be_instantiated():void
+		{
+			assertTrue(instance is <%= instance_name %>);
+		}
+
+		[Test]
+		public function should_fail():void
+		{
+		    assertTrue(false);
+		}
+		
+	}
+}

data/lib/gator/as3/robotlegs/generators/test/asunit4/command.rb

@@ -0,0 +1,63 @@
+module Gator
+  module AS3
+    module RobotLegs
+      module ASUnit4
+
+        class CommandTestGenerator < Task
+          include Gator::Project
+
+          define :command => "command",
+                 :usage => "generate as3 robotlegs test command CLASS_NAME", :description => "Creates ASUnit4 command test."
+
+          argument :classname
+
+          class_option :impl, :default => false
+
+          def self.source_root
+            File.dirname __FILE__
+          end
+
+          def generate
+            src = project.path(:source, :test, :as3)
+            @package_name, @class_name = split_class_name(classname)
+            @class_name += "CommandTest"
+            src = File.join(src, @package_name.split(".").join(File::SEPARATOR)) unless @package_name == ""
+            template "command.as.tt", File.join(src, "#{@class_name}.as")
+          end
+
+          def generate_implementation
+            invoke resolve_subcommand(["test","suite"],["as3","klass"]), [classname]
+            return unless options[:impl]
+            invoke resolve_subcommand(["robotlegs","command"],["as3","klass"])
+          end
+
+          no_tasks {
+
+            def package_name
+              @package_name
+            end
+
+            def class_name
+              @class_name
+            end
+            
+            def instance_name
+              @class_name.chomp("Test")
+            end
+
+          }
+
+          protected
+
+          def split_class_name(class_name)
+            pieces = class_name.split "."
+            class_name = pieces.pop
+            package_name = pieces.join "."
+            return package_name, class_name
+          end
+
+        end
+      end
+    end
+  end
+end

data/lib/gator/as3/robotlegs/generators/test/asunit4/mediator.as.tt

@@ -0,0 +1,46 @@
+package <%= package_name %>
+{
+	import asunit.asserts.*;
+	
+	import <%= view_package_name %>.<%= view_class_name %>;
+	
+	public class <%= class_name %>
+	{
+		private var instance:<%= instance_name %>;
+		
+		[Before]
+		public function setUp():void
+		{
+		    instance=new <%= instance_name %>();
+			instance.view=new <%= view_class_name %>();
+			instance.setViewComponent(instance.view);
+		    instance.eventDispatcher=new EventDispatcher();
+			instance.onRegister();
+		}
+		
+		[After]
+		public function tearDown():void
+		{
+			instance.onRemove();
+			instance=null;
+    	}
+
+		[Test]
+		public function should_be_instantiated():void
+		{
+			assertTrue(instance is <%= instance_name %>);
+		}
+		
+		[Test]
+		public function view_should_be_instantiated():void
+		{
+			assertTrue(instance.view is <%= view_class_name %>);
+		}
+
+		[Test]
+		public function should_fail():void
+		{
+		    assertTrue(false);
+		}		
+	}
+}

data/lib/gator/as3/robotlegs/generators/test/asunit4/mediator.rb

@@ -0,0 +1,74 @@
+module Gator
+  module AS3
+    module RobotLegs
+      module ASUnit4
+
+        class MediatorTestGenerator < Task
+          include Gator::Project
+
+          define :command => "mediator",
+                 :usage => "generate as3 robotlegs test mediator CLASS_NAME", :description => "Creates ASUnit4 mediator test."
+
+          argument :classname
+
+          class_option :impl, :default => false
+
+          def self.source_root
+            File.dirname __FILE__
+          end
+
+          def generate
+            src = project.path(:source, :test, :as3)
+            @package_name, @class_name = split_class_name(classname)
+            @view_package_name = @package_name.dup << ".components"
+            @view_class_name = @class_name.dup
+            @class_name += "MediatorTest"
+            @package_name += ".mediators"
+            src = File.join(src, @package_name.split(".").join(File::SEPARATOR)) unless @package_name == ""
+            template "mediator.as.tt", File.join(src, "#{@class_name}.as")
+          end
+
+          def generate_implementation
+            invoke resolve_subcommand(["test","suite"],["as3","klass"]), [classname]
+            return unless options[:impl]
+            invoke resolve_subcommand(["robotlegs","mediator"],["as3","klass"])
+          end
+
+          no_tasks {
+
+            def package_name
+              @package_name
+            end
+
+            def class_name
+              @class_name
+            end
+            
+            def instance_name
+              @class_name.chomp("Test")
+            end
+            
+            def view_package_name
+              @view_package_name
+            end
+
+            def view_class_name
+              @view_class_name
+            end
+
+          }
+
+          protected
+
+          def split_class_name(class_name)
+            pieces = class_name.split "."
+            class_name = pieces.pop
+            package_name = pieces.join "."
+            return package_name, class_name
+          end
+
+        end
+      end
+    end
+  end
+end

data/lib/gator/as3/robotlegs/generators/test/asunit4/runner.as.tt

@@ -0,0 +1,21 @@
+package 
+{
+    import asunit.core.TextCore;
+    import flash.display.MovieClip;
+
+    public class <%= test_runner_name %> extends MovieClip 
+	{
+        protected var core:TextCore;
+
+        public function <%= test_runner_name %>() 
+		{
+            core = new TextCore();
+            // You can run a single Test Case with:
+            // core.start(SomeTest, null, this);
+            // Or a single test method with:
+            // core.start(SomeTest, 'testMethod', this);
+            core.start(AllTests, null, this);
+        }
+    }
+}
+

data/lib/gator/as3/robotlegs/generators/test/asunit4/suite.as.tt

@@ -0,0 +1,8 @@
+package 
+{
+    [Suite]
+    public class AllTests 
+	{
+		//
+    }
+}

data/lib/gator/as3/robotlegs/generators/test/asunit4/suite.rb

@@ -0,0 +1,43 @@
+module Gator
+  module AS3
+    module RobotLegs
+      module ASUnit4
+
+        class SuiteGenerator < Task
+          include Gator::Project
+
+          define :command => "suite",
+                 :usage => "generate as3 asunit4 test suite CLASS_NAME", :description => "Creates ASUnit4 suite."
+          
+          argument :classname
+          
+          def self.source_root
+            File.dirname __FILE__
+          end
+
+          def generate
+            src = project.path(:source, :test, :as3)
+            @package_name = src.dup
+            @class_name = "AllTests"
+            template "suite.as.tt", File.join(src, "#{@class_name}.as")
+          end
+
+          no_tasks {
+
+            def package_name
+              @package_name
+            end
+
+            def class_name
+              @class_name
+            end
+
+          }
+
+          protected
+
+        end
+      end
+    end
+  end
+end