/*      $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 */
}