Main Page added

50d73f44 · Abinaya Sudhir · 50d73f44 · 50d73f44 · 50d73f44 · 50d73f44
Commit 50d73f44 authored Aug 30, 2017 by Abinaya Sudhir
25 changed files
--- a/.gitignore
+++ b/.gitignore
+/bower_components/
+/node_modules/
+/.pulp-cache/
+/output/
+/generated-docs/
+/.psc*
+/.purs*
+/.psa*
+bundle.js
--- a/bower.json
+++ b/bower.json
+{
+  "name": "purescript-gargantext",
+  "ignore": [
+    "**/.*",
+    "node_modules",
+    "bower_components",
+    "output"
+  ],
+  "dependencies": {
+    "purescript-prelude": "^3.1.0",
+    "purescript-console": "^3.0.0",
+    "purescript-thermite": "^4.1.1",
+    "purescript-affjax": "^4.0.0"
+  },
+  "devDependencies": {
+    "purescript-psci-support": "^3.0.0"
+  }
+}
--- a/dist/css/Login.css
+++ b/dist/css/Login.css
+
+.logoSmall {
+    line-height:15px;
+    height:10px;
+    padding: 10px 10px;
+}
+
+
+.logo-designed {
+    border:15px;
+ }
+
+.logo-designed img {
+    width: 100px;
+    height:150px;
+    border:3px solid white;
+}
--- a/dist/css/bootstrap-theme.css
+++ b/dist/css/bootstrap-theme.css
--- a/dist/css/bootstrap-theme.css.map
+++ b/dist/css/bootstrap-theme.css.map
--- a/dist/css/bootstrap-theme.min.css
+++ b/dist/css/bootstrap-theme.min.css
--- a/dist/css/bootstrap-theme.min.css.map
+++ b/dist/css/bootstrap-theme.min.css.map
--- a/dist/css/bootstrap.css
+++ b/dist/css/bootstrap.css
--- a/dist/css/bootstrap.css.map
+++ b/dist/css/bootstrap.css.map
--- a/dist/css/bootstrap.min.css
+++ b/dist/css/bootstrap.min.css
--- a/dist/css/bootstrap.min.css.map
+++ b/dist/css/bootstrap.min.css.map
--- a/dist/fonts/glyphicons-halflings-regular.eot
+++ b/dist/fonts/glyphicons-halflings-regular.eot
--- a/dist/fonts/glyphicons-halflings-regular.svg
+++ b/dist/fonts/glyphicons-halflings-regular.svg
--- a/dist/fonts/glyphicons-halflings-regular.ttf
+++ b/dist/fonts/glyphicons-halflings-regular.ttf
--- a/dist/fonts/glyphicons-halflings-regular.woff
+++ b/dist/fonts/glyphicons-halflings-regular.woff
--- a/dist/fonts/glyphicons-halflings-regular.woff2
+++ b/dist/fonts/glyphicons-halflings-regular.woff2
--- a/dist/index.html
+++ b/dist/index.html
+<!doctype>
+<html>
+    <head>
+        <meta charset="utf-8"/>
+        <title>CNRS GarganText</title>
+        <link href="./dist/css/bootstrap.min.css" rel="stylesheet">
+        <link rel="stylesheet" type="text/css" href="/static/lib/gargantext/menu.css"/>
+    </head>
+    <body>
+        <div id="app"></div>
+        <script src="bundle.js"></script>
+        <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.12.4/jquery.min.js"></script>
+        <script src="../dist/js/bootstrap.min.js"></script>
+    </body>
+</html>
--- a/dist/js/bootstrap.js
+++ b/dist/js/bootstrap.js
--- a/dist/js/bootstrap.min.js
+++ b/dist/js/bootstrap.min.js
--- a/dist/js/npm.js
+++ b/dist/js/npm.js
+// This file is autogenerated via the `commonjs` Grunt task. You can require() this file in a CommonJS environment.
+require('../../js/transition.js')
+require('../../js/alert.js')
+require('../../js/button.js')
+require('../../js/carousel.js')
+require('../../js/collapse.js')
+require('../../js/dropdown.js')
+require('../../js/modal.js')
+require('../../js/tooltip.js')
+require('../../js/popover.js')
+require('../../js/scrollspy.js')
+require('../../js/tab.js')
+require('../../js/affix.js')
\ No newline at end of file
--- a/package.json
+++ b/package.json
+{
+  "dependencies": {
+    "create-react-class": "^15.6.0",
+    "react": "^15.6.1",
+    "react-dom": "^15.6.1"
+  }
+}
--- a/src/Login.purs
+++ b/src/Login.purs
+module Login where
+
+import Network.HTTP.Affjax (AJAX)
+import Control.Monad.Eff.Console (CONSOLE)
+import DOM (DOM)
+import Prelude hiding (div)
+import React.DOM (a, div, footer, h1, h3, hr, i, img, li, p, span, text, ul)
+import React.DOM.Props (_data, _id, aria, className, href, role, src, tabIndex, target, title)
+import Thermite (PerformAction, Render, Spec, simpleSpec)
+import Thermite as T
+
+newtype State = State
+  { userName :: String
+  , password :: String
+  }
+
+
+initialState :: State
+initialState = State
+  {userName : ""
+ , password : ""
+  }
+
+data Action
+  = NoOp
+  | Documentation
+  | Login
+  | SignUp
+
+
+performAction :: forall eff props.PerformAction (console :: CONSOLE, ajax :: AJAX,dom::DOM | eff) State props Action
+performAction NoOp _ _ = void do
+  T.modifyState \state -> state
+
+performAction Documentation _ _ = void do
+  T.modifyState \state -> state
+
+performAction Login _ _ = void do
+  T.modifyState \state -> state
+
+performAction SignUp _ _ = void do
+  T.modifyState \state -> state
+
+
+
+loginSpec :: forall props eff . Spec (console::CONSOLE, ajax::AJAX, dom::DOM | eff) State props Action
+loginSpec = simpleSpec performAction render
+  where
+    render :: Render State props Action
+    render dispatch _ state _ =
+      [
+        div [ _id "dafixedtop", className "navbar navbar-inverse navbar-fixed-top", role "navigation"]
+        [ div [className "container"]
+          [
+            div [ className "navbar-inner" ]
+            [ a [ className "navbar-brand logoSmall", href "/" ]
+              [ img [ src "/static/img/logoSmall.png", title "Back to home." ]
+                []
+              ]
+            ]
+          ,  div [className "navbar-collapse collapse"]
+             [
+
+             ul [className "nav navbar-nav"]
+               [
+                 li [className "dropdown"]
+                 [
+                   a [ className "dropdown-toggle navbar-text", _data {toggle: "dropdown"}, href "#", role "button", title "Informations about Gargantext" ]
+                   [ span [ aria {hidden : true}, className "glyphicon glyphicon-info-sign" ]
+                     []
+                   , text "Info"
+                   , i [ className "caret" ]
+                     []
+                   ]
+                 ]
+               , ul [className "dropdown-menu"]
+                 [ li []
+                   [ a [tabIndex (-1),  target "blank", title "Documentation and tutorials", href "https://iscpif.fr/gargantext/your-first-map/"]
+                     [text "Documentation"]
+                   ]
+                 , li [className "divider"] []
+                 , li []
+                   [
+                     a [ tabIndex (-1), target "blank", title "About", href "/about/", title "More informations about the project, its sponsors and its authors"]
+                     [ text "About"]
+
+                   ]
+                 ]
+               ]
+             , ul [className "nav navbar-nav pull-right"]
+               [
+                 li [className "dropdown"]
+                 [
+                   a [href "#", role "button", className"dropdown-toggle navbar-text", _data {toggle : "dropdown"}, title "That is your username"]
+                   [ i [className "icon-user"] []
+
+                  ]
+                 ]
+               ]
+             ]
+
+          ]
+        ]
+
+
+      , div [className "container"]
+        [
+          div [className "jumbotron"]
+          [
+            div [className "row"]
+            [
+              div [className "col-md-8 content"]
+              [
+                h1 []
+                [ text "Gargantext" ]
+              , p []
+                [ text "A web platform to explore text-mining" ]
+              , p []
+                [ a [ className "btn btn-primary btn-lg", href "/projects", title "Click and test by yourself" ]
+                  [ span [ aria {hidden : true}, className "glyphicon glyphicon-hand-right" ]
+                    []
+                  , text "Log in"
+                  ]
+                , a [ className "btn btn-warning btn-lg", href "https://iscpif.fr/services/applyforourservices/", target "blank", title "Fill the form to sign up" ]
+                  [ span [ aria {hidden : true}, className "glyphicon glyphicon-hand-right" ]
+                    []
+                  , text "Sign Up"
+                  ]
+                , a [ className "btn btn-success btn-lg", href "https://iscpif.fr/gargantext/your-first-map/", target "blank", title "Fill the form to sign up" ]
+                  [ span [ aria {hidden : true}, className "glyphicon glyphicon-hand-right" ]
+                    []
+                  , text "Documentation"
+                  ]
+                ]
+              , span [ aria {hidden : true}, className "glyphicon glyphicon-warning-sign" ]
+                []
+              , i []
+                [ text "Some features may not work without a javascript optimized browser (Chromium for instance).                        " ]
+
+              ]
+            , div [className "col-md-2 content"]
+              [
+                p [ className "right" ]
+                [ div [className "logo-designed" ]
+                  [ img [ src "/static/img/logo.png", title "Logo designed by dacha and anoe" ]
+                    []
+                  ]
+                ]
+              ]
+            ]
+          ]
+        ]
+
+
+
+
+      , div [ className "container" ]
+        [ div [ className "row" ]
+          [ div [ className "col-md-4 content" ]
+            [ h3 []
+              [ a [ href "#", title "Random sentences in Gargantua's Books chapters, historically true" ]
+                [ text "Historic" ]
+              ]
+            , p []
+              [ text "Chapter 1.XV. How Gargantua was put under other schoolmasters. Chapter 2.XXII. How Panurge served a Parisian lady a trick that pleased her not very well. Chapter 3.XXXVII. How Pantagruel persuaded Panurge to take counsel of a fool. Chapter 4.LXI. How Gaster invented means to get and preserve corn. Chapter 5.XXXVIII. Of the temple's admirable pavement." ]
+            ]
+          , div [ className "col-md-4 content" ]
+            [ h3 []
+              [ a [ href "#", title "Randomized words, semantically and syntaxically falses." ]
+                [ text "Presentation" ]
+              ]
+            , p []
+              [ text "Autem nascetur iaculis, sedfusce enimsed cursus posuere consectetuer eu justo aliquammauris. Phasellus vero nisi porttitor elit quod, leo feliscras ultricies non tempor sagittis. Liberoduis facilisinam erat dapibusnam, lacus dui duis tristique volutpatut quis vestibulum magna. Nobis faucibusvestibulum dolores minim. Bibendumin malesuada adipiscing ante, mattis fames nequeetiam lorem. No diam id. Litora quisaenean commodo lobortisetiam neque, libero mollis scelerisque inceptos ullamcorper sea congue delenit possim.            " ]
+            ]
+          , div [ className "col-md-4 content" ]
+            [ h3 []
+              [ a [ href "#", title "Randomized letters, true or false ?" ]
+                [ text "Tutoreil" ]
+              ]
+            , p []
+              [ text "Il paraît que l'rdore des lettres dans un mot n'a pas d'imtraopnce. La première et la dernière lettre doeivnt être à la bonne place. Le reste peut être dans un désordre total et on peut touojurs lire sans prolèbme. On ne lit donc pas chaque lettre en ellêem-me, mais le mot comme un tout. Un chaegmnent de référentiel et nous tranpossons ce résultat au texte luimê-me: l'rdore des mots est failbement important copamré au contexte du texte qui, lui, est copmté: comptexter avec Gargantext.                "
+              , text " "
+              , text ""
+              ]
+            ]
+          ]
+        ]
+      , hr [] []
+      , footer []
+        [ p []
+          [ text "Gargantext"
+          , span [ aria {hidden : true}, className "glyphicon glyphicon-registration-mark" ]
+            []
+          , text ", version 3.0.6.9.4,"
+          , a [ href "http://www.cnrs.fr", target "blank", title "Institution that enables this project." ]
+            [ text "Copyrights"
+            , span [ aria {hidden : true}, className "glyphicon glyphicon-copyright-mark" ]
+              []
+            , text "CNRS 2017"
+            ]
+          , a [ href "http://gitlab.iscpif.fr/humanities/gargantext/blob/stable/LICENSE", target "blank", title "Legal instructions of the project." ]
+            [ text ", Licences aGPLV3 and CECILL variant Affero compliant" ]
+          , text "."
+          ]
+        ]
+      ]
--- a/src/Main.purs
+++ b/src/Main.purs
+module Main where
+
+import Login (initialState, loginSpec)
+import Prelude
+
+import Control.Monad.Eff.Unsafe (unsafePerformEff)
+import DOM.HTML (window) as DOM
+import DOM.HTML.Types (htmlDocumentToParentNode) as DOM
+import DOM.HTML.Window (document) as DOM
+import DOM.Node.ParentNode (QuerySelector(..))
+import DOM.Node.ParentNode (querySelector) as DOM
+import Data.Maybe (fromJust)
+import Partial.Unsafe (unsafePartial)
+import React as R
+import ReactDOM as RDOM
+import Thermite as T
+
+main :: Unit
+main = unsafePerformEff $ do
+  case T.createReactSpec loginSpec initialState  of
+    { spec, dispatcher } -> void $ do
+      let spec' = spec
+      document <- DOM.window >>= DOM.document
+      container <- unsafePartial (fromJust <$> DOM.querySelector (QuerySelector "#app") (DOM.htmlDocumentToParentNode document))
+      RDOM.render (R.createFactory (R.createClass spec') {}) container
--- a/test/Main.purs
+++ b/test/Main.purs
+module Test.Main where
+
+import Prelude
+import Control.Monad.Eff (Eff)
+import Control.Monad.Eff.Console (CONSOLE, log)
+
+main :: forall e. Eff (console :: CONSOLE | e) Unit
+main = do
+  log "You should add some tests."
--- a/yarn.lock
+++ b/yarn.lock
+# THIS IS AN AUTOGENERATED FILE. DO NOT EDIT THIS FILE DIRECTLY.
+# yarn lockfile v1
+
+
+asap@~2.0.3:
+  version "2.0.6"
+  resolved "https://registry.yarnpkg.com/asap/-/asap-2.0.6.tgz#e50347611d7e690943208bbdafebcbc2fb866d46"
+
+core-js@^1.0.0:
+  version "1.2.7"
+  resolved "https://registry.yarnpkg.com/core-js/-/core-js-1.2.7.tgz#652294c14651db28fa93bd2d5ff2983a4f08c636"
+
+create-react-class@^15.6.0:
+  version "15.6.0"
+  resolved "https://registry.yarnpkg.com/create-react-class/-/create-react-class-15.6.0.tgz#ab448497c26566e1e29413e883207d57cfe7bed4"
+  dependencies:
+    fbjs "^0.8.9"
+    loose-envify "^1.3.1"
+    object-assign "^4.1.1"
+
+encoding@^0.1.11:
+  version "0.1.12"
+  resolved "https://registry.yarnpkg.com/encoding/-/encoding-0.1.12.tgz#538b66f3ee62cd1ab51ec323829d1f9480c74beb"
+  dependencies:
+    iconv-lite "~0.4.13"
+
+fbjs@^0.8.9:
+  version "0.8.14"
+  resolved "https://registry.yarnpkg.com/fbjs/-/fbjs-0.8.14.tgz#d1dbe2be254c35a91e09f31f9cd50a40b2a0ed1c"
+  dependencies:
+    core-js "^1.0.0"
+    isomorphic-fetch "^2.1.1"
+    loose-envify "^1.0.0"
+    object-assign "^4.1.0"
+    promise "^7.1.1"
+    setimmediate "^1.0.5"
+    ua-parser-js "^0.7.9"
+
+iconv-lite@~0.4.13:
+  version "0.4.18"
+  resolved "https://registry.yarnpkg.com/iconv-lite/-/iconv-lite-0.4.18.tgz#23d8656b16aae6742ac29732ea8f0336a4789cf2"
+
+is-stream@^1.0.1:
+  version "1.1.0"
+  resolved "https://registry.yarnpkg.com/is-stream/-/is-stream-1.1.0.tgz#12d4a3dd4e68e0b79ceb8dbc84173ae80d91ca44"
+
+isomorphic-fetch@^2.1.1:
+  version "2.2.1"
+  resolved "https://registry.yarnpkg.com/isomorphic-fetch/-/isomorphic-fetch-2.2.1.tgz#611ae1acf14f5e81f729507472819fe9733558a9"
+  dependencies:
+    node-fetch "^1.0.1"
+    whatwg-fetch ">=0.10.0"
+
+js-tokens@^3.0.0:
+  version "3.0.2"
+  resolved "https://registry.yarnpkg.com/js-tokens/-/js-tokens-3.0.2.tgz#9866df395102130e38f7f996bceb65443209c25b"
+
+loose-envify@^1.0.0, loose-envify@^1.1.0, loose-envify@^1.3.1:
+  version "1.3.1"
+  resolved "https://registry.yarnpkg.com/loose-envify/-/loose-envify-1.3.1.tgz#d1a8ad33fa9ce0e713d65fdd0ac8b748d478c848"
+  dependencies:
+    js-tokens "^3.0.0"
+
+node-fetch@^1.0.1:
+  version "1.7.2"
+  resolved "https://registry.yarnpkg.com/node-fetch/-/node-fetch-1.7.2.tgz#c54e9aac57e432875233525f3c891c4159ffefd7"
+  dependencies:
+    encoding "^0.1.11"
+    is-stream "^1.0.1"
+
+object-assign@^4.1.0, object-assign@^4.1.1:
+  version "4.1.1"
+  resolved "https://registry.yarnpkg.com/object-assign/-/object-assign-4.1.1.tgz#2109adc7965887cfc05cbbd442cac8bfbb360863"
+
+promise@^7.1.1:
+  version "7.3.1"
+  resolved "https://registry.yarnpkg.com/promise/-/promise-7.3.1.tgz#064b72602b18f90f29192b8b1bc418ffd1ebd3bf"
+  dependencies:
+    asap "~2.0.3"
+
+prop-types@^15.5.10:
+  version "15.5.10"
+  resolved "https://registry.yarnpkg.com/prop-types/-/prop-types-15.5.10.tgz#2797dfc3126182e3a95e3dfbb2e893ddd7456154"
+  dependencies:
+    fbjs "^0.8.9"
+    loose-envify "^1.3.1"
+
+react-dom@^15.6.1:
+  version "15.6.1"
+  resolved "https://registry.yarnpkg.com/react-dom/-/react-dom-15.6.1.tgz#2cb0ed4191038e53c209eb3a79a23e2a4cf99470"
+  dependencies:
+    fbjs "^0.8.9"
+    loose-envify "^1.1.0"
+    object-assign "^4.1.0"
+    prop-types "^15.5.10"
+
+react@^15.6.1:
+  version "15.6.1"
+  resolved "https://registry.yarnpkg.com/react/-/react-15.6.1.tgz#baa8434ec6780bde997cdc380b79cd33b96393df"
+  dependencies:
+    create-react-class "^15.6.0"
+    fbjs "^0.8.9"
+    loose-envify "^1.1.0"
+    object-assign "^4.1.0"
+    prop-types "^15.5.10"
+
+setimmediate@^1.0.5:
+  version "1.0.5"
+  resolved "https://registry.yarnpkg.com/setimmediate/-/setimmediate-1.0.5.tgz#290cbb232e306942d7d7ea9b83732ab7856f8285"
+
+ua-parser-js@^0.7.9:
+  version "0.7.14"
+  resolved "https://registry.yarnpkg.com/ua-parser-js/-/ua-parser-js-0.7.14.tgz#110d53fa4c3f326c121292bbeac904d2e03387ca"
+
+whatwg-fetch@>=0.10.0:
+  version "2.0.3"
+  resolved "https://registry.yarnpkg.com/whatwg-fetch/-/whatwg-fetch-2.0.3.tgz#9c84ec2dcf68187ff00bc64e1274b442176e1c84"