creationix-milk 0.0.9

data/lib/milk/component.rb

@@ -0,0 +1,142 @@
+module Milk
+  class Component
+  
+    @@local_flag = {}
+    
+    attr_accessor :parent
+    @parent = nil
+
+    
+    # Don't store global properties or backreferences to the parent
+    def to_yaml_properties
+      (if respond_to? :global_properties
+        instance_variables.reject { |name| global_properties.member?(name) }
+      else
+        instance_variables
+      end).reject { |name| name == :@parent }
+    end
+    
+    def app
+      page.app
+    end
+
+    def page
+      if @parent.class == Milk::Page
+        @parent
+      else
+        @parent.page
+      end
+    end
+    
+    def self.local_properties(*props)
+    end
+
+    def self.global_properties(*props)
+      globals = props.collect{|name|"@#{name}".to_sym}
+      class_def :global_properties do
+        globals
+      end
+    end
+    
+    def name
+      self.class.to_s
+    end
+
+    # All Components start out with default of no fields    
+    def self.fields
+      []
+    end
+    
+    # Assume no defaults
+    def self.defaults
+      {}
+    end
+
+    # Metaclass black magic to simulate appending items to a list
+    # This works by getting the old result of the fields class method
+    # and stores it in a closure, and then redefines the method, but with
+    # a new item appended.
+    def self.add_field(klass, field, label, options={})
+    
+      # Merge in assumes options
+      options[:field] = field
+      options[:label] = label
+      
+      # Fill in blanks with defaults
+      defaults.each do |k, v|
+        options[k] ||= v
+      end
+      
+      field = klass.new(options)
+      
+      newfields = self.fields + [field]
+      meta_def("fields") do
+        newfields
+      end
+    end
+    
+    def self.method_missing(method, *args)
+      raise "Missing '#{method}' method" unless File.file? FIELDS_DIR+"/#{method}.rb"
+      klass = eval("Fields::" + method.to_s.gsub(/(^|_)(.)/) { $2.upcase })
+      add_field(klass, *args)
+    end
+    
+    def save_settings
+      return unless respond_to? :global_properties
+      yaml_file = Milk::CONFIG_DIR + "/#{system_name}.yaml"
+      data = {}
+      global_properties.each do |name|
+        data[name.to_s.sub('@','')] = instance_variable_get(name)
+      end
+      
+      File.open(yaml_file, "w") do |file|
+        file.write(YAML.dump(data))
+      end
+    end
+    
+    def system_name
+      self.class.to_s.gsub(/([a-z])([A-Z])/) { "#{$1}_#{$2}" }.downcase
+    end
+    
+    def load_settings
+      yaml_file = Milk::CONFIG_DIR + "/#{system_name}.yaml"
+      if File.file? yaml_file
+        YAML.load_file(yaml_file).each_pair do |key, value|
+          instance_variable_set("@#{key}".to_sym, value)
+        end
+      end
+    end
+    
+    def haml(filename, context=self, extras={})
+      if block_given?
+        Page.haml(filename, context, extras) { yield }
+      else
+        Page.haml(filename, context, extras)
+      end
+    end
+
+    def partial(filename, vars, extras={})
+      obj = self.dup
+      vars.each do |key, value|
+        obj.instance_variable_set("@#{key}", value)
+      end
+      haml(filename, obj, extras)
+    end
+
+
+    def edit(prefix)
+      @prefix = prefix
+      haml_file = FIELDS_DIR + "/component.haml"
+      ::Haml::Engine.new(File.read(haml_file), :filename => haml_file).render(self)
+    end
+    
+    def view
+      haml_file = Milk::COMPONENTS_DIR + "/" + system_name + ".haml"
+      raise "Missing template \"" + haml_file + "\"" unless File.file? haml_file
+      ::Haml::Engine.new(File.read(haml_file), :filename => haml_file).render(self)
+    end
+    
+  end
+end
+
+

data/lib/milk/field.rb

