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 */ 198