gnu/packages/javascript.scm

   1 ;;; GNU Guix --- Functional package management for GNU
   2 ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
   3 ;;; Copyright © 2017, 2019 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-xyz)
  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.19")
 290     (source (origin
 291               (method url-fetch)
 292               (uri (string-append "https://datatables.net/releases/DataTables-"
 293                                   version ".zip"))
 294               (sha256
 295                (base32
 296                 "0cff8a1g7pjwbjdqq0yzqd963ar7pfi4splmm6rwdzganr77rkhb"))))
 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-requirejs
 311   (package
 312     (name "js-requirejs")
 313     (version "2.3.6")
 314     (source (origin
 315               (method git-fetch)
 316               (uri (git-reference
 317                      (url "https://github.com/requirejs/requirejs.git")
 318                      (commit version)))
 319               (file-name (git-file-name name version))
 320               (sha256
 321                (base32
 322                 "0cvd5y2mb3h6yil3niqn3gjqrzixdsxcz4rvc2f0hg4kzp5y0w86"))))
 323     (build-system minify-build-system)
 324     (arguments `(#:javascript-files '("require.js")))
 325     (home-page "https://github.com/requirejs/requirejs/")
 326     (synopsis "File and module loader for JavaScript")
 327     (description "RequireJS loads plain JavaScript files as well as more
 328 defined modules.  It is optimized for in-browser use, including in a Web
 329 Worker, but it can be used in other JavaScript environments.")
 330     (license license:expat)))
 331
 332 (define-public js-selectize
 333   (package
 334     (name "js-selectize")
 335     (version "0.12.6")
 336     (source (origin
 337               (method git-fetch)
 338               (uri (git-reference
 339                      (url "https://github.com/selectize/selectize.js")
 340                      (commit (string-append "v" version))))
 341               (file-name (git-file-name name version))
 342               (sha256
 343                (base32
 344                 "15gichl8wi6yxag2ps723nxrgyan15976dzsnvw9h9py8sbyyzjn"))))
 345     (build-system minify-build-system)
 346     (arguments `(#:javascript-files '("src/selectize.js")))
 347     (home-page "http://selectize.github.io/selectize.js/")
 348     (synopsis "Hybrid widget between a textbox and <select> box")
 349     (description "Selectize is the hybrid of a textbox and @code{<select>}
 350 box.  It's jQuery based and it has autocomplete and native-feeling keyboard
 351 navigation; it is useful for tagging, contact lists, etc.")
 352     (license license:asl2.0)))
 353
 354 (define-public js-es5-shim
 355   (package
 356     (name "js-es5-shim")
 357     (version "4.5.13")
 358     (source (origin
 359               (method git-fetch)
 360               (uri (git-reference
 361                      (url "https://github.com/es-shims/es5-shim")
 362                      (commit (string-append "v" version))))
 363               (file-name (git-file-name name version))
 364               (sha256
 365                (base32
 366                 "142w384fbyllq4yggv173g82lw3wix4jqcg6hkhx1ymq89vvnpmh"))))
 367     (build-system minify-build-system)
 368     (arguments `(#:javascript-files
 369                  '("es5-sham.js"
 370                    "es5-shim.js")))
 371     (home-page "https://github.com/es-shims/es5-shim")
 372     (synopsis "ECMAScript 5 compatibility shims for legacy JavaScript engines")
 373     (description "@code{es5-shim.js} patches a JavaScript context to contain
 374 all ECMAScript 5 methods that can be faithfully emulated with a legacy
 375 JavaScript engine.  @code{es5-sham.js} patches other ES5 methods as closely as
 376 possible.  Many of these shams are intended only to allow code to be written
 377 to ES5 without causing run-time errors in older engines.  In many cases, this
 378 means that these shams cause many ES5 methods to silently fail.")
 379     (license license:expat)))
 380
 381 (define-public js-filesaver
 382   (package
 383     (name "js-filesaver")
 384     (version "1.3.8")
 385     (source (origin
 386               (method git-fetch)
 387               (uri (git-reference
 388                      (url "https://github.com/eligrey/FileSaver.js")
 389                      (commit version)))
 390               (file-name (git-file-name name version))
 391               (sha256
 392                (base32
 393                 "0gvqk0hnr8fig0n4da7vj7q6z31bcyv52916xz3rbmdj3pgpiv1d"))))
 394     (build-system minify-build-system)
 395     (arguments
 396      `(#:phases
 397        (modify-phases %standard-phases
 398          (add-after 'unpack 'fix-uglification
 399            ;; Remove "export" keyword which prevents the file from being
 400            ;; uglified by uglify-js.  Moreover, that keyword is not present in
 401            ;; the minified version of the library some projects are using,
 402            ;; e.g.,
 403            ;; <https://github.com/jmoenig/Snap--Build-Your-Own-Blocks/blob/master/FileSaver.min.js>
 404            (lambda _
 405              (substitute* "src/FileSaver.js"
 406                (("export ") ""))
 407              #t)))))
 408     (home-page
 409      "https://eligrey.com/blog/saving-generated-files-on-the-client-side/")
 410     (synopsis "HTML5 saveAs() FileSaver implementation")
 411     (description "@file{FileSaver.js} implements the @code{saveAs()}
 412 FileSaver interface in browsers that do not natively support it.
 413
 414 @file{FileSaver.js} is the solution to saving files on the
 415 client-side, and is perfect for webapps that need to generate files,
 416 or for saving sensitive information that shouldn't be sent to an
 417 external server.")
 418     (license license:expat)))
 419
 420 (define-public mujs
 421   (package
 422     (name "mujs")
 423     (version "1.0.6")
 424     (source (origin
 425               (method url-fetch)
 426               (uri (string-append "https://mujs.com/downloads/mujs-"
 427                                   version ".tar.xz"))
 428               (sha256
 429                (base32
 430                 "1q9w2dcspfp580pzx7sw7x9gbn8j0ak6dvj75wd1ml3f3q3i43df"))))
 431     (build-system gnu-build-system)
 432     (arguments
 433      '(#:phases
 434        (modify-phases %standard-phases
 435          (delete 'configure)  ; no configure
 436          (add-after 'install 'install-shared-library
 437            (lambda* (#:key (make-flags '()) #:allow-other-keys)
 438              (apply invoke "make" "install-shared" make-flags))))
 439        #:make-flags (list (string-append "prefix=" (assoc-ref %outputs "out"))
 440                           (string-append "CC=gcc"))
 441        #:tests? #f))                    ; no tests
 442     (inputs
 443      `(("readline" ,readline)))
 444     (home-page "https://mujs.com/")
 445     (synopsis "JavaScript interpreter written in C")
 446     (description "MuJS is a lightweight Javascript interpreter designed for
 447 embedding in other software to extend them with scripting capabilities.  MuJS
 448 was designed with a focus on small size, correctness, and simplicity.  It is
 449 written in portable C and implements ECMAScript as specified by ECMA-262.  The
 450 interface for binding with native code is designed to be as simple as possible
 451 to use, and is very similar to Lua.  There is no need to interact with byzantine
 452 C++ template mechanisms, or worry about marking and unmarking garbage collection
 453 roots, or wrestle with obscure build systems.")
 454     (license license:isc)))