The Ecere SDK - sdk/blob - ecere/src/sys/DualPipe.ec

   1 #include <stdarg.h>
   2
   3 namespace sys;
   4
   5 import "System"
   6
   7 default:
   8 // IMPLEMENTATION OF THESE IS IN _DualPipe.c
   9 void DualPipe_Destructor(_DualPipe * dp);
  10 void DualPipe_CloseInput(_DualPipe * dp);
  11 void DualPipe_CloseOutput(_DualPipe * dp);
  12 int DualPipe_Read(_DualPipe * dp, byte * buffer, uint size, uint count);
  13 int DualPipe_Write(_DualPipe * dp, const byte * buffer, uint size, uint count);
  14 bool DualPipe_Getc(_DualPipe * dp, char * ch);
  15 bool DualPipe_Putc(_DualPipe * dp, char ch);
  16 bool DualPipe_Puts(_DualPipe * dp, const char * string);
  17 bool DualPipe_Seek(_DualPipe * dp, int pos, FileSeekMode mode);
  18 uint DualPipe_Tell(_DualPipe * dp);
  19 bool DualPipe_Eof(_DualPipe * dp);
  20 bool DualPipe_GetSize(_DualPipe * dp);
  21 bool DualPipe_Peek(_DualPipe * dp);
  22 void DualPipe_Terminate(_DualPipe * dp);
  23 int DualPipe_GetExitCode(_DualPipe * dp);
  24 int DualPipe_GetProcessID(_DualPipe * dp);
  25 void DualPipe_Wait(_DualPipe * dp);
  26 _DualPipe * _DualPipeOpen(PipeOpenMode mode, const char * commandLine, const char * env, void ** inputPtr, void ** outputPtr);
  27
  28 private:
  29
  30 public class PipeOpenMode { public bool output:1, error:1, input:1, showWindow:1; };
  31
  32 public class DualPipe : File
  33 {
  34    void * dp;
  35
  36    ~DualPipe() { DualPipe_Destructor(dp); }
  37    void CloseInput() { (input != null) ? File::CloseInput() : DualPipe_CloseInput(dp); }
  38    void CloseOutput() { (output != null) ? File::CloseOutput() : DualPipe_CloseOutput(dp); }
  39    int Read(byte * buffer, uint size, uint count) { return DualPipe_Read(dp, buffer, size, count); }
  40    int Write(const byte * buffer, uint size, uint count) { return output ? File::Write(buffer, size, count) : DualPipe_Write(dp, buffer, size, count); }
  41    bool Getc(char * ch) { return input ? File::Getc(ch) : DualPipe_Getc(dp, ch); }
  42    bool Putc(char ch) { return output ? File::Putc(ch) : DualPipe_Putc(dp, ch); }
  43    bool Puts(const char * string) { return output ? (File::Puts(string), File::Flush()) : DualPipe_Puts(dp, string); }
  44    bool Seek(int pos, FileSeekMode mode) { return (input || output) ? File::Seek(pos, mode) : DualPipe_Seek(dp, pos, mode); }
  45    uint Tell() { return (input || output) ? File::Tell() : DualPipe_Tell(dp); }
  46    bool Eof() { return DualPipe_Eof(dp); }
  47    uint GetSize() { return (input || output) ? File::GetSize() : DualPipe_GetSize(dp); }
  48
  49 public:
  50    bool Peek() { return DualPipe_Peek(dp); }
  51    void Terminate() { DualPipe_Terminate(dp); }
  52    int GetExitCode() { return DualPipe_GetExitCode(dp); }
  53    int GetProcessID() { return DualPipe_GetProcessID(dp); }
  54    void Wait() { DualPipe_Wait(dp); }
  55
  56    // Return true on getting EOF or new line
  57    bool GetLinePeek(char * s, int max, int * charsRead)
  58    {
  59       char ch = 0;
  60       int c = 0;
  61       while(c < max-1 && Peek() && Getc(&ch) && ch != '\n')
  62          if(ch != '\r')
  63             s[c++] = ch;
  64       s[c] = '\0';
  65       *charsRead = c;
  66       return Eof() || ch == '\n';
  67    }
  68 };
  69
  70 public DualPipe DualPipeOpenf(PipeOpenMode mode, const char * command, ...)
  71 {
  72    char commandLine[MAX_F_STRING];
  73    va_list args;
  74    va_start(args, command);
  75    vsnprintf(commandLine, sizeof(commandLine), command, args);
  76    commandLine[sizeof(commandLine)-1] = 0;
  77    va_end(args);
  78    return DualPipeOpen(mode, commandLine);
  79 }
  80
  81 public DualPipe DualPipeOpen(PipeOpenMode mode, const char * commandLine)
  82 {
  83    void * input, * output;
  84    void * f = _DualPipeOpen(mode, commandLine, null, &input, &output);
  85    if(f)
  86       return DualPipe { dp = f, input = input, output = output };
  87    return null;
  88 }
  89
  90 public DualPipe DualPipeOpenEnvf(PipeOpenMode mode, const char * env, const char * command, ...)
  91 {
  92    char commandLine[MAX_F_STRING];
  93    va_list args;
  94    va_start(args, command);
  95    vsnprintf(commandLine, sizeof(commandLine), command, args);
  96    commandLine[sizeof(commandLine)-1] = 0;
  97    va_end(args);
  98    return DualPipeOpenEnv(mode, env, commandLine);
  99 }
 100
 101 public DualPipe DualPipeOpenEnv(PipeOpenMode mode, const char * env, const char * commandLine)
 102 {
 103    void * input, * output;
 104    void * f = _DualPipeOpen(mode, commandLine, env, &input, &output);
 105    if(f)
 106       return DualPipe { dp = f, input = input, output = output };
 107    return null;
 108 }