/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2008 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include <sys/promif.h>
#include <sys/promimpl.h>
char *
prom_path_gettoken(register char *from, register char *to)
{
while (*from) {
switch (*from) {
case '/':
case '@':
case ':':
case ',':
*to = '\0';
return (from);
default:
*to++ = *from++;
}
}
*to = '\0';
return (from);
}
/*
* Given an OBP pathname, do the best we can to fully expand
* the OBP pathname, in place in the callers buffer.
*
* If we have to complete the addrspec of any component, we can
* only handle devices that have a maximum of NREGSPECS "reg" specs.
* We cannot allocate memory inside this function.
*/
void
prom_pathname(char *pathname)
{
char tmp[OBP_MAXPATHLEN];
char *from = tmp;
char *to = pathname;
char *p;
cell_t ci[7];
#ifdef PROM_32BIT_ADDRS
char *opathname = NULL;
#endif /* PROM_32BIT_ADDRS */
if ((to == (char *)0) || (*to == (char)0))
return;
#ifdef PROM_32BIT_ADDRS
if ((uintptr_t)pathname > (uint32_t)-1) {
opathname = pathname;
pathname = promplat_alloc(OBP_MAXPATHLEN);
if (pathname == NULL) {
return;
}
(void) prom_strcpy(pathname, opathname);
to = pathname;
}
if ((uintptr_t)from > (uint32_t)-1) {
from = promplat_alloc(OBP_MAXPATHLEN);
if (from == NULL) {
if (opathname != NULL)
promplat_free(pathname, OBP_MAXPATHLEN);
return;
}
}
#endif /* PROM_32BIT_ADDRS */
promif_preprom();
(void) prom_strcpy(from, to);
*to = (char)0;
ci[0] = p1275_ptr2cell("canon"); /* Service name */
ci[1] = (cell_t)3; /* #argument cells */
ci[2] = (cell_t)1; /* #result cells */
ci[3] = p1275_ptr2cell(from); /* Arg1: token */
ci[4] = p1275_ptr2cell(to); /* Arg2: buffer address */
ci[5] = p1275_uint2cell(OBP_MAXPATHLEN); /* Arg3: buffer length */
(void) p1275_cif_handler(&ci);
promif_postprom();
#ifdef PROM_32BIT_ADDRS
if (opathname != NULL) {
(void) prom_strcpy(opathname, pathname);
promplat_free(pathname, OBP_MAXPATHLEN);
to = pathname = opathname;
}
if (from != tmp) {
(void) prom_strcpy(tmp, from);
promplat_free(from, OBP_MAXPATHLEN);
from = tmp;
}
#endif /* PROM_32BIT_ADDRS */
/*
* workaround for bugid 1218110, the prom strips the
* options from the input string ... save options at
* at the end of the string if the prom didn't.
* NB: The workaround only preserves options in the last
* component of the string.
*/
/*
* If there are any options in the last component of the
* output, the prom has copied them; No workaround required.
*/
if ((p = prom_strrchr(to, '/')) == 0)
return;
if ((p = prom_strchr(p, ':')) != 0)
return;
/*
* If there are no options in the input ... there's
* nothing to preserve; return.
*/
if ((p = prom_strrchr(from, '/')) == 0)
p = from;
if ((p = prom_strchr(p, ':')) == 0)
return;
/*
* Concatenate the options we found to the end of the output string.
*/
(void) prom_strcat(to, p);
}
/*
* Strip any options strings from an OBP pathname.
* Output buffer (to) expected to be as large as input buffer (from).
*/
void
prom_strip_options(char *from, char *to)
{
while (*from != (char)0) {
if (*from == ':') {
while ((*from != (char)0) && (*from != '/'))
++from;
} else
*to++ = *from++;
}
*to = (char)0;
}