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