mirror of
https://github.com/Yetangitu/ampache
synced 2025-10-06 03:49:56 +02:00
4aa256cb07
Remove misleading, unvetted, or in some cases just plain wrong data. Packages and categories weren't being used correctly. They still aren't.
244 lines
7 KiB
PHP
244 lines
7 KiB
PHP
<?php
|
|
/* vim:set tabstop=8 softtabstop=8 shiftwidth=8 noexpandtab: */
|
|
/**
|
|
* Fix Filenames
|
|
*
|
|
*
|
|
* LICENSE: GNU General Public License, version 2 (GPLv2)
|
|
* Copyright (c) 2001 - 2011 Ampache.org All Rights Reserved
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License v2
|
|
* as published by the Free Software Foundation.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*
|
|
* @package Ampache
|
|
* @copyright 2001 - 2011 Ampache.org
|
|
* @license http://opensource.org/licenses/gpl-2.0 GPLv2
|
|
* @link http://www.ampache.org/
|
|
*/
|
|
|
|
define('NO_SESSION','1');
|
|
$path = dirname(__FILE__);
|
|
$prefix = realpath($path . '/../');
|
|
require_once $prefix . '/lib/init.php';
|
|
|
|
ob_end_clean();
|
|
|
|
/*
|
|
* Pull the root path of your catalogs one by one
|
|
* and then do a directory sweep and check all of the files
|
|
* that would be cataloged and see if they have the correct charset
|
|
* if they don't prompt for a rename, unless $i_am_crazy is true then just
|
|
* do it
|
|
*/
|
|
|
|
// If set to true / 1 then it will not prompt!
|
|
//$GLOBALS['i_am_crazy'] = true;
|
|
|
|
if (!function_exists('iconv')) {
|
|
echo _("ERROR: Iconv required for this functionality, quiting");
|
|
echo "\n";
|
|
exit;
|
|
}
|
|
|
|
// Attempt to figure out what the System Charset is
|
|
$source_encoding = iconv_get_encoding('output_encoding');
|
|
|
|
// Attempt a simple translation
|
|
$string = sprintf(_('%s For the Love of Music'), iconv(Config::get('site_charset'),Config::get('site_charset')));
|
|
echo _('Testing Basic Translation, the two strings below should look the same');
|
|
echo "\n";
|
|
echo _('Original: For the Love of Music');
|
|
echo "\n";
|
|
printf (_('Translated: %s'), $string);
|
|
echo "\n";
|
|
echo "---------------------------------------------------------------------\n";
|
|
printf (_('Input Charset (%s):'), $source_encoding);
|
|
$input = trim(fgets(STDIN));
|
|
|
|
if (strlen($input) > 0) { $source_encoding = trim($input); }
|
|
printf (_('Using %s as source character set'), $source_encoding);
|
|
echo "\n";
|
|
|
|
$sql = "SELECT * FROM `catalog` WHERE `catalog_type`='local'";
|
|
$db_results = Dba::read($sql);
|
|
|
|
while ($row = Dba::fetch_assoc($db_results)) {
|
|
|
|
printf(_('Checking %s (%s)'), $row['name'], $row['path']);
|
|
echo "\n";
|
|
charset_directory_correct($row['path']);
|
|
|
|
} // end of the catalogs
|
|
|
|
echo _('Finished checking filenames for valid chacters');
|
|
echo "\n";
|
|
|
|
/**************************************************
|
|
****************** FUNCTIONS *********************
|
|
**************************************************/
|
|
/**
|
|
* charset_directory_correct
|
|
* This function calls its self recursivly
|
|
* and corrects all of the non-matching filenames
|
|
* it looks at the i_am_crazy var and if not set prompts for change
|
|
*/
|
|
function charset_directory_correct($path) {
|
|
|
|
// Correctly detect the slash we need to use here
|
|
if (strstr($path,"/")) {
|
|
$slash_type = '/';
|
|
}
|
|
else {
|
|
$slash_type = '\\';
|
|
}
|
|
|
|
/* Open up the directory */
|
|
$handle = opendir($path);
|
|
|
|
if (!is_resource($handle)) {
|
|
printf (_('ERROR: Unable to open %s'), $path);
|
|
echo "\n";
|
|
return false;
|
|
}
|
|
|
|
if (!chdir($path)) {
|
|
printf (_('ERROR: Unable to chdir to %s'), $path);
|
|
echo "\n";
|
|
return false;
|
|
}
|
|
|
|
while ( false !== ($file = readdir($handle) ) ) {
|
|
|
|
if ($file == '.' || $file == '..') { continue; }
|
|
|
|
$full_file = $path.$slash_type.$file;
|
|
|
|
if (is_dir($full_file)) {
|
|
charset_directory_correct($full_file);
|
|
continue;
|
|
}
|
|
|
|
$verify_filename = iconv(Config::get('site_charset'),Config::get('site_charset') . '//IGNORE',$full_file);
|
|
|
|
if (strcmp($full_file,$verify_filename) != '0') {
|
|
$translated_filename = iconv($source_encoding,Config::get('site_charset') . '//TRANSLIT',$full_file);
|
|
|
|
// Make sure the extension stayed the same
|
|
if (substr($translated_filename,strlen($translated_filename)-3,3) != substr($full_file,strlen($full_file)-3,3)) {
|
|
echo _("Translation failure, stripping non-valid characters");
|
|
echo "\n";
|
|
$translated_filename = iconv($source_encoding,Config::get('site_charset') . '//IGNORE',$full_file);
|
|
}
|
|
|
|
printf (_('Attempting to Transcode to %s'), Config::get('site_charset'));
|
|
echo "\n";
|
|
echo "--------------------------------------------------------------------------------------------\n";
|
|
printf (_('OLD: %s has invalid chars'), $full_file);
|
|
echo "\n";
|
|
printf (_('NEW: %s'), $translated_filename);
|
|
echo "\n";
|
|
echo "--------------------------------------------------------------------------------------------\n";
|
|
if (!$GLOBALS['i_am_crazy']) {
|
|
echo _("Rename File (Y/N):");
|
|
$input = trim(fgets(STDIN));
|
|
if (strcasecmp($input,'Y') == 0) { charset_rename_file($full_file,$translated_filename); }
|
|
else { echo "\n\t"; echo _('Not Renaming...'); echo "\n\n"; }
|
|
}
|
|
else {
|
|
charset_rename_file($full_file,$translated_filename);
|
|
}
|
|
}
|
|
|
|
} // while reading file
|
|
|
|
} // charset_directory_correct
|
|
|
|
/**
|
|
* charset_rename_file
|
|
* This just takes a source / dest and does the renaming
|
|
*/
|
|
function charset_rename_file($full_file,$translated_filename) {
|
|
|
|
// First break out the base directory name and make sure it exists
|
|
// incase our crap char is in the directory
|
|
$directory = dirname($translated_filename);
|
|
$data = preg_split("/[\/\\\]/",$directory);
|
|
$path = '';
|
|
|
|
foreach ($data as $dir) {
|
|
|
|
$dir = charset_clean_name($dir);
|
|
$path .= "/" . $dir;
|
|
|
|
if (!is_dir($path)) {
|
|
echo "\tMaking $path directory\n";
|
|
$results = mkdir($path);
|
|
if (!$results) {
|
|
printf (_('Error: Unable to create %s move failed, stopping'), $path);
|
|
echo "\n";
|
|
return false;
|
|
}
|
|
} // if the dir doesn't exist
|
|
|
|
} // end foreach
|
|
|
|
// Now to copy the file
|
|
$results = copy($full_file,$translated_filename);
|
|
|
|
if (!$results) {
|
|
echo _('Error: Copy Failed, not deleteing old file');
|
|
echo "\n";
|
|
return false;
|
|
}
|
|
|
|
$old_sum = filesize($full_file);
|
|
$new_sum = filesize($translated_filename);
|
|
|
|
if ($old_sum != $new_sum OR !$new_sum) {
|
|
printf (_('Error: Size Inconsistency, not deleting %s'), $full_file);
|
|
echo "\n";
|
|
return false;
|
|
}
|
|
|
|
$results = unlink($full_file);
|
|
|
|
if (!$results) { printf (_('Error: Unable to delete %s'), $full_file); echo "\n"; return false; }
|
|
|
|
echo _("File Moved...");
|
|
echo "\n\n";
|
|
|
|
return true;
|
|
|
|
} // charset_rename_file
|
|
|
|
/**
|
|
* charset_clean_name
|
|
* We have to have some special rules here
|
|
* This is run on every individual element of the search
|
|
* Before it is put togeather, this removes / and \ and also
|
|
* once I figure it out, it'll clean other stuff
|
|
*/
|
|
function charset_clean_name($string) {
|
|
|
|
/* First remove any / or \ chars */
|
|
$string = preg_replace('/[\/\\\]/','-',$string);
|
|
|
|
$string = str_replace(':',' ',$string);
|
|
|
|
$string = preg_replace('/[\!\:\*]/','_',$string);
|
|
|
|
return $string;
|
|
|
|
} // charset_clean_name
|
|
|
|
?>
|