gnu/packages/javascript.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
   3 ;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
   4 ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
   5 ;;; Copyright © 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il>
   6 ;;; Copyright © 2018 Nicolas Goaziou <mail@nicolasgoaziou.fr>
   7 ;;;
   8 ;;; This file is part of GNU Guix.
   9 ;;;
  10 ;;; GNU Guix is free software; you can redistribute it and/or modify it
  11 ;;; under the terms of the GNU General Public License as published by
  12 ;;; the Free Software Foundation; either version 3 of the License, or (at
  13 ;;; your option) any later version.
  14 ;;;
  15 ;;; GNU Guix is distributed in the hope that it will be useful, but
  16 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ;;; GNU General Public License for more details.
  19 ;;;
  20 ;;; You should have received a copy of the GNU General Public License
  21 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
  22
  23 (define-module (gnu packages javascript)
  24   #:use-module ((guix licenses) #:prefix license:)
  25   #:use-module (gnu packages)
  26   #:use-module (gnu packages base)
  27   #:use-module (gnu packages compression)
  28   #:use-module (gnu packages lisp)
  29   #:use-module (gnu packages readline)
  30   #:use-module (guix packages)
  31   #:use-module (guix download)
  32   #:use-module (guix git-download)
  33   #:use-module (guix build-system gnu)
  34   #:use-module (guix build-system trivial)
  35   #:use-module (guix build-system minify))
  36
  37 (define-public font-mathjax
  38   (package
  39     (name "font-mathjax")
  40     (version "2.7.2")
  41     (source
  42      (origin
  43        (method url-fetch)
  44        (uri (string-append
  45              "https://github.com/mathjax/MathJax/archive/"
  46              version ".tar.gz"))
  47        (file-name (string-append name "-" version ".tar.gz"))
  48        (sha256
  49         (base32
  50          "1r72di4pg4i6pfhcskkxqmf1158m81ki6a7lbw6nz4zh7xw23hy4"))))
  51     (build-system trivial-build-system)
  52     (arguments
  53      `(#:modules ((guix build utils))
  54        #:builder
  55        (begin
  56          (use-modules (guix build utils)
  57                       (ice-9 match))
  58          (set-path-environment-variable
  59           "PATH" '("bin") (map (match-lambda
  60                                  ((_ . input)
  61                                   input))
  62                                %build-inputs))
  63          (let ((install-directory (string-append %output "/share/fonts/mathjax")))
  64            (mkdir-p install-directory)
  65            (invoke "tar" "-C" install-directory "-xvf"
  66                    (assoc-ref %build-inputs "source")
  67                    ,(string-append "MathJax-" version "/fonts")
  68                    "--strip" "2")))))
  69     (native-inputs
  70      `(("gzip" ,gzip)
  71        ("tar" ,tar)))
  72     (home-page "https://www.mathjax.org/")
  73     (synopsis "Fonts for MathJax")
  74     (description "This package contains the fonts required for MathJax.")
  75     (license license:asl2.0)))
  76
  77 (define-public js-mathjax
  78   (package
  79     (inherit font-mathjax)
  80     (name "js-mathjax")
  81     (arguments
  82      `(#:modules ((guix build utils))
  83        #:builder
  84        (begin
  85          (use-modules (guix build utils)
  86                       (ice-9 match)
  87                       (ice-9 popen)
  88                       (ice-9 regex))
  89          (set-path-environment-variable
  90           "PATH" '("bin") (map (match-lambda
  91                                  ((_ . input)
  92                                   input))
  93                                %build-inputs))
  94          (set-path-environment-variable
  95           "GUIX_LOCPATH" '("lib/locale")
  96           (list (assoc-ref %build-inputs "glibc-utf8-locales")))
  97          (setenv "LANG" "en_US.UTF-8")
  98          (let ((install-directory (string-append %output "/share/javascript/mathjax")))
  99            (invoke "tar" "xvf" (assoc-ref %build-inputs "source")
 100                    ,(string-append "MathJax-" (package-version font-mathjax)
 101                                    "/unpacked")
 102                    "--strip" "2")
 103            (mkdir-p install-directory)
 104            (symlink (string-append (assoc-ref %build-inputs "font-mathjax")
 105                                    "/share/fonts/mathjax")
 106                     (string-append install-directory "/fonts"))
 107
 108            (for-each
 109             (lambda (file)
 110               (let ((installed (string-append install-directory
 111                                               ;; remove prefix "."
 112                                               (string-drop file 1))))
 113                 (format #t "~a -> ~a~%" file installed)
 114                 (cond
 115                  ((string-match "\\.js$" file)
 116                   (mkdir-p (dirname installed))
 117                   (let ((minified (open-pipe* OPEN_READ "uglify-js" file)))
 118                     (call-with-output-file installed
 119                       (lambda (port)
 120                         (dump-port minified port)))
 121
 122                     (let ((exit (close-pipe minified)))
 123                       (unless (zero? exit)
 124                         (error "dear, uglify-js failed" exit)))))
 125                  (else
 126                   (install-file file (dirname installed))))))
 127             (find-files "."))
 128
 129            #t))))
 130     (native-inputs
 131      `(("font-mathjax" ,font-mathjax)
 132        ("glibc-utf8-locales" ,glibc-utf8-locales)
 133        ("uglify-js" ,uglify-js)
 134        ,@(package-native-inputs font-mathjax)))
 135     (synopsis "JavaScript display engine for LaTeX, MathML, and AsciiMath")
 136     (description "MathJax is a JavaScript display engine for LaTeX, MathML,
 137 and AsciiMath notation that works in all modern browsers.  It requires no
 138 plugins or software to be installed on the browser.  So the page author can
 139 write web documents that include mathematics and be confident that readers will
 140 be able to view it naturally and easily.")))
 141
 142 (define-public js-respond
 143   (package
 144     (name "js-respond")
 145     (version "1.4.2")
 146     (source (origin
 147               (method git-fetch)
 148               (uri (git-reference
 149                      (url "https://github.com/scottjehl/Respond")
 150                      (commit version)))
 151               (file-name (git-file-name name version))
 152               (sha256
 153                (base32
 154                 "00xid731rirc7sdy1gc8qal3v9g0agr2qx15hm4x97l1lcbylyn2"))))
 155     (build-system minify-build-system)
 156     (arguments
 157      `(#:javascript-files '("src/matchmedia.addListener.js"
 158                             "src/matchmedia.polyfill.js"
 159                             "src/respond.js")))
 160     (home-page "https://github.com/scottjehl/Respond")
 161     (synopsis "Polyfill for min/max-width CSS3 Media Queries")
 162     (description "The goal of this script is to provide a fast and lightweight
 163 script to enable responsive web designs in browsers that don't support CSS3
 164 Media Queries.")
 165     (license license:expat)))
 166
 167 (define-public js-html5shiv
 168   (package
 169     (name "js-html5shiv")
 170     (version "3.7.3")
 171     (source (origin
 172               (method git-fetch)
 173               (uri (git-reference
 174                      (url "https://github.com/aFarkas/html5shiv")
 175                      (commit version)))
 176               (file-name (git-file-name name version))
 177               (sha256
 178                (base32
 179                 "0y1c5nyq0brl9fjdihhax33vks4s1ij9iv113879sg3zflmgqpd0"))))
 180     (build-system minify-build-system)
 181     (home-page "https://github.com/aFarkas/html5shiv")
 182     (synopsis "Enable HTML5 sectioning elements in legacy browsers")
 183     (description "The HTML5 Shiv enables use of HTML5 sectioning elements in
 184 legacy Internet Explorer and provides basic HTML5 styling for Internet
 185 Explorer 6-9, Safari 4.x (and iPhone 3.x), and Firefox 3.x.")
 186     ;; From the file "MIT and GPL2 licenses.md":
 187     ;;
 188     ;;   This software is licensed under a dual license system (MIT or GPL
 189     ;;   version 2). This means you are free to choose with which of both
 190     ;;   licenses (MIT or GPL version 2) you want to use this library.
 191     (license (list license:expat license:gpl2))))
 192
 193 (define-public js-json2
 194   (let ((commit "031b1d9e6971bd4c433ca85e216cc853f5a867bd")
 195         (revision "1"))
 196     (package
 197       (name "js-json2")
 198       (version (string-append "2016-10-28." revision "-" (string-take commit 7)))
 199       (source (origin
 200                 (method git-fetch)
 201                 (uri (git-reference
 202                       (url "https://github.com/douglascrockford/JSON-js.git")
 203                       (commit commit)))
 204                 (file-name (string-append name "-" version "-checkout"))
 205                 (sha256
 206                  (base32
 207                   "1fvb6b2y5sd3sqdgcj683sdxcbxdii34q0ysc9wg0dq1sy81l11v"))))
 208       (build-system minify-build-system)
 209       (arguments
 210        `(#:javascript-files '("json2.js"
 211                               "json_parse.js"
 212                               "json_parse_state.js"
 213                               "cycle.js")))
 214       (home-page "https://github.com/douglascrockford/JSON-js")
 215       (synopsis "JSON encoders and decoders")
 216       (description "The files in this collection implement JSON
 217 encoders/decoders in JavaScript.
 218
 219 @code{json2.js}: This file creates a JSON property in the global object, if
 220 there isn't already one, setting its value to an object containing a stringify
 221 method and a parse method.  The @code{parse} method uses the @code{eval}
 222 method to do the parsing, guarding it with several regular expressions to
 223 defend against accidental code execution hazards.  On current browsers, this
 224 file does nothing, preferring the built-in JSON object.
 225
 226 @code{json_parse.js}: This file contains an alternative JSON @code{parse}
 227 function that uses recursive descent instead of @code{eval}.
 228
 229 @code{json_parse_state.js}: This files contains an alternative JSON
 230 @code{parse} function that uses a state machine instead of @code{eval}.
 231
 232 @code{cycle.js}: This file contains two functions, @code{JSON.decycle} and
 233 @code{JSON.retrocycle}, which make it possible to encode cyclical structures
 234 and DAGs in JSON, and to then recover them.  This is a capability that is not
 235 provided by ES5.  @code{JSONPath} is used to represent the links.")
 236       (license license:public-domain))))
 237
 238 (define-public js-strftime
 239   (package
 240     (name "js-strftime")
 241     (version "0.10.0")
 242     (source (origin
 243               (method git-fetch)
 244               (uri (git-reference
 245                      (url"https://github.com/samsonjs/strftime")
 246                      (commit (string-append "v" version))))
 247               (file-name (git-file-name name version))
 248               (sha256
 249                (base32
 250                 "131nmlivazwxyba25kh9lda99749fq4xsyin6lzfalaaydviby4p"))))
 251     (build-system minify-build-system)
 252     (arguments
 253      `(#:javascript-files '("strftime.js")))
 254     (home-page "https://github.com/samsonjs/strftime")
 255     (synopsis "Implementation of strftime to JavaScript")
 256     (description "This is an implementation of the @code{strftime} procedure
 257 for JavaScript.  It works in (at least) node.js and browsers.  It supports
 258 localization and timezones.  Most standard specifiers from C are supported as
 259 well as some other extensions from Ruby.")
 260     (license license:expat)))
 261
 262 (define-public js-highlight
 263   (package
 264     (name "js-highlight")
 265     (version "9.12.0")
 266     (source (origin
 267               (method git-fetch)
 268               (uri (git-reference
 269                      (url "https://github.com/isagalaev/highlight.js")
 270                      (commit version)))
 271               (file-name (git-file-name name version))
 272               (sha256
 273                (base32
 274                 "12qz22qjpd6svj58pwgcwg2x2rzhihfdrxg6lgj39nfpaln6dris"))))
 275     (build-system minify-build-system)
 276     (arguments
 277      `(#:javascript-files '("src/highlight.js")))
 278     (home-page "https://github.com/isagalaev/highlight.js")
 279     (synopsis "Syntax highlighting for JavaScript")
 280     (description "Highlight.js is a syntax highlighter written in JavaScript.
 281 It works in the browser as well as on the server.  It works with pretty much
 282 any markup, doesn’t depend on any framework and has automatic language
 283 detection.")
 284     (license license:bsd-3)))
 285
 286 (define-public js-datatables
 287   (package
 288     (name "js-datatables")
 289     (version "1.10.15")
 290     (source (origin
 291               (method url-fetch)
 292               (uri (string-append "https://datatables.net/releases/DataTables-"
 293                                   version ".zip"))
 294               (sha256
 295                (base32
 296                 "1y9xqyqyz7x1ls3ska71pshl2hpiy3qnw1f7wygyslbhy4ssgf57"))))
 297     (build-system minify-build-system)
 298     (arguments
 299      `(#:javascript-files '("media/js/dataTables.bootstrap.js"
 300                             "media/js/jquery.dataTables.js")))
 301     (native-inputs
 302      `(("unzip" ,unzip)))
 303     (home-page "https://datatables.net")
 304     (synopsis "DataTables plug-in for jQuery")
 305     (description "DataTables is a table enhancing plug-in for the jQuery
 306 Javascript library, adding sorting, paging and filtering abilities to plain
 307 HTML tables with minimal effort.")
 308     (license license:expat)))
 309
 310 (define-public js-selectize
 311   (package
 312     (name "js-selectize")
 313     (version "0.12.6")
 314     (source (origin
 315               (method git-fetch)
 316               (uri (git-reference
 317                      (url "https://github.com/selectize/selectize.js")
 318                      (commit (string-append "v" version))))
 319               (file-name (git-file-name name version))
 320               (sha256
 321                (base32
 322                 "15gichl8wi6yxag2ps723nxrgyan15976dzsnvw9h9py8sbyyzjn"))))
 323     (build-system minify-build-system)
 324     (arguments `(#:javascript-files '("src/selectize.js")))
 325     (home-page "http://selectize.github.io/selectize.js/")
 326     (synopsis "Hybrid widget between a textbox and <select> box")
 327     (description "Selectize is the hybrid of a textbox and @code{<select>}
 328 box.  It's jQuery based and it has autocomplete and native-feeling keyboard
 329 navigation; it is useful for tagging, contact lists, etc.")
 330     (license license:asl2.0)))
 331
 332 (define-public js-es5-shim
 333   (package
 334     (name "js-es5-shim")
 335     (version "4.5.13")
 336     (source (origin
 337               (method git-fetch)
 338               (uri (git-reference
 339                      (url "https://github.com/es-shims/es5-shim")
 340                      (commit (string-append "v" version))))
 341               (file-name (git-file-name name version))
 342               (sha256
 343                (base32
 344                 "142w384fbyllq4yggv173g82lw3wix4jqcg6hkhx1ymq89vvnpmh"))))
 345     (build-system minify-build-system)
 346     (arguments `(#:javascript-files
 347                  '("es5-sham.js"
 348                    "es5-shim.js")))
 349     (home-page "https://github.com/es-shims/es5-shim")
 350     (synopsis "ECMAScript 5 compatibility shims for legacy JavaScript engines")
 351     (description "@code{es5-shim.js} patches a JavaScript context to contain
 352 all ECMAScript 5 methods that can be faithfully emulated with a legacy
 353 JavaScript engine.  @code{es5-sham.js} patches other ES5 methods as closely as
 354 possible.  Many of these shams are intended only to allow code to be written
 355 to ES5 without causing run-time errors in older engines.  In many cases, this
 356 means that these shams cause many ES5 methods to silently fail.")
 357     (license license:expat)))
 358
 359 (define-public js-filesaver
 360   (package
 361     (name "js-filesaver")
 362     (version "1.3.8")
 363     (source (origin
 364               (method git-fetch)
 365               (uri (git-reference
 366                      (url "https://github.com/eligrey/FileSaver.js")
 367                      (commit version)))
 368               (file-name (git-file-name name version))
 369               (sha256
 370                (base32
 371                 "0gvqk0hnr8fig0n4da7vj7q6z31bcyv52916xz3rbmdj3pgpiv1d"))))
 372     (build-system minify-build-system)
 373     (arguments
 374      `(#:phases
 375        (modify-phases %standard-phases
 376          (add-after 'unpack 'fix-uglification
 377            ;; Remove "export" keyword which prevents the file from being
 378            ;; uglified by uglify-js.  Moreover, that keyword is not present in
 379            ;; the minified version of the library some projects are using,
 380            ;; e.g.,
 381            ;; <https://github.com/jmoenig/Snap--Build-Your-Own-Blocks/blob/master/FileSaver.min.js>
 382            (lambda _
 383              (substitute* "src/FileSaver.js"
 384                (("export ") ""))
 385              #t)))))
 386     (home-page
 387      "https://eligrey.com/blog/saving-generated-files-on-the-client-side/")
 388     (synopsis "HTML5 saveAs() FileSaver implementation")
 389     (description "@file{FileSaver.js} implements the @code{saveAs()}
 390 FileSaver interface in browsers that do not natively support it.
 391
 392 @file{FileSaver.js} is the solution to saving files on the
 393 client-side, and is perfect for webapps that need to generate files,
 394 or for saving sensitive information that shouldn't be sent to an
 395 external server.")
 396     (license license:expat)))
 397
 398 (define-public mujs
 399   (package
 400     (name "mujs")
 401     (version "1.0.6")
 402     (source (origin
 403               (method url-fetch)
 404               (uri (string-append "https://mujs.com/downloads/mujs-"
 405                                   version ".tar.xz"))
 406               (sha256
 407                (base32
 408                 "1q9w2dcspfp580pzx7sw7x9gbn8j0ak6dvj75wd1ml3f3q3i43df"))))
 409     (build-system gnu-build-system)
 410     (arguments
 411      '(#:phases
 412        (modify-phases %standard-phases
 413          (delete 'configure)  ; no configure
 414          (add-after 'install 'install-shared-library
 415            (lambda* (#:key (make-flags '()) #:allow-other-keys)
 416              (apply invoke "make" "install-shared" make-flags))))
 417        #:make-flags (list (string-append "prefix=" (assoc-ref %outputs "out"))
 418                           (string-append "CC=gcc"))
 419        #:tests? #f))                    ; no tests
 420     (inputs
 421      `(("readline" ,readline)))
 422     (home-page "https://mujs.com/")
 423     (synopsis "JavaScript interpreter written in C")
 424     (description "MuJS is a lightweight Javascript interpreter designed for
 425 embedding in other software to extend them with scripting capabilities.  MuJS
 426 was designed with a focus on small size, correctness, and simplicity.  It is
 427 written in portable C and implements ECMAScript as specified by ECMA-262.  The
 428 interface for binding with native code is designed to be as simple as possible
 429 to use, and is very similar to Lua.  There is no need to interact with byzantine
 430 C++ template mechanisms, or worry about marking and unmarking garbage collection
 431 roots, or wrestle with obscure build systems.")
 432     (license license:isc)))