@@ -0,0 +1,60 @@
+module Milk
+  
+  # A field is a data type for part of a component.  This way components can be
+  # quickly built without coding any logic.  The fields take care of the heavy
+  # work.
+  class Field
+    
+    attr_reader :field
+    
+    # Store the field configurations
+    def initialize(props)
+      props.each do |key, value|
+        self.instance_variable_set('@' + key.to_s, value)
+      end
+    end
+    
+    # This is the name shown to the user for the field.
+    def name
+      @label || self.class.to_s.rpartition('::').last
+    end
+
+    def form_field
+      @prefix
+    end
+    
+    def value
+      @component.instance_variable_get('@' + @field.to_s)
+    end
+    
+    # This is called to render the html for a field's form
+    def render(component, prefix)
+      @component = component
+      @prefix = prefix
+      
+      name = self.class.to_s.rpartition('::').last.gsub(/([a-z])([A-Z])/) { "#{$1}_#{$2}" }.downcase
+      haml_file = "#{FIELDS_DIR}/#{name}.haml"
+      if File.file?(haml_file)
+        ::Haml::Engine.new(File.read(haml_file), :filename => haml_file).render(self)
+      else
+        "#{self.class} Not Implemented"
+      end
+    end
+    
+  end
+  
+  # This module is a namespace for all the subclasses of Milk::Field
+  # Is sets up autoloading for the fields classes
+  module Fields
+
+    Dir.glob(Milk::FIELDS_DIR + "/*.rb").each do |c|
+      name = c.split('/').last.gsub(/(.*)\.rb/) { $1 }
+      class_name = name.gsub(/\/(.?)/) { "::" + $1.upcase }.gsub(/(^|_)(.)/) { $2.upcase }
+      path = c.gsub(/(.*)\.rb/) { $1 }
+      autoload class_name.to_sym, path
+    end
+  
+  end
+  
+end
+

data/lib/milk/fields/component.haml

@@ -0,0 +1,8 @@
+%h3
+  %a{:href => "#"}&= name
+%div
+  %input{:type=>"hidden", :name=>"#{@prefix}:class", :value=>self.class.to_s}
+  -self.class.fields.each do |field|
+    .field
+      %h4= field.name
+      .field-content= field.render(self, "#{@prefix}:#{field.field}")

data/lib/milk/fields/component_array.haml

@@ -0,0 +1,3 @@
+.sub-fields
+  - value.each_with_index do |item, i|
+    = item.edit("#{@prefix}:#{i}")

data/lib/milk/fields/component_array.rb

@@ -0,0 +1,4 @@
+module Milk::Fields
+  class ComponentArray < Milk::Field
+  end
+end

data/lib/milk/fields/image_chooser.haml

@@ -0,0 +1,7 @@
+%select{:name=>form_field}
+  - images.each do |img|
+    %option{:value=>img[:url], :selected=>value==img[:url], :title=>"#{img[:size]} bytes"}&= img[:filename]
+%br
+Alt:
+%input{:name=>alt_form_field, :value=>alt_value}
+

data/lib/milk/fields/image_chooser.rb

@@ -0,0 +1,26 @@
+module Milk::Fields
+  class ImageChooser < Milk::Field
+    @@images = []
+    IMAGE_DIR = Milk::PUBLIC_DIR + "/images"
+    Dir.glob(IMAGE_DIR + "/*").each do |img|
+      @@images << {
+        size: File.size(img),
+        url: img.sub(Milk::PUBLIC_DIR, ''),
+        filename: img.rpartition('/').last
+      }
+    end
+    
+    def images
+      @@images
+    end
+    
+    def alt_form_field
+      @prefix.rpartition(':').first + ":#{@alt_field}"
+    end
+    
+    def alt_value
+      @component.instance_variable_get('@' + @alt_field.to_s)
+    end
+
+  end
+end

data/lib/milk/fields/login.haml

