From 2ea4587d8373bce140f24bf2b9219cd73c378f8b Mon Sep 17 00:00:00 2001 From: Danny Milosavljevic Date: Thu, 26 Sep 2019 15:58:48 +0200 Subject: gnu: python-libmpsse: Update to 1.4. * gnu/packages/embedded.scm (python2-libmpsse): Rename to... (python-libmpsse): ...this. [version]: Update to 1.4. [source]: Change repository and version. [inputs]: Change Python version. [arguments]: Add #parallel-build?. (python2-libmpsse): New variable. --- gnu/packages/embedded.scm | 81 ++++++++++++++++++++++++++++++----------------- 1 file changed, 52 insertions(+), 29 deletions(-) (limited to 'gnu/packages/embedded.scm') diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm index a65998c369..106675b87b 100644 --- a/gnu/packages/embedded.scm +++ b/gnu/packages/embedded.scm @@ -874,30 +874,31 @@ the Raspberry Pi chip.") (description "This package provides @code{gcc} for VideoCore IV, the Raspberry Pi chip.")))) -(define-public python2-libmpsse +(define-public python-libmpsse (package - (name "python2-libmpsse") - (version "1.3") + (name "python-libmpsse") + (version "1.4") (source (origin - (method url-fetch) - (uri (string-append "https://storage.googleapis.com/" - "google-code-archive-downloads/v2/" - "code.google.com/libmpsse/" - "libmpsse-" version ".tar.gz")) + (method git-fetch) + (uri (git-reference + (url "https://github.com/daym/libmpsse.git") + (commit (string-append "v" version)))) + (file-name "libmpsse-checkout") (sha256 (base32 - "0jq7nhqq3na8675jnpfcar3pd3dp3adhhc4lw900swkla01a1wh8")))) + "14f1kiiia4kfd9mzwx4h63aa8bpz9aknbrrr7mychnsp3arw0z25")))) (build-system gnu-build-system) (inputs `(("libftdi" ,libftdi) - ("python" ,python-2))) + ("python" ,python))) (native-inputs `(("pkg-config" ,pkg-config) ("swig" ,swig) ("which" ,base:which))) (arguments `(#:tests? #f ; No tests exist. + #:parallel-build? #f ; Would be buggy. #:make-flags (list (string-append "CFLAGS=-Wall -fPIC -fno-strict-aliasing -g -O2 " "$(shell pkg-config --cflags libftdi1)")) @@ -905,28 +906,20 @@ the Raspberry Pi chip.")))) (modify-phases %standard-phases (add-after 'unpack 'set-environment-up (lambda* (#:key inputs outputs #:allow-other-keys) - (chdir "src") - (setenv "PYDEV" (string-append (assoc-ref inputs "python") - "/include/python2.7")) - #t)) - (add-after 'unpack 'patch-global-variable - (lambda _ - ;; fast_rw_buf was defined in a header file which was making - ;; the build not reproducible. - (substitute* "src/fast.c" - (("^int fast_build_block_buffer") " - -unsigned char fast_rw_buf[SPI_RW_SIZE + CMD_SIZE]; -int fast_build_block_buffer")) - (substitute* "src/mpsse.h" - (("unsigned char fast_rw_buf.*") " -")) - #t)) + (let ((python (assoc-ref inputs "python"))) + (chdir "src") + (setenv "PYDEV" (string-append python + "/include/python" + ,(version-major+minor (package-version python)) + "m")) + #t))) (replace 'install - (lambda* (#:key outputs make-flags #:allow-other-keys #:rest args) + (lambda* (#:key inputs outputs make-flags #:allow-other-keys #:rest args) (let* ((out (assoc-ref outputs "out")) (out-python (string-append out - "/lib/python2.7/site-packages")) + "/lib/python" + ,(version-major+minor (package-version python)) + "/site-packages")) (install (assoc-ref %standard-phases 'install))) (install #:make-flags (cons (string-append "PYLIB=" out-python) make-flags)))))))) @@ -937,6 +930,36 @@ MPSSE (Multi-Protocol Synchronous Serial Engine) adapter by FTDI that can do SPI, I2C, JTAG.") (license license:gpl2+))) +(define-public python2-libmpsse + (package + (inherit python-libmpsse) + (name "python2-libmpsse") + (arguments + (substitute-keyword-arguments (package-arguments python-libmpsse) + ((#:phases phases) + `(modify-phases ,phases + (replace 'set-environment-up + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((python (assoc-ref inputs "python"))) + (chdir "src") + (setenv "PYDEV" (string-append python + "/include/python" + ,(version-major+minor (package-version python-2)))) + #t))) + (replace 'install + (lambda* (#:key inputs outputs make-flags #:allow-other-keys #:rest args) + (let* ((out (assoc-ref outputs "out")) + (out-python (string-append out + "/lib/python" + ,(version-major+minor (package-version python-2)) + "/site-packages")) + (install (assoc-ref %standard-phases 'install))) + (install #:make-flags (cons (string-append "PYLIB=" out-python) + make-flags))))))))) + (inputs + (alist-replace "python" (list python-2) + (package-inputs python-libmpsse))))) + (define-public picprog (package (name "picprog") -- cgit 1.4.1 From 1333eb585132c6cd0a48d87346c3359f488ff843 Mon Sep 17 00:00:00 2001 From: Danny Milosavljevic Date: Sat, 28 Sep 2019 15:25:50 +0200 Subject: gnu: fc-host-tools: Update to 11. * gnu/packages/embedded.scm (fc-host-tools): Update to 11. [arguments]<:phases>[handle-tarbomb]: Delete phase. [patch-installation-paths]: Modify. --- gnu/packages/embedded.scm | 16 +++++++--------- 1 file changed, 7 insertions(+), 9 deletions(-) (limited to 'gnu/packages/embedded.scm') diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm index 106675b87b..8c906a9923 100644 --- a/gnu/packages/embedded.scm +++ b/gnu/packages/embedded.scm @@ -1000,14 +1000,14 @@ SPI, I2C, JTAG.") (define-public fc-host-tools (package (name "fc-host-tools") - (version "10") + (version "11") (source (origin (method url-fetch) (uri (string-append "ftp://ftp.freecalypso.org/pub/GSM/" "FreeCalypso/fc-host-tools-r" version ".tar.bz2")) (sha256 (base32 - "0ybjqkz1cpnxni66p3valv1bva39vpwzdcc4040lqzx6py9h7h8b")))) + "0s87lp6gd8i8ivrdd7mnnalysr65035nambcm992rgla7sk76sj1")))) (build-system gnu-build-system) (arguments `(#:tests? #f ; No tests exist. @@ -1016,12 +1016,7 @@ SPI, I2C, JTAG.") (string-append "INCLUDE_INSTALL_DIR=" %output "include/rvinterf")) #:phases (modify-phases %standard-phases - (delete 'configure) - (add-after 'unpack 'handle-tarbomb - (lambda _ - (chdir "..") ; url-fetch/tarbomb doesn't work for some reason. - #t)) - (add-after 'handle-tarbomb 'patch-installation-paths + (add-after 'unpack 'patch-installation-paths (lambda* (#:key outputs #:allow-other-keys) (substitute* '("Makefile" "rvinterf/etmsync/fsiomain.c" @@ -1038,9 +1033,12 @@ SPI, I2C, JTAG.") (string-append (assoc-ref outputs "out") "/lib/freecalypso/loadtools")) (("\\$\\{INSTALL_PREFIX\\}/loadtools") (string-append (assoc-ref outputs "out") "/lib/freecalypso/loadtools")) + (("\\$\\{INSTALL_PREFIX\\}/target-bin") + (string-append (assoc-ref outputs "out") "/lib/freecalypso/target-bin")) (("/opt/freecalypso") (assoc-ref outputs "out"))) - #t))))) + #t)) + (delete 'configure)))) (inputs `(("libx11" ,libx11))) (synopsis "Freecalypso host tools") -- cgit 1.4.1 From 2eefe1d887c7dc34279aaee81f29c672da6662db Mon Sep 17 00:00:00 2001 From: Danny Milosavljevic Date: Sat, 28 Sep 2019 15:39:24 +0200 Subject: gnu: fc-host-tools: Improve description. * gnu/packages/embedded.scm (fc-host-tools)[description]: Improve description. --- gnu/packages/embedded.scm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'gnu/packages/embedded.scm') diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm index 8c906a9923..ab2174a273 100644 --- a/gnu/packages/embedded.scm +++ b/gnu/packages/embedded.scm @@ -1042,7 +1042,7 @@ SPI, I2C, JTAG.") (inputs `(("libx11" ,libx11))) (synopsis "Freecalypso host tools") - (description "This package provides some tools for debugging Freecalypso phones. + (description "This package provides some tools for debugging FreeCalypso phones and the FreeCalypso FCDEV3B dev board. @enumerate @item fc-e1decode: Decodes a binary Melody E1 file into an ASCII source file. @@ -1117,10 +1117,10 @@ feeding melodies to be played to it. that can be issued through the RVTMUX (debug trace) serial channel. This program is our test mode shell for sending Test Mode commands to targets and displaying decoded target responses. -@item fcup-smsend Send a short message via SMS -@item fcup-smsendmult Send multiple short messages via SMS in one go -@item fcup-smsendpdu Send multiple short messages given in PDU format via SMS -@item sms-pdu-decode Decode PDU format messages +@item fcup-smsend: Send a short message via SMS +@item fcup-smsendmult: Send multiple short messages via SMS in one go +@item fcup-smsendpdu: Send multiple short messages given in PDU format via SMS +@item sms-pdu-decode: Decode PDU format messages @end enumerate") (home-page "https://www.freecalypso.org/") (license license:public-domain))) -- cgit 1.4.1