192f2ca38SAlexander Graf /* 292f2ca38SAlexander Graf * S390 virtio-ccw loading program 392f2ca38SAlexander Graf * 492f2ca38SAlexander Graf * Copyright (c) 2013 Alexander Graf <agraf@suse.de> 592f2ca38SAlexander Graf * 692f2ca38SAlexander Graf * This work is licensed under the terms of the GNU GPL, version 2 or (at 792f2ca38SAlexander Graf * your option) any later version. See the COPYING file in the top-level 892f2ca38SAlexander Graf * directory. 992f2ca38SAlexander Graf */ 1092f2ca38SAlexander Graf 1190806fecSThomas Huth #include "libc.h" 12*9bfc04f9SJanosch Frank #include "helper.h" 13c95df3d1SJason J. Herne #include "s390-arch.h" 1492f2ca38SAlexander Graf #include "s390-ccw.h" 15120d0410SJason J. Herne #include "cio.h" 1660612d5cSEugene (jno) Dvurechenski #include "virtio.h" 17efa47d36SJason J. Herne #include "dasd-ipl.h" 1892f2ca38SAlexander Graf 1992f2ca38SAlexander Graf char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE))); 20b88d7fa5SEugene (jno) Dvurechenski static SubChannelId blk_schid = { .one = 1 }; 216673ded7SThomas Huth static char loadparm_str[LOADPARM_LEN + 1]; 22118ee80fSCollin L. Walling QemuIplParameters qipl; 23a5f6e097SJason J. Herne IplParameterBlock iplb __attribute__((__aligned__(PAGE_SIZE))); 24a5f6e097SJason J. Herne static bool have_iplb; 252880469cSJason J. Herne static uint16_t cutype; 26*9bfc04f9SJanosch Frank LowCore *lowcore; /* Yes, this *is* a pointer to address 0 */ 27f2879a5cSChristian Borntraeger 289eaa654aSCollin L. Walling #define LOADPARM_PROMPT "PROMPT " 29074afe60SCollin Walling #define LOADPARM_EMPTY " " 3053b310ceSCollin L. Walling #define BOOT_MENU_FLAG_MASK (QIPL_FLAG_BM_OPTS_CMD | QIPL_FLAG_BM_OPTS_ZIPL) 319eaa654aSCollin L. Walling 32f2879a5cSChristian Borntraeger /* 33a5f6e097SJason J. Herne * Principles of Operations (SA22-7832-09) chapter 17 requires that 34f2879a5cSChristian Borntraeger * a subsystem-identification is at 184-187 and bytes 188-191 are zero 35f2879a5cSChristian Borntraeger * after list-directed-IPL and ccw-IPL. 36f2879a5cSChristian Borntraeger */ 37f2879a5cSChristian Borntraeger void write_subsystem_identification(void) 38f2879a5cSChristian Borntraeger { 39b88d7fa5SEugene (jno) Dvurechenski SubChannelId *schid = (SubChannelId *) 184; 40f2879a5cSChristian Borntraeger uint32_t *zeroes = (uint32_t *) 188; 41f2879a5cSChristian Borntraeger 42f2879a5cSChristian Borntraeger *schid = blk_schid; 43f2879a5cSChristian Borntraeger *zeroes = 0; 44f2879a5cSChristian Borntraeger } 45f2879a5cSChristian Borntraeger 46*9bfc04f9SJanosch Frank void write_iplb_location(void) 47*9bfc04f9SJanosch Frank { 48*9bfc04f9SJanosch Frank lowcore->ptr_iplb = ptr2u32(&iplb); 49*9bfc04f9SJanosch Frank } 50*9bfc04f9SJanosch Frank 51c9262e8aSEugene (jno) Dvurechenski void panic(const char *string) 5292f2ca38SAlexander Graf { 5392f2ca38SAlexander Graf sclp_print(string); 547f61cbc1SChristian Borntraeger disabled_wait(); 5592f2ca38SAlexander Graf while (1) { } 5692f2ca38SAlexander Graf } 5792f2ca38SAlexander Graf 5895fa1af8SFarhan Ali unsigned int get_loadparm_index(void) 5995fa1af8SFarhan Ali { 60074afe60SCollin Walling return atoui(loadparm_str); 6195fa1af8SFarhan Ali } 6295fa1af8SFarhan Ali 63930072d2SJason J. Herne /* 64930072d2SJason J. Herne * Find the subchannel connected to the given device (dev_no) and fill in the 65930072d2SJason J. Herne * subchannel information block (schib) with the connected subchannel's info. 66930072d2SJason J. Herne * NOTE: The global variable blk_schid is updated to contain the subchannel 67930072d2SJason J. Herne * information. 682880469cSJason J. Herne * 692880469cSJason J. Herne * If the caller gives dev_no=-1 then the user did not specify a boot device. 702880469cSJason J. Herne * In this case we'll just use the first potentially bootable device we find. 71930072d2SJason J. Herne */ 727b361db3SJason J. Herne static bool find_subch(int dev_no) 7392f2ca38SAlexander Graf { 747b361db3SJason J. Herne Schib schib; 750f79b89bSAlexander Yarygin int i, r; 762880469cSJason J. Herne bool is_virtio; 77ff151f4eSDominik Dingel 7892f2ca38SAlexander Graf for (i = 0; i < 0x10000; i++) { 7992f2ca38SAlexander Graf blk_schid.sch_no = i; 807b361db3SJason J. Herne r = stsch_err(blk_schid, &schib); 810f79b89bSAlexander Yarygin if ((r == 3) || (r == -EIO)) { 8222d67ab5SCornelia Huck break; 8322d67ab5SCornelia Huck } 847b361db3SJason J. Herne if (!schib.pmcw.dnv) { 850f79b89bSAlexander Yarygin continue; 8692f2ca38SAlexander Graf } 87930072d2SJason J. Herne 883668cb7cSJason J. Herne enable_subchannel(blk_schid); 892880469cSJason J. Herne cutype = cu_type(blk_schid); 902880469cSJason J. Herne 912880469cSJason J. Herne /* 922880469cSJason J. Herne * Note: we always have to run virtio_is_supported() here to make 932880469cSJason J. Herne * sure that the vdev.senseid data gets pre-initialized correctly 942880469cSJason J. Herne */ 952880469cSJason J. Herne is_virtio = virtio_is_supported(blk_schid); 962880469cSJason J. Herne 972880469cSJason J. Herne /* No specific devno given, just return 1st possibly bootable device */ 982880469cSJason J. Herne if (dev_no < 0) { 992880469cSJason J. Herne switch (cutype) { 1002880469cSJason J. Herne case CU_TYPE_VIRTIO: 1012880469cSJason J. Herne if (is_virtio) { 1022880469cSJason J. Herne /* 1032880469cSJason J. Herne * Skip net devices since no IPLB is created and therefore 1042880469cSJason J. Herne * no network bootloader has been loaded 1052880469cSJason J. Herne */ 1062880469cSJason J. Herne if (virtio_get_device_type() != VIRTIO_ID_NET) { 1072880469cSJason J. Herne return true; 1082880469cSJason J. Herne } 1092880469cSJason J. Herne } 1102880469cSJason J. Herne continue; 1112880469cSJason J. Herne case CU_TYPE_DASD_3990: 1122880469cSJason J. Herne case CU_TYPE_DASD_2107: 1132880469cSJason J. Herne return true; 1142880469cSJason J. Herne default: 11599b72e0fSFarhan Ali continue; 11699b72e0fSFarhan Ali } 1172880469cSJason J. Herne } 118930072d2SJason J. Herne 1192880469cSJason J. Herne /* Caller asked for a specific devno */ 1202880469cSJason J. Herne if (schib.pmcw.dev == dev_no) { 1210f79b89bSAlexander Yarygin return true; 1220f79b89bSAlexander Yarygin } 1230f79b89bSAlexander Yarygin } 1240f79b89bSAlexander Yarygin 1250f79b89bSAlexander Yarygin return false; 1260f79b89bSAlexander Yarygin } 1270f79b89bSAlexander Yarygin 1289eaa654aSCollin L. Walling static void menu_setup(void) 1299eaa654aSCollin L. Walling { 130a0e11b61SCollin Walling if (memcmp(loadparm_str, LOADPARM_PROMPT, LOADPARM_LEN) == 0) { 1319eaa654aSCollin L. Walling menu_set_parms(QIPL_FLAG_BM_OPTS_CMD, 0); 1329eaa654aSCollin L. Walling return; 1339eaa654aSCollin L. Walling } 1349eaa654aSCollin L. Walling 1359eaa654aSCollin L. Walling /* If loadparm was set to any other value, then do not enable menu */ 136a0e11b61SCollin Walling if (memcmp(loadparm_str, LOADPARM_EMPTY, LOADPARM_LEN) != 0) { 1379eaa654aSCollin L. Walling return; 1389eaa654aSCollin L. Walling } 1399eaa654aSCollin L. Walling 1409eaa654aSCollin L. Walling switch (iplb.pbt) { 1419eaa654aSCollin L. Walling case S390_IPL_TYPE_CCW: 142ffb4a1c8SCollin L. Walling case S390_IPL_TYPE_QEMU_SCSI: 14353b310ceSCollin L. Walling menu_set_parms(qipl.qipl_flags & BOOT_MENU_FLAG_MASK, 1449eaa654aSCollin L. Walling qipl.boot_menu_timeout); 1459eaa654aSCollin L. Walling return; 1469eaa654aSCollin L. Walling } 1479eaa654aSCollin L. Walling } 1489eaa654aSCollin L. Walling 14987f910c1SJason J. Herne /* 15087f910c1SJason J. Herne * Initialize the channel I/O subsystem so we can talk to our ipl/boot device. 15187f910c1SJason J. Herne */ 15287f910c1SJason J. Herne static void css_setup(void) 15387f910c1SJason J. Herne { 15487f910c1SJason J. Herne /* 15587f910c1SJason J. Herne * Unconditionally enable mss support. In every sane configuration this 15687f910c1SJason J. Herne * will succeed; and even if it doesn't, stsch_err() can handle it. 15787f910c1SJason J. Herne */ 15887f910c1SJason J. Herne enable_mss_facility(); 15987f910c1SJason J. Herne } 16087f910c1SJason J. Herne 161a5f6e097SJason J. Herne /* 162a5f6e097SJason J. Herne * Collect various pieces of information from the hypervisor/hardware that 163a5f6e097SJason J. Herne * we'll use to determine exactly how we'll boot. 164a5f6e097SJason J. Herne */ 165a5f6e097SJason J. Herne static void boot_setup(void) 166a5f6e097SJason J. Herne { 167a5f6e097SJason J. Herne char lpmsg[] = "LOADPARM=[________]\n"; 168a5f6e097SJason J. Herne 169a5f6e097SJason J. Herne sclp_get_loadparm_ascii(loadparm_str); 170a5f6e097SJason J. Herne memcpy(lpmsg + 10, loadparm_str, 8); 171a5f6e097SJason J. Herne sclp_print(lpmsg); 172a5f6e097SJason J. Herne 173a5f6e097SJason J. Herne have_iplb = store_iplb(&iplb); 174a5f6e097SJason J. Herne } 175a5f6e097SJason J. Herne 1767b361db3SJason J. Herne static void find_boot_device(void) 1770f79b89bSAlexander Yarygin { 17899b72e0fSFarhan Ali VDev *vdev = virtio_get_device(); 1797b361db3SJason J. Herne int ssid; 1807b361db3SJason J. Herne bool found; 1810f79b89bSAlexander Yarygin 1827b361db3SJason J. Herne if (!have_iplb) { 1837b361db3SJason J. Herne for (ssid = 0; ssid < 0x3; ssid++) { 1847b361db3SJason J. Herne blk_schid.ssid = ssid; 1857b361db3SJason J. Herne found = find_subch(-1); 1867b361db3SJason J. Herne if (found) { 1877b361db3SJason J. Herne return; 1887b361db3SJason J. Herne } 1897b361db3SJason J. Herne } 1907b361db3SJason J. Herne panic("Could not find a suitable boot device (none specified)\n"); 1917b361db3SJason J. Herne } 192118ee80fSCollin L. Walling 193d046c51dSAlexander Yarygin switch (iplb.pbt) { 194d046c51dSAlexander Yarygin case S390_IPL_TYPE_CCW: 1957b361db3SJason J. Herne debug_print_int("device no. ", iplb.ccw.devno); 196d046c51dSAlexander Yarygin blk_schid.ssid = iplb.ccw.ssid & 0x3; 1970f79b89bSAlexander Yarygin debug_print_int("ssid ", blk_schid.ssid); 1987b361db3SJason J. Herne found = find_subch(iplb.ccw.devno); 199d046c51dSAlexander Yarygin break; 200b39b7718SEugene (jno) Dvurechenski case S390_IPL_TYPE_QEMU_SCSI: 201b39b7718SEugene (jno) Dvurechenski vdev->scsi_device_selected = true; 202b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.channel = iplb.scsi.channel; 203b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.target = iplb.scsi.target; 204b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.lun = iplb.scsi.lun; 205b39b7718SEugene (jno) Dvurechenski blk_schid.ssid = iplb.scsi.ssid & 0x3; 2067b361db3SJason J. Herne found = find_subch(iplb.scsi.devno); 207b39b7718SEugene (jno) Dvurechenski break; 208d046c51dSAlexander Yarygin default: 209d046c51dSAlexander Yarygin panic("List-directed IPL not supported yet!\n"); 210d046c51dSAlexander Yarygin } 2117b361db3SJason J. Herne 2127b361db3SJason J. Herne IPL_assert(found, "Boot device not found\n"); 213ff151f4eSDominik Dingel } 21492f2ca38SAlexander Graf 2157b361db3SJason J. Herne static void virtio_setup(void) 2167b361db3SJason J. Herne { 2177b361db3SJason J. Herne VDev *vdev = virtio_get_device(); 2187b361db3SJason J. Herne QemuIplParameters *early_qipl = (QemuIplParameters *)QIPL_ADDRESS; 2197b361db3SJason J. Herne 2207b361db3SJason J. Herne memcpy(&qipl, early_qipl, sizeof(QemuIplParameters)); 2217b361db3SJason J. Herne 2227b361db3SJason J. Herne if (have_iplb) { 2237b361db3SJason J. Herne menu_setup(); 2247b361db3SJason J. Herne } 22592f2ca38SAlexander Graf 22699b72e0fSFarhan Ali if (virtio_get_device_type() == VIRTIO_ID_NET) { 22799b72e0fSFarhan Ali sclp_print("Network boot device detected\n"); 228118ee80fSCollin L. Walling vdev->netboot_start_addr = qipl.netboot_start_addr; 22999b72e0fSFarhan Ali } else { 230867e039aSThomas Huth virtio_blk_setup_device(blk_schid); 23180ba3e24SEugene (jno) Dvurechenski IPL_assert(virtio_ipl_disk_is_valid(), "No valid IPL device detected"); 23292f2ca38SAlexander Graf } 23399b72e0fSFarhan Ali } 23492f2ca38SAlexander Graf 23592f2ca38SAlexander Graf int main(void) 23692f2ca38SAlexander Graf { 23792f2ca38SAlexander Graf sclp_setup(); 23887f910c1SJason J. Herne css_setup(); 239a5f6e097SJason J. Herne boot_setup(); 2407b361db3SJason J. Herne find_boot_device(); 2413668cb7cSJason J. Herne enable_subchannel(blk_schid); 242ff151f4eSDominik Dingel 2433668cb7cSJason J. Herne switch (cutype) { 244efa47d36SJason J. Herne case CU_TYPE_DASD_3990: 245efa47d36SJason J. Herne case CU_TYPE_DASD_2107: 246efa47d36SJason J. Herne dasd_ipl(blk_schid, cutype); /* no return */ 247efa47d36SJason J. Herne break; 2483668cb7cSJason J. Herne case CU_TYPE_VIRTIO: 2497b361db3SJason J. Herne virtio_setup(); 25060612d5cSEugene (jno) Dvurechenski zipl_load(); /* no return */ 2513668cb7cSJason J. Herne break; 2523668cb7cSJason J. Herne default: 2533668cb7cSJason J. Herne print_int("Attempting to boot from unexpected device type", cutype); 2543668cb7cSJason J. Herne panic(""); 2553668cb7cSJason J. Herne } 25660612d5cSEugene (jno) Dvurechenski 257c9262e8aSEugene (jno) Dvurechenski panic("Failed to load OS from hard disk\n"); 25860612d5cSEugene (jno) Dvurechenski return 0; /* make compiler happy */ 25992f2ca38SAlexander Graf } 260