utopia 0.9.17

data/lib/utopia/response_helper.rb

@@ -0,0 +1,22 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+module Rack
+	class Response
+		def self.create(response, &block)
+			self.new(response[2], response[0], response[1], &block)
+		end
+	end
+end

data/lib/utopia/session/encrypted_cookie.rb

@@ -0,0 +1,115 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'openssl'
+require 'digest/sha2'
+
+module Utopia
+	module Session
+
+		class EncryptedCookie
+			RACK_SESSION = "rack.session"
+			RACK_SESSION_OPTIONS = "rack.session.options"
+
+			def initialize(app, options={})
+				@app = app
+				@cookie = options[:cookie] || (RACK_SESSION + ".encrypted")
+				@secret = Digest::SHA256.digest(options[:secret])
+
+				@default_options = {
+					:domain => nil,
+					:path => "/",
+					:expires_after => nil
+				}.merge(options)
+			end
+
+			def call(env)
+				original_session = load_session(env).dup
+
+				status, headers, body = @app.call(env)
+
+				if original_session != env[RACK_SESSION]
+					commit_session(env, status, headers, body)
+				end
+
+				return [status, headers, body]
+			end
+
+			private
+
+			def load_session(env)
+				session = {}
+
+				request = Rack::Request.new(env)
+				data = request.cookies[@cookie]
+
+				if data
+					session = decrypt(data) rescue session
+				end
+
+				env[RACK_SESSION] = session
+				env[RACK_SESSION_OPTIONS] = @default_options.dup
+
+				return session
+			end
+			
+			def commit_session(env, status, headers, body)
+				session = env[RACK_SESSION]
+
+				data = encrypt(session)
+
+				if data.size > (1024 * 4)
+					env["rack.errors"].puts "Error: #{self.class.name} data exceeds 4K. Content Dropped!"
+				else
+					options = env[RACK_SESSION_OPTIONS]
+					cookie = {:value => data}
+					cookie[:expires] = Time.now + options[:expires_after] unless options[:expires_after].nil?
+
+					Rack::Utils.set_cookie_header!(headers, @cookie, cookie.merge(options))
+				end
+			end
+			
+			def encrypt(hash)
+				c = OpenSSL::Cipher::Cipher.new("aes-256-cbc")
+				c.encrypt
+
+				# your pass is what is used to encrypt/decrypt
+				c.key = @secret
+				c.iv = iv = c.random_iv
+
+				e = c.update(Marshal.dump(hash))
+				e << c.final
+
+				return [iv, e].pack("m16m*")
+			end
+
+			def decrypt(data)
+				iv, e = data.unpack("m16m*")
+
+				c = OpenSSL::Cipher::Cipher.new("aes-256-cbc")
+				c.decrypt
+
+				c.key = @secret
+				c.iv = iv
+
+				d = c.update(e)
+				d << c.final
+
+				return Marshal.load(d)
+			end
+		end
+		
+	end
+end

data/lib/utopia/tag.rb

@@ -0,0 +1,84 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+module Utopia
+	
+	class Tag
+		def initialize(name, attributes = {})
+			@name = name
+			@attributes = attributes
+			@closed = false
+		end
+
+		attr :name
+		attr :attributes
+		attr :closed, true
+
+		def [](key)
+			@attributes[key]
+		end
+
+		def append(text)
+			@content ||= StringIO.new
+			@content.write text
+		end
+
+		def to_html(content = nil, buf = StringIO.new)
+			write_full_html(buf, content)
+			
+			return buf.string
+		end
+		
+		def to_hash
+			@attributes
+		end
+		
+		def to_s
+			buf = StringIO.new
+			write_open_html(buf)
+			return buf.string
+		end
+		
+		def write_open_html(buf, terminate = false)
+			buf ||= StringIO.new 
+			buf.write "<#{name}"
+
+			@attributes.each do |key, value|
+				buf.write " #{key}=\"#{value}\""
+			end
+			
+			if terminate
+				buf.write "/>"
+			else
+				buf.write ">"
+			end
+		end
+		
+		def write_close_html(buf)
+			buf.write "</#{name}>"
+		end
+		
+		def write_full_html(buf, content = nil)
+			if @closed && content == nil
+				write_open_html(buf, true)
+			else
+				write_open_html(buf)
+				buf.write(content)
+				write_close_html(buf)
+			end
+		end
+	end
+	
+end

data/lib/utopia/tags.rb

@@ -0,0 +1,32 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+module Utopia
+	module Tags
+		@@all = {}
+		
+		def self.register(name, tag)
+			@@all[name] = tag
+		end
+		
+		def self.create(name, &block)
+			@@all[name] = Proc.new(&block)
+		end
+		
+		def self.all
+			@@all
+		end
+	end
+end

data/lib/utopia/tags/all.rb

@@ -0,0 +1,25 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'pathname'
+
+Pathname.new(__FILE__).dirname.entries.grep(/\.rb$/).each do |path|
+	name = File.basename(path.to_s, ".rb")
+	
+	if name != "all"
+		require "utopia/tags/#{name}"
+	end
+end
+

data/lib/utopia/tags/env.rb

