bell 0.0.1

data/lib/bell/csv_parser.rb

@@ -0,0 +1,52 @@
+module Bell
+  module CSVParser
+    extend self
+    include Displayable, Util::String
+
+    def parse_contacts(options)
+      contact_rows = CSV.read(options[:path])
+    rescue Errno::ENOENT
+      display(Message.no_such_file_or_directory(options[:path]))
+    rescue Errno::EISDIR
+      display(Message.path_is_a_directory(options[:path]))
+    rescue CSV::MalformedCSVError
+      display(Message.invalid_contacts_file(options[:path]))
+    else
+      user = User.find(:name => options[:user][:name]) if options[:user]
+      valid_contacts = []
+      contact_rows.each_with_index do |row, index|
+        if row.size < 2
+          display(Message.row_with_few_columns(row, index + 1))
+        elsif row.size > 2
+          display(Message.row_with_extra_columns(row, index + 1))
+        else
+          contact = if options[:user]
+            UserContact.new(:name => sanitize(row.first),
+                        :number => row.last,
+                        :user_id => user.id)
+          elsif options[:public]
+            PublicContact.new(:name => sanitize(row.first), :number => row.last)
+          end
+          if contact
+            if contact.valid?
+              valid_contacts << contact
+            else
+              display(Message.
+                        formatted_contact_errors(contact,
+                                                 :line_number => index + 1))
+            end
+          end
+        end
+      end
+      if contact_rows.size > 0
+        if contact_rows.size == valid_contacts.size
+          valid_contacts
+        else
+          raise InvalidContacts
+        end
+      else
+        nil
+      end
+    end
+  end
+end

data/lib/bell/dispatcher.rb

@@ -0,0 +1,13 @@
+module Bell
+  class Dispatcher
+    include Util::String
+
+    def self.dispatch(command)
+      Object.
+        const_get(:Bell).
+        const_get(:Handlers).
+        const_get(camelize(command[:handler])).
+        send(command[:action], command[:params])
+    end
+  end
+end

data/lib/bell/displayable.rb

@@ -0,0 +1,13 @@
+module Bell
+  module Displayable
+    def self.included(base)
+      base.extend(ClassMethods)
+    end
+
+    module ClassMethods
+      def display(text)
+        Bell.output.puts text.to_s
+      end
+    end
+  end
+end

data/lib/bell/full_report.rb

