rubynas 0.1.0.pre.1

data/lib/rubynas/db/migrate/20130331103034_create_shared_folder_services.rb

@@ -0,0 +1,11 @@
+class CreateSharedFolderServices < ActiveRecord::Migration
+  def change
+    create_table :shared_folder_services do |t|
+      t.references :shared_folder
+      t.string :service_class
+      t.text :options
+
+      t.timestamps
+    end
+  end
+end

data/lib/rubynas/installers/base_installer.rb

@@ -0,0 +1,70 @@
+require 'resolv'
+require 'foreman'
+require 'foreman/cli'
+
+class BaseInstaller
+  ROOT_USER_ID = 0
+
+  class InstallError < StandardError; end
+  class ConfigurationError < InstallError; end
+  class PackageError < InstallError; end
+
+  INSTALL_ORDER = [ :prepare_install, :configure_ldap, :install_ldap,
+                    :configure_pam_auth, :install_pam_auth, :configure_app,
+                    :install_app ]
+
+  attr_reader :domain, :admin, :password
+
+  # @param [String] domain the domain for the rubynas like 'rubynas.com'
+  # @param [String] admin the admin user for the ldap
+  # @param [String] password the admin user password
+  def initialize(domain, admin, password)
+    @domain = domain
+    @admin = admin
+    @password = password
+  end
+
+  # @return [Array<String>] a list of domain parts
+  def domain_parts
+    @domain_parts ||= Resolv::DNS::Name.create(domain).to_a.map(&:to_s)
+  end
+
+  # @return [String]
+  def ldap_base
+    domain_parts.map { |s| "dc=#{s}" }.join(",")
+  end
+
+  # @return [String]
+  def admin_ldap_dn
+    "cn=#{admin},#{ldap_base}"
+  end
+
+  # @return [Boolean] if the current user is root
+  def root?
+    Process.uid == ROOT_USER_ID
+  end
+
+  def log(line)
+    STDOUT.puts line
+    Rubynas.logger.info "[#{self.class.name}] #{line}"
+  end
+
+  # Path to the rubynas executable
+  # @return [String]
+  def rubynas
+    File.expand_path('../../../../bin/rubynas', __FILE__)
+  end
+
+  # Executes the installation
+  def run
+    log "Start install of #{Rubynas::VERSION}"
+    INSTALL_ORDER.each do |method|
+      send(method) if respond_to? method
+    end
+  rescue InstallError => ex
+    log "Error: #{ex}"
+    raise ex
+  ensure
+    log "Installation ended"
+  end
+end

data/lib/rubynas/installers/debian_installer.rb

