LXR qemu/pc-bios/s390-ccw/s390-ccw.h

   1/*
   2 * S390 CCW boot loader
   3 *
   4 * Copyright (c) 2013 Alexander Graf <agraf@suse.de>
   5 *
   6 * This work is licensed under the terms of the GNU GPL, version 2 or (at
   7 * your option) any later version. See the COPYING file in the top-level
   8 * directory.
   9 */
  10
  11#ifndef S390_CCW_H
  12#define S390_CCW_H
  13
  14/* #define DEBUG */
  15
  16typedef unsigned char      u8;
  17typedef unsigned short     u16;
  18typedef unsigned int       u32;
  19typedef unsigned long long u64;
  20typedef unsigned long      ulong;
  21typedef unsigned char      __u8;
  22typedef unsigned short     __u16;
  23typedef unsigned int       __u32;
  24typedef unsigned long long __u64;
  25
  26#define true 1
  27#define false 0
  28#define PAGE_SIZE 4096
  29
  30#ifndef EIO
  31#define EIO     1
  32#endif
  33#ifndef EBUSY
  34#define EBUSY   2
  35#endif
  36#ifndef NULL
  37#define NULL    0
  38#endif
  39#ifndef MIN
  40#define MIN(a, b) (((a) < (b)) ? (a) : (b))
  41#endif
  42#ifndef MIN_NON_ZERO
  43#define MIN_NON_ZERO(a, b) ((a) == 0 ? (b) : \
  44                            ((b) == 0 ? (a) : (MIN(a, b))))
  45#endif
  46
  47#define ARRAY_SIZE(a) (sizeof(a) / sizeof((a)[0]))
  48
  49#include "cio.h"
  50#include "iplb.h"
  51
  52typedef struct irb Irb;
  53typedef struct ccw1 Ccw1;
  54typedef struct cmd_orb CmdOrb;
  55typedef struct schib Schib;
  56typedef struct chsc_area_sda ChscAreaSda;
  57typedef struct senseid SenseId;
  58typedef struct subchannel_id SubChannelId;
  59
  60/* start.s */
  61void disabled_wait(void);
  62void consume_sclp_int(void);
  63
  64/* main.c */
  65void panic(const char *string);
  66void write_subsystem_identification(void);
  67extern char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE)));
  68unsigned int get_loadparm_index(void);
  69
  70/* sclp.c */
  71void sclp_print(const char *string);
  72void sclp_setup(void);
  73void sclp_get_loadparm_ascii(char *loadparm);
  74
  75/* virtio.c */
  76unsigned long virtio_load_direct(ulong rec_list1, ulong rec_list2,
  77                                 ulong subchan_id, void *load_addr);
  78bool virtio_is_supported(SubChannelId schid);
  79void virtio_blk_setup_device(SubChannelId schid);
  80int virtio_read(ulong sector, void *load_addr);
  81int enable_mss_facility(void);
  82ulong get_second(void);
  83
  84/* bootmap.c */
  85void zipl_load(void);
  86
  87static inline void fill_hex(char *out, unsigned char val)
  88{
  89    const char hex[] = "0123456789abcdef";
  90
  91    out[0] = hex[(val >> 4) & 0xf];
  92    out[1] = hex[val & 0xf];
  93}
  94
  95static inline void fill_hex_val(char *out, void *ptr, unsigned size)
  96{
  97    unsigned char *value = ptr;
  98    unsigned int i;
  99
 100    for (i = 0; i < size; i++) {
 101        fill_hex(&out[i*2], value[i]);
 102    }
 103}
 104
 105static inline void print_int(const char *desc, u64 addr)
 106{
 107    char out[] = ": 0xffffffffffffffff\n";
 108
 109    fill_hex_val(&out[4], &addr, sizeof(addr));
 110
 111    sclp_print(desc);
 112    sclp_print(out);
 113}
 114
 115static inline void debug_print_int(const char *desc, u64 addr)
 116{
 117#ifdef DEBUG
 118    print_int(desc, addr);
 119#endif
 120}
 121
 122static inline void debug_print_addr(const char *desc, void *p)
 123{
 124#ifdef DEBUG
 125    debug_print_int(desc, (unsigned int)(unsigned long)p);
 126#endif
 127}
 128
 129/***********************************************
 130 *           Hypercall functions               *
 131 ***********************************************/
 132
 133#define KVM_S390_VIRTIO_NOTIFY          0
 134#define KVM_S390_VIRTIO_RESET           1
 135#define KVM_S390_VIRTIO_SET_STATUS      2
 136#define KVM_S390_VIRTIO_CCW_NOTIFY      3
 137
 138static inline void yield(void)
 139{
 140    asm volatile ("diag 0,0,0x44"
 141                  : :
 142                  : "memory", "cc");
 143}
 144
 145#define MAX_SECTOR_SIZE 4096
 146
 147static inline void sleep(unsigned int seconds)
 148{
 149    ulong target = get_second() + seconds;
 150
 151    while (get_second() < target) {
 152        yield();
 153    }
 154}
 155
 156static inline void IPL_assert(bool term, const char *message)
 157{
 158    if (!term) {
 159        sclp_print("\n! ");
 160        sclp_print(message);
 161        panic(" !\n"); /* no return */
 162    }
 163}
 164
 165static inline void IPL_check(bool term, const char *message)
 166{
 167    if (!term) {
 168        sclp_print("\n! WARNING: ");
 169        sclp_print(message);
 170        sclp_print(" !\n");
 171    }
 172}
 173
 174extern const unsigned char ebc2asc[256];
 175static inline void ebcdic_to_ascii(const char *src,
 176                                   char *dst,
 177                                   unsigned int size)
 178{
 179    unsigned int i;
 180
 181    for (i = 0; i < size; i++) {
 182        unsigned c = src[i];
 183        dst[i] = ebc2asc[c];
 184    }
 185}
 186
 187#endif /* S390_CCW_H */
 188