blob: 6319e671d84ad9f716cbc6d502cefef98386296e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
;;; Copyright © 2025 bdunahu <bdunahu@operationnull.com>
;;;
;;; SPDX-License-Identifier: GPL-3.0-or-later
(define-module (tanelorn packages engineering)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix build-system meson)
#:use-module (guix build-system gnu)
#:use-module (guix git-download)
#:use-module (guix gexp)
#:use-module (guix packages)
#: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)
#:use-module (gnu packages libevent)
#: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")
(version "3.7.0")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/P403n1x87/austin")
(commit (string-append "v" version))
(recursive? #f)))
(sha256
(base32 "0074gjkf7agkbgs7k9py2gk7i4ir27bq12mbnslm3fwnxl3vyxk0"))
(file-name (git-file-name name version))))
(build-system gnu-build-system)
(native-inputs (list autoconf automake))
(home-page "https://github.com/P403n1x87/austin")
(synopsis "Python frame stack sampler for CPython")
(description
"Austin is a Python frame stack sampler for CPython written in pure C.
Samples are collected by reading the CPython interpreter virtual memory space
to retrieve information about the currently running threads along with the stack
of the frames that are being executed. Hence, one can use Austin to easily make
powerful statistical profilers that have minimal impact on the target
application and that don't require any instrumentation.")
(license (list license:gpl3+))))
|
