<?php
if (!chdir(dirname(__FILE__))) {
exit;
}
if (count($argv) > 4) {
$_SERVER['REMOTE_USER'] = $argv[4];
}
require_once "./util_rt.php";
require_once "./autotools.php";
$base_path = $argv[1];
$base_name = $argv[2];
$is_multy = $argv[3];
$base_path = rtRemoveTailSlash($base_path);
$base_path = rtRemoveLastToken($base_path, '/');
// filename or dirname
$base_path = rtAddTailSlash($base_path);
$dest_path = $base_path;
$at = rAutoTools::load();
if ($at->enable_move) {
$path_to_finished = trim($at->path_to_finished);
if ($path_to_finished != '') {
$path_to_finished = rtAddTailSlash($path_to_finished);
$directory = rTorrentSettings::get()->directory;
if (!empty($directory)) {
$directory = rtAddTailSlash($directory);
$rel_path = rtGetRelativePath($directory, $base_path);
//------------------------------------------------------------------------------
// !! this is a feature !!
// ($rel_path == '') means, that $base_path is NOT a SUBDIR of $directory at all
// so, we have to skip all automove actions
function rtSetDataDir($hash, $dest_path, $add_path, $move_files, $fast_resume, $dbg = false)
{
if ($dbg) {
rtDbg(__FUNCTION__, "hash : " . $hash);
}
if ($dbg) {
rtDbg(__FUNCTION__, "dest_path : " . $dest_path);
}
if ($dbg) {
rtDbg(__FUNCTION__, "add path : " . ($add_path ? "1" : "0"));
}
if ($dbg) {
rtDbg(__FUNCTION__, "move files : " . ($move_files ? "1" : "0"));
}
if ($dbg) {
rtDbg(__FUNCTION__, "fast resume : " . ($fast_resume ? "1" : "0"));
}
$is_open = false;
$is_active = false;
$is_multy_file = false;
$base_name = '';
$base_path = '';
$base_file = '';
$is_ok = true;
if ($dest_path == '') {
$is_ok = false;
} else {
$dest_path = rtAddTailSlash($dest_path);
}
// Check if torrent is open or active
if ($is_ok) {
$req = rtExec(array("d.is_open", "d.is_active"), $hash, $dbg);
if (!$req) {
$is_ok = false;
} else {
$is_open = $req->val[0] != 0;
$is_active = $req->val[1] != 0;
if ($dbg) {
rtDbg(__FUNCTION__, "is_open=" . $req->val[0] . ", is_active=" . $req->val[1]);
}
}
}
// Open closed torrent to get d.get_base_path, d.get_base_filename
if ($is_ok && $move_files) {
if (!$is_open && !rtExec("d.open", $hash, $dbg)) {
$is_ok = false;
}
}
// Ask info from rTorrent
if ($is_ok && $move_files) {
$req = rtExec(array("d.get_name", "d.get_base_path", "d.get_base_filename", "d.is_multi_file", "d.get_complete"), $hash, $dbg);
if (!$req) {
$is_ok = false;
} else {
$base_name = trim($req->val[0]);
$base_path = trim($req->val[1]);
$base_file = trim($req->val[2]);
$is_multy_file = $req->val[3] != 0;
if ($req->val[4] == 0) {
// if torrent is not completed -> "fast start" is impossible
$fast_resume = false;
}
if ($dbg) {
rtDbg(__FUNCTION__, "d.get_name : " . $base_name);
}
if ($dbg) {
rtDbg(__FUNCTION__, "d.get_base_path : " . $base_path);
}
if ($dbg) {
rtDbg(__FUNCTION__, "d.get_base_filename : " . $base_file);
}
if ($dbg) {
rtDbg(__FUNCTION__, "d.is_multy_file : " . $req->val[3]);
}
if ($dbg) {
rtDbg(__FUNCTION__, "d.get_complete : " . $req->val[4]);
}
}
}
// Check if paths are valid
if ($is_ok && $move_files) {
if ($base_path == '' || $base_file == '') {
if ($dbg) {
rtDbg(__FUNCTION__, "base paths are empty");
}
$is_ok = false;
} else {
// Make $base_path a really BASE path for downloading data
// (not including single file or subdir for multiple files).
// Add trailing slash, if none.
$base_path = rtRemoveTailSlash($base_path);
$base_path = rtRemoveLastToken($base_path, '/');
// filename or dirname
$base_path = rtAddTailSlash($base_path);
}
}
// Get list of torrent data files
$torrent_files = array();
if ($is_ok && $move_files) {
$req = rtExec("f.multicall", array($hash, "", "f.get_path="), $dbg);
if (!$req) {
$is_ok = false;
} else {
$torrent_files = $req->val;
if ($dbg) {
rtDbg(__FUNCTION__, "files in torrent : " . count($torrent_files));
}
}
}
// 1. Stop torrent if active (if not, then rTorrent can crash)
// 2. Close torrent anyway
if ($is_ok) {
$cmds = array();
if ($is_active) {
$cmds[] = "d.stop";
}
if ($is_open || $move_files) {
$cmds[] = "d.close";
}
if (count($cmds) > 0 && !rtExec($cmds, $hash, $dbg)) {
$is_ok = false;
}
}
// Move torrent data files to new location
if ($is_ok && $move_files) {
$full_base_path = $base_path;
$full_dest_path = $dest_path;
// Don't use "count( $torrent_files ) > 1" check (there can be one file in a subdir)
if ($is_multy_file) {
// torrent is a directory
$full_base_path .= rtAddTailSlash($base_file);
$full_dest_path .= $add_path ? rtAddTailSlash($base_name) : "";
} else {
// torrent is a single file
}
if ($dbg) {
rtDbg(__FUNCTION__, "from " . $full_base_path);
}
if ($dbg) {
rtDbg(__FUNCTION__, "to " . $full_dest_path);
}
if ($full_base_path != $full_dest_path && is_dir($full_base_path)) {
if (!rtOpFiles($torrent_files, $full_base_path, $full_dest_path, "Move", $dbg)) {
$is_ok = false;
} else {
// Recursively remove source dirs without files
if ($dbg) {
rtDbg(__FUNCTION__, "clean " . $full_base_path);
}
if ($is_multy_file) {
rtRemoveDirectory($full_base_path, false);
if ($dbg && is_dir($full_base_path)) {
rtDbg(__FUNCTION__, "some files were not deleted");
}
}
}
}
}
if ($is_ok) {
// fast resume is requested
if ($fast_resume) {
if ($dbg) {
rtDbg(__FUNCTION__, "trying fast resume");
}
// collect variables
$session = rTorrentSettings::get()->session;
$tied_to_file = null;
$label = null;
$addition = null;
$req = rtExec(array("get_session", "d.get_tied_to_file", "d.get_custom1", "d.get_connection_seed", "d.get_throttle_name"), $hash, $dbg);
if (!$req) {
$fast_resume = false;
} else {
$session = $req->val[0];
$tied_to_file = $req->val[1];
$label = rawurldecode($req->val[2]);
$addition = array();
if (!empty($req->val[3])) {
$addition[] = getCmd("d.set_connection_seed=") . $req->val[3];
}
if (!empty($req->val[4])) {
$addition[] = getCmd("d.set_throttle_name=") . $req->val[4];
}
// build path to .torrent file
$fname = rtAddTailSlash($session) . $hash . ".torrent";
if (empty($session) || !is_readable($fname)) {
if (!strlen($tied_to_file) || !is_readable($tied_to_file)) {
if ($dbg) {
rtDbg(__FUNCTION__, "empty session or inaccessible .torrent file");
}
$fname = null;
$fast_resume = false;
} else {
$fname = $tied_to_file;
}
}
}
// create torrent, remove old and add new one
if ($fast_resume) {
$torrent = new Torrent($fname);
if ($torrent->errors()) {
if ($dbg) {
rtDbg(__FUNCTION__, "fail to create Torrent object");
}
$fast_resume = false;
} else {
$is_ok = $add_path ? rtExec("d.set_directory", array($hash, $dest_path), $dbg) : rtExec("d.set_directory_base", array($hash, $dest_path), $dbg);
// for erasedata plugin
if ($is_ok) {
if (!rtExec("d.erase", $hash, $dbg)) {
if ($dbg) {
rtDbg(__FUNCTION__, "fail to erase old torrent");
}
$fast_resume = false;
} else {
if (!rTorrent::sendTorrent($torrent, true, $add_path, $dest_path, $label, true, true, false, $addition)) {
if ($dbg) {
rtDbg(__FUNCTION__, "fail to add new torrent");
}
$fast_resume = false;
$is_ok = false;
}
}
}
}
}
if ($dbg) {
rtDbg(__FUNCTION__, "fast resume " . ($fast_resume ? "done" : "fail"));
}
}
// fast resume is fail or not requested at all
if ($is_ok && !$fast_resume) {
// Setup new directory for torrent (we need to stop it first)
$is_ok = $add_path ? rtExec("d.set_directory", array($hash, $dest_path), $dbg) : rtExec("d.set_directory_base", array($hash, $dest_path), $dbg);
if ($is_ok) {
// Start torrent if need
if ($is_active) {
$is_ok = rtExec(array("d.open", "d.start"), $hash, $dbg);
} elseif ($is_open) {
$is_ok = rtExec("d.open", $hash, $dbg);
} else {
$is_ok = rtExec(array("d.open", "d.close"), $hash, $dbg);
}
}
}
}
if ($dbg) {
rtDbg(__FUNCTION__, "finished");
}
return $is_ok;
}
$torrent_name = $torrent->name();
$subject = str_replace("{TORRENT}", $torrent_name, $subject);
$message = implode('', $lines);
$message = str_replace("{TORRENT}", $torrent_name, $message);
$headers = "From: " . $mail_from . "\r\n";
if ($mail_cc != "") {
$headers .= "CC: " . $mail_cc . "\r\n";
}
if ($mail_bcc != "") {
$headers .= "BCC: " . $mail_bcc . "\r\n";
}
$headers .= "Content-type: text/plain; charset=utf-8" . "\r\n";
if (!mail($mail_to, $subject, $message, $headers)) {
Debug("mail() to \"" . $mail_to . "\" fail!");
}
}
break;
}
$path = rtRemoveLastToken($path, "/");
$mailto_file = "";
}
if ($mailto_file == '') {
Debug("\".mailto\" file : not found!");
}
}
}
}
}
}
}
Debug("--- end ---");
$default_dir = rTorrentSettings::get()->directory;
$torrent_dir = trim($req->val[0]);
$custom3 = trim($req->val[1]);
Debug("get_directory : " . $default_dir);
Debug("d.get_directory : " . $torrent_dir);
Debug("d.get_custom3 : " . $custom3);
Debug("d.is_multy_file : " . $is_multy_file);
if ($default_dir == '' || $torrent_dir == '') {
Debug("base paths are not set");
$is_ok = false;
} elseif ($custom3 == '1') {
Debug("torrent is NOT NEW (modified by another plugin)");
$is_ok = false;
} else {
if ($is_multy_file) {
$torrent_dir = rtRemoveLastToken($torrent_dir, '/');
}
$lbl_dir = rtGetRelativePath($default_dir, $torrent_dir);
if ($lbl_dir == "./") {
$lbl_dir = "";
}
$label = str_replace("{DIR}", $lbl_dir, $label);
}
} else {
Debug("rXMLRPCRequest() fail");
$is_ok = false;
}
}
// Get info about tracker
if ($is_ok && strpos($label, "{TRACKER}") !== false) {
$req = new rXMLRPCRequest(array(new rXMLRPCCommand("t.multicall", array($hash, "", getCmd("t.is_enabled="), getCmd("t.get_type="), getCmd("t.get_group="), getCmd("t.get_url=")))));
