Re: Pipe UNIX-commands

[Larry Hazel <Larry.H.Hazel@cpmx.saic.com>]

Markus Wahl wrote:
> 
> I'd like to know how I can make unix-commands from inside my ada-program.
> 
> Eg: The program shall pipe out the command 'ls' and then make something
> within the program with the output of 'ls'. Am I clear?

I don't remember the details of the unix system call, I think it may be
'system' (try 'man system' to check it out).  I no longer have access to
unix.  Anyway, you can import this C function and run any command from
your Ada program that you can run from the shell prompt and can include
I/O redirection.  Something like:

with Interfaces.C;

   procedure Execute_Unix_Command (Command_Line :
Interfaces.C.Char_Array);
   pragma Import (C, Execute_Unix_Command, "system");

   ...

   Execute_Unix_Command (Interfaces.C.To_C ("ls > result_file"));

Now you can open result_file with Text_IO and read it.  There are
probably other ways.

Hope this helps

-- Larry Hazel => Larry.H.Hazel@cpmx.saic.com (205) 876-4509
-- I try to stay above C level,  I get C sick.
-- Team Ada & Team OS/2