dlls/ntdll/misc.c

   1 /*
   2  * Helper functions for ntdll
   3  *
   4  * Copyright 2000 Juergen Schmied
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <time.h>
  24 #include <math.h>
  25
  26 #include "wine/library.h"
  27 #include "wine/debug.h"
  28 #include "ntdll_misc.h"
  29
  30 WINE_DEFAULT_DEBUG_CHANNEL(ntdll);
  31
  32 #if defined(__GNUC__) && defined(__i386__)
  33 #define DO_FPU(x,y) __asm__ __volatile__( x " %0;fwait" : "=m" (y) : )
  34 #define POP_FPU(x) DO_FPU("fstpl",x)
  35 #endif
  36
  37 void dump_ObjectAttributes (const OBJECT_ATTRIBUTES *oa)
  38 {
  39         if (oa)
  40           TRACE("%p:(name=%s, attr=0x%08x, hRoot=%p, sd=%p)\n",
  41             oa, debugstr_us(oa->ObjectName),
  42             oa->Attributes, oa->RootDirectory, oa->SecurityDescriptor);
  43 }
  44
  45 LPCSTR debugstr_us( const UNICODE_STRING *us )
  46 {
  47     if (!us) return "<null>";
  48     return debugstr_wn(us->Buffer, us->Length / sizeof(WCHAR));
  49 }
  50
  51 /*********************************************************************
  52  *                  _ftol   (NTDLL.@)
  53  *
  54  * VERSION
  55  *      [GNUC && i386]
  56  */
  57 #if defined(__GNUC__) && defined(__i386__)
  58 LONGLONG CDECL NTDLL__ftol(void)
  59 {
  60         /* don't just do DO_FPU("fistp",retval), because the rounding
  61          * mode must also be set to "round towards zero"... */
  62         double fl;
  63         POP_FPU(fl);
  64         return (LONGLONG)fl;
  65 }
  66 #endif /* defined(__GNUC__) && defined(__i386__) */
  67
  68 /*********************************************************************
  69  *                  _ftol   (NTDLL.@)
  70  *
  71  * FIXME
  72  *      Should be register function
  73  * VERSION
  74  *      [!GNUC && i386]
  75  */
  76 #if !defined(__GNUC__) && defined(__i386__)
  77 LONGLONG CDECL NTDLL__ftol(double fl)
  78 {
  79         FIXME("should be register function\n");
  80         return (LONGLONG)fl;
  81 }
  82 #endif /* !defined(__GNUC__) && defined(__i386__) */
  83
  84 /*********************************************************************
  85  *                  _ftol   (NTDLL.@)
  86  * VERSION
  87  *      [!i386]
  88  */
  89 #ifndef __i386__
  90 LONG CDECL NTDLL__ftol(double fl)
  91 {
  92         return (LONG) fl;
  93 }
  94 #endif /* !defined(__i386__) */
  95
  96 /*********************************************************************
  97  *                  _CIpow   (NTDLL.@)
  98  * VERSION
  99  *      [GNUC && i386]
 100  */
 101 #if defined(__GNUC__) && defined(__i386__)
 102 double CDECL NTDLL__CIpow(void)
 103 {
 104         double x,y;
 105         POP_FPU(y);
 106         POP_FPU(x);
 107         return pow(x,y);
 108 }
 109 #endif /* defined(__GNUC__) && defined(__i386__) */
 110
 111
 112 /*********************************************************************
 113  *                  _CIpow   (NTDLL.@)
 114  *
 115  * FIXME
 116  *      Should be register function
 117  *
 118  * VERSION
 119  *      [!GNUC && i386]
 120  */
 121 #if !defined(__GNUC__) && defined(__i386__)
 122 double CDECL NTDLL__CIpow(double x,double y)
 123 {
 124         FIXME("should be register function\n");
 125         return pow(x,y);
 126 }
 127 #endif /* !defined(__GNUC__) && defined(__i386__) */
 128
 129 /*********************************************************************
 130  *                  _CIpow   (NTDLL.@)
 131  * VERSION
 132  *      [!i386]
 133  */
 134 #ifndef __i386__
 135 double CDECL NTDLL__CIpow(double x,double y)
 136 {
 137         return pow(x,y);
 138 }
 139 #endif /* !defined(__i386__) */
 140
 141
 142 /*********************************************************************
 143  *                  wine_get_version   (NTDLL.@)
 144  */
 145 const char * CDECL NTDLL_wine_get_version(void)
 146 {
 147     return wine_get_version();
 148 }
 149
 150 /*********************************************************************
 151  *                  wine_get_build_id   (NTDLL.@)
 152  */
 153 const char * CDECL NTDLL_wine_get_build_id(void)
 154 {
 155     return wine_get_build_id();
 156 }
 157
 158 /*********************************************************************
 159  *                  abs   (NTDLL.@)
 160  */
 161 int CDECL NTDLL_abs( int i )
 162 {
 163     return abs( i );
 164 }
 165
 166 /*********************************************************************
 167  *                  labs   (NTDLL.@)
 168  */
 169 LONG CDECL NTDLL_labs( LONG i )
 170 {
 171     return labs( i );
 172 }
 173
 174 /*********************************************************************
 175  *                  atan   (NTDLL.@)
 176  */
 177 double CDECL NTDLL_atan( double d )
 178 {
 179     return atan( d );
 180 }
 181
 182 /*********************************************************************
 183  *                  ceil   (NTDLL.@)
 184  */
 185 double CDECL NTDLL_ceil( double d )
 186 {
 187     return ceil( d );
 188 }
 189
 190 /*********************************************************************
 191  *                  cos   (NTDLL.@)
 192  */
 193 double CDECL NTDLL_cos( double d )
 194 {
 195     return cos( d );
 196 }
 197
 198 /*********************************************************************
 199  *                  fabs   (NTDLL.@)
 200  */
 201 double CDECL NTDLL_fabs( double d )
 202 {
 203     return fabs( d );
 204 }
 205
 206 /*********************************************************************
 207  *                  floor   (NTDLL.@)
 208  */
 209 double CDECL NTDLL_floor( double d )
 210 {
 211     return floor( d );
 212 }
 213
 214 /*********************************************************************
 215  *                  log   (NTDLL.@)
 216  */
 217 double CDECL NTDLL_log( double d )
 218 {
 219     return log( d );
 220 }
 221
 222 /*********************************************************************
 223  *                  pow   (NTDLL.@)
 224  */
 225 double CDECL NTDLL_pow( double x, double y )
 226 {
 227     return pow( x, y );
 228 }
 229
 230 /*********************************************************************
 231  *                  sin   (NTDLL.@)
 232  */
 233 double CDECL NTDLL_sin( double d )
 234 {
 235     return sin( d );
 236 }
 237
 238 /*********************************************************************
 239  *                  sqrt   (NTDLL.@)
 240  */
 241 double CDECL NTDLL_sqrt( double d )
 242 {
 243     return sqrt( d );
 244 }
 245
 246 /*********************************************************************
 247  *                  tan   (NTDLL.@)
 248  */
 249 double CDECL NTDLL_tan( double d )
 250 {
 251     return tan( d );
 252 }