Ignore:
Timestamp:
Sep 15, 2001, 11:47:44 AM (24 years ago)
Author:
sandervl
Message:

restored old version

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/src/crtdll/crtdll.cpp

    r6645 r6712  
    1 /* $Id: crtdll.cpp,v 1.30 2001-09-05 12:14:23 bird Exp $ */
    21/*
    32 * The C RunTime DLL
    4  *
     3 * 
    54 * Implements C run-time functionality as known from UNIX.
    65 *
    7  * TODO:
     6 * TODO: 
    87 *   - Check setjmp(3)
    98 *   - fix *ALL* functions for the FS: wrapper problem
    … …  
    7372// Definitions for internal functions
    7473//
    75 void        qsort1 (char*, char*, size_t,
     74void            qsort1 (char*, char*, size_t,
    7675                    int (* CDECL)(const void*, const void*));
    7776
    … …  
    445444
    446445/*********************************************************************
    447  *  _cscanf                     (CRTDLL.67)
     446 *      _cscanf                                 (CRTDLL.67)
    448447 */
    449448INT CDECL CRTDLL__cscanf( char *s, va_list arg )
    … …  
    605604
    606605/*********************************************************************
    607  *  _ftime                  (CRTDLL.112)
     606 *      _ftime                                  (CRTDLL.112)
    608607 */
    609608void CDECL CRTDLL__ftime( struct timeb *timebuf )
    … …  
    619618LONG CDECL CRTDLL__ftol(void)
    620619{
    621     /* don't just do DO_FPU("fistp",retval), because the rounding
    622     * mode must also be set to "round towards zero"... */
    623     double fl;
    624     POP_FPU(fl);
    625     return (LONG)fl;
     620        /* don't just do DO_FPU("fistp",retval), because the rounding
     621        * mode must also be set to "round towards zero"... */
     622        double fl;
     623        POP_FPU(fl);
     624        return (LONG)fl;
    626625}
    627626
    … …  
    776775
    777776/*********************************************************************
    778  *                  _ltoa   (CRTDLL.179)
     777 *                  _ltoa       (CRTDLL.179)
    779778 */
    780779LPSTR  CDECL CRTDLL__ltoa(long x,LPSTR buf,INT radix)
    … …  
    785784
    786785/*********************************************************************
    787  *                  _matherr    (CRTDLL.181)
     786 *                  _matherr    (CRTDLL.181)
    788787 */
    789788double CDECL CRTDLL__matherr( struct exception * excep )
    … …  
    882881
    883882/*********************************************************************
    884  *           CRTDLL__searchenv   (CRTDLL.260)
     883 *           CRTDLL__searchenv   (CRTDLL.260)
    885884 */
    886885void CDECL CRTDLL__searchenv(char *file, char *var,char *path )
    … …  
    892891
    893892/*********************************************************************
    894  *           CRTDLL__seterrormode   (CRTDLL.261)
     893 *           CRTDLL__seterrormode       (CRTDLL.261)
    895894 */
    896895void CDECL CRTDLL__seterrormode(int uMode)
    … …  
    903902
    904903/*********************************************************************
    905  *           CRTDLL__setjmp     (CRTDLL.262)
     904 *           CRTDLL__setjmp     (CRTDLL.262)
    906905 */
    907906int CDECL CRTDLL__setjmp( jmp_buf env )
    … …  
    938937
    939938/*********************************************************************
    940  *  _sopen                  (CRTDLL.268)
     939 *      _sopen                                  (CRTDLL.268)
    941940 */
    942941int CDECL CRTDLL__sopen( const char *s, int i1, int i2, va_list arg )
    … …  
    948947
    949948/*********************************************************************
    950  *           CRTDLL__spawnl     (CRTDLL.269)
     949 *           CRTDLL__spawnl     (CRTDLL.269)
    951950 */
    952951int CDECL CRTDLL__spawnl(int nMode, char* szPath, char* szArgv0, va_list arg)
    … …  
    958957
    959958/*********************************************************************
    960  *           CRTDLL__spawnle     (CRTDLL.270)
     959 *           CRTDLL__spawnle     (CRTDLL.270)
    961960 */
    962961int CDECL CRTDLL__spawnle( int mode, char *path, char **szArgv0, va_list arg )
    … …  
    968967
    969968/*********************************************************************
    970  *           CRTDLL__spawnlp     (CRTDLL.271)
     969 *           CRTDLL__spawnlp     (CRTDLL.271)
    971970 */
    972971int CDECL CRTDLL__spawnlp(int nMode, char* szPath, char* szArgv0, va_list arg)
    … …  
    978977
    979978/*********************************************************************
    980  *           CRTDLL__spawnlpe   (CRTDLL.272)
     979 *           CRTDLL__spawnlpe   (CRTDLL.272)
    981980 */
    982981int CDECL CRTDLL__spawnlpe( int mode, char *path, char *szArgv0, va_list arg )
    … …  
    988987
    989988/*********************************************************************
    990  *           CRTDLL__spawnv     (CRTDLL.273)
     989 *           CRTDLL__spawnv     (CRTDLL.273)
    991990 */
    992991int CDECL CRTDLL__spawnv( int i, char *s1, char ** s2 )
    … …  
    998997
    999998/*********************************************************************
    1000  *           CRTDLL__spawnvp     (CRTDLL.275)
     999 *           CRTDLL__spawnvp     (CRTDLL.275)
    10011000 */
    10021001int CDECL CRTDLL__spawnvp( int i, char *s1, char ** s2 )
    … …  
    10071006
    10081007/*********************************************************************
    1009  *           CRTDLL__spawnv     (CRTDLL.276)
     1008 *           CRTDLL__spawnv     (CRTDLL.276)
    10101009 */
    10111010int CDECL CRTDLL__spawnvpe( int i, char *s1, char ** s2, char ** s3 )
    … …  
    10171016
    10181017/*********************************************************************
    1019  *           CRTDLL__statusfp    (CRTDLL.279)
     1018 *           CRTDLL__statusfp    (CRTDLL.279)
    10201019 */
    10211020unsigned int CDECL CRTDLL__statusfp( void )
    … …  
    10241023  return (_status87());
    10251024}
    1026 
    1027 
    1028 /*********************************************************************
    1029  *           _ultoa      (CRTDLL.309)
     1025       
     1026
     1027/*********************************************************************
     1028 *           _ultoa              (CRTDLL.309)
    10301029 */
    10311030LPSTR  CDECL CRTDLL__ultoa(long x,LPSTR buf,INT radix)
    … …  
    10371036
    10381037/*********************************************************************
    1039  *           CRTDLL__ungetch    (CRTDLL.311)
     1038 *           CRTDLL__ungetch    (CRTDLL.311)
    10401039 */
    10411040int CDECL CRTDLL__ungetch( int i )
    … …  
    10471046
    10481047/*********************************************************************
    1049  *           _utime      (CRTDLL.314)
     1048 *           _utime              (CRTDLL.314)
    10501049 */
    10511050int CDECL CRTDLL__utime( char *path, struct utimbuf * times )
    … …  
    10571056
    10581057/*********************************************************************
    1059  *  _vsnprintf              (CRTDLL.315)
     1058 *      _vsnprintf                              (CRTDLL.315)
    10601059 */
    10611060int CDECL CRTDLL__vsnprintf( char *s, size_t bufsize, const char *format, va_list arg )
    … …  
    11011100
    11021101/*********************************************************************
    1103  *                  abs     (CRTDLL.336)
     1102 *                  abs         (CRTDLL.336)
    11041103 */
    11051104double CDECL CRTDLL_abs(double d)
    … …  
    11131112
    11141113/*********************************************************************
    1115  *                  acos    (CRTDLL.337)
     1114 *                  acos        (CRTDLL.337)
    11161115 */
    11171116double CDECL CRTDLL_acos( double x )
    … …  
    11231122
    11241123/*********************************************************************
    1125  *                  asctime (CRTDLL.338)
     1124 *                  asctime     (CRTDLL.338)
    11261125 */
    11271126char * CDECL CRTDLL_asctime( const struct tm *timeptr )
    … …  
    11331132
    11341133/*********************************************************************
    1135  *                  asin    (CRTDLL.339)
     1134 *                  asin        (CRTDLL.339)
    11361135 */
    11371136double CDECL CRTDLL_asin( double x )
    … …  
    11431142
    11441143/*********************************************************************
    1145  *                  atan    (CRTDLL.340)
     1144 *                  atan        (CRTDLL.340)
    11461145 */
    11471146double CDECL CRTDLL_atan(double d)
    … …  
    11551154
    11561155/*********************************************************************
    1157  *                  atan2   (CRTDLL.341)
     1156 *                  atan2       (CRTDLL.341)
    11581157 */
    11591158double CDECL CRTDLL_atan2( double y, double x )
    … …  
    11651164
    11661165/*********************************************************************
    1167  *                  atof    (CRTDLL.343)
     1166 *                  atof        (CRTDLL.343)
    11681167 */
    11691168double CDECL CRTDLL_atof( const char *nptr )
    … …  
    11751174
    11761175/*********************************************************************
    1177  *                  atoi    (CRTDLL.344)
     1176 *                  atoi        (CRTDLL.344)
    11781177 */
    11791178int CDECL CRTDLL_atoi(LPSTR str)
    … …  
    11871186
    11881187/*********************************************************************
    1189  *                  atol    (CRTDLL.345)
     1188 *                  atol        (CRTDLL.345)
    11901189 */
    11911190long CDECL CRTDLL_atol(LPSTR str)
    … …  
    11991198
    12001199/*********************************************************************
    1201  *                  bsearch (CRTDLL.346)
     1200 *                  bsearch     (CRTDLL.346)
    12021201 */
    12031202void *CDECL CRTDLL_bsearch (const void *key, const void *base, size_t num, size_t width,
    … …  
    12061205  int left, right, median, sign;
    12071206  const void *element;
    1208 
     1207 
    12091208  if (width == 0)
    12101209    return 0;
    … …  
    12271226
    12281227/*********************************************************************
    1229  *                  ceil    (CRTDLL.348)
     1228 *                  ceil        (CRTDLL.348)
    12301229 */
    12311230double CDECL CRTDLL_ceil(double d)
    … …  
    12381237
    12391238/*********************************************************************
    1240  *                  clock   (CRTDLL.350)
     1239 *                  clock       (CRTDLL.350)
    12411240 */
    12421241clock_t CDECL CRTDLL_clock( void )
    … …  
    12481247
    12491248/*********************************************************************
    1250  *                  cos     (CRTDLL.351)
     1249 *                  cos         (CRTDLL.351)
    12511250 */
    12521251double CDECL CRTDLL_cos(double d)
    … …  
    12601259
    12611260/*********************************************************************
    1262  *                  cosh    (CRTDLL.352)
     1261 *                  cosh        (CRTDLL.352)
    12631262 */
    12641263double CDECL CRTDLL_cosh( double x )
    … …  
    12701269
    12711270/*********************************************************************
    1272  *                  ctime   (CRTDLL.353)
     1271 *                  ctime       (CRTDLL.353)
    12731272 */
    12741273char * CDECL CRTDLL_ctime( const time_t *timer )
    … …  
    12801279
    12811280/*********************************************************************
    1282  *                  difftime    (CRTDLL.354)
     1281 *                  difftime    (CRTDLL.354)
    12831282 */
    12841283double CDECL CRTDLL_difftime( time_t t1, time_t t0 )
    … …  
    12901289
    12911290/*********************************************************************
    1292  *                  div     (CRTDLL.355)
     1291 *                  div         (CRTDLL.355)
    12931292 */
    12941293ULONG CDECL CRTDLL_div( int number, int denom )
    … …  
    13041303
    13051304/*********************************************************************
    1306  *                  exp     (CRTDLL.357)
     1305 *                  exp         (CRTDLL.357)
    13071306 */
    13081307double CDECL CRTDLL_exp( double x )
    … …  
    13141313
    13151314/*********************************************************************
    1316  *                  fabs    (CRTDLL.358)
     1315 *                  fabs        (CRTDLL.358)
    13171316 */
    13181317double CDECL CRTDLL_fabs(double d)
    … …  
    13261325
    13271326/*********************************************************************
    1328  *                  floor       (CRTDLL.367)
     1327 *                  floor               (CRTDLL.367)
    13291328 */
    13301329double CDECL CRTDLL_floor(double d)
    … …  
    13381337
    13391338/*********************************************************************
    1340  *                  fmod    (CRTDLL.368)
     1339 *                  fmod        (CRTDLL.368)
    13411340 */
    13421341double CDECL CRTDLL_fmod(double x, double y )
    … …  
    13481347
    13491348/*********************************************************************
    1350  *                  frexp     (CRTDLL.377)
     1349 *                  frexp         (CRTDLL.377)
    13511350 */
    13521351double CDECL CRTDLL_frexp( double value, int *exp )
    … …  
    14901489
    14911490/*********************************************************************
    1492  *                  labs    (CRTDLL.416)
     1491 *                  labs        (CRTDLL.416)
    14931492 */
    14941493long int CDECL CRTDLL_labs( long int j )
    … …  
    15001499
    15011500/*********************************************************************
    1502  *                  ldexp   (CRTDLL.417)
    1503  */
    1504 double CDECL CRTDLL_ldexp( double x, int exp )
     1501 *                  ldexp       (CRTDLL.417)
     1502 */
     1503double CDECL CRTDLL_ldexp( double x, int exp ) 
    15051504{
    15061505  dprintf2(("CRTDLL: ldexp\n"));
    … …  
    15101509
    15111510/*********************************************************************
    1512  *                  ldiv    (CRTDLL.418)
    1513  */
    1514 ldiv_t CDECL CRTDLL_ldiv( long int numer, long int denom )
     1511 *                  ldiv        (CRTDLL.418)
     1512 */
     1513ldiv_t CDECL CRTDLL_ldiv( long int numer, long int denom ) 
    15151514{
    15161515  dprintf2(("CRTDLL: ldiv\n"));
    … …  
    15201519
    15211520/*********************************************************************
    1522  *                  localeconv  (CRTDLL.419)
     1521 *                  localeconv  (CRTDLL.419)
    15231522 */
    15241523struct lconv * CDECL CRTDLL_localeconv(void)
    … …  
    15301529
    15311530/*********************************************************************
    1532  *                  localtime   (CRTDLL.420)
     1531 *                  localtime   (CRTDLL.420)
    15331532 */
    15341533struct tm * CDECL CRTDLL_localtime( const time_t *timer )
    … …  
    15401539
    15411540/*********************************************************************
    1542  *                  log     (CRTDLL.421)
     1541 *                  log         (CRTDLL.421)
    15431542 */
    15441543double CDECL CRTDLL_log( double x )
    … …  
    15501549
    15511550/*********************************************************************
    1552  *                  log10   (CRTDLL.422)
     1551 *                  log10       (CRTDLL.422)
    15531552 */
    15541553double CDECL CRTDLL_log10( double x )
    … …  
    15821581 *                  pow      (CRTDLL.436)
    15831582 */
    1584 double CDECL CRTDLL_pow( double x, double y )
     1583double CDECL CRTDLL_pow( double x, double y )   
    15851584{
    15861585    dprintf2(("CRTDLL: pow(%08xh, %08xh)\n",x, y));
    … …  
    16221621
    16231622/*********************************************************************
    1624  *  scanf                   (CRTDLL.448)
     1623 *      scanf                                   (CRTDLL.448)
    16251624 */
    16261625int CDECL CRTDLL_scanf( const char *format, va_list arg )
    … …  
    17061705
    17071706/*********************************************************************
    1708  *  sscanf                  (CRTDLL.458)
     1707 *      sscanf                                  (CRTDLL.458)
    17091708 */
    17101709int CDECL CRTDLL_sscanf( const char *s, const char *format, va_list arg )
    … …  
    17831782
    17841783/*********************************************************************
    1785  *  ungetc                  (CRTDLL.492)
     1784 *      ungetc                                  (CRTDLL.492)
    17861785 */
    17871786INT CDECL CRTDLL_ungetc(int c, FILE *f)
    … …  
    18131812
    18141813/*********************************************************************
    1815  *           CRTDLL__setjmp3     (CRTDLL.600)
     1814 *           CRTDLL__setjmp3     (CRTDLL.600)
    18161815 */
    18171816int CDECL CRTDLL__setjmp3( jmp_buf env )
Note: See TracChangeset for help on using the changeset viewer.