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" 12c95df3d1SJason J. Herne #include "s390-arch.h" 1392f2ca38SAlexander Graf #include "s390-ccw.h" 14120d0410SJason J. Herne #include "cio.h" 1560612d5cSEugene (jno) Dvurechenski #include "virtio.h" 16*efa47d36SJason J. Herne #include "dasd-ipl.h" 1792f2ca38SAlexander Graf 1892f2ca38SAlexander Graf char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE))); 19b88d7fa5SEugene (jno) Dvurechenski static SubChannelId blk_schid = { .one = 1 }; 20a0e11b61SCollin Walling static char loadparm_str[LOADPARM_LEN + 1] = { 0, 0, 0, 0, 0, 0, 0, 0, 0 }; 21118ee80fSCollin L. Walling QemuIplParameters qipl; 22a5f6e097SJason J. Herne IplParameterBlock iplb __attribute__((__aligned__(PAGE_SIZE))); 23a5f6e097SJason J. Herne static bool have_iplb; 24c95df3d1SJason J. Herne LowCore const *lowcore; /* Yes, this *is* a pointer to address 0 */ 25f2879a5cSChristian Borntraeger 269eaa654aSCollin L. Walling #define LOADPARM_PROMPT "PROMPT " 27074afe60SCollin Walling #define LOADPARM_EMPTY " " 2853b310ceSCollin L. Walling #define BOOT_MENU_FLAG_MASK (QIPL_FLAG_BM_OPTS_CMD | QIPL_FLAG_BM_OPTS_ZIPL) 299eaa654aSCollin L. Walling 30f2879a5cSChristian Borntraeger /* 31a5f6e097SJason J. Herne * Principles of Operations (SA22-7832-09) chapter 17 requires that 32f2879a5cSChristian Borntraeger * a subsystem-identification is at 184-187 and bytes 188-191 are zero 33f2879a5cSChristian Borntraeger * after list-directed-IPL and ccw-IPL. 34f2879a5cSChristian Borntraeger */ 35f2879a5cSChristian Borntraeger void write_subsystem_identification(void) 36f2879a5cSChristian Borntraeger { 37b88d7fa5SEugene (jno) Dvurechenski SubChannelId *schid = (SubChannelId *) 184; 38f2879a5cSChristian Borntraeger uint32_t *zeroes = (uint32_t *) 188; 39f2879a5cSChristian Borntraeger 40f2879a5cSChristian Borntraeger *schid = blk_schid; 41f2879a5cSChristian Borntraeger *zeroes = 0; 42f2879a5cSChristian Borntraeger } 43f2879a5cSChristian Borntraeger 44c9262e8aSEugene (jno) Dvurechenski void panic(const char *string) 4592f2ca38SAlexander Graf { 4692f2ca38SAlexander Graf sclp_print(string); 477f61cbc1SChristian Borntraeger disabled_wait(); 4892f2ca38SAlexander Graf while (1) { } 4992f2ca38SAlexander Graf } 5092f2ca38SAlexander Graf 5195fa1af8SFarhan Ali unsigned int get_loadparm_index(void) 5295fa1af8SFarhan Ali { 53074afe60SCollin Walling return atoui(loadparm_str); 5495fa1af8SFarhan Ali } 5595fa1af8SFarhan Ali 56930072d2SJason J. Herne /* 57930072d2SJason J. Herne * Find the subchannel connected to the given device (dev_no) and fill in the 58930072d2SJason J. Herne * subchannel information block (schib) with the connected subchannel's info. 59930072d2SJason J. Herne * NOTE: The global variable blk_schid is updated to contain the subchannel 60930072d2SJason J. Herne * information. 61930072d2SJason J. Herne */ 627b361db3SJason J. Herne static bool find_subch(int dev_no) 6392f2ca38SAlexander Graf { 647b361db3SJason J. Herne Schib schib; 650f79b89bSAlexander Yarygin int i, r; 66ff151f4eSDominik Dingel 6792f2ca38SAlexander Graf for (i = 0; i < 0x10000; i++) { 6892f2ca38SAlexander Graf blk_schid.sch_no = i; 697b361db3SJason J. Herne r = stsch_err(blk_schid, &schib); 700f79b89bSAlexander Yarygin if ((r == 3) || (r == -EIO)) { 7122d67ab5SCornelia Huck break; 7222d67ab5SCornelia Huck } 737b361db3SJason J. Herne if (!schib.pmcw.dnv) { 740f79b89bSAlexander Yarygin continue; 7592f2ca38SAlexander Graf } 76930072d2SJason J. Herne 7799b72e0fSFarhan Ali /* Skip net devices since no IPLB is created and therefore no 78930072d2SJason J. Herne * network bootloader has been loaded 7999b72e0fSFarhan Ali */ 803668cb7cSJason J. Herne enable_subchannel(blk_schid); 81930072d2SJason J. Herne if (virtio_is_supported(blk_schid) && 82930072d2SJason J. Herne virtio_get_device_type() == VIRTIO_ID_NET && dev_no < 0) { 8399b72e0fSFarhan Ali continue; 8499b72e0fSFarhan Ali } 85930072d2SJason J. Herne 867b361db3SJason J. Herne if ((dev_no < 0) || (schib.pmcw.dev == dev_no)) { 870f79b89bSAlexander Yarygin return true; 880f79b89bSAlexander Yarygin } 890f79b89bSAlexander Yarygin } 900f79b89bSAlexander Yarygin 910f79b89bSAlexander Yarygin return false; 920f79b89bSAlexander Yarygin } 930f79b89bSAlexander Yarygin 949eaa654aSCollin L. Walling static void menu_setup(void) 959eaa654aSCollin L. Walling { 96a0e11b61SCollin Walling if (memcmp(loadparm_str, LOADPARM_PROMPT, LOADPARM_LEN) == 0) { 979eaa654aSCollin L. Walling menu_set_parms(QIPL_FLAG_BM_OPTS_CMD, 0); 989eaa654aSCollin L. Walling return; 999eaa654aSCollin L. Walling } 1009eaa654aSCollin L. Walling 1019eaa654aSCollin L. Walling /* If loadparm was set to any other value, then do not enable menu */ 102a0e11b61SCollin Walling if (memcmp(loadparm_str, LOADPARM_EMPTY, LOADPARM_LEN) != 0) { 1039eaa654aSCollin L. Walling return; 1049eaa654aSCollin L. Walling } 1059eaa654aSCollin L. Walling 1069eaa654aSCollin L. Walling switch (iplb.pbt) { 1079eaa654aSCollin L. Walling case S390_IPL_TYPE_CCW: 108ffb4a1c8SCollin L. Walling case S390_IPL_TYPE_QEMU_SCSI: 10953b310ceSCollin L. Walling menu_set_parms(qipl.qipl_flags & BOOT_MENU_FLAG_MASK, 1109eaa654aSCollin L. Walling qipl.boot_menu_timeout); 1119eaa654aSCollin L. Walling return; 1129eaa654aSCollin L. Walling } 1139eaa654aSCollin L. Walling } 1149eaa654aSCollin L. Walling 11587f910c1SJason J. Herne /* 11687f910c1SJason J. Herne * Initialize the channel I/O subsystem so we can talk to our ipl/boot device. 11787f910c1SJason J. Herne */ 11887f910c1SJason J. Herne static void css_setup(void) 11987f910c1SJason J. Herne { 12087f910c1SJason J. Herne /* 12187f910c1SJason J. Herne * Unconditionally enable mss support. In every sane configuration this 12287f910c1SJason J. Herne * will succeed; and even if it doesn't, stsch_err() can handle it. 12387f910c1SJason J. Herne */ 12487f910c1SJason J. Herne enable_mss_facility(); 12587f910c1SJason J. Herne } 12687f910c1SJason J. Herne 127a5f6e097SJason J. Herne /* 128a5f6e097SJason J. Herne * Collect various pieces of information from the hypervisor/hardware that 129a5f6e097SJason J. Herne * we'll use to determine exactly how we'll boot. 130a5f6e097SJason J. Herne */ 131a5f6e097SJason J. Herne static void boot_setup(void) 132a5f6e097SJason J. Herne { 133a5f6e097SJason J. Herne char lpmsg[] = "LOADPARM=[________]\n"; 134a5f6e097SJason J. Herne 135a5f6e097SJason J. Herne sclp_get_loadparm_ascii(loadparm_str); 136a5f6e097SJason J. Herne memcpy(lpmsg + 10, loadparm_str, 8); 137a5f6e097SJason J. Herne sclp_print(lpmsg); 138a5f6e097SJason J. Herne 139a5f6e097SJason J. Herne have_iplb = store_iplb(&iplb); 140a5f6e097SJason J. Herne } 141a5f6e097SJason J. Herne 1427b361db3SJason J. Herne static void find_boot_device(void) 1430f79b89bSAlexander Yarygin { 14499b72e0fSFarhan Ali VDev *vdev = virtio_get_device(); 1457b361db3SJason J. Herne int ssid; 1467b361db3SJason J. Herne bool found; 1470f79b89bSAlexander Yarygin 1487b361db3SJason J. Herne if (!have_iplb) { 1497b361db3SJason J. Herne for (ssid = 0; ssid < 0x3; ssid++) { 1507b361db3SJason J. Herne blk_schid.ssid = ssid; 1517b361db3SJason J. Herne found = find_subch(-1); 1527b361db3SJason J. Herne if (found) { 1537b361db3SJason J. Herne return; 1547b361db3SJason J. Herne } 1557b361db3SJason J. Herne } 1567b361db3SJason J. Herne panic("Could not find a suitable boot device (none specified)\n"); 1577b361db3SJason J. Herne } 158118ee80fSCollin L. Walling 159d046c51dSAlexander Yarygin switch (iplb.pbt) { 160d046c51dSAlexander Yarygin case S390_IPL_TYPE_CCW: 1617b361db3SJason J. Herne debug_print_int("device no. ", iplb.ccw.devno); 162d046c51dSAlexander Yarygin blk_schid.ssid = iplb.ccw.ssid & 0x3; 1630f79b89bSAlexander Yarygin debug_print_int("ssid ", blk_schid.ssid); 1647b361db3SJason J. Herne found = find_subch(iplb.ccw.devno); 165d046c51dSAlexander Yarygin break; 166b39b7718SEugene (jno) Dvurechenski case S390_IPL_TYPE_QEMU_SCSI: 167b39b7718SEugene (jno) Dvurechenski vdev->scsi_device_selected = true; 168b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.channel = iplb.scsi.channel; 169b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.target = iplb.scsi.target; 170b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.lun = iplb.scsi.lun; 171b39b7718SEugene (jno) Dvurechenski blk_schid.ssid = iplb.scsi.ssid & 0x3; 1727b361db3SJason J. Herne found = find_subch(iplb.scsi.devno); 173b39b7718SEugene (jno) Dvurechenski break; 174d046c51dSAlexander Yarygin default: 175d046c51dSAlexander Yarygin panic("List-directed IPL not supported yet!\n"); 176d046c51dSAlexander Yarygin } 1777b361db3SJason J. Herne 1787b361db3SJason J. Herne IPL_assert(found, "Boot device not found\n"); 179ff151f4eSDominik Dingel } 18092f2ca38SAlexander Graf 1817b361db3SJason J. Herne static void virtio_setup(void) 1827b361db3SJason J. Herne { 1837b361db3SJason J. Herne VDev *vdev = virtio_get_device(); 1847b361db3SJason J. Herne QemuIplParameters *early_qipl = (QemuIplParameters *)QIPL_ADDRESS; 1857b361db3SJason J. Herne 1867b361db3SJason J. Herne memcpy(&qipl, early_qipl, sizeof(QemuIplParameters)); 1877b361db3SJason J. Herne 1887b361db3SJason J. Herne if (have_iplb) { 1897b361db3SJason J. Herne menu_setup(); 1907b361db3SJason J. Herne } 19192f2ca38SAlexander Graf 19299b72e0fSFarhan Ali if (virtio_get_device_type() == VIRTIO_ID_NET) { 19399b72e0fSFarhan Ali sclp_print("Network boot device detected\n"); 194118ee80fSCollin L. Walling vdev->netboot_start_addr = qipl.netboot_start_addr; 19599b72e0fSFarhan Ali } else { 196867e039aSThomas Huth virtio_blk_setup_device(blk_schid); 19780ba3e24SEugene (jno) Dvurechenski IPL_assert(virtio_ipl_disk_is_valid(), "No valid IPL device detected"); 19892f2ca38SAlexander Graf } 19999b72e0fSFarhan Ali } 20092f2ca38SAlexander Graf 20192f2ca38SAlexander Graf int main(void) 20292f2ca38SAlexander Graf { 2033668cb7cSJason J. Herne uint16_t cutype; 2043668cb7cSJason J. Herne 20592f2ca38SAlexander Graf sclp_setup(); 20687f910c1SJason J. Herne css_setup(); 207a5f6e097SJason J. Herne boot_setup(); 2087b361db3SJason J. Herne find_boot_device(); 2093668cb7cSJason J. Herne enable_subchannel(blk_schid); 210ff151f4eSDominik Dingel 2113668cb7cSJason J. Herne cutype = cu_type(blk_schid); 2123668cb7cSJason J. Herne switch (cutype) { 213*efa47d36SJason J. Herne case CU_TYPE_DASD_3990: 214*efa47d36SJason J. Herne case CU_TYPE_DASD_2107: 215*efa47d36SJason J. Herne dasd_ipl(blk_schid, cutype); /* no return */ 216*efa47d36SJason J. Herne break; 2173668cb7cSJason J. Herne case CU_TYPE_VIRTIO: 2187b361db3SJason J. Herne virtio_setup(); 21960612d5cSEugene (jno) Dvurechenski zipl_load(); /* no return */ 2203668cb7cSJason J. Herne break; 2213668cb7cSJason J. Herne default: 2223668cb7cSJason J. Herne print_int("Attempting to boot from unexpected device type", cutype); 2233668cb7cSJason J. Herne panic(""); 2243668cb7cSJason J. Herne } 22560612d5cSEugene (jno) Dvurechenski 226c9262e8aSEugene (jno) Dvurechenski panic("Failed to load OS from hard disk\n"); 22760612d5cSEugene (jno) Dvurechenski return 0; /* make compiler happy */ 22892f2ca38SAlexander Graf } 229