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" 1292f2ca38SAlexander Graf #include "s390-ccw.h" 13*120d0410SJason J. Herne #include "cio.h" 1460612d5cSEugene (jno) Dvurechenski #include "virtio.h" 1592f2ca38SAlexander Graf 1692f2ca38SAlexander Graf char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE))); 17b88d7fa5SEugene (jno) Dvurechenski static SubChannelId blk_schid = { .one = 1 }; 18a0e11b61SCollin Walling static char loadparm_str[LOADPARM_LEN + 1] = { 0, 0, 0, 0, 0, 0, 0, 0, 0 }; 19118ee80fSCollin L. Walling QemuIplParameters qipl; 20a5f6e097SJason J. Herne IplParameterBlock iplb __attribute__((__aligned__(PAGE_SIZE))); 21a5f6e097SJason J. Herne static bool have_iplb; 22f2879a5cSChristian Borntraeger 239eaa654aSCollin L. Walling #define LOADPARM_PROMPT "PROMPT " 24074afe60SCollin Walling #define LOADPARM_EMPTY " " 2553b310ceSCollin L. Walling #define BOOT_MENU_FLAG_MASK (QIPL_FLAG_BM_OPTS_CMD | QIPL_FLAG_BM_OPTS_ZIPL) 269eaa654aSCollin L. Walling 27f2879a5cSChristian Borntraeger /* 28a5f6e097SJason J. Herne * Principles of Operations (SA22-7832-09) chapter 17 requires that 29f2879a5cSChristian Borntraeger * a subsystem-identification is at 184-187 and bytes 188-191 are zero 30f2879a5cSChristian Borntraeger * after list-directed-IPL and ccw-IPL. 31f2879a5cSChristian Borntraeger */ 32f2879a5cSChristian Borntraeger void write_subsystem_identification(void) 33f2879a5cSChristian Borntraeger { 34b88d7fa5SEugene (jno) Dvurechenski SubChannelId *schid = (SubChannelId *) 184; 35f2879a5cSChristian Borntraeger uint32_t *zeroes = (uint32_t *) 188; 36f2879a5cSChristian Borntraeger 37f2879a5cSChristian Borntraeger *schid = blk_schid; 38f2879a5cSChristian Borntraeger *zeroes = 0; 39f2879a5cSChristian Borntraeger } 40f2879a5cSChristian Borntraeger 41c9262e8aSEugene (jno) Dvurechenski void panic(const char *string) 4292f2ca38SAlexander Graf { 4392f2ca38SAlexander Graf sclp_print(string); 447f61cbc1SChristian Borntraeger disabled_wait(); 4592f2ca38SAlexander Graf while (1) { } 4692f2ca38SAlexander Graf } 4792f2ca38SAlexander Graf 4895fa1af8SFarhan Ali unsigned int get_loadparm_index(void) 4995fa1af8SFarhan Ali { 50074afe60SCollin Walling return atoui(loadparm_str); 5195fa1af8SFarhan Ali } 5295fa1af8SFarhan Ali 53b88d7fa5SEugene (jno) Dvurechenski static bool find_dev(Schib *schib, int dev_no) 5492f2ca38SAlexander Graf { 550f79b89bSAlexander Yarygin int i, r; 56ff151f4eSDominik Dingel 5792f2ca38SAlexander Graf for (i = 0; i < 0x10000; i++) { 5892f2ca38SAlexander Graf blk_schid.sch_no = i; 590f79b89bSAlexander Yarygin r = stsch_err(blk_schid, schib); 600f79b89bSAlexander Yarygin if ((r == 3) || (r == -EIO)) { 6122d67ab5SCornelia Huck break; 6222d67ab5SCornelia Huck } 630f79b89bSAlexander Yarygin if (!schib->pmcw.dnv) { 640f79b89bSAlexander Yarygin continue; 6592f2ca38SAlexander Graf } 66a1102cebSEugene (jno) Dvurechenski if (!virtio_is_supported(blk_schid)) { 670f79b89bSAlexander Yarygin continue; 680f79b89bSAlexander Yarygin } 6999b72e0fSFarhan Ali /* Skip net devices since no IPLB is created and therefore no 7099b72e0fSFarhan Ali * no network bootloader has been loaded 7199b72e0fSFarhan Ali */ 7299b72e0fSFarhan Ali if (virtio_get_device_type() == VIRTIO_ID_NET && dev_no < 0) { 7399b72e0fSFarhan Ali continue; 7499b72e0fSFarhan Ali } 750f79b89bSAlexander Yarygin if ((dev_no < 0) || (schib->pmcw.dev == dev_no)) { 760f79b89bSAlexander Yarygin return true; 770f79b89bSAlexander Yarygin } 780f79b89bSAlexander Yarygin } 790f79b89bSAlexander Yarygin 800f79b89bSAlexander Yarygin return false; 810f79b89bSAlexander Yarygin } 820f79b89bSAlexander Yarygin 839eaa654aSCollin L. Walling static void menu_setup(void) 849eaa654aSCollin L. Walling { 85a0e11b61SCollin Walling if (memcmp(loadparm_str, LOADPARM_PROMPT, LOADPARM_LEN) == 0) { 869eaa654aSCollin L. Walling menu_set_parms(QIPL_FLAG_BM_OPTS_CMD, 0); 879eaa654aSCollin L. Walling return; 889eaa654aSCollin L. Walling } 899eaa654aSCollin L. Walling 909eaa654aSCollin L. Walling /* If loadparm was set to any other value, then do not enable menu */ 91a0e11b61SCollin Walling if (memcmp(loadparm_str, LOADPARM_EMPTY, LOADPARM_LEN) != 0) { 929eaa654aSCollin L. Walling return; 939eaa654aSCollin L. Walling } 949eaa654aSCollin L. Walling 959eaa654aSCollin L. Walling switch (iplb.pbt) { 969eaa654aSCollin L. Walling case S390_IPL_TYPE_CCW: 97ffb4a1c8SCollin L. Walling case S390_IPL_TYPE_QEMU_SCSI: 9853b310ceSCollin L. Walling menu_set_parms(qipl.qipl_flags & BOOT_MENU_FLAG_MASK, 999eaa654aSCollin L. Walling qipl.boot_menu_timeout); 1009eaa654aSCollin L. Walling return; 1019eaa654aSCollin L. Walling } 1029eaa654aSCollin L. Walling } 1039eaa654aSCollin L. Walling 10487f910c1SJason J. Herne /* 10587f910c1SJason J. Herne * Initialize the channel I/O subsystem so we can talk to our ipl/boot device. 10687f910c1SJason J. Herne */ 10787f910c1SJason J. Herne static void css_setup(void) 10887f910c1SJason J. Herne { 10987f910c1SJason J. Herne /* 11087f910c1SJason J. Herne * Unconditionally enable mss support. In every sane configuration this 11187f910c1SJason J. Herne * will succeed; and even if it doesn't, stsch_err() can handle it. 11287f910c1SJason J. Herne */ 11387f910c1SJason J. Herne enable_mss_facility(); 11487f910c1SJason J. Herne } 11587f910c1SJason J. Herne 116a5f6e097SJason J. Herne /* 117a5f6e097SJason J. Herne * Collect various pieces of information from the hypervisor/hardware that 118a5f6e097SJason J. Herne * we'll use to determine exactly how we'll boot. 119a5f6e097SJason J. Herne */ 120a5f6e097SJason J. Herne static void boot_setup(void) 121a5f6e097SJason J. Herne { 122a5f6e097SJason J. Herne char lpmsg[] = "LOADPARM=[________]\n"; 123a5f6e097SJason J. Herne 124a5f6e097SJason J. Herne sclp_get_loadparm_ascii(loadparm_str); 125a5f6e097SJason J. Herne memcpy(lpmsg + 10, loadparm_str, 8); 126a5f6e097SJason J. Herne sclp_print(lpmsg); 127a5f6e097SJason J. Herne 128a5f6e097SJason J. Herne have_iplb = store_iplb(&iplb); 129a5f6e097SJason J. Herne } 130a5f6e097SJason J. Herne 131d046c51dSAlexander Yarygin static void virtio_setup(void) 1320f79b89bSAlexander Yarygin { 133b88d7fa5SEugene (jno) Dvurechenski Schib schib; 1340f79b89bSAlexander Yarygin int ssid; 1350f79b89bSAlexander Yarygin bool found = false; 1360f79b89bSAlexander Yarygin uint16_t dev_no; 13799b72e0fSFarhan Ali VDev *vdev = virtio_get_device(); 138118ee80fSCollin L. Walling QemuIplParameters *early_qipl = (QemuIplParameters *)QIPL_ADDRESS; 1390f79b89bSAlexander Yarygin 140118ee80fSCollin L. Walling memcpy(&qipl, early_qipl, sizeof(QemuIplParameters)); 141118ee80fSCollin L. Walling 142a5f6e097SJason J. Herne if (have_iplb) { 143d046c51dSAlexander Yarygin switch (iplb.pbt) { 144d046c51dSAlexander Yarygin case S390_IPL_TYPE_CCW: 145d046c51dSAlexander Yarygin dev_no = iplb.ccw.devno; 1460f79b89bSAlexander Yarygin debug_print_int("device no. ", dev_no); 147d046c51dSAlexander Yarygin blk_schid.ssid = iplb.ccw.ssid & 0x3; 1480f79b89bSAlexander Yarygin debug_print_int("ssid ", blk_schid.ssid); 1490f79b89bSAlexander Yarygin found = find_dev(&schib, dev_no); 150d046c51dSAlexander Yarygin break; 151b39b7718SEugene (jno) Dvurechenski case S390_IPL_TYPE_QEMU_SCSI: 152b39b7718SEugene (jno) Dvurechenski vdev->scsi_device_selected = true; 153b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.channel = iplb.scsi.channel; 154b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.target = iplb.scsi.target; 155b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.lun = iplb.scsi.lun; 156b39b7718SEugene (jno) Dvurechenski blk_schid.ssid = iplb.scsi.ssid & 0x3; 157b39b7718SEugene (jno) Dvurechenski found = find_dev(&schib, iplb.scsi.devno); 158b39b7718SEugene (jno) Dvurechenski break; 159d046c51dSAlexander Yarygin default: 160d046c51dSAlexander Yarygin panic("List-directed IPL not supported yet!\n"); 161d046c51dSAlexander Yarygin } 1629eaa654aSCollin L. Walling menu_setup(); 1630f79b89bSAlexander Yarygin } else { 1640f79b89bSAlexander Yarygin for (ssid = 0; ssid < 0x3; ssid++) { 1650f79b89bSAlexander Yarygin blk_schid.ssid = ssid; 1660f79b89bSAlexander Yarygin found = find_dev(&schib, -1); 1670f79b89bSAlexander Yarygin if (found) { 1680f79b89bSAlexander Yarygin break; 16992f2ca38SAlexander Graf } 17092f2ca38SAlexander Graf } 171ff151f4eSDominik Dingel } 17292f2ca38SAlexander Graf 17380ba3e24SEugene (jno) Dvurechenski IPL_assert(found, "No virtio device found"); 17492f2ca38SAlexander Graf 17599b72e0fSFarhan Ali if (virtio_get_device_type() == VIRTIO_ID_NET) { 17699b72e0fSFarhan Ali sclp_print("Network boot device detected\n"); 177118ee80fSCollin L. Walling vdev->netboot_start_addr = qipl.netboot_start_addr; 17899b72e0fSFarhan Ali } else { 179867e039aSThomas Huth virtio_blk_setup_device(blk_schid); 18060612d5cSEugene (jno) Dvurechenski 18180ba3e24SEugene (jno) Dvurechenski IPL_assert(virtio_ipl_disk_is_valid(), "No valid IPL device detected"); 18292f2ca38SAlexander Graf } 18399b72e0fSFarhan Ali } 18492f2ca38SAlexander Graf 18592f2ca38SAlexander Graf int main(void) 18692f2ca38SAlexander Graf { 18792f2ca38SAlexander Graf sclp_setup(); 18887f910c1SJason J. Herne css_setup(); 189a5f6e097SJason J. Herne boot_setup(); 190d046c51dSAlexander Yarygin virtio_setup(); 191ff151f4eSDominik Dingel 19260612d5cSEugene (jno) Dvurechenski zipl_load(); /* no return */ 19360612d5cSEugene (jno) Dvurechenski 194c9262e8aSEugene (jno) Dvurechenski panic("Failed to load OS from hard disk\n"); 19560612d5cSEugene (jno) Dvurechenski return 0; /* make compiler happy */ 19692f2ca38SAlexander Graf } 197