/*
     *   This is an example of using mrd_move_medium directly to move
     *   a cartridge from one slot to another.  To simplify the
     *   example, it only supports slot to slot moves, but it shows
     *   how the absolute element addresses are calcuated.  For each
     *   additional destination address given, the previous (successful)
     *   destination address is used as the source.
     *
     *   Usage:
     *
     *      mrd_ready robot port [ port... ]
     */
    #ifndef   lint
    static   char   SccsId[] = "@(#)mrd_ready.c   1.2 3/5/97" ;
    #endif

    #include <stdio.h>
    #include <stdlib.h>
    #include <mrd_common.h>
    #include <mrd_message.h>

    main(int argc, char *argv[])
    {
       int      pc ;      /* counter */
       int      port ;      /* Port number */
       int      address ;   /* Port address */
       int      status ;   /* return status */
       char      *robot ;   /* Robot to open */
       robot_info_t   robot_info ;   /* Robot data */
       dev_status_t   dev_status ;   /* Device status */
       char      log_info[MRD_MAX_LOG_STRING+1] ;

       /*
        *   Check that there are enough arguments.
        */
       if( argc < 3 ) {
          printf("usage: %s robot port [ port... ]\n", argv[0]) ;
          exit(1) ;
       }
       else
          robot  = argv[1] ;

       /*
        *   Initialize the channel field of the robot_info, so
        *   mrd_startup(3mrd) will actually open the robot.
        */
       robot_info.channel = BAD_CHANNEL ;

       status = mrd_startup(robot, &robot_info, log_info) ;

       if( status != MRD_STATUS_SUCCESS ) {
          printf("Startup failed on %s: %s.\n", robot,
             mrd_strstatus(status)) ;

          exit(1) ;
       }

       /*
        *   For each destination address on the command line,
        *   move the the cartridge in the source to the
        *   destination.  After each (successful) move, replace
        *   the previous source with this destination.
        */
       for(pc = 2; pc < argc; pc++) {
          /*
           *   Get the port number.
           */
          port = atoi(argv[pc]) ;

          /*
           *   Now the absolute address.
           */
          address = port + robot_info.port_start ;

          /*
           *   Print an audit as we go.  Since we know these
           *   are slots, convert back to relative addresses
           *   for the audit.
           */
          printf("Ready Inport #%d of %s\n", port, robot) ;

          status = mrd_ready(&robot_info, address, &dev_status) ;

          if( status != MRD_STATUS_SUCCESS ) {
             printf("Ready Inport failed on %s: %s.\n", robot,
                mrd_strstatus(status)) ;

             /*
              *   Since the cartridge didn't move, don't
              *   reset the source, by skipping the remainder
              *   of the loop.
              */
             continue ;
          }
       }

       (void)mrd_shutdown(&robot_info) ;

       return 0 ;
    }