@@ -0,0 +1,199 @@
+require 'etc'
+require 'tempfile'
+require 'fileutils'
+
+class DebianInstaller < BaseInstaller
+  include FileUtils
+
+  def prepare_install
+    log "Updating the package repository"
+    unless system('apt-get update')
+      raise InstallError, "Failed to update the package repository"
+    end
+  end
+
+  def install(*packages)
+    log "Installing #{packages.join(', ')}"
+    ENV['DEBIAN_FRONTEND'] = 'noninteractive'
+    unless system("apt-get install -y #{packages.join(' ')}")
+      raise PackageError, "Failed to install packages #{packages.join(", ")}"
+    end
+  end
+
+  def restart_service(service)
+    log "Start service rubynas"
+    unless system('service rubynas restart')
+      raise InstallError, "Failed to start service"
+    end
+  end
+
+  def debconf(category, key, type, value)
+    case type
+    when :password, :string, :select
+      value = value.to_s
+    when :boolean
+      value = value ? true : false
+    when :multiselect
+      value = value.join(', ')
+    end
+
+    IO.popen("debconf-set-selections", 'w') do |io|
+      io.write "'#{category}' '#{key}' #{type} '#{value}'"
+    end
+    log "Configuring #{category} - #{key}"
+    unless $?.exited?
+      raise ConfigurationError, "Failed to configure #{category} (#{key})"
+    end
+  end
+
+  # Returns the ruby executable
+  def ruby
+    "ruby1.9.3 -S"
+  end
+
+  def configure_ldap
+    log 'Configure LDAP'
+    debconf 'slapd', 'slapd/internal/generated_adminpw', :password, @password
+    debconf 'slapd', 'slapd/password2', :password, @password
+    debconf 'slapd', 'slapd/internal/adminpw', :password, @password
+    debconf 'slapd', 'slapd/password1', :password, @password
+    debconf 'slapd', 'slapd/allow_ldap_v2', :boolean, true
+    debconf 'slapd', 'slapd/invalid_config', :boolean, true
+    debconf 'slapd', 'shared/organization', :string, @domain
+    debconf 'slapd', 'slapd/no_configuration', :boolean, false
+    debconf 'slapd', 'slapd/move_old_database', :boolean, true
+    debconf 'slapd', 'slapd/dump_database_destdir', :string,
+                     '/var/backups/slapd-VERSION'
+    debconf 'slapd', 'slapd/purge_database', :boolean, true
+    debconf 'slapd', 'slapd/domain', :string, @domain
+    debconf 'slapd', 'slapd/backend', :string, 'HDB'
+  end
+
+  def install_ldap
+    install 'ldap-utils', 'slapd'
+  end
+
+  def configure_pam_auth
+    log 'Configure ldap with pam (authentication)'
+    debconf 'libnss-ldapd', 'libnss-ldapd/nsswitch', :multiselect,
+            [:passwd, :group, :shadow]
+    debconf 'libpam-ldapd', 'libpam-ldapd/enable_shadow', :boolean, true
+    debconf 'libnss-ldapd', 'libnss-ldapd/clean_nsswitch', :boolean, false
+
+    log 'Configure the authentication daemon for ldap and pam auth'
+    debconf 'nslcd', 'nslcd/ldap-starttls', :boolean, false
+    debconf 'nslcd', 'nslcd/ldap-sasl-krb5-ccname', :string,
+                     '/var/run/nslcd/nslcd.tkt'
+    debconf 'nslcd', 'nslcd/ldap-auth-type', :select, 'none'
+    debconf 'nslcd', 'nslcd/ldap-uris', :string, 'ldapi:///'
+    debconf 'nslcd', 'nslcd/ldap-base', :string, ldap_base
+    debconf 'nslcd', 'nslcd/ldap-binddn', :string, admin_ldap_dn
+    debconf 'nslcd', 'nslcd/ldap-bindpw', :password, @password
+  end
+
+  def install_pam_auth
+    install 'libnss-ldapd', 'libpam-ldapd', 'nslcd'
+  end
+
+  def install_app
+    create_rubynas_user
+    create_directories
+    create_configuration
+    create_upstart_script
+    migrate_database
+    restart_service :rubynas
+  end
+
+private
+
+  def create_rubynas_user
+    begin
+      Etc.getpwnam('rubynas')
+    rescue ArgumentError => ex
+      log "Create rubynas user"
+      system 'useradd rubynas --system --no-create-home'
+    end
+  end
+
+  def create_directories
+    log "Create directories"
+    mkdir_p '/var/lib/rubynas/'
+  end
+
+  def create_configuration
+    if File.exist? '/etc/rubynas.ini'
+      log "The configuration rubynas.ini already exist!"
+    else
+      log "Create rubynas.ini"
+      File.open('/etc/rubynas.ini', 'w') do |f|
+        config = <<-CONF
+          ;
+          ; This is the configuration file for local development and testing.
+          ;
+
+          ; Configuration for the sqlite3 database
+          [Database]
+          path = %s
+          timeout = 5000
+          pool = 5
+
+          ; Configuration for the ldap server that is used for authentication,
+          ; user and group management
+          [Ldap]
+          host = 127.0.0.1
+          port = 389
+          base = "%s"
+          bind_dn = "%s"
+          password = %s
+
+          ; Server related configuration
+          [Server]
+          ; if syslog set to false it will be logged to stdout
+          syslog = true
+          ; NOTHING HERE YET
+        CONF
+        f.puts config.gsub(/^\s+/, "") % [
+          db_path,
+          ldap_base,
+          admin_ldap_dn,
+          password
+        ]
+      end
+    end
+  end
+
+  def create_upstart_script
+    # Create a rubynas upstart script
+    Tempfile.open('env') do |fe|
+      %w(GEM_HOME GEM_PATH PATH).each do |name|
+        fe.puts "#{name}=#{ENV[name]}" if ENV[name]
+      end
+      fe.flush
+
+      Tempfile.open('Procfile') do |fp|
+        fp.puts "api: exec #{ruby} #{rubynas} server"
+        fp.close
+
+        Foreman::CLI.start [
+          'export', '--app', 'rubynas', '--env', fe.path,
+          '--procfile', fp.path, 'upstart', '/etc/init'
+        ]
+      end
+    end
+  end
+
+  def migrate_database
+    log "Migrate the database"
+    unless system("#{ruby} #{rubynas} migrate")
+      raise InstallError, "Failed to migrate the database"
+    end
+
+    log "Allow access to database by rubynas user"
+    user = Etc.getpwnam('rubynas')
+    chown user.uid, user.gid, db_path
+  end
+
+  def db_path
+    '/var/lib/rubynas/sqlite3.db'
+  end
+end

data/lib/rubynas/installers/ubuntu_installer.rb

@@ -0,0 +1,2 @@
+class UbuntuInstaller < DebianInstaller
+end

data/lib/rubynas/installers/ubuntu_precise_installer.rb

@@ -0,0 +1,2 @@
+class UbuntuPreciseInstaller < UbuntuInstaller
+end

data/lib/rubynas/models/ldap_group.rb

