10Sstevel@tonic-gate /* 20Sstevel@tonic-gate * CDDL HEADER START 30Sstevel@tonic-gate * 40Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*1772Sjl139090 * Common Development and Distribution License (the "License"). 6*1772Sjl139090 * You may not use this file except in compliance with the License. 70Sstevel@tonic-gate * 80Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 90Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 100Sstevel@tonic-gate * See the License for the specific language governing permissions 110Sstevel@tonic-gate * and limitations under the License. 120Sstevel@tonic-gate * 130Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 140Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 150Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 160Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 170Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 180Sstevel@tonic-gate * 190Sstevel@tonic-gate * CDDL HEADER END 200Sstevel@tonic-gate */ 210Sstevel@tonic-gate /* 22*1772Sjl139090 * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 230Sstevel@tonic-gate * Use is subject to license terms. 240Sstevel@tonic-gate */ 250Sstevel@tonic-gate 260Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 270Sstevel@tonic-gate 280Sstevel@tonic-gate #include <stdio.h> 290Sstevel@tonic-gate #include <stdlib.h> 300Sstevel@tonic-gate #include <strings.h> 310Sstevel@tonic-gate 320Sstevel@tonic-gate #include <fcode/private.h> 330Sstevel@tonic-gate #include <fcode/log.h> 340Sstevel@tonic-gate 350Sstevel@tonic-gate #include <fcdriver/fcdriver.h> 360Sstevel@tonic-gate 370Sstevel@tonic-gate /* 38*1772Sjl139090 * claim under /openprom/client-services is used by schizo and oberon Fcode, we 39*1772Sjl139090 * call "claim-memory" service. 400Sstevel@tonic-gate */ 410Sstevel@tonic-gate void 420Sstevel@tonic-gate claim(fcode_env_t *env) 430Sstevel@tonic-gate { 440Sstevel@tonic-gate size_t size; 450Sstevel@tonic-gate void *hint; 460Sstevel@tonic-gate int align; 470Sstevel@tonic-gate fc_cell_t vaddr; 480Sstevel@tonic-gate int error; 490Sstevel@tonic-gate 50*1772Sjl139090 CHECK_DEPTH(env, 3, "claim-memory"); 510Sstevel@tonic-gate hint = (void *)POP(DS); 520Sstevel@tonic-gate size = POP(DS); 530Sstevel@tonic-gate align = POP(DS); 54*1772Sjl139090 error = fc_run_priv(env->private, "claim-memory", 3, 1, 550Sstevel@tonic-gate fc_int2cell(align), fc_size2cell(size), fc_ptr2cell(hint), &vaddr); 560Sstevel@tonic-gate if (error) 570Sstevel@tonic-gate throw_from_fclib(env, 1, "client-services/claim failed\n"); 580Sstevel@tonic-gate vaddr = mapping_to_mcookie(vaddr, size, NULL, NULL); 590Sstevel@tonic-gate PUSH(DS, (fstack_t)vaddr); 600Sstevel@tonic-gate } 610Sstevel@tonic-gate 620Sstevel@tonic-gate void 630Sstevel@tonic-gate release(fcode_env_t *env) 640Sstevel@tonic-gate { 650Sstevel@tonic-gate size_t size; 660Sstevel@tonic-gate void *addr; 670Sstevel@tonic-gate int error; 680Sstevel@tonic-gate 69*1772Sjl139090 CHECK_DEPTH(env, 2, "release-memory"); 700Sstevel@tonic-gate addr = (void *)POP(DS); 710Sstevel@tonic-gate size = POP(DS); 72*1772Sjl139090 error = fc_run_priv(env->private, "release-memory", 2, 0, 730Sstevel@tonic-gate fc_size2cell(size), fc_ptr2cell(addr)); 740Sstevel@tonic-gate if (error) 750Sstevel@tonic-gate throw_from_fclib(env, 1, "client-services/release failed\n"); 760Sstevel@tonic-gate delete_mapping((fstack_t)addr); 770Sstevel@tonic-gate } 780Sstevel@tonic-gate 790Sstevel@tonic-gate static void 800Sstevel@tonic-gate fc_vtop(fcode_env_t *env) 810Sstevel@tonic-gate { 820Sstevel@tonic-gate void *vaddr; 830Sstevel@tonic-gate fc_cell_t physlo, physhi; 840Sstevel@tonic-gate int error; 850Sstevel@tonic-gate 86*1772Sjl139090 CHECK_DEPTH(env, 1, "vtop"); 870Sstevel@tonic-gate vaddr = (void *)POP(DS); 88*1772Sjl139090 error = fc_run_priv(env->private, "vtop", 1, 2, 890Sstevel@tonic-gate fc_ptr2cell(vaddr), &physlo, &physhi); 900Sstevel@tonic-gate if (error) 910Sstevel@tonic-gate throw_from_fclib(env, 1, "fc_vtop: '>physical' failed\n"); 920Sstevel@tonic-gate 930Sstevel@tonic-gate PUSH(DS, physlo); 940Sstevel@tonic-gate PUSH(DS, physhi); 950Sstevel@tonic-gate } 960Sstevel@tonic-gate 970Sstevel@tonic-gate void 980Sstevel@tonic-gate install_openprom_nodes(fcode_env_t *env) 990Sstevel@tonic-gate { 1000Sstevel@tonic-gate MYSELF = open_instance_chain(env, env->root_node, 0); 1010Sstevel@tonic-gate if (MYSELF != NULL) { 1020Sstevel@tonic-gate make_a_node(env, "openprom", 0); 1030Sstevel@tonic-gate make_a_node(env, "client-services", 0); 1040Sstevel@tonic-gate FORTH(0, "claim", claim); 1050Sstevel@tonic-gate FORTH(0, "release", release); 1060Sstevel@tonic-gate finish_device(env); 1070Sstevel@tonic-gate finish_device(env); 1080Sstevel@tonic-gate close_instance_chain(env, MYSELF, 0); 1090Sstevel@tonic-gate device_end(env); 1100Sstevel@tonic-gate MYSELF = 0; 1110Sstevel@tonic-gate } 1120Sstevel@tonic-gate } 1130Sstevel@tonic-gate 1140Sstevel@tonic-gate #pragma init(_init) 1150Sstevel@tonic-gate 1160Sstevel@tonic-gate static void 1170Sstevel@tonic-gate _init(void) 1180Sstevel@tonic-gate { 1190Sstevel@tonic-gate fcode_env_t *env = initial_env; 1200Sstevel@tonic-gate 1210Sstevel@tonic-gate ASSERT(env); 1220Sstevel@tonic-gate NOTICE; 1230Sstevel@tonic-gate 1240Sstevel@tonic-gate FORTH(0, "install-openprom-nodes", install_openprom_nodes); 1250Sstevel@tonic-gate FORTH(0, "claim", claim); 1260Sstevel@tonic-gate FORTH(0, "release", release); 1270Sstevel@tonic-gate P1275(0x106, 0, ">physical", fc_vtop); 1280Sstevel@tonic-gate } 129