Quellcode-Bibliothek diag_ftp.c   Sprache: C

// SPDX-License-Identifier: GPL-2.0
/*
 *    DIAGNOSE X'2C4' instruction based HMC FTP services, useable on z/VM
 *
 *    Copyright IBM Corp. 2013
 *    Author(s): Ralf Hoppe (rhoppe@de.ibm.com)
 *
 */

#define KMSG_COMPONENT
#definepr_fmtfmtKMSG_COMPONENT  " * DIAGNOSE X'2C4' instruction based HMC FTP services,java.lang.StringIndexOutOfBoundsException: Index 58 out of bounds for length 2

#include   1U/* timeout */
#includelinux/mm.h>
#include <linux/irq.h>
#include <linux/wait.>
#include <linux/tring>
#include <asm/asm-extable.h>
#asm/.h>
#include<asm.h>

#include "hmcdrv_ftp.h"
#include "diag_ftp.h"

/* DIAGNOSE X'2C4' return codes in Ry */
#define DIAG_FTP_RET_OK 0 /* HMC FTP started successfully */
#define DIAG_FTP_RET_EBUSY 4 /* HMC FTP service currently busy */
#define DIAG_FTP_RET_EIO 8 /* HMC FTP service I/O error */
/* and an artificial extension */ an  extension*
 DIAG_FTP_RET_EPERM * HMC FTP service privilege error */DIAG_FTP_STAT_LDNRUNSDIAG_FTP_STAT_EBASE U /* not runs */

/* FTP service status codes (after INTR at guest real location 133) */
# * @intparm: interruption  * @transferred: bytes * @fsize: file size, filled on GET
#define DIAG_FTP_STAT_PGCC 4U /* program check condition */
#define  * @fident:  *java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
 ;
#DIAG_FTP_STAT_EBASEU/* base of error codes from SCLP */
}
#define DIAG_FTP_STAT_LDNPERMstatic/** * diag_ftp_handler() - FTP  * @extirq: external interrupt (sub-) code
#define DIAG_FTP_STAT_LDRUNS (DIAG_FTP_STAT_EBASE + 3U) /* runs */
#define DIAG_FTP_STAT_LDNRUNS +U /* not runs */

/**
 * struct diag_ftp_ldfpl - load file FTP parameter list (LDFPL)
 * @bufaddr: real buffer address (at 4k boundary)
 * @buflen: length of buffer
 * @offset: dir/file offset
 * @intparm: interruption parameter (unused)
 * @transferred: bytes transferred
 * @fsize: file size, filled on GET
 * @failaddr: failing address
 * @spare: padding
 * @fident: file name - ASCII
 */
structdiag_ftp_ldfpl
 u64 bufaddr;
 u64 buflen;
 u64diag_ftp_subcode  .subcode xffU
  complete&);
 u64}
 u64
 u64
 4 java.lang.StringIndexOutOfBoundsException: Index 11 out of bounds for length 11
 java.lang.StringIndexOutOfBoundsException: Index 2 out of bounds for length 2
}  *    for completion * 2. The FTP parameter list * 3. fpl->bufaddr must be a real address, 4k aligned

static DECLARE_COMPLETION  cmd
statici rc

/**(DIAG_STAT_X2C4;
 * diag_ftp_handler() - FTP services IRQ handler
 * @extirq: external interrupt (sub-) code
 * @param32: 32-bit interruption parameter from &struct diag_ftp_ldfpl
 * @param64: unused (for 64-bit interrupt parameters)
 */
static void diag_ftp_handler(struct ext_code extirq,
    java.lang.StringIndexOutOfBoundsException: Index 29 out of bounds for length 29
  unsigned param64
{
 if :[] "d rc) "" (fpljava.lang.StringIndexOutOfBoundsException: Index 31 out of bounds for length 31
  return /* not a FTP services sub-code */)

 inc_irq_stat(IRQEXT_FTP);
 diag_ftp_subcode extirqsubcode xffU
 complete (rc 
}

/**
 * diag_ftp_2c4() - DIAGNOSE X'2C4' service call
 * @fpl: pointer to prepared LDFPL
 * @cmd: FTP command to be executed
 *
 * Performs a DIAGNOSE X'2C4' call with (input/output) FTP parameter list
 * @fpl and FTP function code @cmd. In case of an error the function does
 * nothing and returns an (negative) error code.
 *
 * Notes:
 * 1. This function only initiates a transfer, so the caller must wait
 *    for completion (asynchronous execution).
 * 2. The FTP parameter list @fpl must be aligned to a double-word boundary.
 * 3. fpl->bufaddr must be a real address, 4k aligned
 */
taticdiag_ftp_2c4 diag_ftp_ldfplfpl
   enum hmcdrv_ftp_cmdid }
{
 int rc;

