src/F_Batch_UI.C

   1
   2  /*
   3   *   Copyright (C) 2007, Harbour, All rights reserved.
   4   */
   5
   6 #include <F_Batch_UI.H>
   7
   8 using namespace F;
   9 using namespace ost;
  10
  11 static bool stream_is_present(FILE *stream)
  12 {
  13  if ((::fileno(stream) < 0) || ::ferror(stream))
  14    return false;
  15  return true;
  16 }
  17
  18 bool F_Batch_UI::probe()
  19 {
  20  if (!stream_is_present(stdin) || !stream_is_present(stdout) ||
  21        !stream_is_present(stderr))
  22          return false;
  23  return true;
  24 }