el_vfs 0.0.1

data/config/dragonfly.rb

@@ -0,0 +1,45 @@
+require 'dragonfly'
+
+vfs = Dragonfly[:vfs]
+vfs.configure_with(:rails)
+vfs.configure_with(:imagemagick)
+vfs.define_macro(ActiveRecord::Base, :file_accessor)
+vfs.content_filename = ->(job, request) { request[:entry_name] }
+
+if defined?(Settings) && Settings[:s3]
+  require 'fog'
+  vfs.datastore = Dragonfly::DataStorage::S3DataStore.new
+  vfs.datastore.configure do |datastore|
+    Settings[:s3].each do | key, value |
+      datastore.send("#{key}=", value)
+    end
+  end
+
+  class Fog::Storage::AWS::Real
+    def initialize_with_openteam(options={})
+      initialize_without_openteam(options.merge(:scheme => :http, :port => 80, :host => 's3.openteam.ru'))
+    end
+    alias_method_chain :initialize, :openteam
+  end
+
+  class Fog::Connection
+    def request_with_openteam(params, &block)
+      request_without_openteam(params.merge(:path => "/#{Settings[:s3][:bucket_name]}/#{params[:path]}"), &block)
+    end
+    alias_method_chain :request, :openteam
+  end
+else
+  vfs.datastore.configure do |datastore|
+    datastore.root_path = "#{Rails.root}/files/#{Rails.env}"
+    datastore.store_meta = false
+  end
+end
+
+require 'dragonfly/image_magick/utils'
+module Dragonfly::ImageMagick::Utils
+  def raw_identify(temp_object, args='')
+    @cache ||= {}
+    @cache["#{temp_object}#{args}"] ||= run "#{identify_command} #{args} \"#{temp_object.path}\" 2>/dev/null"
+  end
+end
+

data/config/routes.rb

@@ -0,0 +1,6 @@
+module ElVfs
+  Engine.routes.draw do
+    match '/api/elfinder' => 'el_finder#run'
+    resources :entries
+  end
+end

data/db/migrate/20111111111111_create_el_vfs_entries.rb

@@ -0,0 +1,19 @@
+class CreateElVfsEntries < ActiveRecord::Migration
+  def change
+    create_table :el_vfs_entries do |t|
+      t.string  :type
+      t.string  :ancestry
+      t.integer :ancestry_depth
+      t.text    :entry_path
+      t.text    :entry_path_hash
+      t.string  :entry_name
+      t.string  :entry_mime_type
+      t.integer :entry_size
+      t.integer :root_number
+      t.timestamps
+    end
+    add_index :el_vfs_entries, :entry_name
+    add_index :el_vfs_entries, :ancestry
+    add_index :el_vfs_entries, :entry_path_hash
+  end
+end

data/lib/el_finder_api/el_vfs/command.rb

@@ -0,0 +1,66 @@
+module ElVfs
+
+  class ::IsAFileValidator < ActiveModel::EachValidator
+    def validate_each(record, attribute, value)
+      record.errors[attribute] << "must be an instance of ElVfs::File (was #{value.class})" unless value.is_a?(ElVfs::File)
+    end
+  end
+
+  class ::IsADirectoryValidator < ActiveModel::EachValidator
+    def validate_each(record, attribute, value)
+      record.errors[attribute] << "must be an instance of ElVfs::Directory (was #{value.class})" unless value.is_a?(ElVfs::Directory) || value.is_a?(ElVfs::Root)
+    end
+  end
+
+  class ::IsAnEntryValidator < ActiveModel::EachValidator
+    def validate_each(record, attribute, value)
+      record.errors[attribute] << "must be an instance of ElVfs::Entry (was #{value.class})" unless value.is_a?(ElVfs::Entry)
+    end
+  end
+
+  class Command < Model
+
+    attr_accessor :arguments, :error, :result
+
+    class Arguments < Model
+      def entry
+        @entry ||= Entry.find_by_entry_path_hash target
+      end
+      def entries
+        @entries ||= targets.map{|target| Entry.find_by_entry_path_hash target}
+      end
+    end
+
+    class Result < Model
+      attr_accessor :arguments, :execute_command
+    end
+
+    class_attribute :command_name
+
+    class Error < Model
+      attr_accessor :error
+    end
+
+    def initialize(init_params)
+      self.arguments = "#{self.class.name}::Arguments".constantize.new(init_params)
+    end
+
+    def run
+      self.result = "#{self.class.name}::Result".constantize.new(:arguments => arguments, :execute_command => execute_command)
+    end
+
+    def headers
+      @headers ||= {}
+    end
+
+    protected
+
+      def execute_command
+      end
+
+      def self.register_in_connector(command_name=nil)
+        self.command_name = command_name || name.demodulize.underscore
+        Connector.commands[self.command_name] = self
+      end
+  end
+end