@@ -0,0 +1,90 @@
+!!! xml
+!!! 1.1
+%html{:xmlns =>"http://www.w3.org/1999/xhtml"}
+  %head
+    %title Please Login
+    %style{:type=>"text/css"}
+      :sass
+        !width = 400
+        !height = 160
+        table, #shadow, .ui-widget-shadow
+          :width = !width + "px"
+          :height = !height + "px"
+        table#login, #shadow
+          :font-size 15px
+          :position absolute
+          :top 50%
+          :left 50%
+          :margin
+            :top = (-!height/2)+"px"
+            :left = (-!width/2)+"px"
+        table#login td, table#login th
+          :vertical-align middle
+        #login
+          tr.ui-state-error
+            td
+              :padding 5px 10px
+            :font-size 12px
+            span
+              :float left
+              :margin-right 0.3em
+          .ui-widget-header
+            :line-height 2em
+            :height 2em
+          button
+            :font-size 12px
+            :cursor pointer
+            :line-height 1em
+            :padding 2px 5px 2px 2px
+            .ui-icon
+              :float left
+              :line-height 1em
+          
+    %link{ :rel => "shortcut icon", :href => "/favicon.ico", :type => "image/x-icon"}/
+    %link{ :href => "/skin/jquery-ui-1.7.2.custom.css", :media => "screen", :rel => "stylesheet", :type => "text/css" }/
+    %link{ :href => "/style/style.css", :media => "screen", :rel => "stylesheet", :type => "text/css" }/
+    %script{:src=>"/js/jquery-1.3.2.min.js", :type=>"text/javascript"}
+    %script{:src=>"/js/jquery.json-1.3.min.js", :type=>"text/javascript"}
+    %script{:src=>"/js/jquery-ui-1.7.2.custom.min.js", :type=>"text/javascript"}
+  %body
+    .ui-widget-overlay
+    %form{:action => "/login", :method=>"post"}
+      %input{:type=>"hidden", :name => "dest", :value => @req.path_info}
+      #shadow
+        .ui-widget-shadow
+      %table#login{:class => "ui-widget ui-widget-content ui-corner-all"}
+        %thead
+          %tr
+            %th{:colspan=>2, :class=>"ui-widget-header ui-corner-top"}
+              &= "Please Login to edit '#{@page.pagename}'"
+        - if f = flash
+          %tr.ui-state-error{:class=>"ui-corner-all"}
+            %td{:colspan=>2}
+              %span{:class => "ui-icon ui-icon-alert",:style=>"float:left"}
+              %strong Alert:
+              &= f
+        %tr
+          %th Email
+          %td
+            %input{:name => "email"}
+        %tr
+          %th Password
+          %td
+            %input{:type=>"password", :name => "password"}
+        %tr
+          %th 
+          %td 
+            %button{:type =>"submit", :title=>'Login to the backend to edit this page.'}
+              %span{:class=>'ui-icon ui-icon-unlocked'}
+              Login
+    :javascript
+      $(function() {
+       $("button")
+        .addClass("ui-state-default ui-corner-all")
+        .hover(
+          function() { $(this).addClass('ui-state-hover'); },
+          function() { $(this).removeClass('ui-state-hover'); }
+        );
+      });
+
+      

data/lib/milk/fields/markdown_field.haml

@@ -0,0 +1 @@
+%textarea.markdown{:class=>"ui-widget ui-widget-content ui-corner-all", :name => form_field}&= value

data/lib/milk/fields/markdown_field.rb

@@ -0,0 +1,4 @@
+module Milk::Fields
+  class MarkdownField < Milk::Field
+  end
+end

data/lib/milk/fields/page_chooser.haml

@@ -0,0 +1,3 @@
+%select{:name=>form_field}
+  - pages.each do |page|
+    %option{:value=>page[:url], :selected=>value==page[:url], :title=>page[:file]}&= page[:name]

data/lib/milk/fields/page_chooser.rb

@@ -0,0 +1,17 @@
+module Milk::Fields
+  class PageChooser < Milk::Field
+    @@pages = []
+    Dir.glob(Milk::PAGES_DIR + "/*.yaml").each do |page|
+      pagename = File.basename(page, '.yaml').rpartition('/').last.gsub('.','/')
+      @@pages << {
+        file: page,
+        name: pagename,
+        url: "/"+pagename
+      }
+    end
+    
+    def pages
+      @@pages
+    end
+  end
+end

data/lib/milk/fields/sprite_chooser.haml

@@ -0,0 +1,6 @@
+.sprite-select
+  %input{:type=>"hidden", :name=>form_field, :value=>value}
+  - @sprites.each do |sprite|
+    %div{:class => "ui-state-default ui-corner-all sprite-option" + ((value == sprite[:name]) ? " ui-state-highlight" : "")}
+      %span{:class => sprite[:css_class], :title => sprite[:name]} 
+  %br.clear

data/lib/milk/fields/sprite_chooser.rb

