/***************************************
* hv_init.c                            *
*                                      *
***************************************/

#include <signal.h>
#include <strings.h>
#include <stdio.h>
#include <errno.h>
#include <modes.h>
#include "../lib/mylib1.h"
#include "a200.h"

main(argc,argv)
int argc;
char **argv; 
{
     int i, iev, tcycle;
     char *cline;
     char *pipe ="/pipe/to_hv_ftp";
     int pid;

     if((pid = create(pipe, 0x03, 0x03)) == -1)
       exit(_errmsg(errno," hv_ftp: error creating %s\n",pipe)); 

     for (i=0; i < 10; i++){
        cline = "dagostini\n";
        write(pid, cline, strlen(cline));
        cline = "zeus147\n";
        write(pid, cline, strlen(cline));
        cline = "chd [.os9]\n";
        write(pid, cline, strlen(cline));
        cline = "append messaggio\n";
        write(pid, cline, strlen(cline));
        cline = "quit\n";
        write(pid, cline, strlen(cline));

        system("ftp zeus02 </pipe/to_hv_ftp ");
        sleep(1);
     }
     close(pid);
}