data/lib/el_finder_api/el_vfs/command/change_working_directory.rb

@@ -0,0 +1,36 @@
+module ElVfs
+
+  class Command::ChangeWorkingDirectory < Command
+    register_in_connector :open
+
+    class Arguments < Command::Arguments
+      attr_accessor :init, :target, :tree
+
+      validates_presence_of :init, :unless => :target
+      validates :entry, :is_a_directory => true
+
+      def initialize(params)
+        super
+        self.target ||= Entry.root.target if init
+      end
+    end
+
+    class Result < Command::Result
+      def api;        2               end
+      def cwd;        arguments.entry end
+      def uplMaxSize; '16m'           end
+
+      def files
+        files = arguments.entry.children.all
+        files += Entry.where(['ancestry_depth <= ?', 2]).only_directories if arguments.tree
+        files.uniq
+      end
+
+      def options
+        {path: arguments.entry.el_vfs_path, url: arguments.entry.url, disabled: [], separator: '/', copyOverwrite: 1, archivers: {create: [], extract: []}}
+      end
+    end
+
+  end
+
+end

data/lib/el_finder_api/el_vfs/command/copy_entries.rb

@@ -0,0 +1,44 @@
+module ElVfs
+  class Command::CopyEntries < ElVfs::Command
+    register_in_connector :paste
+
+    class Arguments < Command::Arguments
+      attr_accessor :targets, :src, :dst, :cut
+      validates_presence_of :src, :dst, :targets
+
+      validates :source, :destination, :is_a_directory => true
+      validates :entries, :is_an_entry => true
+
+      def cut?
+        cut == '1' || cut == 'true' || cut == true
+      end
+
+      def source
+        @source ||= Entry..find_by_entry_path_hash(src)
+      end
+
+      def destination
+        @destination ||= Entry.find_by_entry_path_hash(dst)
+      end
+    end
+
+    class Result < Command::Result
+      def added
+        execute_command
+      end
+      def removed
+        arguments.cut? ? arguments.targets : []
+      end
+    end
+
+    protected
+      def execute_command
+        arguments.entries.map do | entry |
+          entry = entry.dup unless arguments.cut?
+          entry.tap do | entry |
+            entry.update_attributes! :parent => arguments.destination
+          end
+        end
+      end
+  end
+end

data/lib/el_finder_api/el_vfs/command/create_directory.rb

@@ -0,0 +1,21 @@
+module ElVfs
+  class Command::CreateDirectory < ElVfs::Command
+    register_in_connector :mkdir
+    class Arguments < Command::Arguments
+      attr_accessor :target, :name
+      validates_presence_of :target, :name
+      validates :entry, :is_a_directory => true
+    end
+
+    class Result < Command::Result
+      def added
+        [ execute_command ]
+      end
+    end
+
+    protected
+      def execute_command
+        Directory.create!(:parent => arguments.entry, :entry_name => arguments.name)
+      end
+  end
+end

data/lib/el_finder_api/el_vfs/command/create_file.rb

@@ -0,0 +1,24 @@
+module ElVfs
+  class Command::CreateFile < ElVfs::Command
+    register_in_connector :mkfile
+
+    class Arguments < Command::Arguments
+      attr_accessor :target, :name
+      validates_presence_of :target, :name
+      validates :entry, :is_a_directory => true
+    end
+
+    class Result < Command::Result
+      def added
+        [ execute_command ]
+      end
+    end
+
+    def execute_command
+      ElVfs::File.new(:parent => arguments.entry).tap do | file |
+        Dir.mktmpdir{|dir| file.entry = ::File.open("#{dir}/#{arguments.name}", "w") }
+        file.save!
+      end
+    end
+  end
+end

data/lib/el_finder_api/el_vfs/command/create_thumbnail.rb

@@ -0,0 +1,3 @@
+class ElVfs::Command::CreateThumbnail < ElVfs::Command
+  register_in_connector :tmb
+end

data/lib/el_finder_api/el_vfs/command/destroy_entries.rb

