/* Do not remove the headers from this file! see /USAGE for more info. */

// Rust

//:COMMAND
//USAGE:  mv  source destination
//
//This command will allow you to move files from source to
//destination.  The source file must exist, the destination may or
//may not exist at the time of the move.  If the destination does
//not exist one will be created, if the destination does exist, at
//the time of the move it will be overwritten.  The source file will
//be removed.
//
//It thus provides a "rename" facility for files.
//
//If you do not supply a full path name mv will assume that the
//files will be in your current directory.
//
//mv wizroom.c workroom.c
//
//I will now have workroom.c in the current directory and wizroom.c
//  will no longer exist.
//
//cp /domains/std/wizroom.c /wiz/zifnab/workroom.c
//
//I now have workroom.c in my home directory and wizroom.c no longer
//exists.

inherit CMD;

private void move_one(string src, string dst, int force)
{
  string contents;

  if ( is_file(dst) && !force )
    outf("%s already exists.  Move failed.\n", dst);
  else if ( !(contents = read_file(src)) )
    outf("Could not read %s.  Move failed.\n", src);
  else if ( src == dst )
    outf("%s and %s same filename.  Move failed.\n",dst,src);
  else if ( !write_file(dst, contents, 1) )
    outf("%s could not be written to.  Move failed.\n", dst);
  else if ( !rm(src) )
    outf("%s couldn't be removed.\n", src);
  else
    outf("%s moved to %s.\n", src, dst);
}

private void main(mixed argv, mapping flags)
{
  string dst, src;

  if(arrayp(argv[0]) && sizeof(argv[0]) > 1 && !is_directory(argv[1]))
  {
    outf("mv: files dir, not mv files file\n");
    return;
  }
  if(sizeof(argv[0]) > 1)
  {
    if(argv[1][<1] != '/')
      argv[1] += "/";

    foreach ( src in argv[0] )
    {
      dst = argv[1] + split_path(src)[1];
      move_one(src, dst, flags["f"]);
    }
  } else {
    dst = argv[1];
    src = argv[0][0];
    if(is_directory(dst))
    {
      if(dst[<1] != '/')
        dst += "/";
      dst += depath(src);
    }
    move_one(src, dst, flags["f"]);
  }
}