knjtasks 0.0.3

data/locales/da_DK/title.txt

@@ -0,0 +1 @@
+Danish

data/locales/en_GB/title.txt

@@ -0,0 +1 @@
+English

data/models/class_comment.rb

@@ -0,0 +1,44 @@
+class Knjtasks::Comment < Knj::Datarow
+  has_one [
+    {:class => :User, :required => true}
+  ]
+  
+  def self.list(d)
+    sql = "SELECT * FROM Comment WHERE 1=1"
+    
+    ret = list_helper(d)
+    d.args.each do |key, val|
+      case key
+        when "object_lookup"
+          sql += " AND object_class = '#{val.table}' AND object_id = '#{d.db.esc(val.id)}'"
+        else
+          raise sprintf(_("Invalid key: %s."), key)
+      end
+    end
+    
+    sql += ret[:sql_where]
+    sql += ret[:sql_order]
+    sql += ret[:sql_limit]
+    
+    return d.ob.list_bysql(:Comment, sql)
+  end
+  
+  def self.add(d)
+    d.data[:user_id ] = _site.user.id if !d.data[:user_id] and _site.user
+    d.data[:date_saved] = Time.new if !d.data[:date_saved]
+    
+    raise "No 'object_class' was given." if !d.data[:object_class]
+    raise "No 'object_id' was given." if !d.data[:object_id]
+    
+    obj = d.ob.get(d.data[:object_class], d.data[:object_id])
+    user = d.ob.get(:User, d.data[:user_id])
+  end
+  
+  def object
+    return ob.get_try(self, :object_id, self[:object_class])
+  end
+  
+  def add_after(d)
+    self.object.send_notify_new_comment(self) if self.object.class.name == "Knjtasks::Task"
+  end
+end

data/models/class_customer.rb

@@ -0,0 +1,13 @@
+class Knjtasks::Customer < Knj::Datarow
+  has_many [
+    {:class => :Project, :col => :customer_id, :depends => true}
+  ]
+  
+  def self.add(d)
+    d.data[:date_added] = Time.new if !d.data[:date_added]
+  end
+  
+  def html
+    return "<a href=\"?show=customer_show&amp;customer_id=#{id}\">#{name.html}</a>"
+  end
+end

data/models/class_email_check.rb

@@ -0,0 +1,7 @@
+class Knjtasks::Email_check < Knj::Datarow
+  def self.checked_id?(d, email_id_str)
+    data = d.db.query("SELECT id FROM Email_check WHERE email_id_str = '#{d.db.esc(email_id_str)}' LIMIT 1").fetch
+    return true if data
+    return false
+  end
+end

data/models/class_project.rb

@@ -0,0 +1,22 @@
+class Knjtasks::Project < Knj::Datarow
+  has_one [
+    {:class => :User, :col => :added_user_id, :method => :added_user, :required => true},
+    {:class => :Customer, :col => :customer_id, :method => :customer, :required => true}
+  ]
+  
+  has_many [
+    {:class => :Task, :col => :project_id, :depends => true},
+    {:class => :User_project_link, :col => :project_id, :method => :users, :autodelete => true, :depends => true}
+  ]
+  
+  def self.add(d)
+    raise _("Invalid name given.") if d.data[:name].to_s.strip.length <= 0
+    
+    d.data[:added_user_id] = _site.user.id if !d.data[:added_user_id] and _site.user
+    d.data[:added_date] = Time.new if !d.data[:added_date]
+  end
+  
+  def html
+    return "<a href=\"?show=project_show&amp;project_id=#{id}\">#{name.html}</a>"
+  end
+end

data/models/class_task.rb

