knjtasks 0.0.3

data/models/class_user_project_link.rb

@@ -0,0 +1,66 @@
+class Knjtasks::User_project_link < Knj::Datarow
+  has_one [
+    :User,
+    :Project
+  ]
+  
+  def self.list(d)
+    if d.args["orderby"] == "user_name"
+      join_users = true
+      orderby = "User.name"
+      d.args.delete("orderby")
+    end
+    
+    sql = "SELECT User_project_link.* FROM User_project_link"
+    
+    if join_users
+      sql += "
+        LEFT JOIN User ON
+          User.id = User_project_link.user_id
+      "
+    end
+    
+    sql += " 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 += " GROUP BY User_project_link.id"
+    
+    if orderby
+      sql += " ORDER BY #{orderby}"
+    else
+      sql += ret[:sql_order]
+    end
+    
+    sql += ret[:sql_limit]
+    
+    return d.ob.list_bysql(:User_project_link, sql)
+  end
+  
+  def self.add(d)
+    user = d.ob.get(:User, d.data[:user_id])
+    project = d.ob.get(:Project, d.data[:project_id])
+    
+    exists = d.ob.get_by(:User_project_link, {
+      "user" => user,
+      "project" => project
+    })
+    raise Errno::EEXIST, _("That user is already assigned to that project.") if exists
+  end
+  
+  def add_after(d)
+    if self.user.has_email?
+      subj = sprintf(_hb.gettext.gettext("Assigned to project: %s", self.user.locale), self.project.name)
+      
+      html = ""
+      html += sprintf(_hb.gettext.gettext("You have been assigned to the project: '%s'.", self.user.locale), self.project.name)
+      
+      _hb.mail(:to => self.user[:email], :subject => subj, :html => html)
+    end
+  end
+end

data/models/class_user_rank.rb

@@ -0,0 +1,3 @@
+class Knjtasks::User_rank < Knj::Datarow
+  
+end

data/models/class_user_rank_link.rb

@@ -0,0 +1,17 @@
+class Knjtasks::User_rank_link < Knj::Datarow
+  has_one [
+    :User,
+    {:class => :User_rank, :col => :rank_id, :method => :rank}
+  ]
+  
+  def self.add(d)
+    user = d.ob.get(:User, d.data[:user_id])
+    rank = d.ob.get(:User_rank, d.data[:rank_id])
+    
+    link = d.ob.get_by(:User_rank_link, {
+      "user" => user,
+      "rank" => rank
+    })
+    raise _("That user already have that rank.") if link
+  end
+end

data/models/class_user_task_list_link.rb

@@ -0,0 +1,17 @@
+class Knjtasks::User_task_list_link < Knj::Datarow
+  has_one [
+    :Task,
+    :User
+  ]
+  
+  def self.add(d)
+    task = d.ob.get(:Task, d.data[:task_id])
+    user = d.ob.get(:User, d.data[:user_id])
+    
+    link = d.ob.get_by(:User_task_list_link, {
+      "task" => task,
+      "user" => user
+    })
+    raise _("That user has already listed that task.") if link
+  end
+end

data/pages/admin.rhtml

@@ -0,0 +1,7 @@
+<%
+  _hb.alert(_("You do not have permission to view this page.")).back if !_site.has_rank?("admin")
+  
+  print _site.header(_("Administration"))
+%>
+
+<a href="?show=comment_update_id_per_obj"><%=_"Comments"%> - <%=_"Update ID per object"%></a><br />

data/pages/comment_edit.rhtml

