1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright 2009 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 */ 26 27 #include <sys/types.h> 28 29 #include <sys/hypervisor.h> 30 #include <sys/machparam.h> 31 #include <xen/public/io/console.h> 32 #include <sys/mach_mmu.h> 33 34 shared_info_t *HYPERVISOR_shared_info; 35 void *HYPERVISOR_console_page; 36 37 #if defined(_BOOT) 38 #include "dboot/dboot_printf.h" 39 char big_empty[MMU_PAGESIZE * 3]; /* room for 2 page aligned page */ 40 #endif /* _BOOT */ 41 42 unsigned short video_fb_buf[32 * 1024 + MMU_PAGESIZE]; 43 unsigned char kb_status_buf[MMU_PAGESIZE * 2]; 44 unsigned short *video_fb = NULL; 45 unsigned char *kb_status = NULL; 46 47 static volatile struct xencons_interface *cons_ifp; 48 49 #define XR_FULL(r) ((r)->xr_in_cnt - (r)->xr_out_cnt == XR_SIZE) 50 #define XR_EMPTY(r) ((r)->xr_in_cnt == (r)->xr_out_cnt) 51 52 #define PTE_BITS (PT_VALID | PT_WRITABLE) 53 #define PTE_DEV_BITS (PT_VALID | PT_WRITABLE | PT_NOCACHE | PT_NOCONSIST | \ 54 PT_FOREIGN) 55 56 /* 57 * For some unfortunate reason, the hypervisor doesn't bother to include the 58 * shared info in the original virtual address space. This means we can't 59 * do any console I/O until we have manipulated some pagetables. So we have to 60 * do this bit of code with no ability to get debug output. 61 */ 62 /*ARGSUSED*/ 63 void 64 bcons_init_xen(char *cmdline) 65 { 66 #ifdef _BOOT 67 int i = 0; 68 uintptr_t vaddr; 69 70 /* 71 * find a page aligned virtual address in "big_empty" 72 */ 73 vaddr = (uintptr_t)&big_empty; 74 vaddr = (vaddr + MMU_PAGEOFFSET) & MMU_PAGEMASK; 75 HYPERVISOR_shared_info = (shared_info_t *)vaddr; 76 77 /* 78 * Sets the "present" and "writable" bits in the PTE 79 * plus user for amd64. 80 */ 81 (void) HYPERVISOR_update_va_mapping(vaddr, 82 xen_info->shared_info | PTE_BITS, UVMF_INVLPG | UVMF_LOCAL); 83 84 if (!DOMAIN_IS_INITDOMAIN(xen_info)) { 85 /* 86 * map the xen console ring buffers 87 */ 88 (void) HYPERVISOR_update_va_mapping(vaddr + MMU_PAGESIZE, 89 mmu_ptob((x86pte_t)xen_info->console.domU.mfn) | PTE_BITS, 90 UVMF_INVLPG | UVMF_LOCAL); 91 } else { 92 /* 93 * Xen will pass dom0 information about the current 94 * display settings via xen_info->console.dom0. This 95 * information includes what video mode we're in (vga 96 * or vesa) and some basic information about the video 97 * mode. (screen size, cursor location, etc.) We're 98 * just going to ignore all this info. Here's some 99 * reasons why: 100 * 101 * - Currently Solaris itself has no support for vesa. 102 * Also, the only way to boot Solaris is using our 103 * patched version of grub, which conveniently doesn't 104 * support vesa either. 105 * 106 * - By default when solaris boots up it clears the screen 107 * thereby removing any previously displayed grub/xen 108 * console messages, so we really don't care about the 109 * current vga settings. 110 * 111 * Initially we'll map device memory for the frame buffer 112 * and keyboard into some local memory that already has 113 * page table entries so that we can get very basic debug 114 * output. Later on when we're initializing page tables 115 * we'll map re-map these devices to be at their expected 116 * addresses. Note that these mappings created below will 117 * be torn down right before the kernel boots up when 118 * all the memory and mappings associated with dboot are 119 * released. 120 * 121 * Map the frame buffer. 122 */ 123 vaddr = (uintptr_t)&video_fb_buf; 124 vaddr = (vaddr + MMU_PAGEOFFSET) & MMU_PAGEMASK; 125 for (i = 0; i < 32 * 1024; i += MMU_PAGESIZE) 126 (void) HYPERVISOR_update_va_mapping(vaddr + i, 127 0xb8000 + i | PTE_DEV_BITS, 128 UVMF_INVLPG | UVMF_LOCAL); 129 video_fb = (unsigned short *)vaddr; 130 131 /* Map the keyboard */ 132 vaddr = (uintptr_t)&kb_status_buf; 133 vaddr = (vaddr + MMU_PAGEOFFSET) & MMU_PAGEMASK; 134 (void) HYPERVISOR_update_va_mapping(vaddr, 0x0 | PTE_DEV_BITS, 135 UVMF_INVLPG | UVMF_LOCAL); 136 kb_status = (unsigned char *)vaddr; 137 } 138 139 #endif /* _BOOT */ 140 if (!DOMAIN_IS_INITDOMAIN(xen_info)) { 141 HYPERVISOR_console_page = 142 (void *)((uintptr_t)HYPERVISOR_shared_info + MMU_PAGESIZE); 143 } else { 144 HYPERVISOR_console_page = NULL; 145 } 146 } 147 148 149 /* 150 * This is the equivalent of polled I/O across the hypervisor CONSOLE 151 * channel to output 1 character at a time. 152 */ 153 void 154 bcons_putchar_xen(int c) 155 { 156 evtchn_send_t send; 157 char buffer = (char)c; 158 159 if (DOMAIN_IS_INITDOMAIN(xen_info)) { 160 (void) HYPERVISOR_console_io(CONSOLEIO_write, 1, &buffer); 161 return; 162 } 163 164 cons_ifp = (volatile struct xencons_interface *)HYPERVISOR_console_page; 165 166 /* 167 * need to add carriage return for new lines 168 */ 169 if (c == '\n') 170 bcons_putchar_xen('\r'); 171 172 /* 173 * We have to wait till we have an open transmit slot. 174 */ 175 while (cons_ifp->out_prod - cons_ifp->out_cons >= 176 sizeof (cons_ifp->out)) 177 (void) HYPERVISOR_yield(); 178 179 cons_ifp->out[MASK_XENCONS_IDX(cons_ifp->out_prod, cons_ifp->out)] = 180 (char)c; 181 ++cons_ifp->out_prod; 182 183 /* 184 * Signal Domain 0 that it has something to do for us. 185 */ 186 send.port = xen_info->console.domU.evtchn; 187 (void) HYPERVISOR_event_channel_op(EVTCHNOP_send, &send); 188 } 189 190 static uint_t have_char = 0; 191 static char buffered; 192 193 /* 194 * See if there is a character on input. 195 */ 196 int 197 bcons_ischar_xen(void) 198 { 199 if (DOMAIN_IS_INITDOMAIN(xen_info)) { 200 if (have_char) 201 return (1); 202 if (HYPERVISOR_console_io(CONSOLEIO_read, 1, &buffered) > 0) 203 return (have_char = 1); 204 return (0); 205 } 206 207 cons_ifp = (volatile struct xencons_interface *)HYPERVISOR_console_page; 208 if (cons_ifp->in_cons == cons_ifp->in_prod) 209 return (0); 210 return (1); 211 } 212 213 /* 214 * get a console input character 215 */ 216 int 217 bcons_getchar_xen(void) 218 { 219 evtchn_send_t send; 220 char c; 221 222 if (DOMAIN_IS_INITDOMAIN(xen_info)) { 223 while (have_char == 0) 224 (void) bcons_ischar_xen(); 225 have_char = 0; 226 return (buffered); 227 } 228 229 cons_ifp = (volatile struct xencons_interface *)HYPERVISOR_console_page; 230 while (cons_ifp->in_cons == cons_ifp->in_prod) 231 (void) HYPERVISOR_yield(); 232 233 c = cons_ifp->in[MASK_XENCONS_IDX(cons_ifp->in_cons, cons_ifp->in)]; 234 ++cons_ifp->in_cons; 235 236 /* 237 * Signal Domain 0 that we ate a character. 238 */ 239 send.port = xen_info->console.domU.evtchn; 240 (void) HYPERVISOR_event_channel_op(EVTCHNOP_send, &send); 241 return (c); 242 } 243