@@ -0,0 +1,24 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'utopia/tags'
+
+Utopia::Tags.create("env") do |transaction, state|
+	only = state[:only].split(",").collect(&:to_sym) rescue []
+
+	if defined?(UTOPIA_ENV) && only.include?(UTOPIA_ENV)
+		transaction.parse_xml(state.content)
+	end
+end

data/lib/utopia/tags/fortune.rb

@@ -0,0 +1,20 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'utopia/tags'
+
+Utopia::Tags.create("fortune") do |transaction, state|
+	"<pre>#{`fortune`.to_html}</pre>"
+end

data/lib/utopia/tags/gallery.rb

@@ -0,0 +1,175 @@
+# Copyright (c) 2010 Samuel Williams. Released under the GNU GPLv3.
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+# 
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+# 
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'utopia/tags'
+
+require 'RMagick'
+require 'fileutils'
+
+class Utopia::Tags::Gallery
+	PROCESSES = {
+		:photo_thumbnail => lambda do |img|
+			img = img.resize_to_fit(300, 300)
+
+			shadow = img.flop
+			shadow = shadow.colorize(1, 1, 1, "gray50")
+			shadow.background_color = "white"
+			shadow.border!(10, 10, "white")
+			shadow = shadow.blur_image(0, 5)
+      
+			shadow.composite(img, 5, 5, Magick::OverCompositeOp)
+		end,
+		:thumbnail => lambda do |img| 
+			img = img.resize_to_fit(300, 300)
+		end,
+		:large => lambda{|img| img.resize_to_fit(768, 768)}
+	}
+	
+	CACHE_DIR = "_cache"
+	
+	class ImagePath
+		def initialize(original_path)
+			@original_path = original_path
+			@cache_root = @original_path.dirname + CACHE_DIR
+		end
+
+		attr :cache_root
+
+		def original
+			@original_path
+		end
+
+		def self.append_suffix(name, suffix)
+			name.split(".").insert(-2, suffix).join(".")
+		end
+
+		def processed(process = nil)
+			if process
+				name = @original_path.basename
+				return cache_root + ImagePath.append_suffix(name, process.to_s)
+			else
+				return @original_path
+			end
+		end
+		
+		def to_html(process = nil)
+			Tag.new("img", {"src" => path(process)}).to_html
+		end
+		
+		def to_s
+			@original_path.to_s
+		end
+		
+		def method_missing(name, *args)
+			return processed(name.to_s)
+		end
+	end
+	
+	def initialize(node, path)
+		@node = node
+		@path = path
+		
+		Utopia::LOG.debug("node: #{node.inspect} path: #{path}")
+	end
+	
+	def metadata
+		metadata_path = @node.local_path(@path + "gallery.yaml")
+		
+		if File.exist? metadata_path
+			return YAML::load(File.read(metadata_path))
+		else
+			return {}
+		end
+	end
+	
+	def images(options = {})
+		options[:filter] ||= /(\.jpg|\.png)$/
+
+		paths = []
+		local_path = @node.local_path(@path)
+
+		Utopia::LOG.debug("Scanning #{local_path}")
+
+		Dir.entries(local_path).each do |filename|
+			next unless filename.match(options[:filter])
+
+			Utopia::LOG.debug("Filename #{filename} matched filter...")
+
+			fullpath = File.join(local_path, filename)
+
+			paths << ImagePath.new(@path + filename)
+		end
+
+		if options[:process]
+			paths.each do |path|
+				processed_image(path, options[:process])
+			end
+		end
+
+		return paths
+	end
+	
+	def processed_image(image_path, processes)
+		# Create the local cache directory if it doesn't exist already
+		local_cache_path = @node.local_path(image_path.cache_root)
+		
+		unless File.exist? local_cache_path
+			FileUtils.mkdir local_cache_path
+		end
+		
+		# Calculate the new name for the processed image
+		local_original_path = @node.local_path(image_path.original)
+		
+		if processes.kind_of? String
+			processes = processes.split(",")
+		end
+		
+		processes.each do |process|
+			local_processed_path = @node.local_path(image_path.processed(process))
+		
+			unless File.exists? local_processed_path
+				image = Magick::ImageList.new(local_original_path)
+
+				processed_image = PROCESSES[process.to_sym].call(image)
+				processed_image.write(local_processed_path)
+			end
+		end
+	end
+	
+	def self.call(transaction, state)
+		gallery = new(transaction.end_tags[-2].node, Utopia::Path.create(state["path"] || "./"))
+		metadata = gallery.metadata
+		metadata.default = {}
+		
+		tag_name = state["tag"] || "img"
+
+		options = {}
+		options[:process] = state["process"]
+
+		transaction.tag("div", "class" => "gallery") do |node|
+			images = gallery.images(options).sort_by do |path|
+				name = path.original.basename
+				metadata[name]["order"] || name
+			end
+			
+			images.each do |path|
+				alt_text = metadata[path.original.basename]["caption"]
+				transaction.tag(tag_name, "src" => path, "alt" => alt_text)
+			end
+		end
+	end
+end
+
+Utopia::Tags.register("gallery", Utopia::Tags::Gallery)