@@ -0,0 +1,121 @@
+<%
+  if _get["choice"] == "dosave"
+    save_hash = {
+      :comment => _post["texcomment"]
+    }
+  end
+  
+  if _get["comment_id"].to_i > 0
+    comment = _ob.get(:Comment, _get["comment_id"])
+    url = "&comment_id=#{comment.id}"
+    
+    if _get["choice"] == "dosave"
+      comment.update(save_hash)
+      exit
+    end
+    
+    if _get["choice"] == "dodelete"
+      _ob.delete(comment)
+      exit
+    end
+  else
+    url = "&object_class=#{_get["object_class"]}&object_id=#{_get["object_id"]}"
+    
+    if _get["choice"] == "dosave"
+      if _post.has_key?("seltaskstatus")
+        task = _ob.get(:Task, _get["object_id"])
+        last_comment = task.comments("orderby" => [["date_saved", "desc"]], "limit" => 1)
+        
+        if last_comment.empty?
+          save_hash[:id_per_obj] = 1
+        else
+          save_hash[:id_per_obj] = last_comment.first[:id_per_obj].to_i + 1
+        end
+        
+        if task[:status] != _post["seltaskstatus"]
+          task[:status] = _post["seltaskstatus"]
+          save_hash[:comment] = "#{_post["texcomment"]}<div style=\"padding-top: 15px;\">#{sprintf(_("Changed the task-status to '%s'."), task.status_str)}</div>"
+        end
+      end
+      
+      save_hash[:object_class] = _get["object_class"]
+      save_hash[:object_id] = _get["object_id"]
+      comment = _ob.add(:Comment, save_hash)
+      exit
+    end
+  end
+%>
+
+<form id="form_comment" method="get" onsubmit="return do_save_comment();">
+
+<%=_site.boxt(_("Enter details"))%>
+  <table class="form">
+    <%
+      print _hb.inputs({
+        :title => _("Comment"),
+        :name => :texcomment,
+        :value => [comment, :comment],
+        :type => :fckeditor,
+        :height => 380
+      })
+      
+      if _get["object_class"] == "Task"
+        task = _ob.get(:Task, _get["object_id"])
+        
+        print _hb.inputs({
+          :title => _("Task status"),
+          :name => :seltaskstatus,
+          :value => task[:status],
+          :opts => _ob.static(:Task, :status_opts),
+          :descr => _("If you want to change the status of the task as well, then you should choose the new status here.")
+        })
+      end
+    %>
+    <tr>
+      <td colspan="2" class="buttons">
+        <input type="submit" value="<%=_("Save")%>" />
+      </td>
+    </tr>
+  </table>
+<%=_site.boxb%>
+
+</form>
+
+<script type="text/javascript">
+  function do_save_comment(){
+    comment_val = FCKeditorAPI.GetInstance("texcomment").GetHTML();
+    if (comment_val.length <= 0){
+      alert("<%=_('Please write a comment before saving.')%>");
+      return false;
+    }
+    
+    $.ajax({
+      type: "POST",
+      url: "clean.rhtml?show=comment_edit&choice=dosave<%=url%>",
+      data: forms_inputs_read($("#form_comment")),
+      complete: function(data){
+        if (data.responseText.length > 0){
+          alert(data.responseText);
+        }else{
+          events.call("on_comment_added");
+          events.call("do_comments_update");
+          modal_close();
+        }
+      }
+    });
+    return false;
+  }
+  
+  modal_on_opened(function(){
+    try{
+      fckeditor_set_focus();
+    }catch(err){
+      setTimeout("fckeditor_set_focus", 100);
+    }
+  });
+  
+  function fckeditor_set_focus(){
+    oFCKeditor = FCKeditorAPI.GetInstance("texcomment");
+    oFCKeditor.Focus();
+  }
+</script>

data/pages/comment_update_id_per_obj.rhtml

@@ -0,0 +1,41 @@
+<%
+  _hb.alert(_("You do not have permission to view this page.")).back if !_site.has_rank?("admin")
+  
+  if _get["choice"] == "doupdate"
+    objs = {}
+    _db.q("SELECT * FROM Comment WHERE id_per_obj = 0") do |comment_data|
+      objs[comment_data[:object_class]] = {} if !objs.has_key?(comment_data[:object_class])
+      objs[comment_data[:object_class]][comment_data[:object_id]] = true if !objs[comment_data[:object_class]].has_key?(comment_data[:object_id])
+    end
+    
+    objs.each do |class_name, class_ids|
+      class_ids.each do |class_id, temp_val|
+        _db.q("SELECT * FROM Task") do |task_data|
+          count = 0
+          _db.q("SELECT * FROM Comment WHERE object_class = 'Task' AND object_id = '#{task_data[:id]}' ORDER BY date_saved") do |comment_data|
+            count += 1
+            count = comment_data[:id_per_obj].to_i if comment_data[:id_per_obj].to_i > count
+            _db.update(:Comment, {:id_per_obj => count}, {:id => comment_data[:id]}) if comment_data[:id_per_obj].to_i == 0
+          end
+        end
+      end
+    end
+    
+    _hb.alert(_("Done")).redirect("?show=comment_update_id_per_obj")
+  end
+  
+  print _site.header(_("Update comment IDs"))
+%>
+
+<%=_site.boxt(_("Actions"), 350)%>
+  <table class="form">
+    <%
+      
+    %>
+    <tr>
+      <td colspan="2" class="buttons">
+        <input type="button" value="<%=_"Update"%>" onclick="location.href='?show=comment_update_id_per_obj&amp;choice=doupdate';" />
+      </td>
+    </tr>
+  </table>
+<%=_site.boxb%>

data/pages/customer_edit.rhtml