@@ -0,0 +1,21 @@
+class LdapGroup < ActiveLdap::Base
+  ldap_mapping :dn_attribute => 'cn', :prefix => 'ou=groups',
+               :classes => ['top', 'posixGroup']
+
+  # Associate with primary belonged users
+  has_many :primary_members, :foreign_key => 'gidNumber',
+           :class_name => "LdapUser", :primary_key => 'gidNumber'
+
+  # Associate with all belonged users
+  has_many :members, :wrap => "memberUid",
+           :class_name => "LdapUser", :primary_key => 'uid'
+
+  # Creates or finds the admin group. The common name has to be 'Administrators'
+  # @return [LdapGroup]
+  def self.find_or_create_administrators
+    group = LdapGroup.find('Administrators') rescue nil
+    group ||= LdapGroup.create :common_name => "Administrators",
+                               :gid_number => 0
+    group
+  end
+end

data/lib/rubynas/models/ldap_org_unit.rb

@@ -0,0 +1,13 @@
+class LdapOrgUnit < ActiveLdap::Base
+  ldap_mapping dn_attribute: "ou", :classes => ['organizationalUnit'],
+               :scope => :sub, :prefix => ""
+
+  # Creates or finds a unit by name
+  # @param [String] name the name of the unit (ou) to find or create
+  # @return [LdapOrgUnit]
+  def self.find_or_create(name)
+    unit = LdapOrgUnit.find(name) rescue nil
+    unit ||= LdapOrgUnit.create(:ou => name)
+    unit
+  end
+end

data/lib/rubynas/models/ldap_user.rb

@@ -0,0 +1,31 @@
+class LdapUser < ActiveLdap::Base
+  ldap_mapping :dn_attribute => 'cn', :scope => :one,
+               :prefix => 'ou=users', :classes => [
+                 'inetOrgPerson', 'organizationalPerson', 'person', 
+                 'posixAccount', 'top'
+               ]
+
+  # Associate with primary belonged group
+  belongs_to :primary_group, :primary_key => 'gidNumber',
+             :class_name => 'LdapGroup'
+
+  # Associate with all belonged groups
+  belongs_to :groups, :primary_key => 'uid', :many => 'memberUid',
+             :class_name => 'LdapGroup'
+             
+  # Creates or finds the admin user. The common name has to be 'Admin'
+  # @return [LdapUser]
+  def self.find_or_create_admin
+    user = LdapUser.find('Admin') rescue nil
+    user ||= LdapUser.create(
+               :common_name => "Admin",
+               :mail => "admin@rubynas.com",
+               :home_directory => "/root",
+               :uid => "admin",
+               :surname => "Admin",
+               :uid_number => 0,
+               :gid_number => 0,
+               :user_password => ActiveLdap::UserPassword.sha("secret"))
+    user  
+  end
+end

data/lib/rubynas/models/shared_folder.rb

@@ -0,0 +1,32 @@
+class SharedFolder < ActiveRecord::Base
+  attr_accessible :name, :path
+  has_many :shared_folder_services
+  validates_presence_of :name, :path
+  
+  validate :path_exists
+  
+  # Converts the shared folder path to path object
+  # @returns [Pathname]
+  def pathname
+    Pathname.new(path)
+  end
+  
+  # Validate if the path is given and is really a directory
+  def path_exists
+    if path
+      errors.add(:path, "Path dosn't exist") unless pathname.exist? 
+      errors.add(:path, "Path isn't a directory") unless pathname.directory?
+    end
+  end
+  
+  # Searches for the shared folder service that is identified by the given
+  # service class.
+  # @param [Class, String] service_class a klass like AfpShareService
+  # @return [SharedFolderService, nil] the service configuration or nil if
+  #   no confiuration was found
+  def [](service_class)
+    if service = shared_folder_services.where(service_class: service_class).first
+      service.options
+    end
+  end
+end

data/lib/rubynas/models/shared_folder_service.rb

@@ -0,0 +1,15 @@
+class SharedFolderService < ActiveRecord::Base
+  attr_accessible :options, :service_class, :shared_folder
+  belongs_to :shared_folder
+  serialize :options
+  
+  validates_presence_of :service_class, :shared_folder_id
+  
+  # @return [Class] a service class
+  def service_class
+    if service_class = read_attribute("service_class")
+      service_class = service_class.constantize if service_class.is_a?(String)
+      service_class
+    end
+  end
+end

data/lib/rubynas/models/volume.rb

@@ -0,0 +1,16 @@
+class Volume < ActiveRecord::Base
+  attr_accessible :name, :path
+
+  def capacity
+    disk.block_size * disk.total_blocks
+  end
+  
+  def usage
+    used_bytes = (disk.total_blocks - disk.free_blocks) * disk.block_size
+    used_bytes / capacity.to_f * 100
+  end
+  
+  def disk
+    Vmstat.disk(path)
+  end
+end

data/lib/rubynas/services/afp_share_service.rb

@@ -0,0 +1,9 @@
+class AfpShareService < ShareService
+  service_name :netatalk
+
+  def update!
+    if AfpServiceConfiguration.update
+      restart # supplied by base class
+    end
+  end
+end

data/lib/rubynas/services/service.rb

@@ -0,0 +1,4 @@
+class Service
+  def self.service_name(name)
+  end
+end

data/lib/rubynas/services/share_service.rb

@@ -0,0 +1,3 @@
+class ShareService < Service
+  
+end