Re: solaris daemon question

["David C. Hoos, Sr." <david.c.hoos.sr@ada95.com>]

darren wilson wrote in message <7nl2l8$cg9$1@Usenet.Logical.NET>...
>I'm trying to write a simple daemon to run on a Sun E3500 running solaris
>2.6.  Can anyone tell me how to issue command line unix statements such as
>mv or cp and such from within an ada program?  I've been programming in
>ada for a while, but have never done this.  Any help is appreciated.
>

Here's an interface to the "system" C library function:

with Ada.Characters.Latin_1;
with System;
function Execute_Shell_Command
           (The_Command : String) return Integer is
   function Execute
              (The_Command_Address : System.Address) return Integer;
   pragma Import (C, Execute, "system");
   The_Nul_Terminated_Command_String : constant String :=
     The_Command & Ada.Characters.Latin_1.Nul;
begin
   return Execute (The_Nul_Terminated_Command_String'Address);
end Execute_Shell_Command;