sztupy-shaml 0.1.1

data/bin/shaml

@@ -0,0 +1,2 @@
+#!/usr/bin/env ruby
+require 'shaml'

data/lib/shaml.rb

@@ -0,0 +1,158 @@
+require 'rubygems'
+require 'zip/zip'
+
+SHAML_VERSION="0.1"
+
+TEMPLATEDIR = File.join(File.dirname(__FILE__),"templates")
+
+def camelcase(phrase)
+  phrase.gsub(/^[a-z]|[ _]+[a-z]/) { |a| a.upcase }.gsub(/[ _]/, '')
+end
+
+
+def unzip_file(file, destination)
+  Zip::ZipFile.open(file) { |zip_file|
+   zip_file.each { |f|
+     f_path=File.join(destination, f.name)
+     FileUtils.mkdir_p(File.dirname(f_path))
+     zip_file.extract(f, f_path) unless File.exist?(f_path)
+   }
+  }
+end
+
+def convert_file(file, appname, modelname, propertydescriptor)
+  out = ""
+  pstring = ""
+  insideprop = false
+  file.each_line do |line|
+    if insideprop then
+      if line.strip=="__END__PROPERTY__" then
+        propertydescriptor.split(";").each do |property|
+          p = property.split(":")
+          out << pstring.gsub("PropertyType",p[1]).gsub("Property",p[0])
+        end
+        insideprop = false
+      else
+        pstring << line.gsub("WebBase",appname).gsub("WebSample", camelcase(modelname)).gsub("websample", modelname);
+      end
+    else
+      if line.strip=="__BEGIN__PROPERTY__" then
+        pstring = ""
+        insideprop = true
+      else
+        out << line.gsub("WebBase",appname).gsub("WebSample", camelcase(modelname)).gsub("websample", modelname);
+      end
+    end
+  end
+  out
+end
+
+def copy_file(from,to,appname,modelname,propertydescriptor)
+  
+  outfname = to.gsub("WebSample",camelcase(modelname))
+  FileUtils.mkdir_p(File.dirname(outfname))
+  File.open(from,"rb") do |infile|
+    File.open(outfname,"wb+") do |outfile|
+      puts "Writing #{outfname}"        
+      outfile.write convert_file(infile.read,appname,modelname,propertydescriptor)
+    end
+  end
+end
+
+if ARGV.count == 0 then
+  puts "S#aml architecture: ASP.NET MVC and NHibernate on mono 2.4+"
+  puts " version: #{SHAML_VERSION}"
+  puts
+  puts "Usage:"
+  puts "  shaml command [parameters]"
+  puts 
+  puts "Where command might be:"
+  puts " generate"
+  puts "  app AppName             : Create new shaml application"
+  puts "  resource ResName [desc] : Create new CRUD resource with"
+  puts "                            a model, a view and a controller"
+  puts "  controller Controller   : Create a standalone controller"
+  puts "  model Model [desc]      : Create a standalone model"
+  puts
+  puts "Examples: "
+  puts "  shaml generate app Blog"
+  puts "  shaml generate resource Post"
+  puts
+  puts "The optional [desc] parameter describes the base schema"
+  puts "of the model. Here is an example how it looks like:"
+  puts "  name:string;email:string;birthdate:DateTime"
+else
+  command = ARGV.shift
+  case command
+  when "generate" then
+    type = ARGV.shift
+    name = ARGV.shift
+    if name then
+      case type
+      when "app" then
+        unzip_file(File.join(TEMPLATEDIR,"shaml_base_template.zip"), ".shaml_extract_temp")
+        Dir.glob(".shaml_extract_temp/**/*").each do |filename|
+          infname = filename
+          outfname = filename.gsub("WebBase",name).gsub(".shaml_extract_temp",name);
+          FileUtils.mkdir_p(File.dirname(outfname))
+          unless File.directory?(infname)
+            File.open(infname,"rb") do |infile|         
+              File.open(outfname,"wb+") do |outfile|
+                puts "Writing #{outfname}"
+                outfile.write infile.read.gsub("WebBase",name);
+              end
+            end
+          end
+        end
+        FileUtils.rm_rf ".shaml_extract_temp"
+      when "resource"
+        desc = ARGV.shift || nil
+        appname = Dir.glob("*.sln").first.gsub(".sln","");
+        if appname.nil? 
+          puts 'S#aml ERROR: solution file not found'
+          exit
+        end
+        copy_file(File.join(TEMPLATEDIR,"WebSample.cs"),File.join(appname,"App","Models","WebSample.cs"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"WebSamplesController.cs"),File.join(appname,"App","Controllers","WebSamplesController.cs"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"_WebSampleForm.haml"),File.join(appname,"App","Views","WebSample","_WebSampleForm.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Create.haml"),File.join(appname,"App","Views","WebSample","Create.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Delete.haml"),File.join(appname,"App","Views","WebSample","Delete.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Edit.haml"),File.join(appname,"App","Views","WebSample","Edit.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Index.haml"),File.join(appname,"App","Views","WebSample","Index.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Show.haml"),File.join(appname,"App","Views","WebSample","Show.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"WebSampleTests.cs"),File.join(appname+".Tests","Tests","Core","WebSampleTests.cs"),appname,name,desc)        
+        copy_file(File.join(TEMPLATEDIR,"WebSamplesControllerTests.cs"),File.join(appname+".Tests","Tests","Web","Controllers","WebSamplesControllerTests.cs"),appname,name,desc)        
+      when "model"
+        desc = ARGV.shift || nil
+        appname = Dir.glob("*.sln").first.gsub(".sln","");
+        if appname.nil? 
+          puts 'S#aml ERROR: solution file not found'
+          exit
+        end        
+        copy_file(File.join(TEMPLATEDIR,"WebSample.cs"),File.join(appname,"App","Models","WebSample.cs"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"WebSampleTests.cs"),File.join(appname+".Tests","Tests","Core","WebSampleTests.cs"),appname,name,desc)        
+      when "controller"
+        desc = ARGV.shift || nil
+        appname = Dir.glob("*.sln").first.gsub(".sln","");
+        if appname.nil? 
+          puts 'S#aml ERROR: solution file not found'
+          exit
+        end        
+        copy_file(File.join(TEMPLATEDIR,"WebSamplesController.cs"),File.join(appname,"App","Controllers","WebSamplesController.cs"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"_WebSampleForm.haml"),File.join(appname,"App","Views","WebSample","_WebSampleForm.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Create.haml"),File.join(appname,"App","Views","WebSample","Create.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Delete.haml"),File.join(appname,"App","Views","WebSample","Delete.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Edit.haml"),File.join(appname,"App","Views","WebSample","Edit.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Index.haml"),File.join(appname,"App","Views","WebSample","Index.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"Show.haml"),File.join(appname,"App","Views","WebSample","Show.haml"),appname,name,desc)
+        copy_file(File.join(TEMPLATEDIR,"WebSamplesControllerTests.cs"),File.join(appname+".Tests","Tests","Web","Controllers","WebSamplesControllerTests.cs"),appname,name,desc)                
+      else
+        puts 'S#aml ERROR: unknown generate argument'
+      end        
+    else
+      puts 'S#aml ERROR: no name specified'
+    end
+  else
+    puts 'S#aml ERROR: unknown command'
+  end
+end

data/lib/templates/Create.haml

@@ -0,0 +1,3 @@
+%div
+  %h2 Create WebSample
+  _ WebSampleForm

data/lib/templates/Delete.haml

@@ -0,0 +1,7 @@
+%div
+  %h2 Delete WebSample
+  %p Are you sure?
+  - using (Html.BeginForm<WebSamplesController>(c => c.DeleteConfirmed(ViewData.Model.Id)))
+    /= Html.AntiForgeryToken()
+    %input{ type="submit" value="Yes" }
+    %input{ type="button" name="No" value="No" onclick="javascript:history.go(-1);"}

data/lib/templates/Edit.haml

@@ -0,0 +1,3 @@
+%div
+  %h2 Edit WebSample
+  _ WebSampleForm

data/lib/templates/Index.haml

@@ -0,0 +1,24 @@
+%div
+  %h2 WebSamples
+  - if (ViewContext.TempData["message"] != null)
+    %p= ViewContext.TempData["message"]
+  %table
+    %thead
+      %tr
+        %th Name
+        %th CreatedAt
+        %th CreatorOwner
+        %th{ colspan=3 } Action
+    %tbody
+      - foreach (WebSample websample in ViewData.Model)
+        %tr
+__BEGIN__PROPERTY__          
+          %td= websample.Property
+__END__PROPERTY__  
+          %td
+            = Html.ActionLink<WebSamplesController>( c => c.Show( websample.Id ), "Details ")
+          %td
+            = Html.ActionLink<WebSamplesController>( c => c.Edit( websample.Id ), "Edit")
+          %td
+            = Html.ActionLink<WebSamplesController>( c => c.Delete( websample.Id), "Delete")
+  %p= Html.ActionLink<WebSamplesController>(c => c.Create(), "Create New WebSample")

data/lib/templates/Show.haml

@@ -0,0 +1,9 @@
+%div
+  %h2 WebSample Details
+  %ul
+__BEGIN__PROPERTY__    
+  %li
+    %label{ for="WebSample.Name" } Name:
+      %span{ id="WebSample.Name" }
+        = ViewData.Model.Name
+__END__PROPERTY__

data/lib/templates/WebSample.cs

@@ -0,0 +1,16 @@
+using NHibernate.Validator;
+using Shaml.Core.DomainModel;
+using Shaml.Core.PersistenceSupport;
+using System;
+
+namespace WebBase.Core
+{
+    public class WebSample : Entity
+    {
+        public WebSample() { }
+		
+__BEGIN__PROPERTY__
+        public virtual PropertyType Property { get; set; }
+__END__PROPERTY__
+    }
+}

data/lib/templates/WebSampleTests.cs

@@ -0,0 +1,20 @@
+using NUnit.Framework;
+using WebBase.Core;
+using NUnit.Framework.SyntaxHelpers;
+using Shaml.Testing;
+
+namespace Tests.Blog.Core
+{
+	[TestFixture]
+    public class WebSampleTests
+    {
+        [Test]
+        public void CanCompareWebSamples() {
+            WebSample instance = new WebSample();
+
+            WebSample instanceToCompareTo = new WebSample();
+
+            Assert.That(instance.Equals(instanceToCompareTo));
+        }
+    }
+}

data/lib/templates/WebSamplesController.cs

@@ -0,0 +1,130 @@
+using System.Web.Mvc;
+using System.Collections.Generic;
+using System.Text;
+using System;
+using Shaml.Core;
+using Shaml.Core.DomainModel;
+using Shaml.Core.PersistenceSupport;
+using Shaml.Web.NHibernate;
+using Shaml.Web.CommonValidator;
+using NHibernate.Validator.Engine;
+using WebBase.Core;
+using Shaml.Data.NHibernate;
+
+namespace WebBase.Controllers
+{
+    [HandleError]
+    [GenericLogger]
+    public class WebSamplesController : Controller
+    {
+        private readonly IRepository<WebSample> websampleRepository;
+
+        public WebSamplesController()
+        {
+            websampleRepository = new Repository<WebSample>();
+        }
+
+        public WebSamplesController(IRepository<WebSample> rep)
+        {
+            websampleRepository = rep;
+        }
+
+        [Transaction]
+        public ActionResult Index() {
+            IList<WebSample> websamples = websampleRepository.GetAll();
+            return View(websamples);
+        }
+
+        [Transaction]
+        public ActionResult Show(int id) {
+            WebSample websample = websampleRepository.Get(id);
+            return View(websample);
+        }
+
+        public ActionResult Create() {
+            return View();
+        }
+
+        //[ValidateAntiForgeryToken]
+        [Transaction]
+        [AcceptVerbs(HttpVerbs.Post)]
+        public ActionResult Create(WebSample websample) {
+            if (websample.IsValid()) {
+                websampleRepository.SaveOrUpdate(websample);
+
+                TempData["message"] = "The websample was successfully created.";
+                return RedirectToAction("Index");
+            }
+
+            MvcValidationAdapter.TransferValidationMessagesTo(ViewData.ModelState,
+                websample.ValidationResults());
+            return View();
+        }
+
+        [Transaction]
+        public ActionResult Edit(int id) {
+            WebSample websample = websampleRepository.Get(id);
+            return View(websample);
+        }
+
+        //[ValidateAntiForgeryToken]
+        [Transaction]
+        [AcceptVerbs(HttpVerbs.Post)]
+        public ActionResult Edit(int id, [ModelBinder(typeof(DefaultModelBinder))] WebSample websample) {
+            WebSample websampleToUpdate = websampleRepository.Get(id);
+            TransferFormValuesTo(websampleToUpdate, websample);
+
+            if (websampleToUpdate.IsValid()) {
+                TempData["message"] = "The websample was successfully updated.";
+                return RedirectToAction("Index");
+            }
+            else {
+                websampleRepository.DbContext.RollbackTransaction();
+                MvcValidationAdapter.TransferValidationMessagesTo(ViewData.ModelState, 
+                    websampleToUpdate.ValidationResults());
+                return View(websampleToUpdate);
+            }
+        }
+
+        private void TransferFormValuesTo(WebSample websampleToUpdate, WebSample websampleFromForm) {
+__BEGIN__PROPERTY__
+          websampleToUpdate.Property = websampleFromForm.Property;
+__END__PROPERTY__
+        }
+
+        [AcceptVerbs(HttpVerbs.Get)]
+        public ActionResult Delete(int id)
+        {
+            WebSample websampleToDelete = websampleRepository.Get(id);
+            return View(websampleToDelete);
+        }
+
+        //[ValidateAntiForgeryToken]
+        [Transaction]
+        [AcceptVerbs(HttpVerbs.Post)]
+        public ActionResult DeleteConfirmed(int id) {
+            string resultMessage = "The websample was successfully deleted.";
+            WebSample websampleToDelete = websampleRepository.Get(id);
+
+            if (websampleToDelete != null) {
+                websampleRepository.Delete(websampleToDelete);
+
+                try {
+                    websampleRepository.DbContext.CommitChanges();
+                }
+                catch {
+                    resultMessage = "A problem was encountered preventing the websample from being deleted. " +
+                          "Another item likely depends on this websample.";
+                    websampleRepository.DbContext.RollbackTransaction();
+                }
+            }
+            else {
+                resultMessage = "The websample could not be found for deletion. It may already have been deleted.";
+            }
+
+            TempData["Message"] = resultMessage;
+            return RedirectToAction("Index");
+        }
+
+    }
+}

data/lib/templates/WebSamplesControllerTests.cs

@@ -0,0 +1,147 @@
+using System;
+using MvcContrib.TestHelper;
+using NUnit.Framework;
+using Rhino.Mocks;
+using NUnit.Framework.SyntaxHelpers;
+using Shaml.Core.PersistenceSupport;
+using Shaml.Testing;
+using System.Collections.Generic;
+using System.Web.Mvc;
+using WebBase.Core;
+using WebBase.Controllers;
+
+namespace Tests.Blog.Web.Controllers
+{
+    [TestFixture]
+    public class WebSamplesControllerTests
+    {
+        [SetUp]
+        public void SetUp() {
+            controller = new WebSamplesController(CreateMockWebSampleRepository());
+        }
+
+        /// <summary>
+        /// Add a couple of objects to the list within CreateWebSamples and change the 
+        /// "Is.EqualTo(0)" within this test to the respective number.
+        /// </summary>
+        [Test]
+        public void CanListWebSamples() {
+            ViewResult result = controller.Index().AssertViewRendered();
+
+            Assert.That(result.ViewData.Model as List<WebSample>, Is.Not.Null);
+            Assert.That((result.ViewData.Model as List<WebSample>).Count, Is.EqualTo(0));
+        }
+
+        [Test]
+        public void CanShowWebSample() {
+            ViewResult result = controller.Show(1).AssertViewRendered();
+
+            Assert.That(result.ViewData.Model as WebSample, Is.Not.Null);
+            Assert.That((result.ViewData.Model as WebSample).Id, Is.EqualTo(1));
+        }
+
+        [Test]
+        public void CanInitWebSampleCreation() {
+            ViewResult result = controller.Create().AssertViewRendered();
+
+            Assert.That(result.ViewData.Model as WebSample, Is.Null);
+        }
+
+        [Test]
+        public void CanEnsureWebSampleCreationIsValid() {
+           WebSample websampleFromForm = new WebSample();
+            ViewResult result = controller.Create(websampleFromForm).AssertViewRendered();
+
+            Assert.That(result.ViewData.Model as WebSample, Is.Null);
+            Assert.That(result.ViewData.ModelState.Count, Is.GreaterThan(0));
+
+            // Example validation message test for lower level testing
+            // Assert.That(result.ViewData.ModelState["WebSample.Name"].Errors[0].ErrorMessage, Is.Not.Empty);
+        }
+
+        [Test]
+        public void CanCreateWebSample() {
+            WebSample websampleFromForm = CreateTransientWebSample();
+            RedirectToRouteResult redirectResult = controller.Create(websampleFromForm)
+                .AssertActionRedirect().ToAction("Index");
+            Assert.That(controller.TempData["message"].ToString().Contains("was successfully created"));
+        }
+
+        [Test]
+        public void CanUpdateWebSample() {
+            WebSample websampleFromForm = CreateTransientWebSample();
+            RedirectToRouteResult redirectResult = controller.Edit(1, websampleFromForm)
+                .AssertActionRedirect().ToAction("Index");
+            Assert.That(controller.TempData["message"].ToString().Contains("was successfully updated"));
+        }
+
+        [Test]
+        public void CanInitWebSampleEdit() {
+            ViewResult result = controller.Edit(1).AssertViewRendered();
+
+            Assert.That(result.ViewData.Model as WebSample, Is.Not.Null);
+            Assert.That((result.ViewData.Model as WebSample).Id, Is.EqualTo(1));
+        }
+
+        [Test]
+        public void CanDeleteWebSample() {
+            RedirectToRouteResult redirectResult = controller.DeleteConfirmed(1)
+                .AssertActionRedirect().ToAction("Index");
+            Assert.That(controller.TempData["message"].ToString().Contains("was successfully deleted"));
+        }
+
+		#region Create Mock WebSample Repository
+
+        private IRepository<WebSample> CreateMockWebSampleRepository() {
+            MockRepository mocks = new MockRepository();
+
+            IRepository<WebSample> mockedRepository = mocks.StrictMock<IRepository<WebSample>>();
+            Expect.Call(mockedRepository.GetAll())
+                .Return(CreateWebSamples());
+            Expect.Call(mockedRepository.Get(1)).IgnoreArguments()
+                .Return(CreateWebSample());
+            Expect.Call(mockedRepository.SaveOrUpdate(null)).IgnoreArguments()
+                .Return(CreateWebSample());
+            Expect.Call(delegate { mockedRepository.Delete(null); }).IgnoreArguments();
+
+            IDbContext mockedDbContext = mocks.StrictMock<IDbContext>();
+            Expect.Call(delegate { mockedDbContext.CommitChanges(); });
+            SetupResult.For(mockedRepository.DbContext).Return(mockedDbContext);
+            
+            mocks.Replay(mockedRepository);
+
+            return mockedRepository;
+        }
+
+        private WebSample CreateWebSample() {
+            WebSample websample = CreateTransientWebSample();
+            EntityIdSetter.SetIdOf<int>(websample, 1);
+            return websample;
+        }
+
+        private List<WebSample> CreateWebSamples() {
+            List<WebSample> websamples = new List<WebSample>();
+
+            // Create a number of websample object instances here and add them to the list
+
+            return websamples;
+        }
+        
+        #endregion
+
+        /// <summary>
+        /// Creates a valid, transient WebSample; typical of something retrieved back from a form submission
+        /// </summary>
+        private WebSample CreateTransientWebSample() {
+            WebSample websample = new WebSample() {
+__BEGIN__PROPERTY__
+            Property = new PropertyType(),
+__END__PROPERTY__
+            };
+            
+            return websample;
+        }
+
+        private WebSamplesController controller;
+    }
+}

data/lib/templates/_WebSampleForm.haml

@@ -0,0 +1,16 @@
+= Html.ValidationSummary()
+
+- using (Html.BeginForm()) 
+  /= Html.AntiForgeryToken()
+  = Html.Hidden("id", (ViewData.Model == null) ? 0 : ((WebSample)ViewData.Model).Id)
+  %ul
+__BEGIN__PROPERTY__
+    %li
+      %label{ for="WebSample_Property" }Name:
+        %div
+          = Html.TextBox("WebSample.Property", (ViewData.Model != null) ? ((WebSample)ViewData.Model).Property.ToString() : "")
+          = Html.ValidationMessage("WebSample.Property")
+__END__PROPERTY__          
+    %li
+      %input{ type="submit" name="btnSave" value="Save WebSample"}/
+        %button{ name="btnCancel" onClick="window.location.href = '/WebSamples';"} Cancel

metadata

@@ -0,0 +1,74 @@
+--- !ruby/object:Gem::Specification 
+name: sztupy-shaml
+version: !ruby/object:Gem::Version 
+  version: 0.1.1
+platform: ruby
+authors: 
+- Zsolt Sz. Sztupak
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-06-18 00:00:00 -07:00
+default_executable: shaml
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: chriseppstein-compass
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.6.15
+    version: 
+description: Shaml is an ASP.NET MVC framework with NHibernate for mono 2.4+
+email: mail@sztupy.hu
+executables: 
+- shaml
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/shaml.rb
+- bin/shaml
+- lib/templates/_WebSampleForm.haml
+- lib/templates/Create.haml
+- lib/templates/Delete.haml
+- lib/templates/Edit.haml
+- lib/templates/Index.haml
+- lib/templates/shaml_base_template.zip
+- lib/templates/Show.haml
+- lib/templates/WebSample.cs
+- lib/templates/WebSamplesController.cs
+- lib/templates/WebSamplesControllerTests.cs
+- lib/templates/WebSampleTests.cs
+has_rdoc: false
+homepage: http://code.google.com/p/shaml-architecture/
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+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: shaml
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 3
+summary: ASP.NET MVC on mono
+test_files: []
+