@@ -0,0 +1,163 @@
+class Knjtasks::Task < Knj::Datarow
+  has_many [
+    [:Timelog, :task_id],
+    [:Task_assigned_user, :task_id, :assigned_users],
+    [:Task_check, :task_id, :checks],
+    [:User_task_list_link, :task_id, :user_lists]
+  ]
+  has_one [
+    {:class => :Project, :required => true},
+    :User
+  ]
+  
+  def initialize(*args, &blk)
+    super(*args, &blk)
+    self[:priority] = 1 if self[:priority].to_i <= 0 or self[:priority].to_i > 10
+  end
+  
+  def self.add(d)
+    raise _("No project-ID was given.") if d.data[:project_id].to_i <= 0
+    raise _("Invalid name was given.") if d.data[:name].to_s.strip.length <= 0
+    
+    d.data[:user_id] = _site.user.id if _site.user
+    d.data[:date_added] = Time.now if !d.data[:date_added]
+    d.data[:priority] = 1 if d.data[:priority].to_i <= 0 or d.data[:priority].to_i > 10
+    
+    begin
+      task = d.ob.get(:Project, d.data[:project_id])
+    rescue Errno::ENOENT
+      raise sprintf(_("A project with the given project-ID could not be found: '%s'."), d.data[:project_id])
+    end
+  end
+  
+  def self.type_opts(d)
+    return {
+      :feature => _("Feature"),
+      :bug => _("Bug report"),
+      :question => _("Question")
+    }
+  end
+  
+  def self.status_opts(d)
+    return {
+      :open => _("Open"),
+      :confirmed => _("Confirmed"),
+      :waiting => _("Waiting"),
+      :closed => _("Closed")
+    }
+  end
+  
+  #Sends a notification about a newly added comment to a task.
+  def send_notify_new_comment(comment)
+    self.notify_emails.each do |data|
+      subj = "#{sprintf(_hb.gettext.gettext("Task #%1$s: %2$s", data[:user].locale), self.id, self.name)} - #{sprintf(_hb.gettext.gettext("New comment from: %s", data[:user].locale), comment.user.name)}"
+      
+      if !self.user
+        user_html = "[#{_hb.gettext.gettext("no user", data[:user].locale)}]"
+      else
+        user_html = comment.user.name.html
+      end
+      
+      html = ""
+      
+      html += sprintf(_hb.gettext.gettext("A new comment has been written to the task '%s'.", data[:user].locale), self.name)
+      html += "<br /><br />"
+      
+      html += "<b>#{_hb.gettext.gettext("Author", data[:user].locale)}:</b><br />"
+      html += "#{user_html}<br /><br />"
+      
+      html += "<b>#{_hb.gettext.gettext("Task", data[:user].locale)}:</b><br />"
+      html += "<a href=\"#{url}\">#{url}</a><br /><br />"
+      
+      html += "<b>#{_hb.gettext.gettext("Comment", data[:user].locale)}</b><br />"
+      html += comment[:comment]
+      
+      _hb.mail(:to => data[:email], :subject => subj, :html => html)
+    end
+  end
+  
+  #Sends a 
+  def send_notify_assigned(user_assigned, user_by)
+    return false if user_assigned[:email].to_s.strip.length <= 0
+    
+    subj = sprintf(_hb.gettext.gettext("You have been assigned to: %s", user_assigned.locale), self.name)
+    
+    html = ""
+    
+    html += "<b>#{_hb.gettext.gettext("Assigned by", user_assigned.locale)}:</b><br />"
+    html += "#{user_by.name}<br /><br />"
+    
+    html += "<b>#{_hb.gettext.gettext("Task", user_assigned.locale)}:</b><br />"
+    html += "<a href=\"#{url}\">#{url}</a><br /><br />"
+    
+    html += "<b>#{_hb.gettext.gettext("Description", user_assigned.locale)}</b><br />"
+    html += self[:descr]
+    
+    _hb.mail(:to => user_assigned[:email], :subject => subj, :html => html)
+  end
+  
+  #Returns the emails of the assigned users and the owner as an array.
+  def notify_emails
+    emails = {}
+    emails[self.user[:email]] = self.user if self.user and self.user[:email].to_s.strip.length > 0
+    
+    assigned_users.each do |link|
+      user = link.user
+      next if !user or user[:email].to_s.strip.length <= 0
+      
+      emails[user[:email]] = user
+    end
+    
+    ret = []
+    emails.each do |email, user|
+      ret << {
+        :email => email,
+        :user => user
+      }
+    end
+    
+    return ret
+  end
+  
+  def url
+    return "#{_site.args[:url]}/?show=task_show&task_id=#{id}"
+  end
+  
+  def html
+    return "<a href=\"?show=task_show&amp;task_id=#{id}\">#{name.html}</a>"
+  end
+  
+  def comments(args = {})
+    return _ob.list(:Comment, {"object_lookup" => self}.merge(args))
+  end
+  
+  def has_access?(user = _site.user)
+    return false if !user
+    return true if user.has_rank?("admin")
+    return true if self[:user_id].to_s == user.id.to_s
+    return false
+  end
+  
+  def status_str
+    return ob.static(:Task, :status_opts)[self[:status].to_sym]
+  end
+  
+  def has_view_access?(user)
+    return false if !user
+    return true if self.has_access?(user)
+    
+    task_link = ob.get_by(:Task_assigned_user, {
+      "user" => user,
+      "task" => self
+    })
+    return true if task_link
+    
+    project_link = ob.get_by(:User_project_link, {
+      "user" => user,
+      "project" => self.project
+    })
+    return true if project_link
+    
+    return false
+  end
+end

