wine/dlls/ntdll/misc.c
2006-10-18 12:35:26 +02:00

236 lines
5.5 KiB
C

/*
* Helper functions for ntdll
*
* Copyright 2000 Juergen Schmied
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
*/
#include "config.h"
#include <time.h>
#include <math.h>
#include "wine/debug.h"
#include "ntdll_misc.h"
WINE_DEFAULT_DEBUG_CHANNEL(ntdll);
#if defined(__GNUC__) && defined(__i386__)
#define DO_FPU(x,y) __asm__ __volatile__( x " %0;fwait" : "=m" (y) : )
#define POP_FPU(x) DO_FPU("fstpl",x)
#endif
void dump_ObjectAttributes (const OBJECT_ATTRIBUTES *oa)
{
if (oa)
TRACE("%p:(name=%s, attr=0x%08x, hRoot=%p, sd=%p)\n",
oa, debugstr_us(oa->ObjectName),
oa->Attributes, oa->RootDirectory, oa->SecurityDescriptor);
}
LPCSTR debugstr_us( const UNICODE_STRING *us )
{
if (!us) return "<null>";
return debugstr_wn(us->Buffer, us->Length / sizeof(WCHAR));
}
/*********************************************************************
* _ftol (NTDLL.@)
*
* VERSION
* [GNUC && i386]
*/
#if defined(__GNUC__) && defined(__i386__)
LONGLONG CDECL NTDLL__ftol(void)
{
/* don't just do DO_FPU("fistp",retval), because the rounding
* mode must also be set to "round towards zero"... */
double fl;
POP_FPU(fl);
return (LONGLONG)fl;
}
#endif /* defined(__GNUC__) && defined(__i386__) */
/*********************************************************************
* _ftol (NTDLL.@)
*
* FIXME
* Should be register function
* VERSION
* [!GNUC && i386]
*/
#if !defined(__GNUC__) && defined(__i386__)
LONGLONG CDECL NTDLL__ftol(double fl)
{
FIXME("should be register function\n");
return (LONGLONG)fl;
}
#endif /* !defined(__GNUC__) && defined(__i386__) */
/*********************************************************************
* _ftol (NTDLL.@)
* VERSION
* [!i386]
*/
#ifndef __i386__
LONG CDECL NTDLL__ftol(double fl)
{
return (LONG) fl;
}
#endif /* !defined(__i386__) */
/*********************************************************************
* _CIpow (NTDLL.@)
* VERSION
* [GNUC && i386]
*/
#if defined(__GNUC__) && defined(__i386__)
double CDECL NTDLL__CIpow(void)
{
double x,y;
POP_FPU(y);
POP_FPU(x);
return pow(x,y);
}
#endif /* defined(__GNUC__) && defined(__i386__) */
/*********************************************************************
* _CIpow (NTDLL.@)
*
* FIXME
* Should be register function
*
* VERSION
* [!GNUC && i386]
*/
#if !defined(__GNUC__) && defined(__i386__)
double CDECL NTDLL__CIpow(double x,double y)
{
FIXME("should be register function\n");
return pow(x,y);
}
#endif /* !defined(__GNUC__) && defined(__i386__) */
/*********************************************************************
* _CIpow (NTDLL.@)
* VERSION
* [!i386]
*/
#ifndef __i386__
double CDECL NTDLL__CIpow(double x,double y)
{
return pow(x,y);
}
#endif /* !defined(__i386__) */
/*********************************************************************
* abs (NTDLL.@)
*/
int CDECL NTDLL_abs( int i )
{
return abs( i );
}
/*********************************************************************
* labs (NTDLL.@)
*/
long int CDECL NTDLL_labs( long int i )
{
return labs( i );
}
/*********************************************************************
* atan (NTDLL.@)
*/
double CDECL NTDLL_atan( double d )
{
return atan( d );
}
/*********************************************************************
* ceil (NTDLL.@)
*/
double CDECL NTDLL_ceil( double d )
{
return ceil( d );
}
/*********************************************************************
* cos (NTDLL.@)
*/
double CDECL NTDLL_cos( double d )
{
return cos( d );
}
/*********************************************************************
* fabs (NTDLL.@)
*/
double CDECL NTDLL_fabs( double d )
{
return fabs( d );
}
/*********************************************************************
* floor (NTDLL.@)
*/
double CDECL NTDLL_floor( double d )
{
return floor( d );
}
/*********************************************************************
* log (NTDLL.@)
*/
double CDECL NTDLL_log( double d )
{
return log( d );
}
/*********************************************************************
* pow (NTDLL.@)
*/
double CDECL NTDLL_pow( double x, double y )
{
return pow( x, y );
}
/*********************************************************************
* sin (NTDLL.@)
*/
double CDECL NTDLL_sin( double d )
{
return sin( d );
}
/*********************************************************************
* sqrt (NTDLL.@)
*/
double CDECL NTDLL_sqrt( double d )
{
return sqrt( d );
}
/*********************************************************************
* tan (NTDLL.@)
*/
double CDECL NTDLL_tan( double d )
{
return tan( d );
}