From nobody Sat May 30 20:11:18 2026 Delivered-To: importer@patchew.org Authentication-Results: mx.zohomail.com; dkim=pass; spf=pass (zohomail.com: domain of gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=qemu-devel-bounces+importer=patchew.org@nongnu.org; dmarc=pass(p=none dis=none) header.from=gmail.com ARC-Seal: i=1; a=rsa-sha256; t=1776364634; cv=none; d=zohomail.com; s=zohoarc; b=m9ofytdaIs001xyLrIOhe7TGMea9SJt5dMW9l2YF0HT8eYGNguGRPFDmXDGr/oO6c7UWeUJwlFjtmDJNaV/Ic8E1P9oRuk8IgMF4IpWAzy9zsTyS5TNaxVn6lmVy2OiiMvaTM06IzBl1Jj5aM8dw1j5hEQc3OKg8rjt5VWtah/Y= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zohomail.com; s=zohoarc; t=1776364634; h=Content-Transfer-Encoding:Cc:Cc:Date:Date:From:From:In-Reply-To:List-Subscribe:List-Post:List-Id:List-Archive:List-Help:List-Unsubscribe:MIME-Version:Message-ID:References:Sender:Subject:Subject:To:To:Message-Id:Reply-To; bh=qeXdY72qLpEkZGuemq19cakrMF8+4TuaA9hdFMx77A0=; b=kTdb0qn+TaPFDpk3s66cPsHRbMa1U4+Cu0THnvOpTsDMWo5XAUK7uwd7kTrmSUpud/1/hYQbY3Sy3wkw0fj4hK+PvWtPI9tsj55mt16ed4bEnEU0/6tJoNMUDRAEh3Q6lx7pKXdjpIMnIJ0GFnHxIeLFROmsAeTZivbhTtTuvuc= ARC-Authentication-Results: i=1; mx.zohomail.com; dkim=pass; spf=pass (zohomail.com: domain of gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=qemu-devel-bounces+importer=patchew.org@nongnu.org; dmarc=pass header.from= (p=none dis=none) Return-Path: Received: from lists1p.gnu.org (lists1p.gnu.org [209.51.188.17]) by mx.zohomail.com with SMTPS id 1776364634621805.2365880821252; Thu, 16 Apr 2026 11:37:14 -0700 (PDT) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists1p.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1wDRZr-0004Ge-Ce; Thu, 16 Apr 2026 14:36:35 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists1p.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1wDRZU-0004Er-4c for qemu-devel@nongnu.org; Thu, 16 Apr 2026 14:36:14 -0400 Received: from mail-wm1-x334.google.com ([2a00:1450:4864:20::334]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1wDRZM-0008JA-Ow for qemu-devel@nongnu.org; Thu, 16 Apr 2026 14:36:09 -0400 Received: by mail-wm1-x334.google.com with SMTP id 5b1f17b1804b1-488b3f8fa2bso9210085e9.1 for ; Thu, 16 Apr 2026 11:36:03 -0700 (PDT) Received: from deb.cbu.edu.tr ([194.27.157.32]) by smtp.gmail.com with ESMTPSA id ffacd0b85a97d-43ead3d5fe1sm15835729f8f.22.2026.04.16.11.36.00 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Thu, 16 Apr 2026 11:36:01 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20251104; t=1776364562; x=1776969362; darn=nongnu.org; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:from:to:cc:subject:date :message-id:reply-to; bh=qeXdY72qLpEkZGuemq19cakrMF8+4TuaA9hdFMx77A0=; b=gCCAJHfDesdeeI/KFdcE4ls+vvX5I7PBHa5FaaessQ2bbldRu8d96ETJpIgsG2C2x3 4Z89fgx956cuTQIO/bmdLGskgijs+GGZnkXttRt0JH4Pv61oUUuzYLZ5J76kBqVGF/Yf TpHC1XrVfVSAwXa2cPxtm4CkZ8FAwNSAun6+acJOyQgD8k4zqAMpYLT8AHGpL8xC5tJC LXJ0sH7pJQhyeoDBjQdGEqeB65cGMW1WxbfkfgTmW1aAb0D31K0CS1xwWl7yBhd61nzZ cD0HI8SE8L+R5oB1Sb4vq1I5YLB9al1r6Df7Qvfb6muKK/nIJxOXlMOTwvXfIpKRun94 3b5A== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20251104; t=1776364562; x=1776969362; h=content-transfer-encoding:mime-version:references:in-reply-to :message-id:date:subject:cc:to:from:x-gm-gg:x-gm-message-state:from :to:cc:subject:date:message-id:reply-to; bh=qeXdY72qLpEkZGuemq19cakrMF8+4TuaA9hdFMx77A0=; b=Y94dHbX+oXQJiBulN6sdFxT6uLY1evfhZnowObYfJB4ACIJ6UsOw5OYBUmXwfmOYMa bYE+cUxTWFjibPsWQwBjI7h4y+Q4uML6vRKfbG329QsHCNZYn49K0HBJlQrkPxjCUKk/ 92m58eKubcArYKxT/xuZrykSHPvgcU4BblpfvCYv4vowRjcv3s0LtdIjcmyhPo+FGeVv D91R0eBUD0m5Uhi8RXwwRxLGY3JVLsF1HOanTA2GkJePZAwHPcxAgjFo4g/5IclJE5E/ GtPr25NoCkJdxFFyPKOWrXAKVPKDkoHEafRaM3Q7SehrN53x5gdddxTPQTbCbxPbAJYE 54dQ== X-Gm-Message-State: AOJu0YyVLAlA43Hz7Ogni1r+o9vteyRnRQjC0Y9pWx0DC6Zg4Ey6gLtT JjA4QkcaW77lNNyXutDlSnQqk40giTqsLao7SQcCKfjsXSLqYFDR2aj5lcOc1d2w X-Gm-Gg: AeBDieuBVTttPV5FUJ4ufCvlxogWJynZZ237nJ2r/eibTPjKR7+W7GrnIc5+vDgk/wW KShcZoVgVrivY7dYWrlvPp/SxrwvcsDVELLLlmCyBgfUlRgoB6ego9eJ/ofy1s1fP3bVx+Cf+ju oEKqstdrPkzWl0Aj/7eySemd48G/eW0jOuwUUkbAWafrP6eyqQa2y5WADu0Y/srtkK/tpjmiE/z bMjCyyMW9SmEsvlzWdtrYYv133VTMWdxt5qC4uWxF/e/+fOIy10Q7kjAr2vBOdIrBJtbgeee6pZ MaEd2gjKXJgLtrDbslmaxBK5Bt30kIAde2r6Gju/mXnUJ4QAoNPvtO8cvrl9zSWt9eP28dVeTu6 +UpPgSwxUsfvhDp8yj7g4Xdf5vPRH2qW59Ph4CnHRt740JTJr6qEFGlf2K9uglPNsIpDPE9725Q hSOEs9RO/vfoFd2wb9+idnwoH/wBE1ngTWklBw6fzs2I3E0qIhhqFr X-Received: by 2002:a05:600c:310d:b0:47d:52ef:c572 with SMTP id 5b1f17b1804b1-488fa7d0b7dmr6407985e9.1.1776364561728; Thu, 16 Apr 2026 11:36:01 -0700 (PDT) From: rft0 To: qemu-devel@nongnu.org Cc: berrange@redhat.com, pbonzini@redhat.com, fam@euphon.net, rft0 Subject: [PATCH v2] hw/scsi: Add SCSI tape device emulation Date: Thu, 16 Apr 2026 21:35:40 +0300 Message-ID: <20260416183540.142727-1-rafettaskindev@gmail.com> X-Mailer: git-send-email 2.47.3 In-Reply-To: References: MIME-Version: 1.0 Content-Transfer-Encoding: quoted-printable Received-SPF: pass (zohomail.com: domain of gnu.org designates 209.51.188.17 as permitted sender) client-ip=209.51.188.17; envelope-from=qemu-devel-bounces+importer=patchew.org@nongnu.org; helo=lists1p.gnu.org; Received-SPF: pass client-ip=2a00:1450:4864:20::334; envelope-from=rafettaskindev@gmail.com; helo=mail-wm1-x334.google.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: qemu-devel@nongnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: qemu development List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: qemu-devel-bounces+importer=patchew.org@nongnu.org Sender: qemu-devel-bounces+importer=patchew.org@nongnu.org X-ZohoMail-DKIM: pass (identity @gmail.com) X-ZM-MESSAGEID: 1776364638701154100 Content-Type: text/plain; charset="utf-8" Add initial emulation of SCSI tape device supporting basic INQUIRY operation for now. Signed-off-by: rft0 --- Second patch: - Add kconfig entry - Validate vendor, product, version, serial lengths hw/scsi/Kconfig | 5 + hw/scsi/meson.build | 1 + hw/scsi/scsi-tape.c | 349 ++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 355 insertions(+) create mode 100644 hw/scsi/scsi-tape.c diff --git a/hw/scsi/Kconfig b/hw/scsi/Kconfig index 5743ee9b4d..06e7cab178 100644 --- a/hw/scsi/Kconfig +++ b/hw/scsi/Kconfig @@ -1,6 +1,11 @@ config SCSI bool =20 +config SCSI_TAPE + bool + default y + depends on SCSI + config LSI_SCSI_PCI bool default y if PCI_DEVICES diff --git a/hw/scsi/meson.build b/hw/scsi/meson.build index 69fde0cf84..1c62115d8e 100644 --- a/hw/scsi/meson.build +++ b/hw/scsi/meson.build @@ -8,6 +8,7 @@ scsi_ss.add(files( 'scsi-disk.c', 'scsi-generic.c', )) +scsi_ss.add(when: 'CONFIG_SCSI_TAPE', if_true: files('scsi-tape.c')) scsi_ss.add(when: 'CONFIG_ESP', if_true: files('esp.c')) scsi_ss.add(when: 'CONFIG_ESP_PCI', if_true: files('esp-pci.c')) scsi_ss.add(when: 'CONFIG_LSI_SCSI_PCI', if_true: files('lsi53c895a.c')) diff --git a/hw/scsi/scsi-tape.c b/hw/scsi/scsi-tape.c new file mode 100644 index 0000000000..adbae9b4ad --- /dev/null +++ b/hw/scsi/scsi-tape.c @@ -0,0 +1,349 @@ +/* + * SCSI Tape Device emulation + * + * SPDX-License-Identifier: GPL-2.0-or-later + * + * Written by Rafet Taskin + * + * SCSI Tape device emulation. + * + */ + +#include "qemu/hw-version.h" +#include "qemu/osdep.h" +#include "qapi/error.h" +#include "qemu/module.h" +#include "qemu/memalign.h" +#include "qemu/cutils.h" +#include "hw/scsi/scsi.h" +#include "scsi/constants.h" +#include "system/block-backend.h" +#include "hw/block/block.h" +#include "hw/core/qdev-properties.h" +#include "hw/core/qdev-properties-system.h" +#include "qom/object.h" + +#define SCSI_MAX_INQUIRY_LEN 256 + +#define MAX_SERIAL_LEN 36 + +#define TYPE_SCSI_TAPE "scsi-tape" + +OBJECT_DECLARE_SIMPLE_TYPE(SCSITapeState, SCSI_TAPE) + +typedef struct SCSITapeReq { + SCSIRequest req; + + uint32_t buflen; + struct iovec iov; + + QEMUIOVector qiov; +} SCSITapeReq; + +struct SCSITapeState { + SCSIDevice qdev; + + char *vendor; + char *product; + char *version; + char *serial; +}; + +static void scsi_free_request(SCSIRequest *req) +{ + SCSITapeReq *r =3D DO_UPCAST(SCSITapeReq, req, req); + + qemu_vfree(r->iov.iov_base); +} + +static uint8_t *scsi_get_buf(SCSIRequest *req) +{ + SCSITapeReq *r =3D DO_UPCAST(SCSITapeReq, req, req); + + return (uint8_t *)r->iov.iov_base; +} + +static void scsi_init_iovec(SCSITapeReq *r, size_t size) +{ + if (!r->iov.iov_base) { + r->buflen =3D size; + r->iov.iov_base =3D qemu_memalign(qemu_real_host_page_size(), size= ); + } + + r->iov.iov_len =3D size; + qemu_iovec_init_external(&r->qiov, &r->iov, 1); +} + +static void scsi_check_condition(SCSITapeReq *r, SCSISense sense) +{ + scsi_req_build_sense(&r->req, sense); + scsi_req_complete(&r->req, CHECK_CONDITION); +} + +static int scsi_disk_emulate_vpd_page(SCSIRequest *req, uint8_t *outbuf) +{ + SCSITapeState *s =3D DO_UPCAST(SCSITapeState, qdev, req->dev); + uint8_t page_code =3D req->cmd.buf[2]; + + outbuf[0] =3D TYPE_TAPE; + outbuf[1] =3D page_code; + outbuf[2] =3D 0x00; + outbuf[3] =3D 0x00; + + switch (page_code) { + case 0x00: /* Supported VPD pages */ + outbuf[4] =3D 0x00; /* page 0x00 (this page) */ + if (s->serial) { + outbuf[5] =3D 0x80; /* page 0x80 (serial number) */ + outbuf[3] =3D 2; /* page data length */ + return 6; + } + outbuf[3] =3D 1; + return 5; + + case 0x80: /* Unit Serial Number */ + if (!s->serial) { + return -1; /* not supported, caller sends INVALID_FIELD */ + } + { + int l =3D strlen(s->serial); + outbuf[3] =3D l; + memcpy(&outbuf[4], s->serial, l); + return 4 + l; + } + + default: + return -1; /* unsupported VPD page */ + } +} + +static int scsi_tape_emulate_inquiry(SCSIRequest *req, uint8_t *outbuf) +{ + SCSITapeState *s =3D DO_UPCAST(SCSITapeState, qdev, req->dev); + int buflen; + + if (req->cmd.buf[1] & 0x1) { + return scsi_disk_emulate_vpd_page(req, outbuf); + } + + /* Standard INQUIRY, not a VPD request */ + if (req->cmd.buf[2] !=3D 0) { + return -1; + } + + /* PAGE_CODE =3D=3D 0 */ + buflen =3D req->cmd.xfer; + if (buflen > SCSI_MAX_INQUIRY_LEN) { + buflen =3D SCSI_MAX_INQUIRY_LEN; + } + + outbuf[0] =3D TYPE_TAPE; /* 0x01 =3D Tape */ + outbuf[1] =3D 0x80; /* Always removable */ + outbuf[2] =3D 0x05; /* SPC-3 */ + outbuf[3] =3D 0x02 | 0x10; /* Format 2, HiSup */ + + if (buflen > 36) { + outbuf[4] =3D buflen - 5; + } else { + outbuf[4] =3D 36 - 5; + } + + outbuf[7] =3D 0x10 | (req->bus->info->tcq ? 0x02 : 0); + + strpadcpy((char *)&outbuf[16], 16, s->product, ' '); + strpadcpy((char *)&outbuf[8], 8, s->vendor, ' '); + + memset(&outbuf[32], 0, 4); + memcpy(&outbuf[32], s->version, MIN(4, strlen(s->version))); + + return buflen; +} + +/* + * > 0 - number of bytes from device to host + * < 0 - number of bytes from host to device + * =3D 0 - no data transfer, already completed + */ +static int32_t scsi_tape_emulate_command(SCSIRequest *req, uint8_t *buf) +{ + SCSITapeReq *r =3D DO_UPCAST(SCSITapeReq, req, req); + uint8_t *outbuf; + int32_t len =3D 0; + uint8_t command =3D buf[0]; + + if (req->cmd.xfer > 65536) { + scsi_check_condition(r, SENSE_CODE(INVALID_FIELD)); + return 0; + } + r->buflen =3D MAX(4096, req->cmd.xfer); + scsi_init_iovec(r, r->buflen); + + outbuf =3D r->iov.iov_base; + memset(outbuf, 0, r->buflen); + + switch (command) { + case INQUIRY: + len =3D scsi_tape_emulate_inquiry(req, outbuf); + if (len < 0) { + scsi_check_condition(r, SENSE_CODE(INVALID_FIELD)); + return 0; + } + break; + + case TEST_UNIT_READY: + if (!blk_is_available(req->dev->conf.blk)) { + scsi_check_condition(r, SENSE_CODE(NO_MEDIUM)); + return 0; + } + + /* TODO: check if tape is really ready */ + scsi_req_complete(&r->req, GOOD); + return 0; + case REQUEST_SENSE: + /* TODO: returning NO SENSE for now handle it later. */ + /* 0x0: 0x70 =3D current errors, fixed format */ + /* 0x2: sense key (0x00 =3D NO SENSE) */ + /* 0x7: additional sense length */ + { + int sense_len =3D MIN(buf[4], 18); + memset(outbuf, 0, sense_len); + outbuf[0] =3D 0x70; + outbuf[2] =3D 0x00; + outbuf[7] =3D 10; + len =3D sense_len; + } + break; + + case REWIND: + if (!blk_is_available(req->dev->conf.blk)) { + scsi_check_condition(r, SENSE_CODE(NO_MEDIUM)); + return 0; + } + + /* TODO: reset tape position to beginning of SIMH image */ + scsi_req_complete(&r->req, GOOD); + return 0; + + /* Add rest later */ + default: + scsi_check_condition(r, SENSE_CODE(INVALID_OPCODE)); + return 0; + } + + r->iov.iov_len =3D len; + return len; +} + + +/* TODO */ +static void scsi_tape_emulate_read_data(SCSIRequest *req) +{ + SCSITapeReq *r =3D DO_UPCAST(SCSITapeReq, req, req); + int buflen =3D r->iov.iov_len; + + if (buflen) { + r->iov.iov_len =3D 0; + scsi_req_data(&r->req, buflen); + return; + } + + scsi_req_complete(&r->req, GOOD); +} + +/* TODO: not implemented yet */ +static void scsi_tape_emulate_write_data(SCSIRequest *req) +{ + scsi_req_complete(req, GOOD); +} + +static const SCSIReqOps scsi_tape_reqops =3D { + .size =3D sizeof(SCSITapeReq), + .free_req =3D scsi_free_request, + .send_command =3D scsi_tape_emulate_command, + .read_data =3D scsi_tape_emulate_read_data, + .write_data =3D scsi_tape_emulate_write_data, + .get_buf =3D scsi_get_buf, +}; + +static SCSIRequest *scsi_tape_new_request(SCSIDevice *d, uint32_t tag, + uint32_t lun, uint8_t *buf, + void *hba_private) +{ + return scsi_req_alloc(&scsi_tape_reqops, d, tag, lun, hba_private); +} + +static void scsi_tape_realize(SCSIDevice *dev, Error **errp) +{ + SCSITapeState *s =3D DO_UPCAST(SCSITapeState, qdev, dev); + + dev->type =3D TYPE_TAPE; + + if (!s->qdev.conf.blk) { + error_setg(errp, "Drive property not set"); + return; + } + + if (!blk_is_inserted(s->qdev.conf.blk)) { + error_setg(errp, "Device needs media, but drive is empty"); + return; + } + + if (!s->vendor) { + s->vendor =3D g_strdup("QEMU"); + } else if (strlen(s->vendor) > 8) { + error_setg(errp, "Vendor must be 8 characters at most"); + return; + } + + if (!s->product) { + s->product =3D g_strdup("QEMU TAPE"); + } else if (strlen(s->product) > 16) { + error_setg(errp, "Product must be 16 characters at most"); + return; + } + + if (!s->version) { + s->version =3D g_strdup(QEMU_HW_VERSION); + } else if (strlen(s->version) > 4) { + error_setg(errp, "Version must be 4 characters at most"); + return; + } + + if (s->serial && strlen(s->serial) > 36) { + error_setg(errp, "Serial must be 36 characters at most"); + return; + } +} + +static Property scsi_tape_properties[] =3D { + DEFINE_PROP_DRIVE("drive", SCSITapeState, qdev.conf.blk), + DEFINE_PROP_STRING("vendor", SCSITapeState, vendor), + DEFINE_PROP_STRING("product", SCSITapeState, product), + DEFINE_PROP_STRING("ver", SCSITapeState, version), + DEFINE_PROP_STRING("serial", SCSITapeState, serial), +}; + +static void scsi_tape_class_initfn(ObjectClass *klass, const void *data) +{ + DeviceClass *dc =3D DEVICE_CLASS(klass); + SCSIDeviceClass *sc =3D SCSI_DEVICE_CLASS(klass); + + sc->realize =3D scsi_tape_realize; + sc->alloc_req =3D scsi_tape_new_request; + dc->desc =3D "SCSI Tape"; + device_class_set_props(dc, scsi_tape_properties); +} + +static const TypeInfo scsi_tape_info =3D { + .name =3D TYPE_SCSI_TAPE, + .parent =3D TYPE_SCSI_DEVICE, + .instance_size =3D sizeof(SCSITapeState), + .class_init =3D scsi_tape_class_initfn, +}; + +static void scsi_tape_register_types(void) +{ + type_register_static(&scsi_tape_info); +} + +type_init(scsi_tape_register_types) --=20 2.47.3