data/models/class_task_assigned_user.rb

@@ -0,0 +1,62 @@
+class Knjtasks::Task_assigned_user < Knj::Datarow
+  has_one [
+    {:class => :User, :required => true},
+    {:class => :Task, :required => true}
+  ]
+  
+  def self.list(d)
+    sql = "SELECT #{table}.* FROM #{table}"
+    
+    join_task = true if d.args["orderby"] == "project_task_names"
+    join_task = true if d.args["task_status_not"]
+    
+    if join_task
+      orderby = "project_task_names"
+      d.args.delete("orderby")
+      
+      sql += "
+        LEFT JOIN Task ON
+          Task.id = #{table}.task_id
+        
+        LEFT JOIN Project ON
+          Project.id = Task.project_id
+      "
+    end
+    
+    sql += " WHERE 1=1"
+    
+    ret = list_helper(d)
+    d.args.each do |key, val|
+      case key
+        when "task_status_not"
+          sql += " AND Task.status != '#{d.db.esc(val)}'"
+        else
+          raise sprintf(_("Invalid key: %s."), key)
+      end
+    end
+    
+    sql += ret[:sql_where]
+    
+    if orderby == "task_name"
+      sql += " ORDER BY Project.name, Task.name"
+    else
+      sql += ret[:sql_order]
+    end
+    
+    sql += ret[:sql_limit]
+    
+    return d.ob.list_bysql(table, sql)
+  end
+  
+  def self.add(d)
+    link = d.ob.get_by(:Task_assigned_user, {
+      "task_id" => d.data[:task_id],
+      "user_id" => d.data[:user_id]
+    })
+    raise _("That user is already assigned to that task.") if link
+  end
+  
+  def add_after(d)
+    task.send_notify_assigned(user, _site.user)
+  end
+end

data/models/class_task_check.rb

@@ -0,0 +1,26 @@
+class Knjtasks::Task_check < Knj::Datarow
+  has_one [
+    {:class => :User, :col => :added_user_id, :method => :user_added, :required => true},
+    :Task
+  ]
+  
+  def self.list(d)
+    sql = "SELECT * FROM #{table} WHERE 1=1"
+    
+    ret = list_helper(d)
+    d.args.each do |key, val|
+      raise sprintf(_("Invalid key: %s."), key)
+    end
+    
+    sql += ret[:sql_where]
+    sql += ret[:sql_order]
+    sql += ret[:sql_limit]
+    
+    return d.ob.list_bysql(:Task_check, sql)
+  end
+  
+  def self.add(d)
+    d.data[:added_user_id] = _site.user.id if !d.data[:added_user_id] and _site.user
+    d.data[:date_added] = Time.now if !d.data[:date_added]
+  end
+end

data/models/class_timelog.rb

@@ -0,0 +1,82 @@
+class Knjtasks::Timelog < Knj::Datarow
+  has_one [
+    :Task,
+    :User
+  ]
+  
+  def self.list(d)
+    sql = "SELECT"
+    
+    join_tasks = true if d.args["project_id"]
+    
+    if d.args[:count]
+      count = true
+      d.args.delete(:count)
+      sql += "
+        SUM(TIME_TO_SEC(Timelog.time)) AS sum_time,
+        SUM(TIME_TO_SEC(Timelog.time_transport)) AS sum_time_transport,
+        SUM(Timelog.transport_length) AS sum_transport_length
+      "
+    else
+      sql += " Timelog.*"
+    end
+    
+    sql += " FROM Timelog"
+    
+    if join_tasks
+      sql += "
+        LEFT JOIN Task ON
+          Task.id = Timelog.task_id
+      "
+    end
+    
+    sql += " WHERE 1=1"
+    
+    ret = list_helper(d)
+    d.args.each do |key, val|
+      case key
+        when "project_id"
+          if val.is_a?(Array)
+            sql += " AND Task.project_id IN (" + Knj::ArrayExt.join(:arr => val, :sep => ",", :surr => "'", :callback => proc{|data| d.db.esc(data)}) + ")"
+          else
+            sql += " AND Task.project_id = '#{d.db.esc(val)}'"
+          end
+        else
+          raise sprintf(_("Invalid key: %s."), key)
+      end
+    end
+    
+    sql += ret[:sql_where]
+    sql += ret[:sql_order]
+    
+    if count
+      return d.db.query(sql).fetch
+    end
+    
+    sql += ret[:sql_limit]
+    
+    return d.ob.list_bysql(:Timelog, sql)
+  end
+  
+  def self.add(d)
+    d.data[:user_id] = _site.user.id if !d.data[:user_id] and _site.user
+    raise _("No comment has been written.") if d.data[:comment].to_s.length <= 0
+    task = d.ob.get(:Task, d.data[:task_id])
+  end
+  
+  def html(args = {})
+    if args[:key] == :id_localized
+      name = Knj::Locales.number_out(id, 0)
+    elsif args[:key]
+      name = self[args[:key]].html
+    else
+      name = sprintf(_("Timelog %s"), Knj::Locales.number_out(id, 0))
+    end
+    
+    return "<a href=\"javascript: timelog_edit('#{id}');\">#{name}</a>"
+  end
+  
+  def comment_html
+    return Php4r.nl2br(Knj::Web.html(self[:comment]))
+  end
+end

