// SPDX-License-Identifier: GPL-2.0
/* Copyright (c) 2024 Meta Platforms, Inc. and affiliates. */

#include <vmlinux.h>
#include <bpf/bpf_helpers.h>
#include "bpf_experimental.h"
#include "bpf_misc.h"
#include "uptr_test_common.h"

struct {
        __uint(type, BPF_MAP_TYPE_TASK_STORAGE);
        __uint(map_flags, BPF_F_NO_PREALLOC);
        __type(key, int);
        __type(value, struct value_type);
} datamap SEC(".maps");

SEC("?syscall")
__failure __msg("store to uptr disallowed")
int uptr_write(const void *ctx)
{
        struct task_struct *task;
        struct value_type *v;

        task = bpf_get_current_task_btf();
        v = bpf_task_storage_get(&datamap, task, 0,
                                 BPF_LOCAL_STORAGE_GET_F_CREATE);
        if (!v)
                return 0;

        v->udata = NULL;
        return 0;
}

SEC("?syscall")
__failure __msg("store to uptr disallowed")
int uptr_write_nested(const void *ctx)
{
        struct task_struct *task;
        struct value_type *v;

        task = bpf_get_current_task_btf();
        v = bpf_task_storage_get(&datamap, task, 0,
                                 BPF_LOCAL_STORAGE_GET_F_CREATE);
        if (!v)
                return 0;

        v->nested.udata = NULL;
        return 0;
}

SEC("?syscall")
__failure __msg("R1 invalid mem access 'mem_or_null'")
int uptr_no_null_check(const void *ctx)
{
        struct task_struct *task;
        struct value_type *v;

        task = bpf_get_current_task_btf();
        v = bpf_task_storage_get(&datamap, task, 0,
                                 BPF_LOCAL_STORAGE_GET_F_CREATE);
        if (!v)
                return 0;

        v->udata->result = 0;

        return 0;
}

SEC("?syscall")
__failure __msg("doesn't point to kptr")
int uptr_kptr_xchg(const void *ctx)
{
        struct task_struct *task;
        struct value_type *v;

        task = bpf_get_current_task_btf();
        v = bpf_task_storage_get(&datamap, task, 0,
                                 BPF_LOCAL_STORAGE_GET_F_CREATE);
        if (!v)
                return 0;

        bpf_kptr_xchg(&v->udata, NULL);

        return 0;
}

SEC("?syscall")
__failure __msg("invalid mem access 'scalar'")
int uptr_obj_new(const void *ctx)
{
        struct value_type *v;

        v = bpf_obj_new(typeof(*v));
        if (!v)
                return 0;

        if (v->udata)
                v->udata->result = 0;

        bpf_obj_drop(v);

        return 0;
}

char _license[] SEC("license") = "GPL";