@@ -0,0 +1,19 @@
+module Milk::Fields
+  class SpriteChooser < Milk::Field
+    
+    def initialize(*args)
+      super(*args)
+      @sprites = []
+      open(Milk::COMPONENTS_DIR+"/sprites.sass") do |sass|
+        sass.each do |line|
+          if match = @icon_classes.match(line)
+            @sprites << {
+              css_class: @main_class + " " + match[1],
+              name: match[2]
+            }
+          end
+        end
+      end
+    end
+  end
+end

data/lib/milk/fields/text_field.haml

@@ -0,0 +1 @@
+%input{:class=>"ui-widget ui-widget-content ui-corner-all", :type =>"text", :name=>form_field, :value=>value}

data/lib/milk/fields/text_field.rb

@@ -0,0 +1,4 @@
+module Milk::Fields
+  class TextField < Milk::Field
+  end
+end

data/lib/milk/fields/xhtml.haml

@@ -0,0 +1,253 @@
+!!! xml
+!!! 1.1
+%html{:xmlns =>"http://www.w3.org/1999/xhtml"}
+  %head
+    %title&= "Editing \"#{@pagename}\""
+    %style{:type=>"text/css"}
+      :sass
+        body, html
+          :border 0
+          :margin 0
+          :padding 0
+        body.busy
+          :cursor busy
+        div.component
+          &:hover
+            :border 10px solid #08f
+        #admin-title
+          :position absolute
+          :margin 0
+          :top 5px
+          :left 10px
+          :line-height 1em
+          :font-size 20px
+          :font-family monaco,monospace
+          
+        #toolbar
+          :position absolute
+          :left 0
+          :bottom 0
+          :right 0
+          :padding 3px
+          .toolitem
+            :font-size 12px
+            :cursor pointer
+            :line-height 1em
+            :padding 2px 5px 2px 2px
+            .ui-icon
+              :float left
+              :line-height 1em
+        #frame
+          :position absolute
+          :top 0px
+          :left 0px
+          :right 0px
+          :bottom 0px
+        #left
+          :font-size 11px
+          :position absolute
+          :top 0px
+          :left 0px
+          :width 250px
+          :bottom 0px
+          h4
+            :font-size 14px
+          h3
+            :font-size 13px
+        #divider
+          :position absolute
+          :top 0px
+          :left 250px
+          :width 5px
+          :bottom 0px
+        
+        #fields
+          :position absolute
+          :top 0px
+          :bottom 35px
+          :overflow auto
+          :left 0px
+          :right 0
+          .ui-accordion-content
+            :padding 10px
+            h4
+              :margin 0
+            .field-content
+              :margin-bottom 10px
+              input
+                :width 95%
+                :padding 2px
+              textarea
+                :width 100%
+                :min-height 330px
+              .sprite-select
+                .sprite-option
+                  :padding 4px
+                  :margin 2px
+                  :float left
+                  :cursor pointer
+          
+        #preview
+          :position absolute
+          :top 0px
+          :left 255px
+          :right 0
+          :width auto
+          :bottom 0px
+          :overflow auto
+          
+          
+    %link{ :rel => "shortcut icon", :href => "/favicon.ico", :type => "image/x-icon"}/
+    %link{ :href => "/skin/jquery-ui-1.7.2.custom.css", :media => "screen", :rel => "stylesheet", :type => "text/css" }/
+    %link{ :href => "/style/style.css", :media => "screen", :rel => "stylesheet", :type => "text/css" }/
+    %script{:src=>"/js/jquery-1.3.2.min.js", :type=>"text/javascript"}
+    %script{:src=>"/js/jquery.json-1.3.min.js", :type=>"text/javascript"}
+    %script{:src=>"/js/jquery-ui-1.7.2.custom.min.js", :type=>"text/javascript"}
+  %body
+    #frame
+      #left
+        .ui-widget-overlay
+        %form#fields{:method => "post", :action => "/"+@pagename}
+          %h3
+            %a{:href => "#"} Page Settings
+          %div
+            %input{:type=>"hidden", :name=>"class", :value=>self.class.to_s}
+            -to_yaml_properties.each do |name|
+              - next if name == :@components
+              - fieldname = name.to_s.sub('@','')
+              .field
+                %h4= fieldname.capitalize + ":"
+                .field-content
+                  %input{:type=>"text", :name=>fieldname, :value=>instance_variable_get(name)}
+          -@components.each_with_index do |component, i|
+            = component.edit("components:#{i}")
+        #toolbar{:class=>'ui-widget ui-widget-header'}
+          %button#save_button.toolitem{:title=>'Save changes and go to live page.'}
+            %span{:class=>'ui-icon ui-icon-disk'}
+            Save
+          %button#cancel_button.toolitem{:title=>'Cancel changes and go to live page.'}
+            %span{:class=>'ui-icon ui-icon-cancel'}
+            Cancel
+          %button#logout_button.toolitem{:title=>'Cancel changes and logout and go to live page.'}
+            %span{:class=>'ui-icon ui-icon-locked'}
+            Logout
+      #preview
+        = preview
+      #divider.ui-widget-header
+      
+    :javascript
+      function on_click_sprite(e)
+      {
+        // Look up some useful variables
+        var current = e.currentTarget;
+        var sprite_select = $(current.parentNode);
+        var peers = $(".sprite-option", sprite_select);
+        var hidden_input = $('input', sprite_select)[0];
+        var inner_span = $('span', current)[0];
+
+        // Set the value on the hidden input
+        hidden_input.value = inner_span.title;
+
+        // Move the highlight        
+        peers.removeClass('ui-state-highlight');
+        $(current).addClass('ui-state-highlight');
+        update_preview(50);
+      }
+      
+      function jsonify(form)
+      {
+        var data = {}
+        $("input, textarea, select", form).each(function (i, field){
+          var parts = field.name.split(':');
+          var root = data;
+          var part = parts[0];
+          var numeric_regexp = /[0-9]+/;
+          for(i=0;i<parts.length-1;i++)
+          {
+            if (!root[part])
+            {
+              if (numeric_regexp.test(part))
+                root[part]={};
+              else
+                root[part]=[];
+            }
+            root = root[part];
+            part = parts[i + 1];
+          }
+          root[part] = field.value;
+        });
+        return $.toJSON(data);
+      }
+      
+      function do_update_preview()
+      {
+        var preview = $("#preview");
+        $("body").addClass("busy")
+        $.ajax({
+          type: "POST",
+          url: $("form")[0].action,
+          contentType: "application/json",
+          data: jsonify($("form")[0]),
+          success: function(msg){
+            preview.html(msg);
+            $("body").removeClass("busy")
+          }
+        });
+      }
+      
+      function update_preview(timeout)
+      {
+        clearTimeout(window.preview_timeout);
+        window.preview_timeout = setTimeout(do_update_preview, timeout);
+      }
+      
+      
+      $(function() {
+        $("#left").resizable({handles: "e", resize: function(event, ui) {
+          $("#divider").css("left", ui.size.width);
+          $("#preview").css("left", ui.size.width+5);
+        }});
+        $(".sub-fields").accordion({
+          collapsible: true,
+          autoHeight: false,
+          active: false
+        });
+        var sections = $("#fields").accordion({
+          autoHeight: false
+        });
+        
+        $(".sprite-option").click(on_click_sprite);
+       $(".toolitem, .sprite-option")
+        .addClass("ui-state-default ui-corner-all")
+        .hover(
+          function() { $(this).addClass('ui-state-hover'); },
+          function() { $(this).removeClass('ui-state-hover'); }
+        );
+        $("#fields select, #fields input, #fields textarea").change(function(){
+          update_preview(100);
+        });
+        $("#fields select, #fields input, #fields textarea").keyup(function(){
+          update_preview(1000);
+        });
+        $("#save_button").click(function(){
+          $.ajax({
+            type: "PUT",
+            url: $("form")[0].action,
+            contentType: "application/json",
+            data: jsonify($("form")[0]),
+            success: function(msg){
+              window.location = $("form")[0].action.replace('https://', 'http://');
+            }
+          });
+        });
+        
+        $("#cancel_button").click(function(){
+          window.location = $("form")[0].action.replace('https://', 'http://');
+        });
+        $("#logout_button").click(function(){
+          window.location = "/logout?dest="+$("form")[0].action.replace('https://', 'http://');
+        });
+        
+      });
+
+