// https://syzkaller.appspot.com/bug?id=af63f5e2fae13601dc704abdefe541a3aa6fb3a0
// autogenerated by syzkaller (https://github.com/google/syzkaller)

#define _GNU_SOURCE 

#include <dirent.h>
#include <endian.h>
#include <errno.h>
#include <fcntl.h>
#include <poll.h>
#include <pthread.h>
#include <pwd.h>
#include <setjmp.h>
#include <signal.h>
#include <stdarg.h>
#include <stdbool.h>
#include <stdint.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/event.h>
#include <sys/ioctl.h>
#include <sys/ktrace.h>
#include <sys/mman.h>
#include <sys/msg.h>
#include <sys/sem.h>
#include <sys/shm.h>
#include <sys/socket.h>
#include <sys/stat.h>
#include <sys/syscall.h>
#include <sys/sysctl.h>
#include <sys/syslog.h>
#include <time.h>
#include <unistd.h>

static __thread int clone_ongoing;
static __thread int skip_segv;
static __thread jmp_buf segv_env;

static void segv_handler(int sig, siginfo_t* info, void* ctx)
{
	if (__atomic_load_n(&clone_ongoing, __ATOMIC_RELAXED) != 0) {
		exit(sig);
	}
	uintptr_t addr = (uintptr_t)info->si_addr;
	const uintptr_t prog_start = 1 << 20;
	const uintptr_t prog_end = 100 << 20;
	int skip = __atomic_load_n(&skip_segv, __ATOMIC_RELAXED) != 0;
	int valid = addr < prog_start || addr > prog_end;
	if (skip && valid) {
		_longjmp(segv_env, 1);
	}
	exit(sig);
}

static void install_segv_handler(void)
{
	struct sigaction sa;
	memset(&sa, 0, sizeof(sa));
	sa.sa_sigaction = segv_handler;
	sa.sa_flags = SA_NODEFER | SA_SIGINFO;
	sigaction(SIGSEGV, &sa, NULL);
	sigaction(SIGBUS, &sa, NULL);
}

#define NONFAILING(...) ({ int ok = 1; __atomic_fetch_add(&skip_segv, 1, __ATOMIC_SEQ_CST); if (_setjmp(segv_env) == 0) { __VA_ARGS__; } else ok = 0; __atomic_fetch_sub(&skip_segv, 1, __ATOMIC_SEQ_CST); ok; })

static void sleep_ms(uint64_t ms)
{
	usleep(ms * 1000);
}

static uint64_t current_time_ms(void)
{
	struct timespec ts;
	if (clock_gettime(CLOCK_MONOTONIC, &ts))
	exit(1);
	return (uint64_t)ts.tv_sec * 1000 + (uint64_t)ts.tv_nsec / 1000000;
}

static void thread_start(void* (*fn)(void*), void* arg)
{
	pthread_t th;
	pthread_attr_t attr;
	pthread_attr_init(&attr);
	pthread_attr_setstacksize(&attr, 128 << 10);
	int i = 0;
	for (; i < 100; i++) {
		if (pthread_create(&th, &attr, fn, arg) == 0) {
			pthread_attr_destroy(&attr);
			return;
		}
		if (errno == EAGAIN) {
			usleep(50);
			continue;
		}
		break;
	}
	exit(1);
}

typedef struct {
	pthread_mutex_t mu;
	pthread_cond_t cv;
	int state;
} event_t;

static void event_init(event_t* ev)
{
	if (pthread_mutex_init(&ev->mu, 0))
	exit(1);
	if (pthread_cond_init(&ev->cv, 0))
	exit(1);
	ev->state = 0;
}

static void event_reset(event_t* ev)
{
	ev->state = 0;
}

static void event_set(event_t* ev)
{
	pthread_mutex_lock(&ev->mu);
	if (ev->state)
	exit(1);
	ev->state = 1;
	pthread_mutex_unlock(&ev->mu);
	pthread_cond_broadcast(&ev->cv);
}

static void event_wait(event_t* ev)
{
	pthread_mutex_lock(&ev->mu);
	while (!ev->state)
		pthread_cond_wait(&ev->cv, &ev->mu);
	pthread_mutex_unlock(&ev->mu);
}

static int event_isset(event_t* ev)
{
	pthread_mutex_lock(&ev->mu);
	int res = ev->state;
	pthread_mutex_unlock(&ev->mu);
	return res;
}

static int event_timedwait(event_t* ev, uint64_t timeout)
{
	uint64_t start = current_time_ms();
	uint64_t now = start;
	pthread_mutex_lock(&ev->mu);
	for (;;) {
		if (ev->state)
			break;
		uint64_t remain = timeout - (now - start);
		struct timespec ts;
		ts.tv_sec = remain / 1000;
		ts.tv_nsec = (remain % 1000) * 1000 * 1000;
		pthread_cond_timedwait(&ev->cv, &ev->mu, &ts);
		now = current_time_ms();
		if (now - start > timeout)
			break;
	}
	int res = ev->state;
	pthread_mutex_unlock(&ev->mu);
	return res;
}

