/*      $NetBSD: bootinfo.c,v 1.7 2010/01/10 09:34:45 tsutsui Exp $     */

/*-
 * Copyright (c) 1999, 2000 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Jonathan Stone, Michael Hitch and Simon Burge.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <machine/types.h>
#include <lib/libsa/stand.h>
#include <lib/libkern/libkern.h>

#include "boot.h"
#include "bootinfo.h"

static char *bootinfo = NULL;
static char *bi_next;
static int bi_size;

char *
bi_init(void)
{
        struct btinfo_common *bi;
        struct btinfo_magic bi_magic;

        if ((bootinfo = (char *)alloc(BOOTINFO_SIZE)) != NULL) {
                bi = (struct btinfo_common *)bootinfo;
                bi->next = bi->type = 0;
                bi_next = bootinfo;
                bi_size = 0;

                bi_magic.magic = BOOTINFO_MAGIC;
                bi_add(&bi_magic, BTINFO_MAGIC, sizeof(bi_magic));
        }

        return bootinfo;
}

void bi_add(void *new, int type, int size)
{
        struct btinfo_common *bi;

        if (bi_size + size > BOOTINFO_SIZE)
                return;                         /* XXX error? */

        if (bootinfo != NULL) {
                DPRINTF(("Adding %d of size %d @0x%lx\n",
                    type, size, (u_long)bi_next));

                bi = new;
                bi->next = size;
                bi->type = type;
                memcpy(bi_next, new, size);
                bi_next += size;

                bi = (struct btinfo_common *)bi_next;
                bi->next = bi->type = 0;

                bi_size += size;
        }
}