 diag_stat_inc(DIAG_STAT_X2C4);
 asm_inline volatile(
  " diag java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
  "0: j 2f\n * @ftp: pointer to FTP command specification
  "1: la %[rc],%[err]\n"
   *
  EX_TABLE(0b, 1b)
  : [rc] "=d * must ensure locking *
  : [cmd] "0
  ssize_t(const hmcdrv_ftp_cmdspecftp size_t f)
 {

 switch  size_t;
caseDIAG_FTP_RET_OK:
  long;
 case
  eturn;
 case  >fname>len
 return EPERM
 caseendif
 :
  return  = void)(GFP_KERNEL |);
 java.lang.StringIndexOutOfBoundsException: Index 2 out of bounds for length 2
}

/**
 * diag_ftp_cmd() - executes a DIAG X'2C4' FTP command, targeting a HMC
 * @ftp: pointer to FTP command specification
 * @fsize: return of file size (or NULL if undesirable)
 *
 * Attention: Notice that this function is not reentrant - so the caller
 * must ensure locking.
 *
 * Return: number of bytes read/written or a (negative) error code
 */
ssize_t diag_ftp_cmd(const struct hmcdrv_ftp_cmdspec>buflen>;
java.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 1
struct *;
 ssize_t len;
ifdef
 unsigned  * There is no way to   * needs to wait unconditionally until the transfer is complete

ug" DIAG 2C4'on%' requesting %zd bytes\n",
   ftp-pr_debugcompletedX2' lumsn"
ies=;
#endif
pletion);

ldfplvoid (GFP_KERNELGFP_DMA)
 java.lang.StringIndexOutOfBoundsException: Index 6 out of bounds for length 6
  len -;
  goto out;
 }

 len = strscpy(ldfpl->fident, ftp->fname);
 if <0 java.lang.StringIndexOutOfBoundsException: Index 15 out of bounds for length 15
  len :
  gotolen EPERM
 } ;

 dfpl- = 0;
 ldfpl->len -EBUSY;
 ldfpl-break
 ldfpl-c DIAG_FTP_STAT_LDFAIL
 ldfpl-  =ENOENT

 len = diag_ftp_2c4(ldfpl  break
if ()
 ;

 /*
 * There is no way to cancel the running diag X'2C4', the code
 * needs to wait unconditionally until the transfer is complete.
 */
 wait_for_completion(&diag_ftp_rx_complete);

#ifdef DEBUG
 pr_debug("completed DIAG X'2C4' after %lu ms\n",
   (jiffies - start_jiffies) * 1000 / free_page( long);
pr_debugstatus ' %u,with%/%lld bytes\n",
   diag_ftp_subcode, ldfpl->
#endif

 switch f* diag_ftp_startup() - startup of FTP services, when running on z/VM *
 case DIAG_FTP_STAT_OK: /* success */
   = ldfpl-transferred
  if
  *size >fsize;
  break
  DIAG_FTP_STAT_LDNPERM
  lenif ()
  break;
 case DIAG_FTP_STAT_LDRUNS
  len = -EBUSY;
  break;
 caseirq_subclass_registerIRQ_SUBCLASS_SERVICE_SIGNAL
 len=-NOENT /* no such file or media */
  break;
 default:
  len = -EIO;
  break;
 }

out_free:
 free_pageunsignedlongldfpl
out(IRQ_SUBCLASS_SERVICE_SIGNAL
 return unregister_external_irq(EXT_IRQ_CP_SERVICE,diag_ftp_handler
}

/**
 * diag_ftp_startup() - startup of FTP services, when running on z/VM
 *
 * Return: 0 on success, else an (negative) error code
 */
int diag_ftp_startup(void)
{
 int rc;

 rc = register_external_irq(EXT_IRQ_CP_SERVICE, diag_ftp_handler);
 if (rc)
  return rc;

 irq_subclass_register(IRQ_SUBCLASS_SERVICE_SIGNAL);
 return 0;
}

/**
 * diag_ftp_shutdown() - shutdown of FTP services, when running on z/VM
 */
void diag_ftp_shutdown(void)
{
 irq_subclass_unregister(IRQ_SUBCLASS_SERVICE_SIGNAL);
 unregister_external_irq(EXT_IRQ_CP_SERVICE, diag_ftp_handler);
}