summaryrefslogtreecommitdiff
path: root/modules/tanelorn
diff options
context:
space:
mode:
Diffstat (limited to 'modules/tanelorn')
-rw-r--r--modules/tanelorn/packages/engineering.scm61
1 files changed, 61 insertions, 0 deletions
diff --git a/modules/tanelorn/packages/engineering.scm b/modules/tanelorn/packages/engineering.scm
index 80dd961..6319e67 100644
--- a/modules/tanelorn/packages/engineering.scm
+++ b/modules/tanelorn/packages/engineering.scm
@@ -12,6 +12,7 @@
#:use-module (tanelorn packages)
#:use-module (gnu packages autotools)
#:use-module (gnu packages compression)
+ #:use-module (gnu packages databases)
#:use-module (gnu packages digest)
#:use-module (gnu packages engineering)
#:use-module (gnu packages javascript)
@@ -19,8 +20,68 @@
#:use-module (gnu packages multiprecision)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages python)
+ #:use-module (gnu packages qt)
#:use-module (gnu packages tls))
+(define-public iaito
+ ;; Release versions are currently out of sync with radare2,
+ ;; use most recent commit.
+ (let ((commit "27cdc1793c2f5bf71c6f2ef5116f0bfb91edd730")
+ (revision "1"))
+ (package
+ (name "iaito")
+ (version (git-version "6.0.4" revision commit))
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/radareorg/iaito")
+ (commit commit)))
+ (sha256
+ (base32
+ "0bwjxv73nsd06al2a40r5gvm99kzlq7f7q7ial9189awlnsbnwlw"))
+ (file-name (git-file-name name version))))
+ (build-system gnu-build-system)
+ (arguments
+ (list
+ #:tests? #f ;no tests
+ #:phases
+ #~(modify-phases %standard-phases
+ ;; The build system assumes the sdb lib is installed alongside
+ ;; radare2. We already patch the radare2 package to use a
+ ;; system-installed sdb rather than install its own, so we must
+ ;; propagate those changes here.
+ (add-before 'configure 'add-sdb-libs
+ (lambda _
+ (substitute* '("./src/lib_radare2.pri")
+ (("pkg-config --libs r_core" all)
+ (string-append all " sdb")))))
+ (replace 'configure
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ ;; Does not recognize "--enable-fast-install".
+ (invoke "./configure"
+ (string-append "--prefix=" out))))))))
+ (inputs
+ (list capstone
+ libuv
+ libzip
+ lz4
+ openssl
+ qtbase
+ qtsvg
+ radare2
+ sdb))
+ (native-inputs
+ (list pkg-config python-minimal-wrapper))
+ (home-page "https://github.com/radareorg/iaito")
+ (synopsis "Official radare2 GUI")
+ (description "Iaito is the official graphical interface for radare2, a
+libre reverse engineering framework.
+
+Written in C++ and the QT framework, iaito focuses on simplicity, parity with
+commands, features, and keybindings.")
+ (license license:lgpl3))))
+
(define-public python-austin
(package
(name "python-austin")