Exemple #1
0
INProc::~INProc()
  {  DWORD err = FIO_ERRORN;

    Counter--;

    FILELog( "%*c}<%s>", Counter*2,' ',Name );

    FIO_SETERRORN( err );
}
Exemple #2
0
INProc::INProc( CONSTSTR nm )
    : Name(nm)
  {  DWORD    err;

    err = FIO_ERRORN;
      FILELog( "%*c%s(void) {", Counter*2,' ',nm );
      Counter++;
    FIO_SETERRORN( err );
}
Exemple #3
0
void INProc::Say( CONSTSTR s,... )
  {  va_list ap;
     char    str[500];
     DWORD   err = FIO_ERRORN;

    va_start( ap,s );
      SNprintf( str,sizeof(str), "%*c%s", Counter*2,' ', MessageV(s,ap) );
    va_end(ap);
    FILELog( str );
    FIO_SETERRORN( err );
}
Exemple #4
0
INProc::INProc( CONSTSTR nm,CONSTSTR s,... )
    : Name(nm)
  {  va_list  ap;
     char     str[500];
     DWORD    err = FIO_ERRORN;

    SNprintf( str,sizeof(str), "%*c%s(", Counter*2,' ',nm );

    if ( s ) {
      va_start( ap,s );
        StrCat( str,MessageV(s,ap),sizeof(str) );
      va_end(ap);
    }
    StrCat( str,") {",sizeof(str) );
    FILELog( str );

    Counter++;
    FIO_SETERRORN( err );
}
Exemple #5
0
BOOL MYRTLEXP SetFileTimes( CONSTSTR fname,time_t cr,time_t wr,time_t ac )
  {
    if ( !fname || (!cr && !wr && !ac) ) {
      FIO_SETERRORN( ERROR_INVALID_PARAMETER );
      return FALSE;
    }

//Creation time
    cr = cr;      //?

//Access & modify time
    struct utimbuf tmp;
    tmp.actime  = ac ? ac : ( cr ? cr : wr );
    tmp.modtime = wr ? wr : ( cr ? cr : ac );

#if defined(__BC31__)
 return utime( (char*)fname,&tmp ) == 0;
#else
 return utime( fname,&tmp ) == 0;
#endif
}