Symlink master sock if it is moved elsewhere for path-length reasons.

  mkpath("$opt_vardir/tmp");

  mkpath($opt_tmpdir) if $opt_tmpdir ne "$opt_vardir/tmp";

  if ($master->[0]->{'path_sock'} !~ m/^$opt_tmpdir/)

  {

    mtr_report("Symlinking $master->[0]->{'path_sock'}");

	symlink($master->[0]->{'path_sock'}, "$opt_tmpdir/master.sock");

  }

  # Create new data dirs

  foreach my $data_dir (@data_dir_lst)

  {