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 1192f2ca38SAlexander Graf #include "s390-ccw.h" 1260612d5cSEugene (jno) Dvurechenski #include "virtio.h" 1392f2ca38SAlexander Graf 1492f2ca38SAlexander Graf char stack[PAGE_SIZE * 8] __attribute__((__aligned__(PAGE_SIZE))); 15b88d7fa5SEugene (jno) Dvurechenski static SubChannelId blk_schid = { .one = 1 }; 16d046c51dSAlexander Yarygin IplParameterBlock iplb __attribute__((__aligned__(PAGE_SIZE))); 17*95fa1af8SFarhan Ali static char loadparm[8] = { 0, 0, 0, 0, 0, 0, 0, 0 }; 18f2879a5cSChristian Borntraeger 19cfe2124aSEugene (jno) Dvurechenski const unsigned char ebc2asc[256] = 20cfe2124aSEugene (jno) Dvurechenski /* 0123456789abcdef0123456789abcdef */ 21cfe2124aSEugene (jno) Dvurechenski "................................" /* 1F */ 22cfe2124aSEugene (jno) Dvurechenski "................................" /* 3F */ 23cfe2124aSEugene (jno) Dvurechenski " ...........<(+|&.........!$*);." /* 5F first.chr.here.is.real.space */ 24cfe2124aSEugene (jno) Dvurechenski "-/.........,%_>?.........`:#@'=\""/* 7F */ 25cfe2124aSEugene (jno) Dvurechenski ".abcdefghi.......jklmnopqr......" /* 9F */ 26cfe2124aSEugene (jno) Dvurechenski "..stuvwxyz......................" /* BF */ 27cfe2124aSEugene (jno) Dvurechenski ".ABCDEFGHI.......JKLMNOPQR......" /* DF */ 28cfe2124aSEugene (jno) Dvurechenski "..STUVWXYZ......0123456789......";/* FF */ 29cfe2124aSEugene (jno) Dvurechenski 30f2879a5cSChristian Borntraeger /* 31f2879a5cSChristian Borntraeger * Priniciples 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 51*95fa1af8SFarhan Ali unsigned int get_loadparm_index(void) 52*95fa1af8SFarhan Ali { 53*95fa1af8SFarhan Ali const char *lp = loadparm; 54*95fa1af8SFarhan Ali int i; 55*95fa1af8SFarhan Ali unsigned int idx = 0; 56*95fa1af8SFarhan Ali 57*95fa1af8SFarhan Ali for (i = 0; i < 8; i++) { 58*95fa1af8SFarhan Ali char c = lp[i]; 59*95fa1af8SFarhan Ali 60*95fa1af8SFarhan Ali if (c < '0' || c > '9') { 61*95fa1af8SFarhan Ali break; 62*95fa1af8SFarhan Ali } 63*95fa1af8SFarhan Ali 64*95fa1af8SFarhan Ali idx *= 10; 65*95fa1af8SFarhan Ali idx += c - '0'; 66*95fa1af8SFarhan Ali } 67*95fa1af8SFarhan Ali 68*95fa1af8SFarhan Ali return idx; 69*95fa1af8SFarhan Ali } 70*95fa1af8SFarhan Ali 71b88d7fa5SEugene (jno) Dvurechenski static bool find_dev(Schib *schib, int dev_no) 7292f2ca38SAlexander Graf { 730f79b89bSAlexander Yarygin int i, r; 74ff151f4eSDominik Dingel 7592f2ca38SAlexander Graf for (i = 0; i < 0x10000; i++) { 7692f2ca38SAlexander Graf blk_schid.sch_no = i; 770f79b89bSAlexander Yarygin r = stsch_err(blk_schid, schib); 780f79b89bSAlexander Yarygin if ((r == 3) || (r == -EIO)) { 7922d67ab5SCornelia Huck break; 8022d67ab5SCornelia Huck } 810f79b89bSAlexander Yarygin if (!schib->pmcw.dnv) { 820f79b89bSAlexander Yarygin continue; 8392f2ca38SAlexander Graf } 84a1102cebSEugene (jno) Dvurechenski if (!virtio_is_supported(blk_schid)) { 850f79b89bSAlexander Yarygin continue; 860f79b89bSAlexander Yarygin } 8799b72e0fSFarhan Ali /* Skip net devices since no IPLB is created and therefore no 8899b72e0fSFarhan Ali * no network bootloader has been loaded 8999b72e0fSFarhan Ali */ 9099b72e0fSFarhan Ali if (virtio_get_device_type() == VIRTIO_ID_NET && dev_no < 0) { 9199b72e0fSFarhan Ali continue; 9299b72e0fSFarhan Ali } 930f79b89bSAlexander Yarygin if ((dev_no < 0) || (schib->pmcw.dev == dev_no)) { 940f79b89bSAlexander Yarygin return true; 950f79b89bSAlexander Yarygin } 960f79b89bSAlexander Yarygin } 970f79b89bSAlexander Yarygin 980f79b89bSAlexander Yarygin return false; 990f79b89bSAlexander Yarygin } 1000f79b89bSAlexander Yarygin 101d046c51dSAlexander Yarygin static void virtio_setup(void) 1020f79b89bSAlexander Yarygin { 103b88d7fa5SEugene (jno) Dvurechenski Schib schib; 1040f79b89bSAlexander Yarygin int ssid; 1050f79b89bSAlexander Yarygin bool found = false; 1060f79b89bSAlexander Yarygin uint16_t dev_no; 107*95fa1af8SFarhan Ali char ldp[] = "LOADPARM=[________]\n"; 10899b72e0fSFarhan Ali VDev *vdev = virtio_get_device(); 1090f79b89bSAlexander Yarygin 1100f79b89bSAlexander Yarygin /* 1110f79b89bSAlexander Yarygin * We unconditionally enable mss support. In every sane configuration, 1120f79b89bSAlexander Yarygin * this will succeed; and even if it doesn't, stsch_err() can deal 1130f79b89bSAlexander Yarygin * with the consequences. 1140f79b89bSAlexander Yarygin */ 1150f79b89bSAlexander Yarygin enable_mss_facility(); 1160f79b89bSAlexander Yarygin 117*95fa1af8SFarhan Ali sclp_get_loadparm_ascii(loadparm); 118*95fa1af8SFarhan Ali memcpy(ldp + 10, loadparm, 8); 119*95fa1af8SFarhan Ali sclp_print(ldp); 120*95fa1af8SFarhan Ali 121d046c51dSAlexander Yarygin if (store_iplb(&iplb)) { 122d046c51dSAlexander Yarygin switch (iplb.pbt) { 123d046c51dSAlexander Yarygin case S390_IPL_TYPE_CCW: 124d046c51dSAlexander Yarygin dev_no = iplb.ccw.devno; 1250f79b89bSAlexander Yarygin debug_print_int("device no. ", dev_no); 126d046c51dSAlexander Yarygin blk_schid.ssid = iplb.ccw.ssid & 0x3; 1270f79b89bSAlexander Yarygin debug_print_int("ssid ", blk_schid.ssid); 1280f79b89bSAlexander Yarygin found = find_dev(&schib, dev_no); 129d046c51dSAlexander Yarygin break; 130b39b7718SEugene (jno) Dvurechenski case S390_IPL_TYPE_QEMU_SCSI: 131b39b7718SEugene (jno) Dvurechenski vdev->scsi_device_selected = true; 132b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.channel = iplb.scsi.channel; 133b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.target = iplb.scsi.target; 134b39b7718SEugene (jno) Dvurechenski vdev->selected_scsi_device.lun = iplb.scsi.lun; 135b39b7718SEugene (jno) Dvurechenski blk_schid.ssid = iplb.scsi.ssid & 0x3; 136b39b7718SEugene (jno) Dvurechenski found = find_dev(&schib, iplb.scsi.devno); 137b39b7718SEugene (jno) Dvurechenski break; 138d046c51dSAlexander Yarygin default: 139d046c51dSAlexander Yarygin panic("List-directed IPL not supported yet!\n"); 140d046c51dSAlexander Yarygin } 1410f79b89bSAlexander Yarygin } else { 1420f79b89bSAlexander Yarygin for (ssid = 0; ssid < 0x3; ssid++) { 1430f79b89bSAlexander Yarygin blk_schid.ssid = ssid; 1440f79b89bSAlexander Yarygin found = find_dev(&schib, -1); 1450f79b89bSAlexander Yarygin if (found) { 1460f79b89bSAlexander Yarygin break; 14792f2ca38SAlexander Graf } 14892f2ca38SAlexander Graf } 149ff151f4eSDominik Dingel } 15092f2ca38SAlexander Graf 15180ba3e24SEugene (jno) Dvurechenski IPL_assert(found, "No virtio device found"); 15292f2ca38SAlexander Graf 15399b72e0fSFarhan Ali if (virtio_get_device_type() == VIRTIO_ID_NET) { 15499b72e0fSFarhan Ali sclp_print("Network boot device detected\n"); 15599b72e0fSFarhan Ali vdev->netboot_start_addr = iplb.ccw.netboot_start_addr; 15699b72e0fSFarhan Ali } else { 157a1102cebSEugene (jno) Dvurechenski virtio_setup_device(blk_schid); 15860612d5cSEugene (jno) Dvurechenski 15980ba3e24SEugene (jno) Dvurechenski IPL_assert(virtio_ipl_disk_is_valid(), "No valid IPL device detected"); 16092f2ca38SAlexander Graf } 16199b72e0fSFarhan Ali } 16292f2ca38SAlexander Graf 16392f2ca38SAlexander Graf int main(void) 16492f2ca38SAlexander Graf { 16592f2ca38SAlexander Graf sclp_setup(); 166d046c51dSAlexander Yarygin virtio_setup(); 167ff151f4eSDominik Dingel 16860612d5cSEugene (jno) Dvurechenski zipl_load(); /* no return */ 16960612d5cSEugene (jno) Dvurechenski 170c9262e8aSEugene (jno) Dvurechenski panic("Failed to load OS from hard disk\n"); 17160612d5cSEugene (jno) Dvurechenski return 0; /* make compiler happy */ 17292f2ca38SAlexander Graf } 173