@@ -0,0 +1,145 @@
+# encoding: utf-8
+
+module Bell
+  class FullReport
+    def initialize(phone_bill)
+      @phone_bill = phone_bill
+    end
+
+    def to_s
+      "[resumo]
+       #{formatted_total}
+       #{formatted_known_total}
+       #{formatted_public_total}
+       #{formatted_unknown_total}
+       #{formatted_fees_total}
+
+       [usuários]
+       #{users.map { |user| %{#{formatted_user(user)}} }.join("\n")}
+
+       [ligações públicas]
+       #{public_calls.map do |hash|
+         %{#{formatted_call(hash[:call], :contact => hash[:contact])}}
+       end.join("\n")}
+
+       [ligações desconhecidas]
+       #{unknown_calls.map do |call|
+         %{#{formatted_call(call)}}
+       end.join("\n")}".gsub(/^\ {7,}/, '')
+    end
+
+    private
+
+    def formatted_total
+      %{#{"Total:"}}.ljust(25) << sprintf("%.2f", total)
+    end
+
+    def formatted_known_total
+      %{#{"Usuários:"}}.ljust(25) << sprintf("%.2f", known_total)
+    end
+
+    def formatted_public_total
+      %{#{"Públicas:"}}.ljust(25) << sprintf("%.2f", public_total)
+    end
+
+    def formatted_unknown_total
+      %{#{"Desconhecidas:"}}.ljust(25) << sprintf("%.2f", unknown_total)
+    end
+
+    def formatted_fees_total
+      %{#{"Taxas:"}}.ljust(25) << sprintf("%.2f", fees_total)
+    end
+
+    def formatted_user(user)
+      %{#{user[:name]}}.ljust(25) << sprintf("%.2f", user[:total])
+    end
+
+    def formatted_call(call, options = {})
+      contact = call.number_called << if options[:contact]
+        " (#{options[:contact].name})"
+      else
+        ''
+      end
+      time = call.start_time.to_s
+      date = call.date[0, 8].to_s
+      cost = sprintf("%.2f", call.cost)
+      contact.ljust(30) << if time.empty?
+        date.empty? ? ' ' * 20 : ' ' * 10 << "#{date}  "
+      else
+        date.empty? ? ' ' * 12 << "#{time}" : "#{time}  #{date}  "
+      end << cost
+    end
+
+    def calls
+      @calls ||= @phone_bill.calls
+    end
+
+    def fees
+      @fees ||= @phone_bill.fees
+    end
+
+    def known_calls
+      @known_calls ||= calls.inject([]) do |memo, call|
+        UserContact.find(:number => call.number_called) ? memo << call : memo
+      end
+    end
+
+    def public_calls
+      @public_calls ||= calls.inject([]) do |memo, call|
+        if contact = PublicContact.find(:number => call.number_called)
+          memo << { :call => call, :contact => contact }
+        else
+          memo
+        end
+      end
+    end
+
+    def unknown_calls
+      calls - (public_calls.map { |c| c[:call] } + known_calls)
+    end
+
+    def fees_total
+      @fees_total ||= fees.inject(0) { |memo, call| memo += call.cost.to_f }
+    end
+
+    def total
+      @total ||= @phone_bill.total
+    end
+
+    def known_total
+      @known_total ||= known_calls.inject(0) do |memo, call|
+        memo += call.cost.to_f
+      end
+    end
+
+    def public_total
+      @public_total ||= public_calls.inject(0) do |memo, hash|
+        memo += hash[:call].cost.to_f
+      end
+    end
+
+    def unknown_total
+      @unknown_total ||= unknown_calls.inject(0) do |memo, call|
+        memo += call.cost.to_f
+      end
+    end
+
+    def user_total(user_name)
+      user = User.find(:name => user_name)
+      subtotal = calls.inject(0) do |total, call|
+        if UserContact.find(:number => call.number_called, :user_id => user.id)
+          total += call.cost.to_f
+        else
+          total
+        end
+      end
+      subtotal + (unknown_total + fees_total) / User.all.size
+    end
+
+    def users
+      User.all.inject([]) do |users_hash, user|
+        users_hash << { :name => user.name, :total => user_total(user.name) }
+      end
+    end
+  end
+end

data/lib/bell/handlers/contacts_handler.rb

@@ -0,0 +1,79 @@
+# encoding: utf-8
+
+module Bell
+  module Handlers
+    class ContactsHandler
+      include Displayable
+
+      def self.list(params = {})
+        if params.empty?
+          if UserContact.empty?
+            display Message.no_contacts_created
+          else
+            display formatted_contact_list(UserContact.all + PublicContact.all)
+          end
+        else
+          if user = User.find(:name => params[:user][:name])
+            if user.contacts.empty?
+              display Message.contact_list_empty(user.name)
+            else
+              display formatted_contact_list(user.contacts,
+                                             :user_contacts => true,
+                                             :csv => params[:csv])
+            end
+          else
+            display Message.user_does_not_exist(params[:user][:name])
+          end
+        end
+      end
+
+      def self.import(params)
+        if params[:user]
+          user = User.find(:name => params[:user][:name])
+          if user
+            if contacts = CSVParser.parse_contacts(params)
+              contacts.each do |contact|
+                contact.save && display(Message.contact_created(contact))
+              end
+            end
+          else
+            display(Message.user_does_not_exist(params[:user][:name]))
+          end
+        elsif params[:public]
+          if contacts = CSVParser.parse_contacts(params)
+            contacts.each do |contact|
+              contact.save &&
+                display(Message.contact_created(contact, :public => true))
+            end
+          end
+        end
+      rescue InvalidContacts
+        display(Message.no_contacts_created)
+      end
+
+      private
+
+      def self.text_contact_list(contacts, options)
+        contacts.inject('') do |list, contact|
+          list << "#{contact.name} (#{contact.number})"
+          if contact.is_a?(PublicContact)
+            list << " - público"
+          else
+            list << " - #{contact.user.name}" unless options[:user_contacts]
+          end
+          list << "\n"
+        end
+      end
+
+      def self.csv_contact_list(contacts)
+        contacts.inject('') do |list, contact|
+          list << "\"#{contact.name}\",#{contact.number}\n"
+        end
+      end
+
+      def self.formatted_contact_list(contacts, options = {})
+        options[:csv] ? csv_contact_list(contacts) : text_contact_list(contacts, options)
+      end
+    end
+  end
+end

data/lib/bell/handlers/implosions_handler.rb

@@ -0,0 +1,9 @@
+module Bell::Handlers
+  class ImplosionsHandler
+    include Bell::Displayable
+
+    def self.implode(params = {})
+      Bell.implode!
+    end
+  end
+end

data/lib/bell/handlers/reports_handler.rb

@@ -0,0 +1,41 @@
+module Bell::Handlers
+  class ReportsHandler
+    include Bell::Displayable
+
+    def self.full_report(params = {})
+      phone_bill = Embratel::PhoneBill.new(params[:path])
+    rescue Errno::ENOENT
+      display Bell::Message.no_such_file_or_directory(params[:path])
+    rescue Errno::EISDIR
+      display Bell::Message.path_is_a_directory(params[:path])
+    rescue Bell::CSV::MalformedCSVError
+      display Bell::Message.malformed_csv_file(params[:path])
+    rescue Embratel::NonCSVFileError
+      display Bell::Message.non_csv_file(params[:path])
+    rescue Embratel::InvalidRowsError
+      display Bell::Message.invalid_rows(params[:path], $!.message)
+    else
+      display Bell::FullReport.new(phone_bill).to_s
+    end
+
+    def self.user_report(params = {})
+      phone_bill = Embratel::PhoneBill.new(params[:path])
+    rescue Errno::ENOENT
+      display Bell::Message.no_such_file_or_directory(params[:path])
+    rescue Errno::EISDIR
+      display Bell::Message.path_is_a_directory(params[:path])
+    rescue Bell::CSV::MalformedCSVError
+      display Bell::Message.malformed_csv_file(params[:path])
+    rescue Embratel::NonCSVFileError
+      display Bell::Message.non_csv_file(params[:path])
+    rescue Embratel::InvalidRowsError
+      display Bell::Message.invalid_rows(params[:path], $!.message)
+    else
+      if Bell::User.find(:name => params[:user][:name])
+        display Bell::UserReport.new(phone_bill, params[:user][:name]).to_s
+      else
+        display Bell::Message.user_does_not_exist(params[:user][:name])
+      end
+    end
+  end
+end

data/lib/bell/handlers/users_handler.rb

@@ -0,0 +1,50 @@
+module Bell::Handlers
+  class UsersHandler
+    include Bell::Displayable
+
+    def self.create(params = {})
+      if Bell::User.find(:name => params[:user][:name])
+        display Bell::Message.user_already_exists(params[:user][:name])
+      else
+        Bell::User.create(:name => params[:user][:name])
+        display Bell::Message.user_created(params[:user][:name])
+      end
+    end
+
+    def self.rename(params = {})
+      if user = Bell::User.find(:name => params[:user][:source_name])
+        if Bell::User.find(:name => params[:user][:target_name])
+          display Bell::Message.user_already_exists(params[:user][:target_name])
+        else
+          user.name = params[:user][:target_name]
+          user.save
+          display Bell::Message.user_renamed(params[:user])
+        end
+      else
+        display Bell::Message.user_does_not_exist(params[:user][:source_name])
+      end
+    end
+
+    def self.list(params = {})
+      if Bell::User.empty?
+        display Bell::Message.no_created_users
+      else
+        display formatted_user_list
+      end
+    end
+
+    def self.remove(params = {})
+      if user = Bell::User.find(:name => params[:user][:name])
+        user.destroy
+        display Bell::Message.user_removed(params[:user][:name])
+      else
+        display Bell::Message.user_does_not_exist(params[:user][:name])
+      end
+    end
+
+    private
+    def self.formatted_user_list
+      Bell::User.all.map(&:name).join("\n")
+    end
+  end
+end

data/lib/bell/handlers.rb

@@ -0,0 +1,4 @@
+require File.join(File.dirname(__FILE__), 'handlers', 'users_handler')
+require File.join(File.dirname(__FILE__), 'handlers', 'contacts_handler')
+require File.join(File.dirname(__FILE__), 'handlers', 'reports_handler')
+require File.join(File.dirname(__FILE__), 'handlers', 'implosions_handler')

data/lib/bell/message.rb

@@ -0,0 +1,115 @@
+# encoding: utf-8
+
+module Bell
+  module Message
+    extend self
+    include Util
+
+    def no_created_users
+      "Nenhum usuário criado."
+    end
+
+    def user_created(user_name)
+      "Usuário '#{user_name}' criado."
+    end
+
+    def user_already_exists(user_name)
+      "erro: o usuário '#{user_name}' já existe."
+    end
+
+    def user_does_not_exist(user_name)
+      "erro: o usuário '#{user_name}' não existe."
+    end
+
+    def user_removed(user_name)
+      "Usuário '#{user_name}' removido."
+    end
+
+    def user_renamed(user)
+      "Usuário '#{user[:source_name]}' renomeado para '#{user[:target_name]}'."
+    end
+
+    def no_contacts_created
+      "Nenhum contato criado."
+    end
+
+    def contact_list_empty(user_name)
+      "A lista de contatos do usuário '#{user_name}' está vazia."
+    end
+
+    def contact_created(contact, options = {})
+      "'#{contact.name} (#{contact.number})' adicionado à lista de " <<
+      if options[:public]
+        "contatos públicos."
+      else
+        "contatos do usuário '#{contact.user.name}'."
+      end
+    end
+
+    def contact_removed(contact_name)
+      "Contato '#{contact_name}' removido."
+    end
+
+    def contact_name_taken(contact_name)
+      contact = UserContact.find(:name => contact_name)
+      "erro: este nome já é usado pelo contato '#{contact.name} (#{contact.number})' do usuário '#{contact.user.name}'.\nCrie um contato com nome diferente." if contact
+    end
+
+    def contact_number_taken(contact_number)
+      contact = UserContact.find(:number => contact_number)
+      "erro: este número já é usado pelo contato '#{contact.name} (#{contact.number})' do usuário '#{contact.user.name}'.\nCrie um contato com número diferente." if contact
+    end
+
+    def contact_number_bad_format(contact_number)
+      "erro: '#{contact_number}' não é um número de telefone válido.\nVeja 'bell --help' para saber mais sobre o formato aceito."
+    end
+
+    def no_such_file_or_directory(path)
+      "erro: o arquivo/diretório '#{path}' não existe."
+    end
+
+    def path_is_a_directory(path)
+      "erro: '#{path}' é um diretório."
+    end
+
+    def malformed_csv_file(path)
+      "erro: '#{path}' é um arquivo CSV danificado."
+    end
+
+    def non_csv_file(path)
+      "erro: '#{path}' não é um arquivo CSV."
+    end
+
+    def invalid_rows(path, message)
+      lines = message.match(/(?:\d+, )*(?:\d+)$/).to_a
+      "erro: '#{path}' tem " <<
+        lines.size == 1 ? 'erro na linha ' : 'erros nas linhas ' <<
+        lines.join(', ')
+    end
+
+    def invalid_contacts_file(path)
+      "erro: '#{path}' não é um arquivo de contatos válido."
+    end
+
+    def row_with_extra_columns(row, line_number)
+      "erro: a linha #{line_number}: '#{row.to_s}' tem mais de duas colunas.\nCada linha deve ter duas colunas, sendo a primeira o nome e a segunda o telefone do contato."
+    end
+
+    def row_with_few_columns(row, line_number)
+      "erro: a linha #{line_number}: '#{row.to_s}' tem mais de duas colunas.\nCada linha deve ter duas colunas, sendo a primeira o nome e a segunda o telefone do contato."
+    end
+
+    def row_with_short_number(row, line_number)
+      "erro: o número de telefone #{row.to_s} na linha '#{line_number}' é muito curto.\nNúmeros de telefone devem ter 10 dígitos, sendo os 2 primeiros o DDD."
+    end
+
+    def formatted_contact_errors(contact, options = {})
+      contact_error = contact.errors.first.last.first
+      if options[:line_number]
+        contact_error.split("\n").first.insert(4, " na linha #{options[:line_number]}")
+      else
+        contact_error
+      end
+    end
+  end
+end

data/lib/bell/public_contact.rb

@@ -0,0 +1,17 @@
+module Bell
+  class PublicContact < Sequel::Model
+    plugin :validation_helpers
+
+    def validate
+      super
+      validates_unique(:number,
+                       :message => Message.contact_number_taken(number))
+      validates_format(/^\d{10}$/,
+                       :number,
+                       :message => Message.contact_number_bad_format(number))
+      if UserContact.find(:number => number)
+        errors.add(:number, Message.contact_number_taken(number))
+      end
+    end
+  end
+end

data/lib/bell/user.rb

@@ -0,0 +1,16 @@
+module Bell
+  class User < Sequel::Model
+    one_to_many(:contacts, :class => UserContact)
+    plugin(:validation_helpers)
+
+    def after_destroy
+      super
+      contacts.each(&:delete)
+    end
+
+    def validate
+      super
+      validates_unique(:name)
+    end
+  end
+end

data/lib/bell/user_contact.rb

@@ -0,0 +1,18 @@
+module Bell
+  class UserContact < Sequel::Model
+    many_to_one(:user)
+    plugin(:validation_helpers)
+
+    def validate
+      super
+      validates_unique(:number,
+                       :message => Message.contact_number_taken(number))
+      validates_format(/^\d{10}$/,
+                       :number,
+                       :message => Message.contact_number_bad_format(number))
+      if PublicContact.find(:number => number)
+        errors.add(:number, Message.contact_number_taken(number))
+      end
+    end
+  end
+end

data/lib/bell/user_report.rb

@@ -0,0 +1,88 @@
+# encoding: utf-8
+
+module Bell
+  class UserReport
+    include Bell::Util::String
+
+    def initialize(phone_bill, user_name)
+      @phone_bill = phone_bill
+      @user_name = user_name
+    end
+
+    def user
+      Bell::User.find(:name => @user_name)
+    end
+
+    def calls
+      @phone_bill.calls.inject([]) do |calls, call|
+        if Bell::UserContact.find(:user_id => user.id, :number => call.number_called)
+          calls << call
+        else
+          calls
+        end
+      end
+    end
+
+    def total
+      calls.inject(0) { |total, call| total += call.cost.to_f }
+    end
+
+    def to_s
+      "#{formatted_header}\n#{formatted_contact_calls}\n\n#{formatted_total}"
+    end
+
+    private
+
+    def formatted_header
+      "Data".ljust(15) <<
+      "Contato".ljust(20) <<
+      "Número".ljust(15) <<
+      "Horário".ljust(20) <<
+      "Custo"
+    end
+
+    def contact_calls
+      calls.inject([]) do |contact_calls, call|
+        if contact = Bell::UserContact.find(:number => call.number_called)
+          contact_calls << { :contact => contact, :call => call }
+        else
+          contact_calls
+        end
+      end
+    end
+
+    def formatted_total
+      "Total: R$ #{sprintf("%.2f", total)}"
+    end
+
+    def formatted_contact_name(contact_name)
+      if contact_name.size > 20
+        shortened_contact_name = contact_name[0, 15].rstrip.concat('...')
+      else
+        shortened_contact_name = contact_name
+      end
+
+      multibyte_characters = shortened_contact_name.size -
+                               multibyte_length(shortened_contact_name)
+      formatted_contact_name = shortened_contact_name.
+                                 ljust(20 + multibyte_characters)
+    end
+
+    def formatted_contact_call(contact_call)
+      contact = contact_call[:contact]
+      call = contact_call[:call]
+
+
+      call.date[0, 8].ljust(15) <<
+      formatted_contact_name(contact.name) <<
+      call.number_called.ljust(15) <<
+      call.start_time.ljust(20) <<
+      sprintf("%.2f", call.cost)
+    end
+
+    def formatted_contact_calls
+      contact_calls.
+        map { |contact_call| formatted_contact_call(contact_call) }.join("\n")
+    end
+  end
+end