2N/A/*
2N/A * CDDL HEADER START
2N/A *
2N/A * The contents of this file are subject to the terms of the
2N/A * Common Development and Distribution License, Version 1.0 only
2N/A * (the "License"). You may not use this file except in compliance
2N/A * with the License.
2N/A *
2N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
2N/A * or http://www.opensolaris.org/os/licensing.
2N/A * See the License for the specific language governing permissions
2N/A * and limitations under the License.
2N/A *
2N/A * When distributing Covered Code, include this CDDL HEADER in each
2N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
2N/A * If applicable, add the following below this CDDL HEADER, with the
2N/A * fields enclosed by brackets "[]" replaced with your own identifying
2N/A * information: Portions Copyright [yyyy] [name of copyright owner]
2N/A *
2N/A * CDDL HEADER END
2N/A */
2N/A/*
2N/A * Copyright (c) 1998-2000 by Sun Microsystems, Inc.
2N/A * All rights reserved.
2N/A */
2N/A
2N/A#pragma ident "%Z%%M% %I% %E% SMI"
2N/A
2N/A#include <stdlib.h>
2N/A#include <unistd.h>
2N/A#include <errno.h>
2N/A#include "libproc.h"
2N/A
2N/Atypedef union {
2N/A offset_t full; /* full 64 bit offset value */
2N/A uint32_t half[2]; /* two 32-bit halves */
2N/A} offsets_t;
2N/A
2N/A/*
2N/A * lseek() system call -- executed by subject process.
2N/A */
2N/Aoff_t
2N/Apr_lseek(struct ps_prochandle *Pr, int filedes, off_t offset, int whence)
2N/A{
2N/A int syscall; /* SYS_lseek or SYS_llseek */
2N/A int nargs; /* 3 or 4, depending on syscall */
2N/A offsets_t off;
2N/A sysret_t rval; /* return value from lseek() */
2N/A argdes_t argd[4]; /* arg descriptors for lseek() */
2N/A argdes_t *adp;
2N/A int error;
2N/A
2N/A if (Pr == NULL)
2N/A return (lseek(filedes, offset, whence));
2N/A
2N/A adp = &argd[0]; /* filedes argument */
2N/A adp->arg_value = filedes;
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A
2N/A adp++; /* offset argument */
2N/A if (Pstatus(Pr)->pr_dmodel == PR_MODEL_NATIVE) {
2N/A syscall = SYS_lseek;
2N/A nargs = 3;
2N/A adp->arg_value = offset;
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A } else {
2N/A syscall = SYS_llseek;
2N/A nargs = 4;
2N/A off.full = offset;
2N/A adp->arg_value = off.half[0]; /* first 32 bits */
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A adp++;
2N/A adp->arg_value = off.half[1]; /* second 32 bits */
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A }
2N/A
2N/A adp++; /* whence argument */
2N/A adp->arg_value = whence;
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A
2N/A error = Psyscall(Pr, &rval, syscall, nargs, &argd[0]);
2N/A
2N/A if (error) {
2N/A errno = (error > 0)? error : ENOSYS;
2N/A return ((off_t)(-1));
2N/A }
2N/A
2N/A if (Pstatus(Pr)->pr_dmodel == PR_MODEL_NATIVE)
2N/A offset = rval.sys_rval1;
2N/A else {
2N/A off.half[0] = (uint32_t)rval.sys_rval1;
2N/A off.half[1] = (uint32_t)rval.sys_rval2;
2N/A offset = (off_t)off.full;
2N/A }
2N/A
2N/A return (offset);
2N/A}
2N/A
2N/A/*
2N/A * llseek() system call -- executed by subject process.
2N/A */
2N/Aoffset_t
2N/Apr_llseek(struct ps_prochandle *Pr, int filedes, offset_t offset, int whence)
2N/A{
2N/A int syscall; /* SYS_lseek or SYS_llseek */
2N/A int nargs; /* 3 or 4, depending on syscall */
2N/A offsets_t off;
2N/A sysret_t rval; /* return value from llseek() */
2N/A argdes_t argd[4]; /* arg descriptors for llseek() */
2N/A argdes_t *adp;
2N/A int error;
2N/A
2N/A if (Pr == NULL)
2N/A return (llseek(filedes, offset, whence));
2N/A
2N/A adp = &argd[0]; /* filedes argument */
2N/A adp->arg_value = filedes;
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A
2N/A adp++; /* offset argument */
2N/A if (Pstatus(Pr)->pr_dmodel == PR_MODEL_LP64) {
2N/A syscall = SYS_lseek;
2N/A nargs = 3;
2N/A adp->arg_value = offset;
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A } else {
2N/A syscall = SYS_llseek;
2N/A nargs = 4;
2N/A off.full = offset;
2N/A adp->arg_value = off.half[0]; /* first 32 bits */
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A adp++;
2N/A adp->arg_value = off.half[1]; /* second 32 bits */
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A }
2N/A
2N/A adp++; /* whence argument */
2N/A adp->arg_value = whence;
2N/A adp->arg_object = NULL;
2N/A adp->arg_type = AT_BYVAL;
2N/A adp->arg_inout = AI_INPUT;
2N/A adp->arg_size = 0;
2N/A
2N/A error = Psyscall(Pr, &rval, syscall, nargs, &argd[0]);
2N/A
2N/A if (error) {
2N/A errno = (error > 0)? error : ENOSYS;
2N/A return ((offset_t)(-1));
2N/A }
2N/A
2N/A if (Pstatus(Pr)->pr_dmodel == PR_MODEL_LP64)
2N/A offset = rval.sys_rval1;
2N/A else {
2N/A off.half[0] = (uint32_t)rval.sys_rval1;
2N/A off.half[1] = (uint32_t)rval.sys_rval2;
2N/A offset = off.full;
2N/A }
2N/A
2N/A return (offset);
2N/A}