// SPDX-License-Identifier: GPL-2.0-or-later
/*
 * This file contains the routines for handling the MMU on those
 * PowerPC implementations where the MMU substantially follows the
 * architecture specification.  This includes the 6xx, 7xx, 7xxx,
 * and 8260 implementations but excludes the 8xx and 4xx.
 *  -- paulus
 *
 *  Derived from arch/ppc/mm/init.c:
 *    Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org)
 *
 *  Modifications by Paul Mackerras (PowerMac) (paulus@cs.anu.edu.au)
 *  and Cort Dougan (PReP) (cort@cs.nmt.edu)
 *    Copyright (C) 1996 Paul Mackerras
 *
 *  Derived from "arch/i386/mm/init.c"
 *    Copyright (C) 1991, 1992, 1993, 1994  Linus Torvalds
 */

#include <linux/mm.h>
#include <linux/init.h>
#include <linux/export.h>

#include <asm/mmu_context.h>

/*
 * Room for two PTE pointers, usually the kernel and current user pointers
 * to their respective root page table.
 */
void *abatron_pteptrs[2];

/*
 * On 32-bit PowerPC 6xx/7xx/7xxx CPUs, we use a set of 16 VSIDs
 * (virtual segment identifiers) for each context.  Although the
 * hardware supports 24-bit VSIDs, and thus >1 million contexts,
 * we only use 32,768 of them.  That is ample, since there can be
 * at most around 30,000 tasks in the system anyway, and it means
 * that we can use a bitmap to indicate which contexts are in use.
 * Using a bitmap means that we entirely avoid all of the problems
 * that we used to have when the context number overflowed,
 * particularly on SMP systems.
 *  -- paulus.
 */
#define NO_CONTEXT              ((unsigned long) -1)
#define LAST_CONTEXT            32767
#define FIRST_CONTEXT           1

static unsigned long next_mmu_context;
static unsigned long context_map[LAST_CONTEXT / BITS_PER_LONG + 1];

unsigned long __init_new_context(void)
{
        unsigned long ctx = next_mmu_context;

        while (test_and_set_bit(ctx, context_map)) {
                ctx = find_next_zero_bit(context_map, LAST_CONTEXT+1, ctx);
                if (ctx > LAST_CONTEXT)
                        ctx = 0;
        }
        next_mmu_context = (ctx + 1) & LAST_CONTEXT;

        return ctx;
}
EXPORT_SYMBOL_GPL(__init_new_context);

/*
 * Set up the context for a new address space.
 */
int init_new_context(struct task_struct *t, struct mm_struct *mm)
{
        mm->context.id = __init_new_context();
        mm->context.sr0 = CTX_TO_VSID(mm->context.id, 0);

        if (IS_ENABLED(CONFIG_PPC_KUEP))
                mm->context.sr0 |= SR_NX;
        if (!kuap_is_disabled())
                mm->context.sr0 |= SR_KS;

        return 0;
}

/*
 * Free a context ID. Make sure to call this with preempt disabled!
 */
void __destroy_context(unsigned long ctx)
{
        clear_bit(ctx, context_map);
}
EXPORT_SYMBOL_GPL(__destroy_context);

/*
 * We're finished using the context for an address space.
 */
void destroy_context(struct mm_struct *mm)
{
        preempt_disable();
        if (mm->context.id != NO_CONTEXT) {
                __destroy_context(mm->context.id);
                mm->context.id = NO_CONTEXT;
        }
        preempt_enable();
}

/*
 * Initialize the context management stuff.
 */
void __init mmu_context_init(void)
{
        /* Reserve context 0 for kernel use */
        context_map[0] = (1 << FIRST_CONTEXT) - 1;
        next_mmu_context = FIRST_CONTEXT;
}

void switch_mmu_context(struct mm_struct *prev, struct mm_struct *next, struct task_struct *tsk)
{
        long id = next->context.id;

        if (id < 0)
                panic("mm_struct %p has no context ID", next);

        isync();

        update_user_segments(next->context.sr0);

        if (IS_ENABLED(CONFIG_BDI_SWITCH))
                abatron_pteptrs[1] = next->pgd;

        if (!mmu_has_feature(MMU_FTR_HPTE_TABLE))
                mtspr(SPRN_SDR1, rol32(__pa(next->pgd), 4) & 0xffff01ff);

        mb();   /* sync */
        isync();
}
EXPORT_SYMBOL(switch_mmu_context);