@@ -0,0 +1,24 @@
+module ElVfs
+  class Command::DestroyEntries < ElVfs::Command
+    register_in_connector :rm
+
+    class Arguments < Command::Arguments
+      attr_accessor :targets
+      validates_presence_of :targets
+      validates :entries, :is_an_entry => true
+    end
+
+    class Result < Command::Result
+      def removed
+        arguments.targets
+      end
+    end
+
+    protected
+
+      def execute_command
+        arguments.entries.map(&:destroy)
+      end
+
+  end
+end

data/lib/el_finder_api/el_vfs/command/duplicate_entries.rb

@@ -0,0 +1,24 @@
+module ElVfs
+  class Command::DuplicateEntries < ElVfs::Command
+    register_in_connector :duplicate
+
+    class Arguments < Command::Arguments
+      attr_accessor :targets
+      validates_presence_of :targets
+      validates :entries, :is_an_entry => true
+    end
+
+
+    class Result < Command::Result
+      def added
+        execute_command
+      end
+    end
+
+    protected
+
+      def execute_command
+        arguments.entries.map(&:duplicate)
+      end
+  end
+end

data/lib/el_finder_api/el_vfs/command/get_ancestors.rb

@@ -0,0 +1,22 @@
+module ElVfs
+  class Command::GetAncestors < ElVfs::Command
+    register_in_connector :parents
+
+    class Arguments < Command::Arguments
+      attr_accessor :target
+      validates_presence_of :target
+      validates :entry, :is_a_directory => true
+    end
+
+    class Result < Command::Result
+      def tree
+        tree = arguments.entry.ancestors
+        tree += arguments.entry.ancestors.from_depth(1).map(&:directories).flatten
+        tree << arguments.entry
+        tree += Entry.where(['ancestry_depth <= ?', 2]).only_directories
+        tree.uniq
+      end
+    end
+
+  end
+end

data/lib/el_finder_api/el_vfs/command/get_descendants.rb

@@ -0,0 +1,19 @@
+module ElVfs
+  class Command::GetDescendants < ElVfs::Command
+    register_in_connector :tree
+
+    class Arguments < Command::Arguments
+      attr_accessor :target
+
+      validates_presence_of :target
+      validates :entry, :is_a_directory => true
+    end
+
+    class Result < Command::Result
+      def tree
+        arguments.entry.descendants(:to_depth => 2)
+      end
+    end
+
+  end
+end

data/lib/el_finder_api/el_vfs/command/list_names.rb

@@ -0,0 +1,14 @@
+class ElVfs::Command::ListNames < ElVfs::Command
+  register_in_connector :ls
+  options :target
+
+  protected
+
+    def hash
+      if target
+        { list: directory.files.map(&:entry_name) }
+      else
+        wrong_params_hash
+      end
+    end
+end

data/lib/el_finder_api/el_vfs/command/pack_entries.rb

@@ -0,0 +1,3 @@
+class ElVfs::Command::PackEntries < ElVfs::Command
+  register_in_connector :archive
+end

data/lib/el_finder_api/el_vfs/command/ping.rb

@@ -0,0 +1,12 @@
+module ElVfs
+  class Command::Ping < Command
+    register_in_connector
+
+    class Arguments < Command::Arguments
+    end
+
+    def run
+      self.headers['Connection'] = 'close'
+    end
+  end
+end

data/lib/el_finder_api/el_vfs/command/read_file_body.rb

@@ -0,0 +1,17 @@
+module ElVfs
+  class Command::ReadFileBody < ElVfs::Command
+    register_in_connector :get
+
+    class Arguments < Command::Arguments
+      attr_accessor :target
+      validates_presence_of :target
+      validates :entry, :is_a_file => true
+    end
+
+    class Result < Command::Result
+      def content
+        arguments.entry.entry.data
+      end
+    end
+  end
+end

data/lib/el_finder_api/el_vfs/command/rename_entry.rb

@@ -0,0 +1,25 @@
+module ElVfs
+  class Command::RenameEntry < ElVfs::Command
+    register_in_connector :rename
+
+    class Arguments < Command::Arguments
+      attr_accessor :target, :name
+      validates_presence_of :target, :name
+      validates :entry, :is_an_entry => true
+    end
+
+    class Result < Command::Result
+      def added
+        [arguments.entry]
+      end
+      def removed
+        [arguments.target]
+      end
+    end
+
+    protected
+      def execute_command
+        arguments.entry.update_attributes! :entry_name => arguments.name
+      end
+  end
+end