ntdll: Update behavior of ActivationContextBasicInformation.
[wine] / 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 }