#define CAST 

struct thread_t {
	int created, call;
	event_t ready, done;
};

static struct thread_t threads[16];
static void execute_call(int call);
static int running;

static void* thr(void* arg)
{
	struct thread_t* th = (struct thread_t*)arg;
	for (;;) {
		event_wait(&th->ready);
		event_reset(&th->ready);
		execute_call(th->call);
		__atomic_fetch_sub(&running, 1, __ATOMIC_RELAXED);
		event_set(&th->done);
	}
	return 0;
}

static void loop(void)
{
	int i, call, thread;
	for (call = 0; call < 9; call++) {
		for (thread = 0; thread < (int)(sizeof(threads) / sizeof(threads[0])); thread++) {
			struct thread_t* th = &threads[thread];
			if (!th->created) {
				th->created = 1;
				event_init(&th->ready);
				event_init(&th->done);
				event_set(&th->done);
				thread_start(thr, th);
			}
			if (!event_isset(&th->done))
				continue;
			event_reset(&th->done);
			th->call = call;
			__atomic_fetch_add(&running, 1, __ATOMIC_RELAXED);
			event_set(&th->ready);
			event_timedwait(&th->done, 50);
			break;
		}
	}
	for (i = 0; i < 100 && __atomic_load_n(&running, __ATOMIC_RELAXED); i++)
		sleep_ms(1);
}

uint64_t r[2] = {0xffffffffffffffff, 0xffffffffffffffff};

void execute_call(int call)
{
		intptr_t res = 0;
	switch (call) {
	case 0:
		NONFAILING(*(uint32_t*)0x20000000 = 0);
		NONFAILING(*(uint32_t*)0x20000004 = 0);
		NONFAILING(*(uint64_t*)0x20000008 = 0);
		NONFAILING(*(uint64_t*)0x20000010 = 0x10000000000003);
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(ioctl))(/*fd=*/-1, /*cmd=*/0x80185760, /*arg=*/0x20000000));
		break;
	case 1:
		NONFAILING(*(uint16_t*)0x200000c0 = 0);
		NONFAILING(*(uint16_t*)0x200000c2 = 0);
		NONFAILING(*(uint64_t*)0x200000c8 = 0);
		NONFAILING(*(uint64_t*)0x200000d0 = 0x100000020100000);
		NONFAILING(*(uint32_t*)0x200000d8 = -1);
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(fcntl))(/*fd=*/-1, /*cmd=*/0, /*lock=*/0x200000c0));
		break;
	case 2:
		NONFAILING(*(uint16_t*)0x200000c0 = 0x18e6);
		NONFAILING(*(uint8_t*)0x200000c2 = 7);
		NONFAILING(*(uint32_t*)0x200000c4 = 0);
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(connect))(/*fd=*/-1, /*addr=*/0x200000c0, /*addrlen=*/0x1c));
		break;
	case 3:
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(mprotect))(/*addr=*/0x20000000, /*len=*/0x800000, /*prot=*/5));
		break;
	case 4:
		res = -1;
		NONFAILING(res = ((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(socket))(/*domain=*/0x18, /*type=*/1, /*proto=*/0));
		if (res != -1)
				r[0] = res;
		break;
	case 5:
		NONFAILING(((intptr_t(*)(intptr_t))CAST(close))(/*fd=*/r[0]));
		break;
	case 6:
		res = -1;
		NONFAILING(res = ((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(socket))(/*domain=*/0x18, /*type=*/1, /*proto=*/0));
		if (res != -1)
				r[1] = res;
		break;
	case 7:
		NONFAILING(memcpy((void*)0x20000000, "\xeb\xff\xcb\xff\x13\xb9\xfd\x81\x2e\xaa\x4e\x71\x30\x48\xe6\x99\x31\x92\x96\x48", 20));
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t,intptr_t,intptr_t))CAST(setsockopt))(/*fd=*/r[1], /*level=*/0x29, /*optname=*/0x2e, /*optval=*/0x20000000, /*optlen=*/0x14));
		break;
	case 8:
		NONFAILING(*(uint16_t*)0x200000c0 = 0);
		NONFAILING(*(uint8_t*)0x200000c2 = 7);
		NONFAILING(*(uint32_t*)0x200000c4 = 0);
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t))CAST(connect))(/*fd=*/r[0], /*addr=*/0x200000c0, /*addrlen=*/0x1c));
		break;
	}

}
int main(void)
{
		NONFAILING(((intptr_t(*)(intptr_t,intptr_t,intptr_t,intptr_t,intptr_t,intptr_t))CAST(mmap))(/*addr=*/0x20000000, /*len=*/0x1000000, /*prot=*/3, /*flags=*/0x1012, /*fd=*/-1, /*offset=*/0));
	install_segv_handler();
			loop();
	return 0;
}