bug_hunter 0.0.1

data/lib/bug_hunter/config.rb

@@ -0,0 +1,17 @@
+module BugHunter
+  def self.config_path
+    Dir.home+"/.bughunterrc"
+  end
+
+  def self.config
+    @config ||= YAML.load_file(self.config_path)
+  end
+end
+
+if !File.exist?(BugHunter.config_path)
+  File.open(BugHunter.config_path, "w") do |f|
+    f.write YAML.dump("username" => "admin", "password" => "admin", "enable_auth" => true)
+  end
+
+  $stdout.puts "Created #{BugHunter.config_path} with username=admin password=admin"
+end

data/lib/bug_hunter/middleware.rb

@@ -0,0 +1,28 @@
+module BugHunter
+  class Middleware
+    def initialize(app)
+      @app = app
+    end
+
+    def call(env)
+      response = nil
+      begin
+        response = @app.call(env)
+      rescue StandardError, LoadError, SyntaxError => e
+        error = BugHunter::Error.build_from(env, e)
+
+        if !error.valid? && !error.errors[:uniqueness].empty?
+          BugHunter::Error.collection.update(error.unique_error_selector,
+                                             {:$inc => {:times => 1}, :$set => {:updated_at => Time.now.utc}},
+                                             {:multi => true})
+        else
+          error.save
+        end
+
+        raise e
+      end
+
+      response
+    end
+  end
+end

data/lib/bug_hunter/models.rb

