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
  16 typedef unsigned char      u8;
  17 typedef unsigned short     u16;
  18 typedef unsigned int       u32;
  19 typedef unsigned long long u64;
  20 typedef unsigned long      ulong;
  21 typedef long               size_t;
  22 typedef int                bool;
  23 typedef unsigned char      uint8_t;
  24 typedef unsigned short     uint16_t;
  25 typedef unsigned int       uint32_t;
  26 typedef unsigned long long uint64_t;
  27 typedef unsigned char      __u8;
  28 typedef unsigned short     __u16;
  29 typedef unsigned int       __u32;
  30 typedef unsigned long long __u64;
  31
  32 #define true 1
  33 #define false 0
  34 #define PAGE_SIZE 4096
  35
  36 #ifndef EIO
  37 #define EIO     1
  38 #endif
  39 #ifndef EBUSY
  40 #define EBUSY   2
  41 #endif
  42 #ifndef NULL
  43 #define NULL    0
  44 #endif
  45
  46 #include "cio.h"
  47 #include "iplb.h"
  48
  49 typedef struct irb Irb;
  50 typedef struct ccw1 Ccw1;
  51 typedef struct cmd_orb CmdOrb;
  52 typedef struct schib Schib;
  53 typedef struct chsc_area_sda ChscAreaSda;
  54 typedef struct senseid SenseId;
  55 typedef struct subchannel_id SubChannelId;
  56
  57 /* start.s */
  58 void disabled_wait(void);
  59 void consume_sclp_int(void);
  60
  61 /* main.c */
  62 void panic(const char *string);
  63 void write_subsystem_identification(void);
  64 extern char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE)));
  65 unsigned int get_loadparm_index(void);
  66
  67 /* sclp.c */
  68 void sclp_print(const char *string);
  69 void sclp_setup(void);
  70 void sclp_get_loadparm_ascii(char *loadparm);
  71
  72 /* virtio.c */
  73 unsigned long virtio_load_direct(ulong rec_list1, ulong rec_list2,
  74                                  ulong subchan_id, void *load_addr);
  75 bool virtio_is_supported(SubChannelId schid);
  76 void virtio_setup_device(SubChannelId schid);
  77 int virtio_read(ulong sector, void *load_addr);
  78 int enable_mss_facility(void);
  79 ulong get_second(void);
  80
  81 /* bootmap.c */
  82 void zipl_load(void);
  83
  84 static inline void *memset(void *s, int c, size_t n)
  85 {
  86     int i;
  87     unsigned char *p = s;
  88
  89     for (i = 0; i < n; i++) {
  90         p[i] = c;
  91     }
  92
  93     return s;
  94 }
  95
  96 static inline void fill_hex(char *out, unsigned char val)
  97 {
  98     const char hex[] = "0123456789abcdef";
  99
 100     out[0] = hex[(val >> 4) & 0xf];
 101     out[1] = hex[val & 0xf];
 102 }
 103
 104 static inline void fill_hex_val(char *out, void *ptr, unsigned size)
 105 {
 106     unsigned char *value = ptr;
 107     unsigned int i;
 108
 109     for (i = 0; i < size; i++) {
 110         fill_hex(&out[i*2], value[i]);
 111     }
 112 }
 113
 114 static inline void print_int(const char *desc, u64 addr)
 115 {
 116     char out[] = ": 0xffffffffffffffff\n";
 117
 118     fill_hex_val(&out[4], &addr, sizeof(addr));
 119
 120     sclp_print(desc);
 121     sclp_print(out);
 122 }
 123
 124 static inline void debug_print_int(const char *desc, u64 addr)
 125 {
 126 #ifdef DEBUG
 127     print_int(desc, addr);
 128 #endif
 129 }
 130
 131 static inline void debug_print_addr(const char *desc, void *p)
 132 {
 133 #ifdef DEBUG
 134     debug_print_int(desc, (unsigned int)(unsigned long)p);
 135 #endif
 136 }
 137
 138 /***********************************************
 139  *           Hypercall functions               *
 140  ***********************************************/
 141
 142 #define KVM_S390_VIRTIO_NOTIFY          0
 143 #define KVM_S390_VIRTIO_RESET           1
 144 #define KVM_S390_VIRTIO_SET_STATUS      2
 145 #define KVM_S390_VIRTIO_CCW_NOTIFY      3
 146
 147 static inline void yield(void)
 148 {
 149     asm volatile ("diag 0,0,0x44"
 150                   : :
 151                   : "memory", "cc");
 152 }
 153
 154 #define MAX_SECTOR_SIZE 4096
 155
 156 static inline void sleep(unsigned int seconds)
 157 {
 158     ulong target = get_second() + seconds;
 159
 160     while (get_second() < target) {
 161         yield();
 162     }
 163 }
 164
 165 static inline void *memcpy(void *s1, const void *s2, size_t n)
 166 {
 167     uint8_t *p1 = s1;
 168     const uint8_t *p2 = s2;
 169
 170     while (n--) {
 171         p1[n] = p2[n];
 172     }
 173     return s1;
 174 }
 175
 176 static inline void IPL_assert(bool term, const char *message)
 177 {
 178     if (!term) {
 179         sclp_print("\n! ");
 180         sclp_print(message);
 181         panic(" !\n"); /* no return */
 182     }
 183 }
 184
 185 static inline void IPL_check(bool term, const char *message)
 186 {
 187     if (!term) {
 188         sclp_print("\n! WARNING: ");
 189         sclp_print(message);
 190         sclp_print(" !\n");
 191     }
 192 }
 193
 194 extern const unsigned char ebc2asc[256];
 195 static inline void ebcdic_to_ascii(const char *src,
 196                                    char *dst,
 197                                    unsigned int size)
 198 {
 199     unsigned int i;
 200
 201     for (i = 0; i < size; i++) {
 202         unsigned c = src[i];
 203         dst[i] = ebc2asc[c];
 204     }
 205 }
 206
 207 #endif /* S390_CCW_H */