[jenkinscat-docs] master: Handler for third step for adding book to Jenkins. (ade437a)

[immanetize at fedoraproject.org]

Repository : http://git.fedorahosted.org/cgit/jenkinscat-docs.git

On branch  : master

>---------------------------------------------------------------

commit ade437a6026fd253029fd4779da85bd57bfc9013
Author: Pavel Tisnovsky <ptisnovs at redhat.com>
Date:   Mon Feb 2 10:56:39 2015 +0100

    Handler for third step for adding book to Jenkins.


>---------------------------------------------------------------

 ChangeLog                 |    5 +++++
 src/jenkinscat/server.clj |   40 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 45 insertions(+), 0 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index b939888..db62429 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-02  Pavel Tisnovsky  <ptisnovs at redhat.com>
+
+	* src/jenkinscat/server.clj:
+	Handler for third step for adding book to Jenkins.
+
 2015-01-23  Pavel Tisnovsky  <ptisnovs at redhat.com>
 
 	* src/jenkinscat/server.clj:
diff --git a/src/jenkinscat/server.clj b/src/jenkinscat/server.clj
index dbe6e41..f284878 100644
--- a/src/jenkinscat/server.clj
+++ b/src/jenkinscat/server.clj
@@ -63,6 +63,12 @@
 (def not-available-message
     "<span style='color:red'>N/A</span>")
 
+(def gerrit-repo-prefix
+    "")
+
+(def internal-svn-repo-prefix
+    "")
+
 
 (def github-repo-prefix
     "https://github.com/")
@@ -944,6 +950,40 @@
                  (generate-response-html (add-book-step-2-renderer/render-add-book-step-2-already-have-bookinfo repository-type repository-name repository-url book-info config/devel-version) session))
     ))
 
+(defn add-book-step-3-handler
+    "Handler for the 'Add book -> Continue -> Continue' command."
+    [uri params session]
+    (let [repository-type   (read-trimmed-parameter-default-nil params "repository-type")
+          repository-name   (read-trimmed-parameter-default-nil params "repository-name")
+          repository-url    (read-trimmed-parameter-default-nil params "repository-url")
+          document-title    (read-trimmed-parameter-default-nil params "document-title")
+          product-name      (read-trimmed-parameter-default-nil params "product-name")
+          product-number    (read-trimmed-parameter-default-nil params "product-number")
+          component-name    (read-trimmed-parameter-default-nil params "component-name")
+          component-product (read-trimmed-parameter-default-nil params "component-product")
+         ]
+         (cond
+             (not repository-type)
+                 (generate-response-html (add-book-step-2-error-pages-renderer/render-add-book-step-2-missing-repository-type) session)
+             (not repository-name)
+                 (generate-response-html (add-book-step-2-error-pages-renderer/render-add-book-step-2-missing-repository-name) session)
+             (not repository-url)
+                 (generate-response-html (add-book-step-2-error-pages-renderer/render-add-book-step-2-missing-repository-url) session)
+             (not document-title)
+                 (generate-response-html (add-book-step-2-error-pages-renderer/render-add-book-step-2-missing-document-title) session)
+             (not product-name)
+                 (generate-response-html (add-book-step-2-error-pages-renderer/render-add-book-step-2-missing-product-name) session)
+             (not product-number)
+                 (generate-response-html (add-book-step-2-error-pages-renderer/render-add-book-step-2-missing-product-number) session)
+             :else
+                 (generate-response-html (add-book-step-3-renderer/render-add-book-step-3 document-title product-name product-number component-name component-product repository-type repository-name repository-url) session))))
+
+(defn build-configuration-help-handler
+    ""
+    [uri params session]
+    (let [page-content (render-build-configuration-help-page)]
+        (generate-response-html page-content session)))
+
 (defn count-books
     [books]
     (let [out-data (new java.util.TreeSet)]