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 unsigned char      __u8;
  22 typedef unsigned short     __u16;
  23 typedef unsigned int       __u32;
  24 typedef 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
  52 typedef struct irb Irb;
  53 typedef struct ccw1 Ccw1;
  54 typedef struct cmd_orb CmdOrb;
  55 typedef struct schib Schib;
  56 typedef struct chsc_area_sda ChscAreaSda;
  57 typedef struct senseid SenseId;
  58 typedef struct subchannel_id SubChannelId;
  59
  60 /* start.s */
  61 void disabled_wait(void);
  62 void consume_sclp_int(void);
  63
  64 /* main.c */
  65 void panic(const char *string);
  66 void write_subsystem_identification(void);
  67 extern char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE)));
  68 unsigned int get_loadparm_index(void);
  69
  70 /* sclp.c */
  71 void sclp_print(const char *string);
  72 void sclp_set_write_mask(uint32_t receive_mask, uint32_t send_mask);
  73 void sclp_setup(void);
  74 void sclp_get_loadparm_ascii(char *loadparm);
  75 int sclp_read(char *str, size_t count);
  76
  77 /* virtio.c */
  78 unsigned long virtio_load_direct(ulong rec_list1, ulong rec_list2,
  79                                  ulong subchan_id, void *load_addr);
  80 bool virtio_is_supported(SubChannelId schid);
  81 void virtio_blk_setup_device(SubChannelId schid);
  82 int virtio_read(ulong sector, void *load_addr);
  83 int enable_mss_facility(void);
  84 u64 get_clock(void);
  85 ulong get_second(void);
  86
  87 /* bootmap.c */
  88 void zipl_load(void);
  89
  90 /* menu.c */
  91 void menu_set_parms(uint8_t boot_menu_flag, uint32_t boot_menu_timeout);
  92 int menu_get_zipl_boot_index(const char *menu_data);
  93 bool menu_is_enabled_zipl(void);
  94 int menu_get_enum_boot_index(int entries);
  95 bool menu_is_enabled_enum(void);
  96
  97 static inline void fill_hex(char *out, unsigned char val)
  98 {
  99     const char hex[] = "0123456789abcdef";
 100
 101     out[0] = hex[(val >> 4) & 0xf];
 102     out[1] = hex[val & 0xf];
 103 }
 104
 105 static inline void fill_hex_val(char *out, void *ptr, unsigned size)
 106 {
 107     unsigned char *value = ptr;
 108     unsigned int i;
 109
 110     for (i = 0; i < size; i++) {
 111         fill_hex(&out[i*2], value[i]);
 112     }
 113 }
 114
 115 static inline void print_int(const char *desc, u64 addr)
 116 {
 117     char out[] = ": 0xffffffffffffffff\n";
 118
 119     fill_hex_val(&out[4], &addr, sizeof(addr));
 120
 121     sclp_print(desc);
 122     sclp_print(out);
 123 }
 124
 125 static inline void debug_print_int(const char *desc, u64 addr)
 126 {
 127 #ifdef DEBUG
 128     print_int(desc, addr);
 129 #endif
 130 }
 131
 132 static inline void debug_print_addr(const char *desc, void *p)
 133 {
 134 #ifdef DEBUG
 135     debug_print_int(desc, (unsigned int)(unsigned long)p);
 136 #endif
 137 }
 138
 139 /***********************************************
 140  *           Hypercall functions               *
 141  ***********************************************/
 142
 143 #define KVM_S390_VIRTIO_NOTIFY          0
 144 #define KVM_S390_VIRTIO_RESET           1
 145 #define KVM_S390_VIRTIO_SET_STATUS      2
 146 #define KVM_S390_VIRTIO_CCW_NOTIFY      3
 147
 148 static inline void yield(void)
 149 {
 150     asm volatile ("diag 0,0,0x44"
 151                   : :
 152                   : "memory", "cc");
 153 }
 154
 155 #define MAX_SECTOR_SIZE 4096
 156
 157 static inline void sleep(unsigned int seconds)
 158 {
 159     ulong target = get_second() + seconds;
 160
 161     while (get_second() < target) {
 162         yield();
 163     }
 164 }
 165
 166 static inline void IPL_assert(bool term, const char *message)
 167 {
 168     if (!term) {
 169         sclp_print("\n! ");
 170         sclp_print(message);
 171         panic(" !\n"); /* no return */
 172     }
 173 }
 174
 175 static inline void IPL_check(bool term, const char *message)
 176 {
 177     if (!term) {
 178         sclp_print("\n! WARNING: ");
 179         sclp_print(message);
 180         sclp_print(" !\n");
 181     }
 182 }
 183
 184 extern const unsigned char ebc2asc[256];
 185 static inline void ebcdic_to_ascii(const char *src,
 186                                    char *dst,
 187                                    unsigned int size)
 188 {
 189     unsigned int i;
 190
 191     for (i = 0; i < size; i++) {
 192         unsigned c = src[i];
 193         dst[i] = ebc2asc[c];
 194     }
 195 }
 196
 197 #endif /* S390_CCW_H */