function addf_inject()
{
calltar();
$ra = msql_read('server', 'edition_typos', '');
if ($ra) {
$vra = array_keys_r($ra, 0, 'k');
}
$r = msql_read('', 'public_addfonts', '');
if ($r) {
$vr = array_shift($r);
}
$dir = 'fonts/';
$diru = 'users/' . $_SESSION['qb'] . '/fonts/';
if (!is_dir($diru)) {
mkdir($diru);
}
if ($r) {
foreach ($r as $k => $v) {
$font = normalize($v[0]);
if (!$vra[$font]) {
$rb = array($font, '', '', '', '');
for ($i = 1; $i < count($v); $i++) {
$f = $font . '.' . $vr[$i];
$rc[] = $dir . $f;
$ret .= addf_copy($v[$i], $dir . $f) . br();
}
//u
//msql_modif('server','edition_typos',$rb,$dfb,'push','');
//modif_vars('','public_addfonts',$k,'del');
if ($rc) {
PclTarCreate($diru . $font . '.tar.gz', $rc, '', '', '');
}
$ret .= btn('txtblc', lka($diru . $font . '.tar.gz')) . ' ' . btn('txtx', 'saved') . br();
} else {
$ret .= $font . ' already_exists' . br();
}
}
}
//if($rb)msql_modif('server','edition_typos',$rb,$dfb,'add','');
$ret .= lkc('txtbox', '/?admin=fonts&inject==', 'inject datas (admin/fonts)') . br();
return $ret;
}
function tardir($v)
{
//imgb/icons//avatar//bkg
list($dr, $dn) = split_right('/', $v, 1);
$lk = '_public/' . $v . '.tar.gz';
$r = walk_dir('' . $v, 'funcd');
if ($r) {
$sum = array_sum($r);
}
if ($sum) {
PclTarCreate($lk, '' . $v);
echo lkc('txtyl', $lk, $lk . 'modified') . br();
} else {
echo 'lk=' . $lk . br();
}
}
function give_tar()
{
$f = 'userdl.tar.gz';
calltar();
require 'tar.php';
$r = explode(';', $_GET['getzip']);
foreach ($r as $k => $v) {
$v = '../' . $v;
if (is_file($v)) {
$ret[] = $v;
} elseif (is_dir($v)) {
$ret = read_dir($v);
}
}
//print_r($ret);
PclTarCreate($f, $ret, '', '', '');
//echo $f; //$f=targz('userdl.tar',$r);
return scrut_txt_b($f);
}
function mktar_one($f)
{
$dr = '../';
$gz = $dr . '_public/' . $f . '.tar.gz';
$rf = $dr . $f;
echo lkc('txtred', $gz, $dr . $f) . br();
echo PclTarCreate($gz, $rf);
copy($gz, $rf . '/' . $f . '.tar.gz');
}
}
}
$dt = date('d-m-Y-') . 'at' . date('-h-i');
$dumpName = $backupFileDir . '/dbbackup-' . $dt . '.sql';
$tarName = $backupFileDir . '/' . $dt . '-db.tar.gz';
fputs(fopen($dumpName, 'w'), $dump);
if (PclTarCreate($tarName, $dumpName, 'tgz', '', $backupFileDir)) {
array_push($ftpsendTasks, $tarName);
unlink($dumpName);
}
}
}
if ($backupFtpsend == 1) {
$dt = date('d-m-Y-') . 'at' . date('-h-i');
$tarName = $backupFileDir . '/backup-' . $dt . '.tar.gz';
if (PclTarCreate($tarName, $ftpsendTasks, 'tgz', '', $backupFileDir)) {
foreach ($ftpsendTasks as $file) {
unlink($file);
}
$fp = ftp_connect($backupFtpsendServer, $backupFtpsendPort);
if (ftp_login($fp, $backupFtpsendUsername, $backupFtpsendPassword)) {
ftp_chdir($fp, $backupFtpsendDirectory);
/***********************************************************************
foreach ($ftpsendTasks as $file) {
echo "\nFTP: $file\n";
$ret = ftp_nb_put($fp,basename($file),$file,FTP_BINARY);
while ($ret == FTP_MOREDATA)
$ret = ftp_nb_continue ($fp);
}