data/models/class_user.rb

@@ -0,0 +1,125 @@
+class Knjtasks::User < Knj::Datarow
+  has_many [
+    {:class => :Task, :col => :user_id, :depends => true},
+    {:class => :Task_assigned_user, :col => :user_id, :method => :assigned_to_tasks, :depends => true},
+    {:class => :User_rank_link, :col => :user_id, :method => :ranks, :depends => true},
+    {:class => :User_project_link, :col => :user_id, :method => :projects, :depends => true},
+    [:User_task_list_link, :user_id, :user_lists]
+  ]
+  
+  def delete
+    raise _("Cannot delete user because that user has created tasks.") if ob.get_by(:Task, {"user" => self})
+  end
+  
+  def name
+    if self[:name].to_s.length > 0
+      return self[:name]
+    elsif self[:username].to_s.length > 0
+      return self[:username]
+    end
+    
+    raise "Could not figure out a name?"
+  end
+  
+  def locale
+    return self[:locale] if self[:locale].to_s.length > 0
+    return "en_GB"
+  end
+  
+  def has_rank?(rank_str)
+    rank = self.ob.get_by(:User_rank, {
+      "id_str" => rank_str
+    })
+    return false if !rank
+    
+    rank_link = self.ob.get_by(:User_rank_link, {
+      "user" => self,
+      "rank" => rank
+    })
+    return false if !rank_link
+    
+    return true
+  end
+  
+  def has_email?
+    return Knj::Strings.is_email?(self[:email])
+  end
+  
+  def html
+    name_str = self[:name]
+    if name_str.to_s.strip.length <= 0
+      name_str = self[:username]
+    end
+    
+    if name_str.to_s.strip.length <= 0
+      name_str = "[#{_("no name")}]"
+    end
+    
+    return "<a href=\"?show=user_show&amp;user_id=#{id}\">#{name_str.html}</a>"
+  end
+  
+  def has_view_access?(user)
+    return false if !user
+    return true if user.has_rank?("admin")
+    
+    res = _db.query("
+      SELECT
+        *
+      
+      FROM
+        User_project_link AS user_link,
+        User_project_link AS my_link
+      
+      WHERE
+        user_link.user_id = '#{_db.esc(user.id)}' AND
+        my_link.user_id = '#{_db.esc(self.id)}' AND
+        user_link.project_id = my_link.project_id
+      
+      LIMIT
+        1
+    ").fetch
+    return true if res
+    
+    return false
+  end
+  
+  def customers
+    customers = {}
+    self.ob.list(:Project, {
+      [:User_project_link, "user_id"] => self.id
+    }) do |project|
+      customer = project.customer
+      next if !customer or customers.key?(customer.id)
+      customers[customer.id] = customer
+    end
+    
+    customers = customers.values.to_a
+    customers.sort do |cust1, cust2|
+      cust1.name.downcase <=> cust2.name.downcase
+    end
+    
+    return customers
+  end
+  
+  #A list of all relevant users for this user (from the same customer).
+  def users_list
+    users = {}
+    
+    self.customers.each do |customer|
+      customer.projects do |project|
+        self.ob.list(:User, {
+          [:User_project_link, "project_id"] => project.id
+        }) do |user|
+          users[user.id] = user
+        end
+      end
+    end
+    
+    users = users.values
+    users.sort do |user1, user2|
+      user1.name.downcase <=> user2.name.downcase
+    end
+    
+    return users
+  end
+end