/*      $NetBSD: devopen.c,v 1.12 2024/06/29 13:46:40 rin Exp $  */

/*
 * Copyright (c) 1996
 *      Matthias Drochner.  All rights reserved.
 *
 * 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 AUTHOR ``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 AUTHOR 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 <lib/libsa/stand.h>
#include <lib/libkern/libkern.h>
#include <lib/libsa/ufs.h>

#include <libi386.h>
#include <biosdisk.h>
#include <bootinfo.h>

#include "dosfile.h"

struct devsw devsw[] = {
        {"disk", biosdisk_strategy, biosdisk_open, biosdisk_close, biosdisk_ioctl},
};
int ndevs = sizeof(devsw) / sizeof(struct devsw);

static struct fs_ops dosfs = {
        dos_open, dos_close, dos_read, dos_write, dos_seek, dos_stat
};
static struct fs_ops ufsfs = {
        ufs_open, ufs_close, ufs_read, ufs_write, ufs_seek, ufs_stat
};

struct fs_ops   file_system[] = {
        {0},
};
int  nfsys = 1;

static struct {
        char           *name;
        int             biosdev;
}               biosdevtab[] = {
        {
                "fd", 0
        },
        {
                "wd", 0x80
        },
        {
                "sd", 0x80
        },
        {
                "hd", 0x80
        }
};
#define NUMBIOSDEVS (sizeof(biosdevtab) / sizeof(biosdevtab[0]))

static int dev2bios(char *, unsigned int, int *);

static int
dev2bios(char *devname, unsigned int unit, int *biosdev)
{
        unsigned             i;

        for (i = 0; i < NUMBIOSDEVS; i++)
                if (!strcmp(devname, biosdevtab[i].name)) {
                        *biosdev = biosdevtab[i].biosdev + unit;
                        if (unit >= 4)  /* ??? */
                                return (EUNIT);
                        return (0);
                }
        return (ENXIO);
}

struct btinfo_bootpath bibp;

int
devopen(struct open_file *f, const char *fname, char **file)
{
        char           *devname;
        char           *fsmode;
        int             unit, partition;
        int             biosdev;
        int             error;
        struct devsw   *dp;

        if ((error = parsebootfile(fname, &fsmode, &devname, &unit,
            &partition, (const char **) file)))
                return (error);

        if (!strcmp(fsmode, "dos")) {
                file_system[0] = dosfs; /* structure assignment! */
                f->f_flags |= F_NODEV;  /* handled by DOS */
                return (0);
        } else if (!strcmp(fsmode, "ufs")) {
                if ((error = dev2bios(devname, unit, &biosdev)))
                        return (error);
                file_system[0] = ufsfs; /* structure assignment! */
                dp = &devsw[0]; /* must be biosdisk */
                f->f_dev = dp;

                strncpy(bibp.bootpath, *file, sizeof(bibp.bootpath));
                BI_ADD(&bibp, BTINFO_BOOTPATH, sizeof(bibp));

                return (biosdisk_open(f, biosdev, partition));
        } else {
                printf("no file system\n");
                return (ENXIO);
        }
        /* NOTREACHED */
}