Changeset 156 for trunk/src


Ignore:
Timestamp:
Jun 22, 1999, 7:08:16 PM (26 years ago)
Author:
phaller
Message:

Add: more C-runtime stuff in NTDLL

Location:
trunk/src/NTDLL
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/src/NTDLL/crt.cpp

    r155 r156  
    1 /* $Id: crt.cpp,v 1.1 1999-06-22 16:18:14 phaller Exp $ */
     1/* $Id: crt.cpp,v 1.2 1999-06-22 17:08:16 phaller Exp $ */
    22
    33/*
    … …  
    1010#include <stdlib.h>
    1111#include <string.h>
     12#include <math.h>
     13#include <ctype.h>
     14#include <wchar.h>
     15#include <wcstr.h>
     16
    1217#include "ntdll.h"
    1318
    1419/*
    1520NTDLL.sprintf
    16 NTDLL.wcslen
    1721NTDLL._itoa
    1822NTDLL._wcsicmp
    … …  
    2024
    2125
     26
     27/*****************************************************************************
     28 * Name      :
     29 * Purpose   :
     30 * Parameters:
     31 * Variables :
     32 * Result    :
     33 * Remark    : NTDLL.883
     34 * Status    :
     35 *
     36 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     37 *****************************************************************************/
     38
     39double CDECL OS2abs(double d)
     40{
     41  dprintf(("NTDLL: abs(%f)\n",
     42           d));
     43
     44  return (abs(d));
     45}
     46
     47
     48/*****************************************************************************
     49 * Name      :
     50 * Purpose   :
     51 * Parameters:
     52 * Variables :
     53 * Result    :
     54 * Remark    : NTDLL.884
     55 * Status    :
     56 *
     57 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     58 *****************************************************************************/
     59
     60double CDECL OS2atan(double d)
     61{
     62  dprintf(("NTDLL: atan(%f)\n",
     63           d));
     64
     65  return (atan(d));
     66}
     67
     68
     69/*****************************************************************************
     70 * Name      :
     71 * Purpose   :
     72 * Parameters:
     73 * Variables :
     74 * Result    :
     75 * Remark    : NTDLL.885
     76 * Status    :
     77 *
     78 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     79 *****************************************************************************/
     80
     81int CDECL OS2atoi(LPSTR str)
     82{
     83  dprintf(("NTDLL: atoi(%s)\n",
     84           str));
     85
     86  return (atoi(str));
     87}
     88
     89
     90/*****************************************************************************
     91 * Name      :
     92 * Purpose   :
     93 * Parameters:
     94 * Variables :
     95 * Result    :
     96 * Remark    : NTDLL.886
     97 * Status    :
     98 *
     99 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     100 *****************************************************************************/
     101
     102long CDECL OS2atol(LPSTR str)
     103{
     104  dprintf(("NTDLL: atol(%s)\n",
     105           str));
     106
     107  return (atol(str));
     108}
     109
     110
     111/*****************************************************************************
     112 * Name      :
     113 * Purpose   :
     114 * Parameters:
     115 * Variables :
     116 * Result    :
     117 * Remark    : NTDLL.887
     118 * Status    :
     119 *
     120 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     121 *****************************************************************************/
     122
     123double CDECL OS2ceil(double d)
     124{
     125  dprintf(("NTDLL: ceil(%f)\n",
     126           d));
     127
     128  return (ceil(d));
     129}
     130
     131
     132/*****************************************************************************
     133 * Name      :
     134 * Purpose   :
     135 * Parameters:
     136 * Variables :
     137 * Result    :
     138 * Remark    : NTDLL.888
     139 * Status    :
     140 *
     141 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     142 *****************************************************************************/
     143
     144double CDECL OS2cos(double d)
     145{
     146  dprintf(("NTDLL: cos(%f)\n",
     147           d));
     148
     149  return (cos(d));
     150}
     151
     152
     153/*****************************************************************************
     154 * Name      :
     155 * Purpose   :
     156 * Parameters:
     157 * Variables :
     158 * Result    :
     159 * Remark    : NTDLL.889
     160 * Status    :
     161 *
     162 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     163 *****************************************************************************/
     164
     165double CDECL OS2fabs(double d)
     166{
     167  dprintf(("NTDLL: fabs(%f)\n",
     168           d));
     169
     170  return (fabs(d));
     171}
     172
     173
     174/*****************************************************************************
     175 * Name      :
     176 * Purpose   :
     177 * Parameters:
     178 * Variables :
     179 * Result    :
     180 * Remark    : NTDLL.890
     181 * Status    :
     182 *
     183 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     184 *****************************************************************************/
     185
     186double CDECL OS2floor(double d)
     187{
     188  dprintf(("NTDLL: floor(%f)\n",
     189           d));
     190
     191  return (floor(d));
     192}
     193
     194
     195/*****************************************************************************
     196 * Name      :
     197 * Purpose   :
     198 * Parameters:
     199 * Variables :
     200 * Result    :
     201 * Remark    : NTDLL.891
     202 * Status    :
     203 *
     204 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     205 *****************************************************************************/
     206
     207int CDECL OS2isalpha(int i)
     208{
     209  dprintf(("NTDLL: isalpha(%08xh)\n",
     210           i));
     211
     212  return (isalpha(i));
     213}
     214
     215
     216/*****************************************************************************
     217 * Name      :
     218 * Purpose   :
     219 * Parameters:
     220 * Variables :
     221 * Result    :
     222 * Remark    : NTDLL.892
     223 * Status    :
     224 *
     225 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     226 *****************************************************************************/
     227
     228int CDECL OS2isdigit(int i)
     229{
     230  dprintf(("NTDLL: isdigit(%08xh)\n",
     231           i));
     232
     233  return (isdigit(i));
     234}
     235
     236
     237/*****************************************************************************
     238 * Name      :
     239 * Purpose   :
     240 * Parameters:
     241 * Variables :
     242 * Result    :
     243 * Remark    : NTDLL.893
     244 * Status    :
     245 *
     246 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     247 *****************************************************************************/
     248
     249int CDECL OS2islower(int i)
     250{
     251  dprintf(("NTDLL: islower(%08xh)\n",
     252           i));
     253
     254  return (islower(i));
     255}
     256
     257
     258/*****************************************************************************
     259 * Name      :
     260 * Purpose   :
     261 * Parameters:
     262 * Variables :
     263 * Result    :
     264 * Remark    : NTDLL.894
     265 * Status    :
     266 *
     267 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     268 *****************************************************************************/
     269
     270int CDECL OS2isprint(int i)
     271{
     272  dprintf(("NTDLL: isprint(%08xh)\n",
     273           i));
     274
     275  return (isprint(i));
     276}
     277
     278
     279/*****************************************************************************
     280 * Name      :
     281 * Purpose   :
     282 * Parameters:
     283 * Variables :
     284 * Result    :
     285 * Remark    : NTDLL.895
     286 * Status    :
     287 *
     288 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     289 *****************************************************************************/
     290
     291int CDECL OS2isspace(int i)
     292{
     293  dprintf(("NTDLL: isspace(%08xh)\n",
     294           i));
     295
     296  return (isspace(i));
     297}
     298
     299
     300/*****************************************************************************
     301 * Name      :
     302 * Purpose   :
     303 * Parameters:
     304 * Variables :
     305 * Result    :
     306 * Remark    : NTDLL.896
     307 * Status    :
     308 *
     309 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     310 *****************************************************************************/
     311
     312int CDECL OS2isupper(int i)
     313{
     314  dprintf(("NTDLL: isupper(%08xh)\n",
     315           i));
     316
     317  return (isupper(i));
     318}
     319
     320
    22321/*****************************************************************************
    23322 * Name      :
    … …  
    33332
    34333LPSTR CDECL OS2strcat(      LPSTR str1,
    35                      const LPSTR str2)
     334                      const LPSTR str2)
    36335{
    37336  dprintf(("NTDLL: strcat(%s,%s)\n",
    … …  
    322621}
    323622
     623
     624
     625
     626
     627
     628
     629
     630
     631/*****************************************************************************
     632 * Name      :
     633 * Purpose   :
     634 * Parameters:
     635 * Variables :
     636 * Result    :
     637 * Remark    : NTDLL.934
     638 * Status    :
     639 *
     640 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     641 *****************************************************************************/
     642
     643wchar_t* CDECL OS2wcscat(      wchar_t* str1,
     644                       const wchar_t* str2)
     645{
     646  dprintf(("NTDLL: wcscat(%08xh,%08xh)\n",
     647           str1,
     648           str2));
     649
     650  return (wcscat(str1, str2));
     651}
     652
     653
     654/*****************************************************************************
     655 * Name      :
     656 * Purpose   :
     657 * Parameters:
     658 * Variables :
     659 * Result    :
     660 * Remark    : NTDLL.935
     661 * Status    :
     662 *
     663 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     664 *****************************************************************************/
     665
     666wchar_t* CDECL OS2wcschr(const wchar_t* str,
     667                       int          i)
     668{
     669  dprintf(("NTDLL: wcschr(%08xh,%08xh)\n",
     670           str,
     671           i));
     672
     673  return (wcschr(str, i));
     674}
     675
     676
     677/*****************************************************************************
     678 * Name      :
     679 * Purpose   :
     680 * Parameters:
     681 * Variables :
     682 * Result    :
     683 * Remark    : NTDLL.936
     684 * Status    :
     685 *
     686 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     687 *****************************************************************************/
     688
     689int CDECL OS2wcscmp(const wchar_t* str1,
     690                    const wchar_t* str2)
     691{
     692  dprintf(("NTDLL: wcscmp(%08xh,%08xh)\n",
     693           str1,
     694           str2));
     695
     696  return (wcscmp(str1, str2));
     697}
     698
     699
     700/*****************************************************************************
     701 * Name      :
     702 * Purpose   :
     703 * Parameters:
     704 * Variables :
     705 * Result    :
     706 * Remark    : NTDLL.937
     707 * Status    :
     708 *
     709 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     710 *****************************************************************************/
     711
     712wchar_t* CDECL OS2wcscpy(      wchar_t* str1,
     713                       const wchar_t* str2)
     714{
     715  dprintf(("NTDLL: wcscpy(%08xh,%08xh)\n",
     716           str1,
     717           str2));
     718
     719  return (wcscpy(str1, str2));
     720}
     721
     722
     723/*****************************************************************************
     724 * Name      :
     725 * Purpose   :
     726 * Parameters:
     727 * Variables :
     728 * Result    :
     729 * Remark    : NTDLL.938
     730 * Status    :
     731 *
     732 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     733 *****************************************************************************/
     734
     735size_t CDECL OS2wcscspn(const wchar_t* str1,
     736                              wchar_t* str2)
     737{
     738  dprintf(("NTDLL: wcscspn(%08xh,%08xh)\n",
     739           str1,
     740           str2));
     741
     742  return (wcscspn(str1, str2));
     743}
     744
     745
     746/*****************************************************************************
     747 * Name      :
     748 * Purpose   :
     749 * Parameters:
     750 * Variables :
     751 * Result    :
     752 * Remark    : NTDLL.939
     753 * Status    :
     754 *
     755 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     756 *****************************************************************************/
     757
     758size_t CDECL OS2wcslen(const wchar_t* str)
     759{
     760  dprintf(("NTDLL: wcslen(%08xh)\n",
     761           str));
     762
     763  return (wcslen(str));
     764}
     765
     766
     767/*****************************************************************************
     768 * Name      :
     769 * Purpose   :
     770 * Parameters:
     771 * Variables :
     772 * Result    :
     773 * Remark    : NTDLL.940
     774 * Status    :
     775 *
     776 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     777 *****************************************************************************/
     778
     779wchar_t* CDECL OS2wcsncat(      wchar_t* str1,
     780                        const wchar_t* str2,
     781                        size_t      i)
     782{
     783  dprintf(("NTDLL: wcsncat(%08xh,%08xh,%08xh)\n",
     784           str1,
     785           str2,
     786           i));
     787
     788  return (wcsncat(str1, str2, i));
     789}
     790
     791
     792/*****************************************************************************
     793 * Name      :
     794 * Purpose   :
     795 * Parameters:
     796 * Variables :
     797 * Result    :
     798 * Remark    : NTDLL.941
     799 * Status    :
     800 *
     801 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     802 *****************************************************************************/
     803
     804int CDECL OS2wcsncmp(const wchar_t* str1,
     805                     const wchar_t* str2,
     806                     size_t      i)
     807{
     808  dprintf(("NTDLL: wcsncmp(%08xh,%08xh,%08xh)\n",
     809           str1,
     810           str2,
     811           i));
     812
     813  return (wcsncmp(str1, str2, i));
     814}
     815
     816
     817/*****************************************************************************
     818 * Name      :
     819 * Purpose   :
     820 * Parameters:
     821 * Variables :
     822 * Result    :
     823 * Remark    : NTDLL.942
     824 * Status    :
     825 *
     826 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     827 *****************************************************************************/
     828
     829wchar_t* CDECL OS2wcsncpy(      wchar_t* str1,
     830                          const wchar_t* str2,
     831                          size_t       i)
     832{
     833  dprintf(("NTDLL: wcsncpy(%s,%s,%08xh)\n",
     834           str1,
     835           str2,
     836           i));
     837
     838  return (wcsncpy(str1, str2, i));
     839}
     840
     841
     842/*****************************************************************************
     843 * Name      :
     844 * Purpose   :
     845 * Parameters:
     846 * Variables :
     847 * Result    :
     848 * Remark    : NTDLL.943
     849 * Status    :
     850 *
     851 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     852 *****************************************************************************/
     853
     854wchar_t* CDECL OS2wcspbrk(const wchar_t* str1,
     855                        const wchar_t* str2)
     856{
     857  dprintf(("NTDLL: wcspbrk(%08xh,%08xh)\n",
     858           str1,
     859           str2));
     860
     861  return (wcspbrk(str1, str2));
     862}
     863
     864
     865/*****************************************************************************
     866 * Name      :
     867 * Purpose   :
     868 * Parameters:
     869 * Variables :
     870 * Result    :
     871 * Remark    : NTDLL.944
     872 * Status    :
     873 *
     874 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     875 *****************************************************************************/
     876
     877wchar_t* CDECL OS2wcsrchr(const wchar_t* str,
     878                        size_t       i)
     879{
     880  dprintf(("NTDLL: wcsrchr(%08xh,%08xh)\n",
     881           str,
     882           i));
     883
     884  return (wcsrchr(str, i));
     885}
     886
     887
     888/*****************************************************************************
     889 * Name      :
     890 * Purpose   :
     891 * Parameters:
     892 * Variables :
     893 * Result    :
     894 * Remark    : NTDLL.945
     895 * Status    :
     896 *
     897 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     898 *****************************************************************************/
     899
     900size_t CDECL OS2wcsspn(const wchar_t* str1,
     901                       const wchar_t* str2)
     902{
     903  dprintf(("NTDLL: wcsspn(%08xh,%08xh)\n",
     904           str1,
     905           str2));
     906
     907  return (wcsspn(str1, str2));
     908}
     909
     910
     911/*****************************************************************************
     912 * Name      :
     913 * Purpose   :
     914 * Parameters:
     915 * Variables :
     916 * Result    :
     917 * Remark    : NTDLL.946
     918 * Status    :
     919 *
     920 * Author    : Patrick Haller [Thu, 1999/06/22 20:44]
     921 *****************************************************************************/
     922
     923wchar_t* CDECL OS2wcsstr(const wchar_t* str1,
     924                         const wchar_t* str2)
     925{
     926  dprintf(("NTDLL: wcsstr(%s,%s)\n",
     927           str1,
     928           str2));
     929
     930  return (wcsstr(str1, str2));
     931}
     932

  • trunk/src/NTDLL/ntdll.def

    r155 r156  
    1 ; $Id: ntdll.def,v 1.6 1999-06-22 16:18:14 phaller Exp $
     1; $Id: ntdll.def,v 1.7 1999-06-22 17:08:16 phaller Exp $
    22
    33;Created by BLAST for IBM's compiler
    … …  
    281281; NTDLL's C runtime
    282282; Note: CDECL does not decorate the function names with parameter bytes!
     283    abs                           = _OS2abs                           @883
     284    atan                          = _OS2atan                          @884
     285    atoi                          = _OS2atoi                          @885
     286    atol                          = _OS2atol                          @886
     287    ceil                          = _OS2ceil                          @887
     288    cos                           = _OS2cos                           @888
     289    fabs                          = _OS2fabs                          @889
     290    floor                         = _OS2floor                         @890
     291    isalpha                       = _OS2isalpha                       @891
     292    isdigit                       = _OS2isdigit                       @892
     293    islower                       = _OS2islower                       @893
     294    isprint                       = _OS2isprint                       @894
     295    isspace                       = _OS2isspace                       @895
     296    isupper                       = _OS2isupper                       @896
     297
    283298    strcat                        = _OS2strcat                        @914
    284299    strchr                        = _OS2strchr                        @915
    … …  
    295310    strstr                        = _OS2strstr                        @926
    296311
     312    wcscat                        = _OS2wcscat                        @934
     313    wcschr                        = _OS2wcschr                        @935
     314    wcscmp                        = _OS2wcscmp                        @936
     315    wcscpy                        = _OS2wcscpy                        @937
     316    wcscspn                       = _OS2wcscspn                       @938
     317    wcslen                        = _OS2wcslen                        @939
     318    wcsncat                       = _OS2wcscat                        @940
     319    wcsncmp                       = _OS2wcsncmp                       @941
     320    wcsncpy                       = _OS2wcsncpy                       @942
     321    wcspbrk                       = _OS2wcspbrk                       @943
     322    wcsrchr                       = _OS2wcsrchr                       @944
     323    wcsspn                        = _OS2wcsspn                        @945
     324    wcsstr                        = _OS2wcsstr                        @946
     325
Note: See TracChangeset for help on using the changeset viewer.