@@ -0,0 +1,167 @@
+module BugHunter
+  class Error
+    include Mongoid::Document
+    include Mongoid::Timestamps
+
+    field :is_rails, :type => Boolean, :default => false
+    field :message, :type => String, :required => true
+    field :backtrace, :type => Array, :required => true
+    field :url, :type => String, :required => true
+    field :params, :type => Hash, :required => true
+
+    field :file, :type => String, :required => true
+    field :line, :type => Integer, :required => true
+    field :method, :type => String
+    field :line_content, :type => String
+
+    field :request_env, :type => Hash, :required => true
+
+    field :times, :type => Integer, :default => 1
+
+    field :action, :type => String
+    field :controller, :type => String
+    field :assignee, :type => String
+
+    field :resolved, :type => Boolean, :default => false
+
+    field :comments, :type => Array, :default => []
+    field :comments_count
+
+    index :message
+    index [
+      [:message, Mongo::ASCENDING],
+      [:file, Mongo::ASCENDING],
+      [:line, Mongo::ASCENDING],
+      [:method, Mongo::ASCENDING]
+    ]
+
+    after_create :update_project
+
+    validate :message do
+      if BugHunter::Error.where(unique_error_selector).only(:_id).first
+        errors.add(:uniqueness, "This error is not unique")
+      end
+    end
+
+    def self.minimal
+      without(:comments, :request_env, :backtrace)
+    end
+
+    def similar_errors
+      self.class.where(:message => unique_error_selector[:message], :_id.ne => self.id)
+    end
+
+    def add_comment(from, message, ip)
+      comment = {:from => from,
+                 :message => message,
+                 :created_at => Time.now.utc,
+                 :ip => ip}
+
+      self.collection.update({:_id => self.id},
+                             {:$push => {:comments => comment},
+                              :$inc => {:comments_count => 1}},
+                             {:multi => true})
+    end
+
+    def resolve!
+      self.collection.update({:_id => self.id},
+                             {:$set => {:resolved => true, :updated_at => Time.now.utc}},
+                             {:multi => true})
+      BugHunter::Project.collection.update({:_id => BugHunter::Project.instance.id},
+                                           {:$inc => {:errors_resolved_count => 1}})
+    end
+
+    def unique_error_selector
+      msg = self[:message]
+      if msg.match(/#<.+>/)
+        msg = /^#{Regexp.escape($`)}/
+      end
+
+      {
+        :message => msg,
+        :file => self.file,
+        :line => self.line,
+        :method => self.method
+      }
+    end
+
+
+    def self.build_from(env, exception)
+      doc = self.new
+      doc[:message] = exception.message
+      doc[:backtrace] = exception.backtrace
+
+      env = env.dup.delete_if {|k,v| k.include?(".") }
+      doc[:request_env] = env
+
+      scheme = if env['HTTP_VERSION'] =~ /^HTTPS/i
+        "https://"
+      else
+        "http://"
+      end
+
+      url = "#{scheme}#{env["HTTP_HOST"]}#{env["REQUEST_PATH"]}"
+      params = {}
+      if env["QUERY_STRING"] && !env["QUERY_STRING"].empty?
+        url << "?#{env["QUERY_STRING"]}"
+
+        env["QUERY_STRING"].split("&").each do |e|
+          k,v = e.split("=")
+          params[k] = v
+        end
+      end
+      doc[:url] = url
+      if defined?(Rails)
+        doc[:is_rails] = true
+        doc[:action] = params[:action]
+        doc[:controller] = params[:controller]
+      end
+
+      doc[:params] = params
+
+      exception.backtrace.each do |line|
+        if line !~ /\/usr/ && line =~ /^(.+):(\d+):in `(.+)'/ # I need better way to detect this
+          doc[:file] = $1
+          doc[:line] = $2.to_i
+          doc[:method] = $3
+
+          doc[:line_content] = File.open(doc[:file]).readlines[doc[:line]-1]
+          break
+        end
+      end
+
+
+      doc
+    end
+
+    def update_project
+      BugHunter::Project.collection.update({:_id => BugHunter::Project.instance.id},
+                                           {:$inc => {:errors_count => 1}})
+    end
+  end # Error
+
+
+  class Project
+    include Mongoid::Document
+    include Mongoid::Timestamps
+
+    field :name, :type => String
+    field :errors_count, :type => Integer, :default => 0
+    field :errors_resolved_count, :type => Integer, :default => 0
+    field :members, :type => Array, :default => []
+
+    validate :on => :create do
+      errors.add(:singleton, "You can't create for than one instance of this model") if BugHunter::Project.first.present?
+    end
+
+    def self.instance
+      if project = BugHunter::Project.first
+        project
+      else
+        BugHunter::Project.create
+      end
+    end
+
+    protected
+  end
+end

data/lib/bug_hunter/routes_helper.rb

@@ -0,0 +1,8 @@
+module BugHunter
+  module RoutesHelper
+    def error_path(error)
+      "#{ENV["BUGHUNTER_PATH"]}/errors/#{error.id}"
+    end
+  end
+end
+

data/lib/bug_hunter/ui_helper.rb

@@ -0,0 +1,44 @@
+module BugHunter
+  module UiHelper
+    def title(v)
+      @title = v
+    end
+
+    def content_for(key, &block)
+      sections[key] = capture_haml(&block)
+    end
+
+    def content(key)
+      if section = sections[key]
+        section.respond_to?(:join) ? section.join : section
+      else
+        ""
+      end
+    end
+
+    def content_tag(name, options={}, &block)
+      "<#{name} #{options.map{|k,v| "#{k}=#{v}" }.join(" ")}>#{block.call}</#{name}>"
+    end
+
+    # list_view(my_collection) {|e| [e.url, e.name, "some extra content"]}
+    def list_view(list = [], options = {}, &_block)
+      content_tag(:ul, :"data-role"=>"listview", :"data-filter"=>options[:filter]||false) do
+        list.map do |e|
+          content_tag :li do
+            url, content, extra = _block.call(e)
+
+            content_tag(:a, :href => url) do
+              content
+            end
+          end
+        end.join
+      end
+    end
+
+    private
+    def sections
+      @sections ||= Hash.new {|k,v| k[v] = [] }
+    end
+  end
+end
+

data/lib/bug_hunter/views/errors/_error_info.haml

@@ -0,0 +1,89 @@
+%table
+  %tr
+    %td
+      %b
+        Asignee:
+    %td
+      &=@error.assignee
+      %a(href="#{error_path(@error)}/assign" data-icon="gear" data-rel="dialog")
+        change...
+  %tr
+    %td
+      %b
+        Message:
+    %td
+      &=@error.message
+  %tr
+    %td
+      %b
+        Times:
+    %td
+      &=@error.times
+  %tr
+    %td
+      %b
+        URL:
+    %td
+      %a(href="#{@error.url}")
+        &=@error.url
+  %tr
+    %td
+      %b
+        Params:
+    %td
+      &=@error.params.inspect
+
+  -if @error.action
+    %tr
+      %td
+        %b
+          Action:
+      %td
+        &=@error.action
+
+  -if @error.controller
+    %tr
+      %td
+        %b
+          Controller:
+      %td
+        &=@error.controller
+
+  %tr
+    %td
+      %b
+        File:
+    %td
+      &=@error.file
+  %tr
+    %td
+      %b
+        Line:
+    %td
+      &=@error.line
+
+  %tr
+    %td
+      %b
+        Method:
+    %td
+      &=@error.method
+
+  %tr
+    %td
+      %b
+        Content:
+    %td
+      &=@error.line_content
+  %tr
+    %td
+      %b
+        Created At:
+    %td
+      &=@error.created_at
+  %tr
+    %td
+      %b
+        Updated At:
+    %td
+      &=@error.updated_at

data/lib/bug_hunter/views/errors/assign.haml

@@ -0,0 +1,24 @@
+-title "Select the member to assign..."
+
+-content_for :body do
+  %h3
+    Add a new member
+
+  %form(action="#{ENV["BUGHUNTER_PATH"]}/add_member" method="post")
+    %input(type="hidden" name="assign_to" value="#{@error.id}")
+    %div(data-role="fieldcontain")
+      %label(for="name")
+        Name or Email:
+      %input(type="text" name="name" id="name")
+
+    %input(type="submit" value="Add")
+
+
+  -if BugHunter::Project.instance.members.count > 0
+    %h3
+      Or select the member:
+    -(BugHunter::Project.instance.members||[]).each do |member|
+      %a(href="#{error_path(@error)}/assign_to?member=#{member}" data-role="button" data-theme="c")
+        &=member
+
+

data/lib/bug_hunter/views/errors/show.haml

@@ -0,0 +1,76 @@
+-title "Error: #{@error.message}"
+
+-content_for :body do
+  =haml :"errors/_error_info"
+
+  %div(data-role="collapsible" data-collapsed=true)
+    %h3
+      Backtrace
+    -@error.backtrace.each do |line|
+      -if line !~ /\/usr/
+        %span.fk_key
+          &=line
+      -else
+        &=line
+      %br
+  %div(data-role="collapsible" data-collapsed=true)
+    %h3
+      Environment
+    %table
+      -@error.request_env.each do |k,v|
+        %tr
+          -if k =~ /^HTTP_/
+            %td.name_key
+              &="#{k}"
+            %td
+              &=v
+          -elsif k =~ /^SERVER_/
+            %td.pk_key
+              &="#{k}"
+            %td
+              &=v
+          -elsif k =~ /^REQUEST_/
+            %td.type_key
+              &="#{k}"
+            %td
+              &=v
+          -else
+            %td
+              &="#{k}"
+            %td
+              &="#{v}"
+  -if @error.similar_errors.count > 0
+    %div(data-role="collapsible" data-collapsed=true)
+      %h3
+        Similar Errors
+      %br
+      =list_view(@error.similar_errors.all) { |error| [error_path(error), h(error.message)] }
+      %br
+
+  %div(data-role="collapsible" data-collapsed=true)
+    %h3
+      Comments
+    -(@error.comments||[]).each do |comment|
+      %div(data-role="collapsible" data-collapsed=false data-theme="b")
+        %h3
+          &= "#{comment["from"]}[#{comment["ip"]}] said on #{comment["created_at"]}"
+        &= comment["message"]
+
+    %hr
+    %h3
+      Add Comment
+    %form(action="#{error_path(@error)}/comment" method="post")
+      %div(data-role="fieldcontain")
+        %label(for="from")
+          From:
+        %input(type="text" name="from" id="from")
+      %div(data-role="fieldcontain")
+        %label(for="message")
+          Message:
+        %textarea(cols="40" rows="8" id="message" name="message")
+
+      %input(type="submit" value="Submit")
+
+-content_for :footer do
+  %a(href="#{error_path(@error)}/resolve" data-icon="check")
+    Resolve this error