/*  *   Creation Date: <2002/10/03 20:55:02 samuel> *   Time-stamp: <2002/10/29 13:00:23 samuel> *    *	<prom.c> *	 *	oftree interface *    *   Copyright (C) 2002, 2003 Samuel Rydh (samuel@ibrium.se) *    *   This program is free software; you can redistribute it and/or *   modify it under the terms of the GNU General Public License *   as published by the Free Software Foundation *    */#include "openbios/config.h"#include "osi_calls.h"#include "mol/prom.h"/* OSI_PromClose (free linux side device tree) */intprom_close( void ){	return OSI_PromIface( kPromClose, 0 );}/* ret: 0 no more peers, -1 if error */mol_phandle_tprom_peer( mol_phandle_t phandle ){	return OSI_PromIface( kPromPeer, phandle );}/* ret: 0 no child, -1 if error */mol_phandle_tprom_child( mol_phandle_t phandle ){	return OSI_PromIface( kPromChild, phandle );}/* ret: 0 if root node, -1 if error */mol_phandle_tprom_parent( mol_phandle_t phandle ){	return OSI_PromIface( kPromParent, phandle );}/* ret: -1 error */intprom_package_to_path( mol_phandle_t phandle, char *buf, long buflen ){	return OSI_PromIface2( kPromPackageToPath, phandle, (int)buf, buflen );}/* ret: -1 error */intprom_get_prop_len( mol_phandle_t phandle, const char *name ){	return OSI_PromIface1( kPromGetPropLen, phandle, (int)name );}/* ret: prop len or -1 if error */intprom_get_prop( mol_phandle_t phandle, const char *name, char *buf, long buflen ){	return OSI_PromIface3( kPromGetProp, phandle, (int)name, (int)buf, buflen );}/* ret: prop len or -1 if error */intprom_get_prop_by_path( const char *path, const char *name, char *buf, long buflen ) {	mol_phandle_t ph = prom_find_device(path);	return (ph != -1)? prom_get_prop( ph, name, buf, buflen) : -1;}/* ret: -1 error, 0 last prop, 1 otherwise */intprom_next_prop( mol_phandle_t phandle, const char *prev, char *buf ){	return OSI_PromIface2( kPromNextProp, phandle, (int)prev, (int)buf );}/* ret: -1 if error */intprom_set_prop( mol_phandle_t phandle, const char *name, char *buf, long buflen ){	return OSI_PromIface3( kPromSetProp, phandle, (int)name, (int)buf, buflen );}/* ret: -1 if error */mol_phandle_tprom_create_node( const char *path ){	return OSI_PromPathIface( kPromCreateNode, path );}/* ret: -1 if not found */mol_phandle_tprom_find_device( const char *path ){	mol_phandle_t ph;	char buf2[256], ch, *p;	if( !path )		return -1;		if( (ph=OSI_PromPathIface( kPromFindDevice, path )) != -1 )		return ph;	else if( path[0] == '/' )		return -1;		/* might be an alias */	if( !(p=strpbrk(path, "@:/")) )		p = (char*)path + strlen(path);	ch = *p;	*p = 0;	if( (ph=prom_get_prop(prom_find_device("/aliases"), path, buf2, sizeof(buf2))) == -1 )		return -1;	*p = ch;	strncat( buf2, p, sizeof(buf2) );	if( buf2[0] != '/' ) {		printk("Error: aliases must be absolute!\n");		return -1;	}	ph = OSI_PromPathIface( kPromFindDevice, buf2 );		return ph;}/************************************************************************//*	search the tree for nodes with matching device_type		*//************************************************************************/static mol_phandle_tprom_find_device_type_( mol_phandle_t ph, const char *type, int *icount, int index ){	char buf[64];	int ph2;	if( ph == -1 || !ph )		return -1;	if( prom_get_prop( ph, "device_type", buf, sizeof(buf)) > 0 )		if( !strcmp(buf, type) )			if( (*icount)++ == index )				return ph;	if( (ph2=prom_find_device_type_( prom_peer(ph), type, icount, index )) != -1 )		return ph2;	if( (ph2=prom_find_device_type_( prom_child(ph), type, icount, index )) != -1 )		return ph2;	return -1;}mol_phandle_tprom_find_device_type( const char *type, int index ){	int count = 0;	return prom_find_device_type_( prom_peer(0), type, &count, index );}/************************************************************************//*	device tree tweaking						*//************************************************************************//* -1 if error */intprom_change_phandle( mol_phandle_t old_ph, mol_phandle_t new_ph ){	return OSI_PromIface1( kPromChangePHandle, old_ph, (int)new_ph );}