/*      $NetBSD: iris_scsictl.c,v 1.1 2019/01/12 16:44:47 tsutsui Exp $ */

/*
 * Copyright (c) 2018 Naruaki Etomi
 * 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.
 */

/*
 * Silicon Graphics "IRIS" series MIPS processors machine bootloader.
 * Front end of SCSI commands driver.
 */

#include <lib/libsa/stand.h>

#include "iris_machdep.h"
#include "iris_scsivar.h"
#include "iris_scsicmd.h"

int
scsi_test_unit_rdy(void)
{
        struct wd33c93_softc *sc = &wd33c93_softc[scsi_ctlr];
        static struct scsi_cdb6 cdb = { CMD_TEST_UNIT_READY };

        return wd33c93_go(sc, (uint8_t *)&cdb, sizeof(cdb), NULL, NULL);
}

int
scsi_read_capacity(uint8_t *buf, size_t olen)
{
        size_t len = olen;
        size_t *lenp;
        lenp = &len;
        struct wd33c93_softc *sc = &wd33c93_softc[scsi_ctlr];
        static struct scsi_cdb10 cdb = { CMD_READ_CAPACITY };

        return wd33c93_go(sc, (uint8_t *)&cdb, sizeof(cdb), buf, lenp);
}

int
scsi_read(uint8_t *buf, size_t olen, daddr_t blk, u_int nblk)
{
        size_t len = olen;
        size_t *lenp;
        lenp = &len;
        struct wd33c93_softc *sc = &wd33c93_softc[scsi_ctlr];
        struct scsi_cdb10 cdb;

        memset(&cdb, 0, sizeof(cdb));
        cdb.cmd = CMD_READ_EXT;
        cdb.lbah = blk >> 24;
        cdb.lbahm = blk >> 16;
        cdb.lbalm = blk >> 8;
        cdb.lbal = blk;
        cdb.lenh = nblk >> (8 + DEV_BSHIFT);
        cdb.lenl = nblk >> DEV_BSHIFT;
        wd33c93_go(sc, (uint8_t *)&cdb, sizeof(cdb), buf, lenp);

        if (*lenp == olen)
                return 1;

        return 0;
}

int
scsi_write(uint8_t *buf, size_t olen, daddr_t blk, u_int nblk)
{
        size_t len = olen;
        size_t *lenp;
        lenp = &len;

        struct wd33c93_softc *sc = &wd33c93_softc[scsi_ctlr];
        struct scsi_cdb10 cdb;

        memset(&cdb, 0, sizeof(cdb));
        cdb.cmd = CMD_WRITE_EXT;
        cdb.lbah = blk >> 24;
        cdb.lbahm = blk >> 16;
        cdb.lbalm = blk >> 8;
        cdb.lbal = blk;
        cdb.lenh = nblk >> (8 + DEV_BSHIFT);
        cdb.lenl = nblk >> DEV_BSHIFT;
        wd33c93_go(sc, (uint8_t *)&cdb, sizeof(cdb), buf, lenp);

        if (*lenp == olen)
                return 1;

        return 0;
}