@@ -0,0 +1,69 @@
+<%
+  if !_site.has_rank?("admin")
+    _hb.alert(_("You are not an administrator and cannot view this page.")).back
+  end
+  
+  if _get["choice"] == "dosave"
+    save_hash = {
+      :name => _post["texname"]
+    }
+  end
+  
+  if _get["customer_id"].to_i > 0
+    customer = _ob.get(:Customer, _get["customer_id"])
+    title = sprintf(_("Edit customer: %s"), customer.name.html)
+    
+    if _get["choice"] == "dosave"
+      customer.update(save_hash)
+      _hb.redirect("?show=customer_edit&customer_id#{customer.id}")
+    end
+    
+    if _get["choice"] == "dodelete"
+      _hb.on_error_go_back do
+        _ob.delete(customer)
+        _hb.redirect("?show=customer_search")
+      end
+    end
+  else
+    title = _("Add new customer")
+    
+    if _get["choice"] == "dosave"
+      _hb.on_error_go_back do
+        customer = _ob.add(:Customer, save_hash)
+        _hb.redirect("?show=customer_edit&customer_id=#{customer.id}")
+      end
+    end
+  end
+  
+  print _site.header(title)
+%>
+
+<form method="post" action="?show=customer_edit&amp;choice=dosave<%if customer; print "&amp;customer_id=#{customer.id}"; end%>">
+
+<%=_site.boxt(_("Enter details"), "350px")%>
+  <table class="form">
+    <%
+      print Knj::Web.inputs([{
+        :title => _("Name"),
+        :name => :texname,
+        :value => [customer, :name],
+        :descr => _("The name of the customer as it should appear in the system.")
+      }])
+    %>
+    <tr>
+      <td colspan="2" class="buttons">
+        <%if customer%>
+          <input type="button" value="<%=_("Show")%>" onclick="location.href='?show=customer_show&amp;customer_id=<%=customer.id%>';" />
+          <input type="button" value="<%=_("Delete")%>" onclick="if (confirm('<%=_("Do you want to delete this customer?")%>')){location.href='?show=customer_edit&amp;customer_id=<%=customer.id%>&amp;choice=dodelete';}" />
+        <%end%>
+        <input type="submit" value="<%=_("Save")%>" />
+      </td>
+    </tr>
+  </table>
+<%=_site.boxb%>
+
+</form>
+
+<script type="text/javascript">
+  $("#texname").focus();
+</script>

data/pages/customer_search.rhtml

@@ -0,0 +1,80 @@
+<%
+  print _site.header(_("Search for customers"))
+%>
+
+<form method="get">
+<%=Knj::Web.hiddens([{:name => :show, :value => :customer_search}, {:name => :choice, :value => :dosearch}])%>
+
+<%=_site.boxt(_("Enter criteria"), "350px")%>
+  <table class="form">
+    <%
+      print Knj::Web.inputs([{
+        :title => _("Name"),
+        :name => :texname,
+        :value => _get["texname"],
+        :descr => _("A part of the customers name which you are looking for.")
+      }])
+    %>
+    <tr>
+      <td colspan="2" class="buttons">
+        <input type="button" value="<%=_("Add new customer")%>" onclick="location.href='?show=customer_edit';" />
+        <input type="submit" value="<%=_("Search")%>" />
+      </td>
+    </tr>
+  </table>
+<%=_site.boxb%>
+
+</form>
+
+<script type="text/javascript">
+  $("#texname").focus();
+</script>
+
+<%
+  if _get["choice"] == "dosearch"
+    args = {"orderby" => "name"}
+    
+    if _get["texname"].to_s.length > 0
+      args["name_search"] = _get["texname"]
+    end
+    
+    customers = _ob.list(:Customer, args)
+    
+    %>
+      <br />
+      
+      <%=_site.boxt(_("Results"), "350px")%>
+        <table class="list">
+          <thead>
+            <tr>
+              <th><%=_("Customer")%></th>
+            </tr>
+          </thead>
+          <tbody>
+            <%
+              customers.each do |customer|
+                %>
+                  <tr>
+                    <td>
+                      <%=customer.html%>
+                    </td>
+                  </tr>
+                <%
+              end
+              
+              if customers.empty?
+                %>
+                  <tr>
+                    <td colspan="1" class="error">
+                      <%=_("No customers were found.")%>
+                    </td>
+                  </tr>
+                <%
+              end
+            %>
+          </tbody>
+        </table>
+      <%=_site.boxb%>
+    <%
+  end
+%>

data/pages/customer_show.rhtml

@@ -0,0 +1,50 @@
+<%
+  begin
+    customer = _ob.get(:Customer, _get["customer_id"])
+  rescue
+    _hb.alert(_("That customer do not exist.")).back
+  end
+  
+  print _site.header(sprintf(_("Show customer: %s"), customer.name.html))
+%>
+
+<%=_site.boxt(_("Actions"), "350px")%>
+  <input type="button" value="<%=_("Edit customer")%>" onclick="location.href='?show=customer_edit&amp;customer_id=<%=customer.id%>';" />
+<%=_site.boxb%>
+
+<br />
+
+<%=_site.boxt(_("Projects"), "350px")%>
+  <table class="list">
+    <thead>
+      <tr>
+        <th><%=_("Project")%></th>
+      </tr>
+    </thead>
+    <tbody>
+      <%
+        projects = customer.projects
+        
+        projects.each do |project|
+          %>
+            <tr>
+              <td>
+                <%=project.html%>
+              </td>
+            </tr>
+          <%
+        end
+        
+        if projects.empty?
+          %>
+            <tr>
+              <td colspan="1" class="error">
+                <%=_("No projects has been added for this customer.")%>
+              </td>
+            </tr>
+          <%
+        end
+      %>
+    </tbody>
+  </table>
+<%=_site.boxb%>