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
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
|
// Instrumentation library
//
// SPDX-FileCopyrightText: 2016 Aleksandar Nikolic <anikolich@sourcefire.com>
// SPDX-FileCopyrightText: 2018, 2020, 2021 Marc "van Hauser" Heuse <vh@thc.org>
// SPDX-License-Identifier: Apache-2.0
//
// SPDX-FileCopyrightText: 2024 Nguyễn Gia Phong <cnx@loang.net>
// SPDX-License-Identifier: AGPL-3.0-or-later
#include "afl/config.h"
#include "afl/types.h"
#include <algorithm>
#include <cstdio>
#include <cstdlib>
#include <cstring>
#include <fcntl.h>
#include <iostream>
#include <sys/shm.h>
#include <sys/stat.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <unistd.h>
#include <vector>
using namespace std;
static u8 dummy[65536];
static u8 *__afl_area_ptr = dummy; // this saves a test + jz instruction
static s32 shm_id;
static int __afl_temp_data;
static pid_t __afl_fork_pid;
static unsigned short int prev_id = 0;
static bool forkserver_installed = false;
#define PRINT_ERROR(string) (void)(write(2, string, strlen(string)) + 1) // the (...+1) weirdness is so we do not get an ignoring return value warning
void initAflForkServer() {
if (forkserver_installed == true)
return;
forkserver_installed = true;
// we can not use fprint* stdout/stderr functions here, it fucks up some programs
char *shm_env_var = getenv(SHM_ENV_VAR);
if (!shm_env_var) {
PRINT_ERROR("Error getting shm\n");
return;
}
shm_id = atoi(shm_env_var);
__afl_area_ptr = (u8 *)shmat(shm_id, NULL, 0);
if (__afl_area_ptr == (u8 *)-1) {
PRINT_ERROR("Error: shmat\n");
return;
}
// enter fork() server thyme!
int n = write(FORKSRV_FD + 1, &__afl_temp_data, 4);
if (n != 4) {
PRINT_ERROR("Error writing fork server\n");
return;
}
while (1) {
n = read(FORKSRV_FD, &__afl_temp_data, 4);
if (n != 4) {
PRINT_ERROR("Error reading fork server\n");
return;
}
__afl_fork_pid = fork();
if (__afl_fork_pid < 0) {
PRINT_ERROR("Error on fork()\n");
return;
}
if (__afl_fork_pid == 0) {
close(FORKSRV_FD);
close(FORKSRV_FD + 1);
prev_id = 0;
break;
} else {
// parrent stuff
n = write(FORKSRV_FD + 1, &__afl_fork_pid, 4);
pid_t temp_pid = waitpid(__afl_fork_pid, &__afl_temp_data, 2);
if (temp_pid == 0) {
return;
}
n = write(FORKSRV_FD + 1, &__afl_temp_data, 4);
}
}
}
// Should be called on basic block entry
void bbCallback(unsigned short id) {
__afl_area_ptr[prev_id ^ id]++;
prev_id = id >> 1;
}
void forceCleanExit() { exit(0); }
void initOnlyAflForkServer() {
if (forkserver_installed == true)
return;
forkserver_installed = true;
// enter fork() server thyme!
int n = write(FORKSRV_FD + 1, &__afl_temp_data, 4);
if (n != 4) {
PRINT_ERROR("Error writting fork server\n");
return;
}
while (1) {
n = read(FORKSRV_FD, &__afl_temp_data, 4);
if (n != 4) {
PRINT_ERROR("Error reading fork server\n");
return;
}
__afl_fork_pid = fork();
if (__afl_fork_pid < 0) {
PRINT_ERROR("Error on fork()\n");
return;
}
if (__afl_fork_pid == 0) {
close(FORKSRV_FD);
close(FORKSRV_FD + 1);
prev_id = 0;
break;
} else {
// parrent stuff
n = write(FORKSRV_FD + 1, &__afl_fork_pid, 4);
pid_t temp_pid = waitpid(__afl_fork_pid, &__afl_temp_data, 2);
if (temp_pid == 0) {
return;
}
n = write(FORKSRV_FD + 1, &__afl_temp_data, 4);
}
}
}
void initAflForkServerVar(u8 *map) {
// we can not use fprint* stdout/stderr functions here, it fucks up some programs
if (forkserver_installed == true)
return;
forkserver_installed = true;
u8 **ptr = (u8 **)map;
char *shm_env_var = getenv(SHM_ENV_VAR);
if (!shm_env_var) {
char buf[256];
PRINT_ERROR("Error getting shm\n");
snprintf(buf, sizeof(buf), "__afl_area_ptr: %p\n", ptr);
PRINT_ERROR(buf);
return;
}
shm_id = atoi(shm_env_var);
*ptr = (u8 *)shmat(shm_id, NULL, 0);
if ((u8 *)*ptr == (u8 *)-1) {
PRINT_ERROR("Error: shmat\n");
return;
}
// enter fork() server thyme!
int n = write(FORKSRV_FD + 1, &__afl_temp_data, 4);
if (n != 4) {
PRINT_ERROR("Error writing fork server\n");
return;
}
while (1) {
n = read(FORKSRV_FD, &__afl_temp_data, 4);
if (n != 4) {
PRINT_ERROR("Error reading fork server\n");
return;
}
__afl_fork_pid = fork();
if (__afl_fork_pid < 0) {
PRINT_ERROR("Error on fork()\n");
return;
}
if (__afl_fork_pid == 0) {
close(FORKSRV_FD);
close(FORKSRV_FD + 1);
prev_id = 0;
break;
} else {
// parrent stuff
n = write(FORKSRV_FD + 1, &__afl_fork_pid, 4);
pid_t temp_pid = waitpid(__afl_fork_pid, &__afl_temp_data, 2);
if (temp_pid == 0) {
return;
}
n = write(FORKSRV_FD + 1, &__afl_temp_data, 4);
}
}
}
|
