distruggi_lock_file($filelock, C_DATA_PATH . "/lingua.php");
$filelock = crea_lock_file(C_DATA_PATH . "/tema.php");
include C_DATA_PATH . "/tema.php";
$file_tema = @file(C_DATA_PATH . "/tema.php");
unset($linee);
$num_lin = 0;
$ini_lin = "\$tema[{$id_utente_canc}]";
for ($num1 = 0; $num1 < count($file_tema); $num1++) {
if (substr($file_tema[$num1], 0, strlen($ini_lin)) != $ini_lin) {
$linee[$num_lin] = $file_tema[$num1];
$num_lin++;
}
# fine if (substr($file_tema[$num1],0,strlen($ini_lin)) != $ini_lin)
}
# fine for $num1
scrivi_file($linee, C_DATA_PATH . "/tema.php");
distruggi_lock_file($filelock, C_DATA_PATH . "/tema.php");
}
# fine else if ($continua != "SI")
}
# fine if ($continua != "NO")
unlock_tabelle($tabelle_lock);
}
# fine if ($cancella)
if ($importa_priv) {
$id_utente_importa = aggslashdb($id_utente_importa);
$id_utente_esporta = aggslashdb($id_utente_esporta);
include "./includes/funzioni_menu.php";
include C_DATA_PATH . "/lingua.php";
$tabelle_lock = array($tablepersonalizza, $tableprivilegi);
$altre_tab_lock = array($tableanni, $tableutenti, $tablerelgruppi);
}
foreach ($arr_sql as $key => $sql) {
if (!$db->sql_query($sql)) {
print_debug($key . " ===> \n\t\t\t" . $sql);
}
//if($_SESSION["USER_ID"]<5) echo "<p>$sql</p>";
$r[$key] = $db->sql_fetchrowset();
}
$p = valida_recordset($r, $intestazioni, $pratica);
list($html_code, $errore) = array_values($p);
if ($errore) {
$result[] = "<tr><td class=\"pratica\"><a class=\"pratica\" href=\"#\" onclick=\"javascript:NewWindow('praticaweb.php?pratica={$pratica}','Praticaweb',0,0,'yes')\">" . ($limit * $offset + ($i + 1)) . ") Pratica n° {$num_pr} del {$data_pres}</a></td></tr><tr><td width=\"100%\">{$html_code}</td></tr>";
$num_err++;
scrivi_file($r);
} else {
scrivi_file($r);
}
$r = array();
}
$sql = "SELECT * FROM anagrafe_tributaria.find_coda({$anno});";
// TROVO INFO SUL RECORD DI CODA
if (!$db->sql_query($sql)) {
print_debug($sql);
}
$coda = $db->sql_fetchrowset();
$coda = implode("", $coda[0]);
// SCRITTURA DEL RECORD DI CODA
$handle = fopen(STAMPE_DIR . "anagrafe_tributaria.txt", 'a+');
if (!$handle) {
echo "Impossibile aprire il file " . $dir . "ana_trib";
}
function ripristina_backup($file, $silenzio, $pag, &$numconnessione, $database_esistente, $tempdatabase, $PHPR_DB_TYPE, $PHPR_DB_NAME, $PHPR_DB_HOST, $PHPR_DB_PORT, $PHPR_DB_USER, $PHPR_DB_PASS, $PHPR_LOAD_EXT, $PHPR_TAB_PRE, $N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE, $ext_pgsql_caricata, $ext_mysql_caricata, $mantieni_anni = "")
{
$tableanni = $PHPR_TAB_PRE . "anni";
$tableutenti = $PHPR_TAB_PRE . "utenti";
include "./includes/variabili_contratto.php";
unset($var_predef);
allunga_tempo_limite();
global $LIKE, $MEDIUMTEXT, $ext_sqlite_caricata;
$fatto = "NO";
if (C_CREA_NUOVI_APP == "NO") {
$num_appartamenti_prec = esegui_query("select idappartamenti from " . $PHPR_TAB_PRE . "appartamenti");
$num_appartamenti_prec = numlin_query($num_appartamenti_prec);
} elseif (defined("C_MASSIMO_NUM_APP") and C_MASSIMO_NUM_APP != 0) {
$num_appartamenti_prec = C_MASSIMO_NUM_APP;
}
if (C_CAMBIA_TIPO_PERIODI == "NO") {
unset($tipo_periodi_prec);
$anni = esegui_query("select * from {$tableanni} order by idanni");
for ($num1 = 0; $num1 < numlin_query($anni); $num1++) {
$ultimo_anno_prec = risul_query($anni, $num1, 'idanni');
$tipo_periodi_prec[$ultimo_anno_prec] = risul_query($anni, $num1, 'tipo_periodi');
}
# fine for $num1
}
# fine if (C_CAMBIA_TIPO_PERIODI == "NO")
# Prima lettura di controllo del file
$file_coerente = "SI";
$num_err = "";
$ultima_linea = "";
$fbackup = fopen($file, "r");
if ($fbackup) {
$leggendo_righe = "NO";
while (!feof($fbackup)) {
unset($linee_backup);
$linee_backup = fread($fbackup, 524288);
$linee_backup = explode("\n", $linee_backup);
$num_linee_backup = count($linee_backup) - 1;
$linee_backup[0] = $ultima_linea . $linee_backup[0];
if (!feof($fbackup)) {
$ultima_linea = $linee_backup[$num_linee_backup];
} else {
$num_linee_backup++;
}
for ($num1 = 0; $num1 < $num_linee_backup; $num1++) {
$linea = togli_acapo($linee_backup[$num1]);
if ($linea == "</backup>" and $leggendo_righe != "SI") {
$leggendo_backup = "NO";
}
if ($leggendo_backup == "SI") {
if (substr($linea, 0, 5) == "<log>" and substr($linea, -6) == "</log>") {
$phpr_log = substr($linea, 5, -6);
}
if ($linea == "</database>" and $leggendo_righe != "SI") {
$leggendo_database = "NO";
}
if ($leggendo_database == "SI") {
if ($linea == "</tabella>" and $leggendo_righe != "SI") {
$leggendo_tabella = "NO";
}
if ($leggendo_tabella == "SI") {
if (substr($linea, 0, 13) == "<nometabella>") {
$nome_tabella = substr($linea, 13);
$nome_tabella = substr($nome_tabella, 0, -14);
}
# fine if (substr($linea,0,13) == "<nometabella>")
if ($linea == "</colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne == "NO";
$anno_ins = "";
if ($nome_tabella == "clienti") {
$tab_presente['clienti'] = "SI";
}
if ($nome_tabella == "relclienti") {
$tab_presente['relclienti'] = "SI";
}
if ($nome_tabella == "anni") {
$tab_presente['anni'] = "SI";
}
if ($nome_tabella == "versioni") {
$tab_presente['versioni'] = "SI";
}
if ($nome_tabella == "nazioni") {
$tab_presente['nazioni'] = "SI";
}
if ($nome_tabella == "regioni") {
$tab_presente['regioni'] = "SI";
}
if ($nome_tabella == "citta") {
$tab_presente['citta'] = "SI";
}
if ($nome_tabella == "documentiid") {
$tab_presente['documentiid'] = "SI";
}
if ($nome_tabella == "parentele") {
$tab_presente['parentele'] = "SI";
}
if ($nome_tabella == "personalizza") {
$tab_presente['personalizza'] = "SI";
}
if ($nome_tabella == "appartamenti") {
$tab_presente['appartamenti'] = "SI";
}
if ($nome_tabella == "utenti") {
$tab_presente['utenti'] = "SI";
}
if ($nome_tabella == "gruppi") {
$tab_presente['gruppi'] = "SI";
}
if ($nome_tabella == "privilegi") {
$tab_presente['privilegi'] = "SI";
}
if ($nome_tabella == "relutenti") {
$tab_presente['relutenti'] = "SI";
}
if ($nome_tabella == "relgruppi") {
$tab_presente['relgruppi'] = "SI";
}
if ($nome_tabella == "sessioni") {
$tab_presente['sessioni'] = "SI";
}
if ($nome_tabella == "transazioni") {
$tab_presente['transazioni'] = "SI";
}
if ($nome_tabella == "transazioniweb") {
$tab_presente['transazioniweb'] = "SI";
}
if ($nome_tabella == "descrizioni") {
$tab_presente['descrizioni'] = "SI";
}
if ($nome_tabella == "beniinventario") {
$tab_presente['beniinventario'] = "SI";
}
if ($nome_tabella == "magazzini") {
$tab_presente['magazzini'] = "SI";
}
if ($nome_tabella == "relinventario") {
$tab_presente['relinventario'] = "SI";
}
if ($nome_tabella == "casse") {
$tab_presente['casse'] = "SI";
}
if ($nome_tabella == "contratti") {
$tab_presente['contratti'] = "SI";
}
if ($nome_tabella == "interconnessioni") {
$tab_presente['interconnessioni'] = "SI";
}
if ($nome_tabella == "messaggi") {
$tab_presente['messaggi'] = "SI";
}
if (substr($nome_tabella, 0, 7) == "prenota") {
$anno_ins = substr($nome_tabella, 7);
$tab_presente[$anno_ins]['prenota'] = "SI";
}
if (substr($nome_tabella, 0, 12) == "costiprenota") {
$anno_ins = substr($nome_tabella, 12);
$tab_presente[$anno_ins]['costiprenota'] = "SI";
} else {
if (substr($nome_tabella, 0, 5) == "costi") {
$anno_ins = substr($nome_tabella, 5);
$tab_presente[$anno_ins]['costi'] = "SI";
}
}
if (substr($nome_tabella, 0, 15) == "rclientiprenota") {
$anno_ins = substr($nome_tabella, 15);
$tab_presente[$anno_ins]['rclientiprenota'] = "SI";
}
if (substr($nome_tabella, 0, 6) == "regole") {
$anno_ins = substr($nome_tabella, 6);
$tab_presente[$anno_ins]['regole'] = "SI";
}
if (substr($nome_tabella, 0, 5) == "soldi") {
$anno_ins = substr($nome_tabella, 5);
$tab_presente[$anno_ins]['soldi'] = "SI";
}
if (substr($nome_tabella, 0, 7) == "periodi") {
$anno_ins = substr($nome_tabella, 7);
$tab_presente[$anno_ins]['periodi'] = "SI";
}
if (substr($nome_tabella, 0, 8) == "ntariffe") {
$anno_ins = substr($nome_tabella, 8);
$tab_presente[$anno_ins]['ntariffe'] = "SI";
}
if ($anno_ins and controlla_anno($anno_ins) == "NO") {
$file_coerente = "NO";
$num_err .= "#1";
}
if ($anno_ins and $tab_anno_esistente[$anno_ins] != "SI") {
$tab_anno_esistente[$anno_ins] = "SI";
}
}
# fine if ($linea == "</colonnetabella>" and $leggendo_righe != "SI")
if ($leggendo_colonne == "SI") {
if (substr($linea, 0, 13) == "<nomecolonna>") {
$num_colonne++;
$nome_colonna[$num_colonne] = substr($linea, 13);
$nome_colonna[$num_colonne] = substr($nome_colonna[$num_colonne], 0, -14);
$num_colonna[$nome_colonna[$num_colonne]] = $num_colonne - 1;
if (substr($nome_tabella, 0, 7) == "periodi" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe++;
}
if (substr($nome_tabella, 0, 8) == "ntariffe" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe++;
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $lista_tariffe > max(C_MASSIMO_NUM_TARIFFE, 10) * 3) {
$file_coerente = "NO";
$num_err .= "#2";
}
}
# fine if (substr($linea,0,13) == "<nomecolonna>")
if (substr($linea, 0, 13) == "<tipocolonna>") {
$tipo_colonna[$num_colonne] = substr($linea, 13);
$tipo_colonna[$num_colonne] = substr($tipo_colonna[$num_colonne], 0, -14);
}
# fine if (substr($linea,0,13) == "<tipocolonna>")
}
# fine if ($leggendo_colonne == "SI")
if ($linea == "<colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne = "SI";
$num_colonne = 0;
$lista_tariffe = 0;
}
# fine if ($linea == "<colonnetabella>" and $leggendo_righe != "SI")
if ($linea == "</righetabella>") {
$leggendo_righe = "NO";
}
if ($leggendo_righe == "SI") {
if (substr($linea, 0, 6) == "<riga>") {
$riga = substr($linea, 11);
} else {
$riga .= "\n" . $linea;
}
# fine else if (substr($linea,0,6) == "<riga>")
if (substr($linea, -7) == "</riga>") {
$riga = substr($riga, 0, -13);
$riga = explode("</cmp><cmp>", $riga);
if ($nome_tabella == "contratti") {
$tipo_contr = $riga[$num_colonna['tipo']];
if (substr($tipo_contr, 0, 3) == "var") {
$nome = $riga[$num_colonna['testo']];
if ($var_riserv[$nome]) {
$file_coerente = "NO";
$num_err .= "#3";
}
}
# fine if (substr($tipo_contr,0,3) == "var")
if (substr($tipo_contr, 0, 4) == "vett") {
$nome = explode(";", $riga[$num_colonna['testo']]);
if ($var_riserv[$nome[0]]) {
$file_coerente = "NO";
$num_err .= "#4";
}
if ($var_riserv[$nome[1]]) {
$file_coerente = "NO";
$num_err .= "#5";
}
}
# fine if (substr($tipo_contr,0,4) == "vett")
}
# fine if ($nome_tabella == "contratti")
unset($valore_colonna);
for ($num2 = 0; $num2 < count($riga); $num2++) {
$valore = aggslashdb($riga[$num2]);
if ($valore != "") {
$valore = str_replace("</righetabella@%&@>", "</righetabella>", $valore);
$valore = str_replace("</riga@%&@>", "</riga>", $valore);
$valore = str_replace("<riga@%&@>", "<riga>", $valore);
$valore = str_replace("</cmp@%&@>", "</cmp>", $valore);
$valore = str_replace("@%&@@%&@", "@%&@", $valore);
$valore_colonna[$nome_colonna[$num2 + 1]] = $valore;
}
# fine if ($valore != "")
}
# fine for $num2
if ((C_CREA_NUOVI_APP == "NO" or defined("C_MASSIMO_NUM_APP") and C_MASSIMO_NUM_APP != 0) and $nome_tabella == "appartamenti" and $linee_inserite_in_tabella[$nome_tabella] >= $num_appartamenti_prec) {
$file_coerente = "NO";
$num_err .= "#6";
}
if ($nome_tabella == "anni") {
$campo_anno_esistente[$valore_colonna['idanni']] = $valore_colonna['tipo_periodi'];
}
if (C_CREA_ANNO_NON_ATTUALE == "NO" and $nome_tabella == "anni" and $valore_colonna['idanni'] < C_PRIMO_ANNO_CREATO) {
$file_coerente = "NO";
$num_err .= "#7";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "utenti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI) {
$file_coerente = "NO";
$num_err .= "#8";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "gruppi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI) {
$file_coerente = "NO";
$num_err .= "#9";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and ($nome_tabella == "sessioni" or $nome_tabella == "transazioni") and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI * 25) {
$file_coerente = "NO";
$num_err .= "#10";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "privilegi" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 20) {
$file_coerente = "NO";
$num_err .= "#11";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "personalizza" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_UTENTI * 50) {
$file_coerente = "NO";
$num_err .= "#12";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "nazioni" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 3000) {
$file_coerente = "NO";
$num_err .= "#13";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "regioni" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 3000) {
$file_coerente = "NO";
$num_err .= "#14";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "citta" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 30000) {
$file_coerente = "NO";
$num_err .= "#15";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "documentiid" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 2000) {
$file_coerente = "NO";
$num_err .= "#16";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "parentele" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 1000) {
$file_coerente = "NO";
$num_err .= "#17";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "relutenti" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 80000) {
$file_coerente = "NO";
$num_err .= "#18";
}
if (defined("C_MASSIMO_NUM_UTENTI") and C_MASSIMO_NUM_UTENTI != 0 and $nome_tabella == "relgruppi" and $linee_inserite_in_tabella[$nome_tabella] > C_MASSIMO_NUM_UTENTI * 8000) {
$file_coerente = "NO";
$num_err .= "#19";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "clienti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI) {
$file_coerente = "NO";
$num_err .= "#20";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "relclienti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI * 10) {
$file_coerente = "NO";
$num_err .= "#21";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "transazioniweb" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI) {
$file_coerente = "NO";
$num_err .= "#22";
}
if (defined("C_MASSIMO_NUM_COSTI_AGG") and C_MASSIMO_NUM_COSTI_AGG != 0 and substr($nome_tabella, 0, 8) == "ntariffe" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_COSTI_AGG + 4) {
$file_coerente = "NO";
$num_err .= "#23";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "descrizioni" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 50 + 40) {
$file_coerente = "NO";
$num_err .= "#24";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "beniinventario" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 10000) {
$file_coerente = "NO";
$num_err .= "#25";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "magazzini" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 1000) {
$file_coerente = "NO";
$num_err .= "#26";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "relinventario" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 100000) {
$file_coerente = "NO";
$num_err .= "#27";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $nome_tabella == "casse" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_TARIFFE * 1000) {
$file_coerente = "NO";
$num_err .= "#27.1";
}
if (defined("C_MASSIMO_NUM_CONTRATTI") and C_MASSIMO_NUM_CONTRATTI != 0 and $nome_tabella == "contratti" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CONTRATTI * 200 + 100) {
$file_coerente = "NO";
$num_err .= "#28";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "interconnessioni" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI * 10) {
$file_coerente = "NO";
$num_err .= "#29";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $nome_tabella == "messaggi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_CLIENTI) {
$file_coerente = "NO";
$num_err .= "#30";
}
if (defined("C_MASSIMO_NUM_STORIA_SOLDI") and C_MASSIMO_NUM_STORIA_SOLDI != 0 and substr($nome_tabella, 0, 5) == "soldi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_STORIA_SOLDI + 1) {
$file_coerente = "NO";
$num_err .= "#31";
}
if (defined("C_MASSIMO_NUM_COSTI") and C_MASSIMO_NUM_COSTI != 0 and substr($nome_tabella, 0, 5) == "costi" and $linee_inserite_in_tabella[$nome_tabella] >= C_MASSIMO_NUM_COSTI) {
$file_coerente = "NO";
$num_err .= "#32";
}
if (substr($nome_tabella, 0, 8) == "ntariffe" and $valore_colonna['idntariffe'] == 1) {
$numero_tariffe[substr($nome_tabella, 8)] = $valore_colonna['nomecostoagg'];
}
if ($nome_tabella == "versioni" and $linee_inserite_in_tabella[$nome_tabella] >= 2) {
$file_coerente = "NO";
$num_err .= "#33";
}
$linee_inserite_in_tabella[$nome_tabella]++;
}
# fine if (substr($linea,-7) == "</riga>")
}
# fine if ($leggendo_righe == "SI")
if ($linea == "<righetabella>") {
$leggendo_righe = "SI";
$linee_inserite_in_tabella[$nome_tabella] = 0;
}
# fine if ($linea == "<righetabella>")
}
# fine if ($leggendo_tabella == "SI")
if ($linea == "<tabella>") {
$leggendo_tabella = "SI";
}
} else {
if ($linea == "</file>") {
$leggendo_file = "NO";
}
if ($leggendo_file == "SI") {
if ($nome_file) {
if ($leggendo_contenuto == "SI") {
if (substr($linea, -12) == "</contenuto>") {
$leggendo_contenuto = "NO";
$leggendo_cont_file_sel = "NO";
$linea = substr($linea, 0, -12);
}
# fine if (substr($linea,-12) == "</contenuto>")
$linea = trim($linea);
if ($leggendo_prima_linea == "SI") {
$prima_linea = $linea;
$leggendo_prima_linea = "NO";
}
# fine if ($leggendo_prima_linea == "SI")
if ($nome_file == "./data/versione.php") {
if ($linea != "" and $linea != "<?php" and $linea != "define(C_VERSIONE_ATTUALE," . C_PHP_VERSION_NUM . ");" and preg_replace("/define\\(C_DIFF_ORE,-?[0-9]{1,2}\\);/", "", $linea) != "" and $linea != "?>") {
$file_coerente = "NO";
$num_err .= "#34";
}
}
# fine if ($nome_file == "./data/versione.php")
if ($nome_file == "./data/selectappartamenti.php") {
if ($linea == "\";") {
$leggendo_cont_file_sel = "NO";
}
if ($leggendo_cont_file_sel != "SI" and $linea != "" and $linea != "<?php" and $linea != "?>" and $linea != "\";" and $linea != "echo \"") {
$file_coerente = "NO";
$num_err .= "#35";
}
if ($leggendo_cont_file_sel == "SI") {
if (str_replace("\\\\", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#36";
}
$linea = str_replace("\\\"", "", $linea);
if (str_replace("\"", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#37";
}
}
# fine if ($leggendo_cont_file_sel == "SI")
if ($linea == "echo \"") {
$leggendo_cont_file_sel = "SI";
}
}
# fine if ($nome_file == "./data/selectappartamenti.php")
if (substr($nome_file, 0, 20) == "./data/selectperiodi" or substr($nome_file, 0, 21) == "./data/selperiodimenu") {
if ($linea == "\";") {
$leggendo_cont_file_sel = "NO";
}
if ($leggendo_cont_file_sel != "SI") {
$linea_trovata = "NO";
if ($linea == "") {
$linea_trovata = "SI";
}
if ($linea == "<?php") {
$linea_trovata = "SI";
}
if ($linea == "?>") {
$linea_trovata = "SI";
}
if ($linea == "\";") {
$linea_trovata = "SI";
}
if ($linea == "\$dates_options_list = \"") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$y_ini_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,4}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$m_ini_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,2}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$d_ini_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,2}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$n_dates_menu\\[[0-9]{1,2}\\] = \"[0-9]{1,4}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$d_increment\\[[0-9]{1,2}\\] = \"[0-9]{1,2}\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea == "\$partial_dates = 1;") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$d_names = \"\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\"\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$m_names = \"\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\",\\\\\"[^\"]{1,16}\\\\\"\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea_trovata != "SI") {
$file_coerente = "NO";
$num_err .= "#38";
}
}
# fine if ($leggendo_cont_file_sel != "SI")
if ($leggendo_cont_file_sel == "SI") {
if (str_replace("\\\\", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#39";
}
$linea = str_replace("\\\"", "", $linea);
if (str_replace("\"", "", $linea) != $linea) {
$file_coerente = "NO";
$num_err .= "#40";
}
}
# fine if ($leggendo_cont_file_sel == "SI")
if ($linea == "\$dates_options_list = \"") {
$leggendo_cont_file_sel = "SI";
}
}
# fine if (substr($nome_file,0,20) == "./data/selectperiodi" or...
if ($nome_file == "./data/abilita_login" and $linea != "") {
$file_coerente = "NO";
$num_err .= "#41";
}
if ($nome_file == "./data/lingua.php" and $linea != "" and $linea != "<?php" and $linea != "?>" and preg_replace("/\\\$lingua\\[[0-9]{1,8}\\] = \"[a-z]{1,3}\";/", "", $linea) != "") {
$file_coerente = "NO";
$num_err .= "#42";
}
if ($nome_file == "./data/unit.php" or $nome_file == "./data/unit_single.php") {
$linea_trovata = "NO";
if ($linea == "") {
$linea_trovata = "SI";
}
if ($linea == "<?php") {
$linea_trovata = "SI";
}
if ($linea == "?>") {
$linea_trovata = "SI";
}
if (preg_replace("/^\\\$unit\\['(p_n|s_n|gender)'\\] = \\\$trad_var\\['[a-z_]*'\\];/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/^\\\$unit\\['lang'\\]\\['[a-z]{2,3}'\\]\\['(p_n|s_n|gender)'\\] = '[^']*';/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['s_n'] = \$unit['lang'][\$lingua_mex]['s_n'];") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['p_n'] = \$unit['lang'][\$lingua_mex]['p_n'];") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['gender'] = \$unit['lang'][\$lingua_mex]['gender'];") {
$linea_trovata = "SI";
}
if ($linea == "\$unit['special'] = 0;") {
$linea_trovata = "SI";
}
if ($linea == "\$car_spec = explode(\",\",\$trad_var['special_characters']);") {
$linea_trovata = "SI";
}
if ($linea == "for (\$num1 = 0 ; \$num1 < count(\$car_spec) ; \$num1++) if (substr(\$unit['p_n'],0,strlen(\$car_spec[\$num1])) == \$car_spec[\$num1]) \$unit['special'] = 1;") {
$linea_trovata = "SI";
}
if ($linea_trovata != "SI") {
$file_coerente = "NO";
$num_err .= "#42.1";
}
}
# fine if ($nome_file == "./data/unit.php" or $nome_file == "./data/unit_single.php")
if ($nome_file == "./data/tema.php" and $linea != "" and $linea != "<?php" and $linea != "?>" and preg_replace("/\\\$tema\\[[0-9]{1,8}\\] = \"[a-z]{1,4}\";/", "", $linea) != "" and preg_replace("/\\\$parole_sost = [01];/", "", $linea) != "") {
$file_coerente = "NO";
$num_err .= "#43";
}
if ($nome_file == "./data/parole_sost.php" and $linea != "" and $linea != "<?php" and $linea != "?>" and preg_replace("/\\\$messaggio = str_replace\\(\"[^\"]*\",\"[^\"]*\",\\\$messaggio\\);/", "", $linea) != "") {
$file_coerente = "NO";
$num_err .= "#44";
}
if ($nome_file == "./data/dati_interconnessioni.php") {
$linea_trovata = "NO";
if ($linea == "") {
$linea_trovata = "SI";
}
if ($linea == "<?php") {
$linea_trovata = "SI";
}
if ($linea == "?>") {
$linea_trovata = "SI";
}
if (preg_replace("/^#[0-9a-zA-Z _]*/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/^unset\\(\\\$ic_[a-z_]+[0-9a-z_]*\\);/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$ic_[a-z_]+[0-9a-z_]*\\[?\"?[0-9a-zA-Z_]*\"?\\]?\\[?\"?[0-9a-zA-Z_]*\"?\\]?\\[?\"?[0-9a-zA-Z_]*\"?\\]? = \"[^\"]*\";/", "", $linea) == "") {
$linea_trovata = "SI";
}
if (preg_replace("/\\\$ic_org[a-z_]+[0-9a-z_]*_ic = C_[A-Z][A-Z_]*[A-Z]_IC;/", "", $linea) == "") {
$linea_trovata = "SI";
}
if ($linea_trovata != "SI") {
$file_coerente = "NO";
$num_err .= "#45";
}
}
# fine if ($nome_file == "./data/dati_interconnessioni.php")
if ($nome_file == "./data/log_utenti.php" and ($prima_linea != "<?php exit(); ?>" or $linea != "<?php exit(); ?>" and preg_replace("/^[0-9]+>[0-9]{4,4}-[0-9]{2,2}-[0-9]{2,2} [0-9]{2,2}:[0-9]{2,2}:[0-9]{2,2}>[a-zA-Z]?.*/", "", $linea) != "")) {
$file_coerente = "NO";
$num_err .= "#46";
}
if ($leggendo_contenuto == "NO") {
$nome_file = "";
}
}
# fine if ($leggendo_contenuto == "SI")
if ($linea == "<contenuto>") {
$leggendo_contenuto = "SI";
$leggendo_prima_linea = "SI";
}
# fine if ($linea == "<contenuto>")
}
# fine if ($nome_file)
if (substr($linea, 0, 10) == "<nomefile>") {
$nome_file = substr($linea, 10);
$nome_file = substr($nome_file, 0, -11);
if (C_CREA_SUBORDINAZIONI == "NO" and str_replace("dati_subordinazione", "", $nome_file) != $nome_file) {
$file_coerente = "NO";
$num_err .= "#47";
}
if (substr($nome_file, 0, 7) != "./data/") {
$file_coerente = "NO";
$num_err .= "#48";
}
$nome_file_vett = explode("/", $nome_file);
if (count($nome_file_vett) > 3) {
$file_coerente = "NO";
$num_err .= "#49";
}
$nome_file_trovato = "NO";
if ($nome_file == "./data/selectappartamenti.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/abilita_login") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/lingua.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/unit.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/unit_single.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/tema.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/parole_sost.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/dati_interconnessioni.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/log_utenti.php") {
$nome_file_trovato = "SI";
}
if ($nome_file == "./data/versione.php") {
$nome_file_trovato = "SI";
}
if (substr($nome_file, 0, 20) == "./data/selectperiodi") {
$nome_file_trovato = "SI";
}
if (substr($nome_file, 0, 21) == "./data/selperiodimenu") {
$nome_file_trovato = "SI";
}
if ($nome_file_trovato == "NO") {
$file_coerente = "NO";
$num_err .= "#50";
}
}
# fine if (substr($linea,0,9) == "<nomefile>")
}
# fine if ($leggendo_file == "SI")
if ($linea == "<file>" and $leggendo_modello != "SI") {
$leggendo_file = "SI";
}
}
# fine else if ($leggendo_database == "SI")
if ($linea == "<database>" and $leggendo_modello != "SI") {
$leggendo_database = "SI";
}
if ($linea == "</modello>") {
$leggendo_modello = "NO";
}
if ($linea == "<modello>" and $leggendo_database != "SI" and $leggendo_file != "SI") {
$leggendo_modello = "SI";
}
}
# fine if ($leggendo_backup == "SI")
if ($linea == "<backup>") {
$leggendo_backup = "SI";
}
}
# fine for $num1
}
# fine while (!feof($fbackup))
fclose($fbackup);
} else {
$file_coerente = "NO";
$num_err .= "#51";
}
if (preg_replace("/SI[0-9,]*/", "", $phpr_log) != "") {
$phpr_log = "NO";
}
if (!@is_array($campo_anno_esistente) or !@is_array($tab_anno_esistente)) {
$file_coerente = "NO";
$num_err .= "#52";
} else {
if (count($campo_anno_esistente) != count($tab_anno_esistente)) {
$file_coerente = "NO";
$num_err .= "#53";
}
reset($campo_anno_esistente);
while (list($key, $val) = each($campo_anno_esistente)) {
if ($tab_anno_esistente[$key] != "SI") {
$file_coerente = "NO";
$num_err .= "#54";
}
if ($tab_presente[$key]['prenota'] != "SI") {
$file_coerente = "NO";
$num_err .= "#55";
}
if ($tab_presente[$key]['costiprenota'] != "SI") {
$file_coerente = "NO";
$num_err .= "#56";
}
if ($tab_presente[$key]['rclientiprenota'] != "SI") {
$file_coerente = "NO";
$num_err .= "#57";
}
if ($tab_presente[$key]['costi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#58";
}
if ($tab_presente[$key]['regole'] != "SI") {
$file_coerente = "NO";
$num_err .= "#59";
}
if ($tab_presente[$key]['soldi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#60";
}
if ($tab_presente[$key]['periodi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#61";
}
if ($tab_presente[$key]['ntariffe'] != "SI") {
$file_coerente = "NO";
$num_err .= "#62";
}
if (defined("C_PRIMO_ANNO_CREATO") and C_CREA_ANNO_NON_ATTUALE == "NO" and $key < C_PRIMO_ANNO_CREATO) {
$file_coerente = "NO";
$num_err .= "#63";
}
if (C_CREA_ANNO_NON_ATTUALE == "NO" and $key > date("Y", time() + C_DIFF_ORE * 3600)) {
$file_coerente = "NO";
$num_err .= "#64";
}
if (!$anno_max or $key > $anno_max) {
$anno_max = $key;
$ultimo_tipo_periodi = $val;
}
# fine if (!$anno_max or $key > $anno_max)
if (!$numero_tariffe[$key] or controlla_num_pos($numero_tariffe[$key]) == "NO") {
$file_coerente = "NO";
$num_err .= "#65";
}
if (defined("C_MASSIMO_NUM_TARIFFE") and C_MASSIMO_NUM_TARIFFE != 0 and $numero_tariffe[$key] > C_MASSIMO_NUM_TARIFFE) {
$file_coerente = "NO";
$num_err .= "#66";
}
if ($val != "g" and $val != "s") {
$file_coerente = "NO";
$num_err .= "#67";
}
if ($val == "g" and $linee_inserite_in_tabella["periodi" . $key] > 1825 or $val == "s" and $linee_inserite_in_tabella["periodi" . $key] > 260) {
$file_coerente = "NO";
$num_err .= "#68";
}
$prenotazioni_max = $linee_inserite_in_tabella["periodi" . $key] * ($linee_inserite_in_tabella["appartamenti"] + 2);
if (defined("C_MASSIMO_NUM_COSTI_AGG_IN_PRENOTA") and C_MASSIMO_NUM_COSTI_AGG_IN_PRENOTA != 0 and $linee_inserite_in_tabella["costiprenota" . $key] > C_MASSIMO_NUM_COSTI_AGG_IN_PRENOTA * $prenotazioni_max) {
$file_coerente = "NO";
$num_err .= "#69";
}
if (defined("C_MASSIMO_NUM_CLIENTI") and C_MASSIMO_NUM_CLIENTI != 0 and $linee_inserite_in_tabella["rclientiprenota" . $key] > C_MASSIMO_NUM_CLIENTI * $prenotazioni_max) {
$file_coerente = "NO";
$num_err .= "#70";
}
if ($linee_inserite_in_tabella["prenota" . $key] > $prenotazioni_max) {
$file_coerente = "NO";
$num_err .= "#71";
}
if ($linee_inserite_in_tabella["regole" . $key] > $prenotazioni_max + $numero_tariffe[$key] * 2) {
$file_coerente = "NO";
$num_err .= "#72";
}
}
# fine while (list($key,$val) = each($campo_anno_esistente))
}
# fine else if (!@is_array($campo_anno_esistente) or...
if (C_CAMBIA_TIPO_PERIODI == "NO" and $tipo_periodi_prec[$ultimo_anno_prec] != $ultimo_tipo_periodi) {
$file_coerente = "NO";
$num_err .= "#73";
}
if ($tab_presente['clienti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#74";
}
if ($tab_presente['relclienti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#75";
}
if ($tab_presente['anni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#76";
}
if ($tab_presente['versioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#77";
}
if ($tab_presente['nazioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#78";
}
if ($tab_presente['regioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#79";
}
if ($tab_presente['citta'] != "SI") {
$file_coerente = "NO";
$num_err .= "#80";
}
if ($tab_presente['documentiid'] != "SI") {
$file_coerente = "NO";
$num_err .= "#81";
}
if ($tab_presente['parentele'] != "SI") {
$file_coerente = "NO";
$num_err .= "#82";
}
if ($tab_presente['personalizza'] != "SI") {
$file_coerente = "NO";
$num_err .= "#83";
}
if ($tab_presente['appartamenti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#84";
}
if ($tab_presente['utenti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#85";
}
if ($tab_presente['gruppi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#86";
}
if ($tab_presente['privilegi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#87";
}
if ($tab_presente['relutenti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#88";
}
if ($tab_presente['relgruppi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#89";
}
if ($tab_presente['sessioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#90";
}
if ($tab_presente['transazioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#91";
}
if ($tab_presente['transazioniweb'] != "SI") {
$file_coerente = "NO";
$num_err .= "#92";
}
if ($tab_presente['descrizioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#93";
}
if ($tab_presente['beniinventario'] != "SI") {
$file_coerente = "NO";
$num_err .= "#94";
}
if ($tab_presente['magazzini'] != "SI") {
$file_coerente = "NO";
$num_err .= "#95";
}
if ($tab_presente['relinventario'] != "SI") {
$file_coerente = "NO";
$num_err .= "#96";
}
if ($tab_presente['casse'] != "SI") {
$file_coerente = "NO";
$num_err .= "#96.1";
}
if ($tab_presente['contratti'] != "SI") {
$file_coerente = "NO";
$num_err .= "#97";
}
if ($tab_presente['interconnessioni'] != "SI") {
$file_coerente = "NO";
$num_err .= "#98";
}
if ($tab_presente['messaggi'] != "SI") {
$file_coerente = "NO";
$num_err .= "#99";
}
unset($tab_presente);
unset($var_riserv);
if ($file_coerente == "NO") {
if ($silenzio != "SI") {
echo mex("Il formato del file è errato", $pag) . ".<br>";
}
# debug backup COMPLETO
#if ($num_err) echo mex("Errori",$pag).": $num_err.<br>";
} else {
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
$HOTELD_DB_TYPE = "";
$HOTELD_DB_NAME = "";
$HOTELD_DB_HOST = "";
$HOTELD_DB_PORT = "";
$HOTELD_DB_USER = "";
$HOTELD_DB_PASS = "";
$HOTELD_TAB_PRE = "";
include C_EXT_DB_DATA_PATH;
if ($HOTELD_DB_TYPE) {
$N_PHPR_DB_TYPE = $HOTELD_DB_TYPE;
}
if ($HOTELD_DB_NAME) {
$N_PHPR_DB_NAME = $HOTELD_DB_NAME;
}
if ($HOTELD_DB_HOST) {
$N_PHPR_DB_HOST = $HOTELD_DB_HOST;
}
if (strcmp($HOTELD_DB_PORT, "")) {
$N_PHPR_DB_PORT = $HOTELD_DB_PORT;
}
if ($HOTELD_DB_USER) {
$N_PHPR_DB_USER = $HOTELD_DB_USER;
}
if (strcmp($HOTELD_DB_PASS, "")) {
$N_PHPR_DB_PASS = $HOTELD_DB_PASS;
}
if ($HOTELD_TAB_PRE) {
$N_PHPR_TAB_PRE = $HOTELD_TAB_PRE;
}
}
# fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
if ($N_PHPR_DB_TYPE == "mysql" and @function_exists('mysqli_connect')) {
$N_PHPR_DB_TYPE = "mysqli";
}
if ($N_PHPR_DB_NAME != $PHPR_DB_NAME or $N_PHPR_DB_HOST != $PHPR_DB_HOST or $N_PHPR_DB_PORT != $PHPR_DB_PORT or $N_PHPR_DB_TYPE != $PHPR_DB_TYPE) {
$nuovo_db = "SI";
if ($N_PHPR_DB_NAME == $PHPR_DB_NAME and $N_PHPR_DB_HOST == $PHPR_DB_HOST and $N_PHPR_DB_PORT == $PHPR_DB_PORT and substr($N_PHPR_DB_TYPE, 0, 5) == "mysql" and substr($PHPR_DB_TYPE, 0, 5) == "mysql") {
$database_esistente = "SI";
}
}
# fine if ($N_PHPR_DB_NAME != $PHPR_DB_NAME or $N_PHPR_DB_HOST != $PHPR_DB_HOST or...
if ($nuovo_db == "SI" or $N_PHPR_TAB_PRE != $PHPR_TAB_PRE) {
$mantieni_anni = "";
}
unset($anno_mantieni);
$tabelle_lock = array($tableanni, $tableutenti);
$altre_tab_lock = array($PHPR_TAB_PRE . "clienti", $PHPR_TAB_PRE . "personalizza", $PHPR_TAB_PRE . "privilegi");
$tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock);
$anni_vecchi = esegui_query("select * from {$tableanni} order by idanni");
$num_anni_vecchi = numlin_query($anni_vecchi);
$utenti_vecchi = esegui_query("select * from {$tableutenti} order by idutenti");
unlink(C_DATA_PATH . "/dati_connessione.php");
unlink(C_DATA_PATH . "/selectappartamenti.php");
unlink(C_DATA_PATH . "/versione.php");
unlink(C_DATA_PATH . "/tema.php");
if (@is_file(C_DATA_PATH . "/parole_sost.php")) {
unlink(C_DATA_PATH . "/parole_sost.php");
}
if (@is_file(C_DATA_PATH . "/dati_interconnessioni.php")) {
unlink(C_DATA_PATH . "/dati_interconnessioni.php");
}
if (@is_file(C_DATA_PATH . "/abilita_login")) {
unlink(C_DATA_PATH . "/abilita_login");
}
if (@is_file(C_DATA_PATH . "/log_utenti.php")) {
unlink(C_DATA_PATH . "/log_utenti.php");
}
#if (@is_file(C_DATI_PATH."/ultimo_accesso")) unlink(C_DATI_PATH."/ultimo_accesso");
esegui_query("drop table " . $PHPR_TAB_PRE . "anni");
esegui_query("drop table " . $PHPR_TAB_PRE . "utenti");
unlock_tabelle($tabelle_lock);
for ($num1 = 0; $num1 < $num_anni_vecchi; $num1 = $num1 + 1) {
$anno_cancella = risul_query($anni_vecchi, $num1, 'idanni');
if (!$mantieni_anni or $campo_anno_esistente[$anno_cancella]) {
esegui_query("drop table " . $PHPR_TAB_PRE . "prenota{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "costiprenota{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "rclientiprenota{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "periodi{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "ntariffe{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "regole{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "soldi{$anno_cancella}");
esegui_query("drop table " . $PHPR_TAB_PRE . "costi{$anno_cancella}");
for ($num2 = 0; $num2 < numlin_query($utenti_vecchi); $num2++) {
$idutente_canc = risul_query($utenti_vecchi, $num2, 'idutenti');
if (@is_file(C_DATA_PATH . "/selectperiodi{$anno_cancella}.{$idutente_canc}.php")) {
unlink(C_DATA_PATH . "/selectperiodi{$anno_cancella}.{$idutente_canc}.php");
}
if (@is_file(C_DATA_PATH . "/selperiodimenu{$anno_cancella}.{$idutente_canc}.php")) {
unlink(C_DATA_PATH . "/selperiodimenu{$anno_cancella}.{$idutente_canc}.php");
}
}
# fine for $num2
} elseif ($mantieni_anni) {
$anno_mantieni[$anno_cancella] = 1;
}
}
# fine for $num1
if ($mantieni_anni and @is_array($anno_mantieni)) {
$clienti_vecchi = esegui_query("select * from " . $PHPR_TAB_PRE . "clienti order by idclienti");
$max_clienti_vecchi = esegui_query("select max(idclienti) from " . $PHPR_TAB_PRE . "clienti");
$max_clienti_vecchi = risul_query($max_clienti_vecchi, 0, 0);
$privilegi_vecchi = esegui_query("select * from " . $PHPR_TAB_PRE . "privilegi order by idutente");
$personalizza_vecchi = esegui_query("select * from " . $PHPR_TAB_PRE . "personalizza where idpersonalizza {$LIKE} 'giorno_vedi_ini_sett%' ");
}
# fine if ($mantieni_anni and @is_array($anno_mantieni))
esegui_query("drop table " . $PHPR_TAB_PRE . "appartamenti");
esegui_query("drop table " . $PHPR_TAB_PRE . "clienti");
esegui_query("drop table " . $PHPR_TAB_PRE . "relclienti");
esegui_query("drop table " . $PHPR_TAB_PRE . "personalizza");
esegui_query("drop table " . $PHPR_TAB_PRE . "versioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "nazioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "regioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "citta");
esegui_query("drop table " . $PHPR_TAB_PRE . "documentiid");
esegui_query("drop table " . $PHPR_TAB_PRE . "parentele");
esegui_query("drop table " . $PHPR_TAB_PRE . "gruppi");
esegui_query("drop table " . $PHPR_TAB_PRE . "privilegi");
esegui_query("drop table " . $PHPR_TAB_PRE . "relutenti");
esegui_query("drop table " . $PHPR_TAB_PRE . "relgruppi");
esegui_query("drop table " . $PHPR_TAB_PRE . "sessioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "transazioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "transazioniweb");
esegui_query("drop table " . $PHPR_TAB_PRE . "descrizioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "beniinventario");
esegui_query("drop table " . $PHPR_TAB_PRE . "magazzini");
esegui_query("drop table " . $PHPR_TAB_PRE . "relinventario");
esegui_query("drop table " . $PHPR_TAB_PRE . "casse");
esegui_query("drop table " . $PHPR_TAB_PRE . "contratti");
esegui_query("drop table " . $PHPR_TAB_PRE . "cache");
esegui_query("drop table " . $PHPR_TAB_PRE . "interconnessioni");
esegui_query("drop table " . $PHPR_TAB_PRE . "messaggi");
disconnetti_db($numconnessione);
if ($nuovo_db == "SI") {
if ($silenzio != "SI") {
echo "<br>" . mex("Vecchio database svuotato, per rimuoverlo del tutto procedere manualmente", $pag) . ".<br><br>";
}
if ($database_esistente != "SI") {
if ($N_PHPR_DB_TYPE == "postgresql") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI") {
dl("pgsql.so");
$ext_pgsql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI")
$numconnessione = pg_connect("dbname={$tempdatabase} host={$N_PHPR_DB_HOST} port={$N_PHPR_DB_PORT} user={$N_PHPR_DB_USER} password={$N_PHPR_DB_PASS} ");
$encoding = " with encoding = 'SQL_ASCII'";
$encoding = "";
pg_exec("set datestyle to 'iso'");
}
# fine if ($N_PHPR_DB_TYPE == "postgresql")
if ($N_PHPR_DB_TYPE == "mysql") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysql.so");
$ext_mysql_caricata = "SI";
}
# fine if ($PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = mysql_connect("{$N_PHPR_DB_HOST}:{$N_PHPR_DB_PORT}", "{$N_PHPR_DB_USER}", "{$N_PHPR_DB_PASS}");
@mysql_query("SET NAMES 'utf8'");
@mysql_query("SET default_storage_engine=MYISAM");
$encoding = "";
}
# fine if ($N_PHPR_DB_TYPE == "mysql")
if ($N_PHPR_DB_TYPE == "mysqli") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysqli.so");
$ext_mysql_caricata = "SI";
}
# fine if ($PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = mysqli_connect($N_PHPR_DB_HOST, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, "", $N_PHPR_DB_PORT);
@mysqli_query($numconnessione, "SET NAMES 'utf8'");
@mysqli_query($numconnessione, "SET default_storage_engine=MYISAM");
$encoding = "";
}
# fine if ($N_PHPR_DB_TYPE == "mysqli")
if ($N_PHPR_DB_TYPE == "sqlite") {
if ($N_PHPR_LOAD_EXT == "SI" and $ext_sqlite_caricata != "SI") {
dl("sqlite.so");
$ext_sqlite_caricata = "SI";
}
# fine if ($PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = new SQLite3(C_DATA_PATH . "/db_" . $N_PHPR_DB_NAME);
$query = $numconnessione;
$database_esistente = "SI";
}
# fine if ($N_PHPR_DB_TYPE == "sqlite")
if ($database_esistente != "SI") {
$query = esegui_query2("create database {$N_PHPR_DB_NAME} {$encoding}", $N_PHPR_DB_TYPE);
}
if ($N_PHPR_DB_TYPE == "postgresql") {
pg_close($numconnessione);
}
if ($N_PHPR_DB_TYPE == "mysql") {
mysql_close($numconnessione);
}
if ($N_PHPR_DB_TYPE == "mysqli") {
mysqli_close($numconnessione);
}
if ($N_PHPR_DB_TYPE == "sqlite") {
$numconnessione->close();
}
} else {
$query = 1;
}
} else {
$query = 1;
}
unlink(C_DATA_PATH . "/lingua.php");
unlink(C_DATA_PATH . "/unit.php");
unlink(C_DATA_PATH . "/unit_single.php");
if ($query) {
$character_set_db = "";
$collation_db = "";
if ($N_PHPR_DB_TYPE == "postgresql") {
$DATETIME = "timestamp";
$MEDIUMTEXT = "text";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI") {
dl("pgsql.so");
$ext_pgsql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_pgsql_caricata != "SI")
$numconnessione = pg_connect("dbname={$N_PHPR_DB_NAME} host={$N_PHPR_DB_HOST} port={$N_PHPR_DB_PORT} user={$N_PHPR_DB_USER} password={$N_PHPR_DB_PASS} ");
pg_exec("set datestyle to 'iso'");
}
# fine if ($N_PHPR_DB_TYPE == "postgresql")
if ($N_PHPR_DB_TYPE == "mysql") {
$DATETIME = "datetime";
$MEDIUMTEXT = "mediumtext";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysql.so");
$ext_mysql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
$numconnessione = mysql_connect("{$N_PHPR_DB_HOST}:{$N_PHPR_DB_PORT}", "{$N_PHPR_DB_USER}", "{$N_PHPR_DB_PASS}");
@mysql_query("SET NAMES 'utf8'");
@mysql_query("SET default_storage_engine=MYISAM");
$select_db = mysql_select_db($N_PHPR_DB_NAME);
if (!$select_db) {
$numconnessione = "";
} else {
$character_set = mysql_query("SHOW VARIABLES LIKE 'character_set_database'");
$collation = mysql_query("SHOW VARIABLES LIKE 'collation_database'");
if (mysql_num_rows($character_set) == 1 and mysql_num_rows($collation) == 1) {
$character_set_db = mysql_result($character_set, 0, 'Value');
$collation_db = mysql_result($collation, 0, 'Value');
if ($character_set_db != "utf8" or $collation_db != "utf8_general_ci") {
mysql_query("alter database {$N_PHPR_DB_NAME} default character set 'utf8' collate 'utf8_general_ci'");
}
}
# fine if (mysql_num_rows($character_set) == 1 and mysql_num_rows($collation) == 1)
}
# fine else if (!$select_db)
}
# fine if ($N_PHPR_DB_TYPE == "mysql")
if ($N_PHPR_DB_TYPE == "mysqli") {
$DATETIME = "datetime";
$MEDIUMTEXT = "mediumtext";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI") {
dl("mysqli.so");
$ext_mysql_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_mysql_caricata != "SI")
global $link_mysqli;
$numconnessione = mysqli_connect($N_PHPR_DB_HOST, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, "", $N_PHPR_DB_PORT);
$link_mysqli = $numconnessione;
@mysqli_query($numconnessione, "SET NAMES 'utf8'");
@mysqli_query($numconnessione, "SET default_storage_engine=MYISAM");
$select_db = mysqli_select_db($numconnessione, $N_PHPR_DB_NAME);
if (!$select_db) {
$numconnessione = "";
} else {
$character_set = mysqli_query($numconnessione, "SHOW VARIABLES LIKE 'character_set_database'");
$collation = mysqli_query($numconnessione, "SHOW VARIABLES LIKE 'collation_database'");
if (mysqli_num_rows($character_set) == 1 and mysqli_num_rows($collation) == 1) {
$character_set_db = mysqli_fetch_assoc($character_set);
$character_set_db = $character_set_db['Value'];
$collation_db = mysqli_fetch_assoc($collation);
$collation_db = $collation_db['Value'];
if ($character_set_db != "utf8" or $collation_db != "utf8_general_ci") {
mysqli_query($numconnessione, "alter database {$N_PHPR_DB_NAME} default character set 'utf8' collate 'utf8_general_ci'");
}
}
# fine if (mysqli_num_rows($character_set) == 1 and mysqli_num_rows($collation) == 1)
}
# fine else if (!$select_db)
}
# fine if ($N_PHPR_DB_TYPE == "mysqli")
if ($N_PHPR_DB_TYPE == "sqlite") {
$DATETIME = "text";
$MEDIUMTEXT = "text";
if ($N_PHPR_LOAD_EXT == "SI" and $ext_sqlite_caricata != "SI") {
dl("sqlite.so");
$ext_sqlite_caricata = "SI";
}
# fine if ($N_PHPR_LOAD_EXT == "SI" and $ext_sqlite_caricata != "SI")
$numconnessione = new SQLite3(C_DATA_PATH . "/db_" . $N_PHPR_DB_NAME);
}
# fine if ($N_PHPR_DB_TYPE == "sqlite")
if ($numconnessione) {
$fileaperto = fopen(C_DATA_PATH . "/dati_connessione.php", "w+");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
if ($HOTELD_DB_TYPE) {
$N_PHPR_DB_TYPE = "";
}
if ($HOTELD_DB_NAME) {
$N_PHPR_DB_NAME = "";
}
if ($HOTELD_DB_HOST) {
$N_PHPR_DB_HOST = "";
}
if (strcmp($HOTELD_DB_PORT, "")) {
$N_PHPR_DB_PORT = "";
}
if ($HOTELD_DB_USER) {
$N_PHPR_DB_USER = "";
}
if (strcmp($HOTELD_DB_PASS, "")) {
$N_PHPR_DB_PASS = "";
}
if ($HOTELD_TAB_PRE) {
$N_PHPR_TAB_PRE = "";
}
}
# fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
$N_PHPR_DB_NAME = aggiungi_slash($N_PHPR_DB_NAME);
$N_PHPR_DB_HOST = aggiungi_slash($N_PHPR_DB_HOST);
$N_PHPR_DB_USER = aggiungi_slash($N_PHPR_DB_USER);
$N_PHPR_DB_PASS = aggiungi_slash($N_PHPR_DB_PASS);
fwrite($fileaperto, "<?php\n\$PHPR_DB_TYPE = \"{$N_PHPR_DB_TYPE}\";\n\$PHPR_DB_NAME = \"{$N_PHPR_DB_NAME}\";\n\$PHPR_DB_HOST = \"{$N_PHPR_DB_HOST}\";\n\$PHPR_DB_PORT = \"{$N_PHPR_DB_PORT}\";\n\$PHPR_DB_USER = \"{$N_PHPR_DB_USER}\";\n\$PHPR_DB_PASS = \"{$N_PHPR_DB_PASS}\";\n\$PHPR_LOAD_EXT = \"{$N_PHPR_LOAD_EXT}\";\n\$PHPR_TAB_PRE = \"{$N_PHPR_TAB_PRE}\";\n\$PHPR_LOG = \"{$phpr_log}\";\n");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) {
fwrite($fileaperto, "\n\$HOTELD_DB_TYPE = \"\";\n\$HOTELD_DB_NAME = \"\";\n\$HOTELD_DB_HOST = \"\";\n\$HOTELD_DB_PORT = \"\";\n\$HOTELD_DB_USER = \"\";\n\$HOTELD_DB_PASS = \"\";\n\$HOTELD_TAB_PRE = \"\";\nrequire('" . C_EXT_DB_DATA_PATH . "');\nif (\$HOTELD_DB_TYPE) \$PHPR_DB_TYPE = \$HOTELD_DB_TYPE;\nif (\$HOTELD_DB_NAME) \$PHPR_DB_NAME = \$HOTELD_DB_NAME;\nif (\$HOTELD_DB_HOST) \$PHPR_DB_HOST = \$HOTELD_DB_HOST;\nif (strcmp(\$HOTELD_DB_PORT,\"\")) \$PHPR_DB_PORT = \$HOTELD_DB_PORT;\nif (\$HOTELD_DB_USER) \$PHPR_DB_USER = \$HOTELD_DB_USER;\nif (strcmp(\$HOTELD_DB_PASS,\"\")) \$PHPR_DB_PASS = \$HOTELD_DB_PASS;\nif (\$HOTELD_TAB_PRE) \$PHPR_TAB_PRE = \$HOTELD_TAB_PRE;\n");
}
fwrite($fileaperto, "?>");
fclose($fileaperto);
@chmod(C_DATA_PATH . "/dati_connessione.php", 0640);
$leggendo_backup = "NO";
$leggendo_database = "NO";
$leggendo_tabella = "NO";
$leggendo_colonne = "NO";
$leggendo_righe = "NO";
$leggendo_file = "NO";
$leggendo_contenuto = "NO";
$nome_file = "";
$linee_inserite_in_tabella = "";
$ultima_linea = "";
$fbackup = fopen($file, "r");
if ($fbackup) {
$leggendo_righe = "NO";
while (!feof($fbackup)) {
unset($linee_backup);
$linee_backup = fread($fbackup, 524288);
$linee_backup = explode("\n", $linee_backup);
$num_linee_backup = count($linee_backup) - 1;
$linee_backup[0] = $ultima_linea . $linee_backup[0];
if (!feof($fbackup)) {
$ultima_linea = $linee_backup[$num_linee_backup];
} else {
$num_linee_backup++;
}
for ($num1 = 0; $num1 < $num_linee_backup; $num1++) {
$linea = togli_acapo($linee_backup[$num1]);
unset($linee_backup[$num1]);
# Keep alive
if (substr($num1, -3) == "000") {
http_keep_alive(" ");
}
if ($linea == "</backup>" and $leggendo_righe != "SI") {
$leggendo_backup = "NO";
}
if ($leggendo_backup == "SI") {
if ($linea == "</database>" and $leggendo_righe != "SI") {
$leggendo_database = "NO";
}
# restore del database
if ($leggendo_database == "SI") {
if ($linea == "</tabella>" and $leggendo_righe != "SI") {
$leggendo_tabella = "NO";
}
if ($leggendo_tabella == "SI") {
if (substr($linea, 0, 13) == "<nometabella>") {
$nome_tabella = substr($linea, 13);
$nome_tabella = substr($nome_tabella, 0, -14);
}
# fine if (substr($linea,0,13) == "<nometabella>")
if ($linea == "</colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne == "NO";
if ($nome_tabella == "clienti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "clienti (idclienti integer primary key, cognome varchar(70) not null, nome varchar(70), soprannome varchar(70), sesso char, titolo varchar(30), lingua varchar(14), datanascita date, cittanascita varchar(70), regionenascita varchar(70), nazionenascita varchar(70), documento varchar(70), scadenzadoc date, tipodoc varchar(70), cittadoc varchar(70), regionedoc varchar(70), nazionedoc varchar(70), nazionalita varchar(70), nazione varchar(70), regione varchar(70), citta varchar(70), via varchar(70), numcivico varchar(30), cap varchar(30), telefono varchar(50), telefono2 varchar(50), telefono3 varchar(50), fax varchar(50), email text, cod_fiscale varchar(50), partita_iva varchar(50), commento text, max_num_ordine integer, idclienti_compagni text, doc_inviati text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "relclienti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relclienti (idclienti integer, numero integer, tipo varchar(12), testo1 text, testo2 text, testo3 text, testo4 text, testo5 text, testo6 text, testo7 text, testo8 text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idclienti", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relclienti")
if ($nome_tabella == "anni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "anni (idanni integer primary key, tipo_periodi text)", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "versioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "versioni (idversioni integer primary key, num_versione float4)", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "nazioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "nazioni (idnazioni integer primary key, nome_nazione varchar(70), codice_nazione varchar(50), codice2_nazione varchar(50), codice3_nazione varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "regioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "regioni (idregioni integer primary key, nome_regione varchar(70), codice_regione varchar(50), codice2_regione varchar(50), codice3_regione varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "citta") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "citta (idcitta integer primary key, nome_citta varchar(70), codice_citta varchar(50), codice2_citta varchar(50), codice3_citta varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "documentiid") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "documentiid (iddocumentiid integer primary key, nome_documentoid varchar(70), codice_documentoid varchar(50), codice2_documentoid varchar(50), codice3_documentoid varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "parentele") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "parentele (idparentele integer primary key, nome_parentela varchar(70), codice_parentela varchar(50), codice2_parentela varchar(50), codice3_parentela varchar(50), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "personalizza") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "personalizza (idpersonalizza varchar(50) not null, idutente integer, valpersonalizza text, valpersonalizza_num integer)", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "appartamenti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "appartamenti (idappartamenti varchar(100) primary key, numpiano text, maxoccupanti integer, numcasa text, app_vicini text, priorita integer, priorita2 integer, letto varchar(1), commento text )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "utenti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "utenti (idutenti integer primary key, nome_utente text, password text, salt text, tipo_pass varchar(1), datainserimento {$DATETIME}, hostinserimento varchar(50) )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "gruppi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "gruppi (idgruppi integer primary key, nome_gruppo text )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "privilegi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "privilegi (idutente integer, anno integer, regole1_consentite text, tariffe_consentite text, costi_agg_consentiti text, contratti_consentiti text, casse_consentite text, cassa_pagamenti varchar(70), priv_ins_prenota varchar(20), priv_mod_prenota varchar(35), priv_mod_pers varchar(15), priv_ins_clienti varchar(5), prefisso_clienti text, priv_ins_costi varchar(10), priv_vedi_tab varchar(30), priv_ins_tariffe varchar(10), priv_ins_regole varchar(10), priv_messaggi varchar(10), priv_inventario varchar(10) )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "relutenti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relutenti (idutente integer not null, idnazione integer, idregione integer, idcitta integer, iddocumentoid integer, idparentela integer, idsup integer, predef integer, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idutente", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relutenti")
if ($nome_tabella == "relgruppi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relgruppi (idutente integer not null, idgruppo integer, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idutente", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relgruppi")
if ($nome_tabella == "sessioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "sessioni (idsessioni varchar(30) primary key, idutente integer, indirizzo_ip text, tipo_conn varchar(12), user_agent text, ultimo_accesso {$DATETIME} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "transazioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "transazioni (idtransazioni varchar(30) primary key, idsessione varchar(30), tipo_transazione varchar(5), anno integer, spostamenti text, dati_transazione1 text, dati_transazione2 text, dati_transazione3 text, dati_transazione4 text, dati_transazione5 text, dati_transazione6 text, dati_transazione7 text, dati_transazione8 text, dati_transazione9 text, dati_transazione10 text, dati_transazione11 text, dati_transazione12 text, dati_transazione13 text, dati_transazione14 text, dati_transazione15 text, dati_transazione16 text, dati_transazione17 text, dati_transazione18 text, dati_transazione19 text, dati_transazione20 text, ultimo_accesso {$DATETIME})", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "transazioniweb") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "transazioniweb (idtransazioni varchar(30) primary key, idsessione varchar(30), tipo_transazione varchar(5), anno integer, spostamenti text, dati_transazione1 text, dati_transazione2 text, dati_transazione3 text, dati_transazione4 text, dati_transazione5 text, dati_transazione6 text, dati_transazione7 text, dati_transazione8 text, dati_transazione9 text, dati_transazione10 text, dati_transazione11 text, dati_transazione12 text, dati_transazione13 text, dati_transazione14 text, dati_transazione15 text, dati_transazione16 text, dati_transazione17 text, dati_transazione18 text, dati_transazione19 text, dati_transazione20 text, ultimo_accesso {$DATETIME})", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "descrizioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "descrizioni (nome text not null, tipo varchar(16), lingua varchar(3), numero integer, testo {$MEDIUMTEXT} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "beniinventario") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "beniinventario (idbeniinventario integer primary key, nome_bene varchar(70), codice_bene varchar(50), descrizione_bene text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "magazzini") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "magazzini (idmagazzini integer primary key, nome_magazzino varchar(70), codice_magazzino varchar(50), descrizione_magazzino text, numpiano text, numcasa text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "relinventario") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "relinventario (idbeneinventario integer not null, idappartamento varchar(100), idmagazzino integer, quantita integer, quantita_min_predef integer, richiesto_checkin varchar(2), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idbeneinventario", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if ($nome_tabella == "relinventario")
if ($nome_tabella == "casse") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "casse (idcasse integer primary key, nome_cassa varchar(70), stato varchar(8), codice_cassa varchar(50), descrizione_cassa text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "contratti") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "contratti (numero integer, tipo varchar(8), testo {$MEDIUMTEXT} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "cache") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "cache (numero integer, tipo varchar(8), testo {$MEDIUMTEXT}, data_modifica {$DATETIME}, datainserimento {$DATETIME} )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "interconnessioni") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "interconnessioni (idlocale integer, idremoto1 text, idremoto2 text, tipoid varchar(12), nome_ic varchar(24), anno integer, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if ($nome_tabella == "messaggi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "messaggi (idmessaggi integer primary key, tipo_messaggio varchar(8), stato varchar(8), idutenti text, idutenti_visto text, datavisione {$DATETIME}, mittente text, testo text, dati_messaggio1 text, dati_messaggio2 text, dati_messaggio3 text, dati_messaggio4 text, dati_messaggio5 text, dati_messaggio6 text, dati_messaggio7 text, dati_messaggio8 text, dati_messaggio9 text, dati_messaggio10 text, dati_messaggio11 text, dati_messaggio12 text, dati_messaggio13 text, dati_messaggio14 text, dati_messaggio15 text, dati_messaggio16 text, dati_messaggio17 text, dati_messaggio18 text, dati_messaggio19 text, dati_messaggio20 text, datainserimento {$DATETIME})", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 7) == "prenota") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idprenota integer primary key, idclienti integer, idappartamenti varchar(100), iddatainizio integer, iddatafine integer, assegnazioneapp varchar(4), app_assegnabili text, num_persone integer, idprenota_compagna text, tariffa text, tariffesettimanali text, incompatibilita text, sconto float8, tariffa_tot float8, caparra float8, commissioni float8, tasseperc float4, pagato float8, metodo_pagamento text, origine varchar(70), codice varchar(10), commento text, conferma varchar(4), checkin {$DATETIME}, checkout {$DATETIME}, id_anni_prec text, datainserimento {$DATETIME}, hostinserimento varchar(50), data_modifica {$DATETIME}, utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 12) == "costiprenota") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idcostiprenota integer primary key, idprenota integer, tipo varchar(2), nome varchar(40), valore float8, valore_perc float8, arrotonda float4, tasseperc float4, associasett varchar(1), settimane text, moltiplica text, categoria text, letto varchar(1), numlimite integer, idntariffe integer, variazione varchar(10), varmoltiplica text, varnumsett varchar(20), varperiodipermessi text, varbeniinv text, varappincompatibili text, vartariffeassociate varchar(10), vartariffeincomp text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer)", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idprenota", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
} else {
if (substr($nome_tabella, 0, 5) == "costi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idcosti integer unique,nome_costo text, val_costo float8, tipo_costo text, nome_cassa varchar(70), persona_costo text, provenienza_costo text, metodo_pagamento text, datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer)", $N_PHPR_DB_TYPE);
}
}
if (substr($nome_tabella, 0, 15) == "rclientiprenota") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idprenota integer, idclienti integer, num_ordine integer, parentela varchar(70), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer )", $N_PHPR_DB_TYPE);
crea_indice2($N_PHPR_TAB_PRE . $nome_tabella, "idprenota", $N_PHPR_TAB_PRE . "iidp" . $nome_tabella, $N_PHPR_DB_TYPE);
}
# fine if (substr($nome_tabella,0,15) == "rclientiprenota")
if (substr($nome_tabella, 0, 6) == "regole") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idregole integer, app_agenzia varchar(100), tariffa_chiusa text, tariffa_per_app text, tariffa_per_utente text, tariffa_per_persone text, tariffa_commissioni integer, iddatainizio integer, iddatafine integer, motivazione text, motivazione2 text )", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 5) == "soldi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idsoldi integer unique, motivazione text, id_pagamento text, metodo_pagamento text, saldo_prenota float8, saldo_cassa float8, soldi_prima float8, data_inserimento {$DATETIME}, utente_inserimento integer )", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 7) == "periodi") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idperiodi integer primary key, datainizio date not null, datafine date{$lista_tariffe})", $N_PHPR_DB_TYPE);
}
if (substr($nome_tabella, 0, 8) == "ntariffe") {
esegui_query2("create table " . $N_PHPR_TAB_PRE . "{$nome_tabella} (idntariffe integer, nomecostoagg varchar(40), tipo_ca varchar(2), valore_ca float8, valore_perc_ca float8, arrotonda_ca float4, tasseperc_ca float4, associasett_ca varchar(1), numsett_ca varchar(20), moltiplica_ca text, periodipermessi_ca text, beniinv_ca text, appincompatibili_ca text, variazione_ca varchar(20), mostra_ca varchar(10), categoria_ca text, letto_ca varchar(1), numlimite_ca integer, regoleassegna_ca varchar(30), utente_inserimento integer{$lista_tariffe})", $N_PHPR_DB_TYPE);
}
}
# fine if ($linea == "</colonnetabella>" and $leggendo_righe != "SI")
if ($leggendo_colonne == "SI") {
if (substr($linea, 0, 13) == "<nomecolonna>") {
$num_colonne++;
$nome_colonna[$num_colonne] = substr($linea, 13);
$nome_colonna[$num_colonne] = substr($nome_colonna[$num_colonne], 0, -14);
if (substr($nome_tabella, 0, 7) == "periodi" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe .= ", " . $nome_colonna[$num_colonne] . " float8";
}
if (substr($nome_tabella, 0, 8) == "ntariffe" and substr($nome_colonna[$num_colonne], 0, 7) == "tariffa") {
$lista_tariffe .= ", " . $nome_colonna[$num_colonne] . " varchar(40)";
}
}
# fine if (substr($linea,0,13) == "<nomecolonna>")
if (substr($linea, 0, 13) == "<tipocolonna>") {
$tipo_colonna[$num_colonne] = substr($linea, 13);
$tipo_colonna[$num_colonne] = substr($tipo_colonna[$num_colonne], 0, -14);
}
# fine if (substr($linea,0,13) == "<tipocolonna>")
}
# fine if ($leggendo_colonne == "SI")
if ($linea == "<colonnetabella>" and $leggendo_righe != "SI") {
$leggendo_colonne = "SI";
$num_colonne = 0;
$lista_tariffe = "";
}
# fine if ($linea == "<colonnetabella>" and $leggendo_righe != "SI")
if ($linea == "</righetabella>") {
$leggendo_righe = "NO";
}
if ($leggendo_righe == "SI") {
if (substr($linea, 0, 6) == "<riga>") {
$riga = substr($linea, 11);
} else {
$riga .= "\n" . $linea;
}
# fine else if (substr($linea,0,6) == "<riga>")
if (substr($linea, -7) == "</riga>") {
$riga = substr($riga, 0, -13);
$riga = explode("</cmp><cmp>", $riga);
$lista_valori = "";
$query = "insert into " . $N_PHPR_TAB_PRE . "{$nome_tabella} (";
for ($num2 = 0; $num2 < count($riga); $num2++) {
aggslashdb2($riga[$num2], $N_PHPR_DB_TYPE);
if ($riga[$num2] != "") {
$query .= $nome_colonna[$num2 + 1] . ",";
}
}
# fine for $num2
$query = substr($query, 0, -1) . ") values (";
for ($num2 = 0; $num2 < count($riga); $num2++) {
if ($riga[$num2] != "") {
$riga[$num2] = str_replace("</righetabella@%&@>", "</righetabella>", $riga[$num2]);
$riga[$num2] = str_replace("</riga@%&@>", "</riga>", $riga[$num2]);
$riga[$num2] = str_replace("<riga@%&@>", "<riga>", $riga[$num2]);
$riga[$num2] = str_replace("</cmp@%&@>", "</cmp>", $riga[$num2]);
$riga[$num2] = str_replace("@%&@@%&@", "@%&@", $riga[$num2]);
$query .= "'" . $riga[$num2] . "',";
}
# fine if ($riga[$num2] != "")
}
# fine for $num2
$query = substr($query, 0, -1) . ")";
#echo $query<br>";
esegui_query3($query, $N_PHPR_DB_TYPE);
}
# fine if (substr($linea,-7) == "</riga>")
}
# fine if ($leggendo_righe == "SI")
if ($linea == "<righetabella>") {
$leggendo_righe = "SI";
$linee_inserite_in_tabella[$nome_tabella] = 0;
}
# fine if ($linea == "<righetabella>")
}
# fine if ($leggendo_tabella == "SI")
if ($linea == "<tabella>" and $leggendo_righe != "SI") {
$leggendo_tabella = "SI";
}
} else {
# restore dei files
if ($linea == "</file>") {
$leggendo_file = "NO";
}
if ($leggendo_file == "SI") {
if ($nome_file) {
if ($leggendo_contenuto == "SI") {
if (substr($linea, -12) == "</contenuto>") {
$nome_file = "";
$leggendo_contenuto = "NO";
$linea = substr($linea, 0, -12);
fwrite($fileaperto, $linea);
fclose($fileaperto);
} else {
fwrite($fileaperto, $linea . "\n");
}
# fine else if (substr($linea,-12) == "</contenuto>")
}
# fine if ($leggendo_contenuto == "SI")
if ($linea == "<contenuto>") {
$leggendo_contenuto = "SI";
}
}
# fine if ($nome_file)
if (substr($linea, 0, 10) == "<nomefile>") {
$nome_file = substr($linea, 10);
$nome_file = substr($nome_file, 0, -11);
if (substr($nome_file, 0, 7) == "./data/") {
$nome_file = C_DATA_PATH . substr($nome_file, 6);
}
if ($nome_file) {
$fileaperto = fopen("{$nome_file}", "w+");
}
}
# fine if (substr($linea,0,10) == "<nomefile>")
}
# fine if ($leggendo_file == "SI")
if ($linea == "<file>" and $leggendo_modello != "SI") {
$leggendo_file = "SI";
}
}
# fine else if ($leggendo_database == "SI")
if ($linea == "<database>" and $leggendo_modello != "SI") {
$leggendo_database = "SI";
}
# restore dei modelli
if ($linea == "</modello>") {
$leggendo_modello = "NO";
$leggendo_contenuto_mod = "NO";
$nome_modello = "";
}
# fine if ($linea == "</modello>")
if ($leggendo_modello == "SI") {
if ($nome_modello) {
if ($leggendo_contenuto_mod == "SI") {
if (substr($linea, -12) == "</contenuto>") {
$leggendo_contenuto_mod = "NO";
$linea = substr($linea, 0, -12);
$contenuto_mod[$dir_modello][$nome_modello] .= $linea . "\n";
$nome_modello = "";
} else {
$contenuto_mod[$dir_modello][$nome_modello] .= $linea . "\n";
}
# fine else if (substr($linea,-12) == "</contenuto>")
}
# fine if ($leggendo_contenuto_mod == "SI")
if ($linea == "<contenuto>") {
$leggendo_contenuto_mod = "SI";
}
} else {
if (substr($linea, 0, 12) == "<dirmodello>") {
$dir_modello = substr($linea, 12);
$dir_modello = substr($dir_modello, 0, -13);
if (substr($dir_modello, -1) == "/") {
$dir_modello = substr($dir_modello, 0, -1);
}
if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "") {
$c_cartella_crea_mod = C_CARTELLA_CREA_MODELLI;
if (substr($c_cartella_crea_mod, -1) == "/") {
$c_cartella_crea_mod = substr($c_cartella_crea_mod, 0, -1);
}
if (substr($dir_modello . "/", 0, strlen($c_cartella_crea_mod . "/")) != $c_cartella_crea_mod . "/") {
$dir_modello = "";
}
if (str_replace("..", "", $dir_modello) != $dir_modello) {
$dir_modello = "";
}
}
# fine if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "")
}
# fine if (substr($linea,0,12) == "<dirmodello>")
if (substr($linea, 0, 13) == "<nomemodello>" and $dir_modello) {
$nome_modello = substr($linea, 13);
$nome_modello = substr($nome_modello, 0, -14);
if (substr($nome_modello, -4) != ".php") {
$nome_modello = "";
}
if (str_replace(".php", "", substr($nome_modello, 0, -4)) != substr($nome_modello, 0, -4)) {
$nome_modello = "";
}
}
# fine if (substr($linea,0,13) == "<nomemodello>" and $dir_modello)
}
# fine else if ($nome_modello)
}
# fine if ($leggendo_modello == "SI")
if ($linea == "<modello>" and $leggendo_database != "SI" and $leggendo_file != "SI") {
$leggendo_modello = "SI";
}
}
# fine if ($leggendo_backup == "SI")
if ($linea == "<backup>") {
$leggendo_backup = "SI";
}
}
# fine for $num1
}
# fine while (!feof($fbackup))
fclose($fbackup);
echo "<br>";
}
# fine if ($fbackup)
# Se si sono mantenuti gli anni non presenti nel backup, aggiorno i loro data ed importo eventuali clienti mancanti
if ($mantieni_anni and @is_array($anno_mantieni)) {
for ($num1 = 0; $num1 < $num_anni_vecchi; $num1++) {
$anno_vecchio = risul_query($anni_vecchi, $num1, 'idanni');
if ($anno_mantieni[$anno_vecchio]) {
esegui_query("insert into " . $PHPR_TAB_PRE . "anni (idanni,tipo_periodi) values ('{$anno_vecchio}','" . risul_query($anni_vecchi, $num1, 'tipo_periodi') . "') ");
}
# fine if ($anno_mantieni[$anno_vecchio])
}
# fine for $num1
unset($id_utenti_vecchi);
$id_utenti_vecchi[1] = 1;
for ($num1 = 0; $num1 < numlin_query($utenti_vecchi); $num1++) {
$idutente_vecchio = risul_query($utenti_vecchi, $num1, 'idutenti');
if ($idutente_vecchio != 1) {
$datainserimento = risul_query($utenti_vecchi, $num1, 'datainserimento');
if (!$datainserimento) {
$cond_datainserimento = "datainserimento is NULL";
} else {
$cond_datainserimento = "datainserimento = '" . aggslashdb($datainserimento) . "'";
}
$hostinserimento = risul_query($utenti_vecchi, $num1, 'hostinserimento');
if (!strcmp($hostinserimento, "")) {
$cond_hostinserimento = "(hostinserimento is NULL or hostinserimento = '')";
} else {
$cond_hostinserimento = "hostinserimento = '" . aggslashdb($hostinserimento) . "'";
}
$utente_esistente = esegui_query("select idutenti from " . $PHPR_TAB_PRE . "utenti where idutenti = '{$idutente_vecchio}' and {$cond_datainserimento} and {$cond_hostinserimento} ");
if (!numlin_query($utente_esistente)) {
reset($anno_mantieni);
while (list($anno_vecchio, $val) = each($anno_mantieni)) {
esegui_query("update " . $PHPR_TAB_PRE . "prenota{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "costi{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "costiprenota{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "rclientiprenota{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} set utente_inserimento = '1' where utente_inserimento = '{$idutente_vecchio}' ");
if (@is_file(C_DATA_PATH . "/selectperiodi{$anno_vecchio}.{$idutente_vecchio}.php")) {
unlink(C_DATA_PATH . "/selectperiodi{$anno_vecchio}.{$idutente_vecchio}.php");
}
if (@is_file(C_DATA_PATH . "/selperiodimenu{$anno_vecchio}.{$idutente_vecchio}.php")) {
unlink(C_DATA_PATH . "/selperiodimenu{$anno_vecchio}.{$idutente_vecchio}.php");
}
}
# fine while (list($anno_vecchio,$val) = each($anno_mantieni))
$id_utenti_vecchi[$idutente_vecchio] = 1;
} else {
$id_utenti_vecchi[$idutente_vecchio] = $idutente_vecchio;
}
}
# fine if ($idutente_vecchio != 1)
}
# fine for $num1
unset($id_clienti_vecchi);
unset($id_clienti_inseriti);
$max_clienti = esegui_query("select max(idclienti) from " . $PHPR_TAB_PRE . "clienti");
$max_clienti = risul_query($max_clienti, 0, 0);
if ($max_clienti_vecchi > $max_clienti) {
$max_clienti = $max_clienti_vecchi;
}
for ($num1 = 0; $num1 < numlin_query($clienti_vecchi); $num1++) {
$idcliente_vecchio = risul_query($clienti_vecchi, $num1, 'idclienti');
$cliente_presente = 0;
reset($anno_mantieni);
while (list($anno_vecchio, $val) = each($anno_mantieni)) {
$idcliente_presente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "prenota{$anno_vecchio} where idclienti = '{$idcliente_vecchio}' ");
$idcliente_presente2 = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "rclientiprenota{$anno_vecchio} where idclienti = '{$idcliente_vecchio}' ");
$idcliente_presente3 = esegui_query("select idsoldi from " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} where motivazione {$LIKE} '{$idcliente_vecchio};%' ");
if (numlin_query($idcliente_presente) or numlin_query($idcliente_presente2) or numlin_query($idcliente_presente3)) {
$cliente_presente = 1;
break;
}
# fine if (numlin_query($idcliente_presente) or numlin_query($idcliente_presente2) or...
}
# fine while (list($anno_vecchio,$val) = each($anno_mantieni))
if ($cliente_presente) {
$datainserimento = risul_query($clienti_vecchi, $num1, 'datainserimento');
if (!$datainserimento) {
$cond_datainserimento = "datainserimento is NULL";
} else {
$cond_datainserimento = "datainserimento = '" . aggslashdb($datainserimento) . "'";
}
$hostinserimento = risul_query($clienti_vecchi, $num1, 'hostinserimento');
if (!strcmp($hostinserimento, "")) {
$cond_hostinserimento = "(hostinserimento is NULL or hostinserimento = '')";
} else {
$cond_hostinserimento = "hostinserimento = '" . aggslashdb($hostinserimento) . "'";
}
$cliente_esistente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "clienti where idclienti = '{$idcliente_vecchio}' and {$cond_datainserimento} and {$cond_hostinserimento} ");
if (!numlin_query($cliente_esistente)) {
$cliente_esistente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "clienti where cognome = '" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cognome')) . "' and {$cond_datainserimento} and {$cond_hostinserimento} ");
if (numlin_query($cliente_esistente) == 1) {
$id_nuovo = risul_query($cliente_esistente, 0, 'idclienti');
} else {
$id_esistente = esegui_query("select idclienti from " . $PHPR_TAB_PRE . "clienti where idclienti = '{$idcliente_vecchio}' ");
if (numlin_query($id_esistente)) {
$max_clienti++;
$id_nuovo = $max_clienti;
} else {
$id_nuovo = $idcliente_vecchio;
}
esegui_query("insert into " . $PHPR_TAB_PRE . "clienti (idclienti,cognome,nome,soprannome,sesso,titolo,lingua,cittanascita,regionenascita,nazionenascita,documento,tipodoc,cittadoc,regionedoc,nazionedoc,nazionalita,nazione,regione,citta,via,numcivico,cap,telefono,telefono2,telefono3,fax,email,cod_fiscale,partita_iva,commento,max_num_ordine,idclienti_compagni,doc_inviati,hostinserimento,utente_inserimento) values ('{$id_nuovo}',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cognome')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nome')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'soprannome')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'sesso')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'titolo')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'lingua')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cittanascita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'regionenascita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazionenascita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'documento')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'tipodoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cittadoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'regionedoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazionedoc')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazionalita')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'nazione')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'regione')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'citta')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'via')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'numcivico')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cap')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'telefono')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'telefono2')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'telefono3')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'fax')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'email')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'cod_fiscale')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'partita_iva')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'commento')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'max_num_ordine')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'idclienti_compagni')) . "',\n'" . aggslashdb(risul_query($clienti_vecchi, $num1, 'doc_inviati')) . "',\n'" . aggslashdb($hostinserimento) . "',\n'" . $id_utenti_vecchi[risul_query($clienti_vecchi, $num1, 'utente_inserimento')] . "') ");
$datanascita = risul_query($clienti_vecchi, $num1, 'datanascita');
if ($datanascita) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set datanascita = '" . aggslashdb($datanascita) . "' where idclienti = '{$id_nuovo}' ");
}
$scadenzadoc = risul_query($clienti_vecchi, $num1, 'scadenzadoc');
if ($scadenzadoc) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set scadenzadoc = '" . aggslashdb($scadenzadoc) . "' where idclienti = '{$id_nuovo}' ");
}
if ($datainserimento) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set datainserimento = '" . aggslashdb($datainserimento) . "' where idclienti = '{$id_nuovo}' ");
}
$id_clienti_inseriti[$idcliente_vecchio] = $id_nuovo;
}
# fine else if (numlin_query($cliente_esistente) == 1)
$id_clienti_vecchi[$idcliente_vecchio] = $id_nuovo;
if ($id_nuovo != $idcliente_vecchio) {
reset($anno_mantieni);
while (list($anno_vecchio, $val) = each($anno_mantieni)) {
esegui_query("update " . $PHPR_TAB_PRE . "prenota{$anno_vecchio} set idclienti = '{$id_nuovo}' where idclienti = '{$idcliente_vecchio}' ");
esegui_query("update " . $PHPR_TAB_PRE . "rclientiprenota{$anno_vecchio} set idclienti = '{$id_nuovo}' where idclienti = '{$idcliente_vecchio}' ");
$storia_soldi = esegui_query("select * from " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} where motivazione {$LIKE} '{$idcliente_vecchio};%' ");
for ($num2 = 0; $num2 < numlin_query($storia_soldi); $num2++) {
$idsoldi = risul_query($storia_soldi, $num2, 'idsoldi');
$motivazione = risul_query($storia_soldi, $num2, 'motivazione');
$motivazione = $id_nuovo . substr($motivazione, strlen($idcliente_vecchio));
esegui_query("update " . $PHPR_TAB_PRE . "soldi{$anno_vecchio} set motivazione = '{$motivazione}' where idsoldi = '{$idsoldi}' ");
}
# fine for $num2
}
# fine while (list($anno_vecchio,$val) = each($anno_mantieni))
}
# fine if ($id_nuovo != $idcliente_vecchio)
} else {
$id_clienti_vecchi[$idcliente_vecchio] = $idcliente_vecchio;
}
}
# fine if ($cliente_presente)
}
# fine for $num1
if (@is_array($id_clienti_inseriti)) {
reset($id_clienti_inseriti);
while (list($idcliente_vecchio, $id_nuovo) = each($id_clienti_inseriti)) {
$n_idclienti_compagni = ",";
$idclienti_compagni = esegui_query("select idclienti_compagni from " . $PHPR_TAB_PRE . "clienti where idclienti = '{$id_nuovo}' ");
$idclienti_compagni = risul_query($idclienti_compagni, 0, 'idclienti_compagni');
$idclienti_compagni_vett = explode(",", $idclienti_compagni);
for ($num1 = 1; $num1 < count($idclienti_compagni_vett) - 1; $num1++) {
if ($id_clienti_vecchi[$idclienti_compagni_vett[$num1]]) {
$n_idclienti_compagni .= $id_clienti_vecchi[$idclienti_compagni_vett[$num1]] . ",";
}
}
# fine for $num1
if ($n_idclienti_compagni != $idclienti_compagni) {
esegui_query("update " . $PHPR_TAB_PRE . "clienti set idclienti_compagni = '{$n_idclienti_compagni}' where idclienti = '{$id_nuovo}' ");
}
}
# fine while (list($idcliente_vecchio,$id_nuovo) = each($id_clienti_inseriti))
}
# fine if (@is_array($id_clienti_inseriti))
for ($num1 = 0; $num1 < numlin_query($privilegi_vecchi); $num1++) {
$anno_priv = risul_query($privilegi_vecchi, $num1, 'anno');
if ($anno_mantieni[$anno_priv]) {
$idutente_priv = risul_query($privilegi_vecchi, $num1, 'idutente');
if ($id_utenti_vecchi[$idutente_priv] != 1) {
esegui_query("insert into " . $PHPR_TAB_PRE . "privilegi (idutente,anno,regole1_consentite,tariffe_consentite,costi_agg_consentiti,contratti_consentiti,priv_ins_prenota,priv_mod_prenota,priv_mod_pers,priv_ins_clienti,prefisso_clienti,priv_ins_costi,priv_vedi_tab,priv_ins_tariffe,priv_ins_regole,priv_messaggi,priv_inventario) values ('{$idutente_priv}','{$anno_priv}',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'regole1_consentite')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'tariffe_consentite')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'costi_agg_consentiti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'contratti_consentiti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_prenota')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_mod_prenota')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_mod_pers')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_clienti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'prefisso_clienti')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_costi')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_vedi_tab')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_tariffe')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_ins_regole')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_messaggi')) . "',\n'" . aggslashdb(risul_query($privilegi_vecchi, $num1, 'priv_inventario')) . "') ");
}
# fine if ($id_utenti_vecchi[$idutente_priv] != 1)
}
# fine if ($anno_mantieni[$anno_priv])
}
# fine for $num1
for ($num1 = 0; $num1 < numlin_query($personalizza_vecchi); $num1++) {
$idpersonalizza = risul_query($personalizza_vecchi, $num1, 'idpersonalizza');
if ($anno_mantieni[str_replace("giorno_vedi_ini_sett", "", $idpersonalizza)]) {
$idutente_pers = risul_query($personalizza_vecchi, $num1, 'idutente');
if ($id_utenti_vecchi[$idutente_pers] != 1) {
esegui_query("insert into " . $PHPR_TAB_PRE . "personalizza (idpersonalizza,idutente,valpersonalizza,valpersonalizza_num) values ('{$idpersonalizza}','{$idutente_pers}',\n'" . aggslashdb(risul_query($personalizza_vecchi, $num1, 'valpersonalizza')) . "',\n'" . aggslashdb(risul_query($personalizza_vecchi, $num1, 'valpersonalizza_num')) . "') ");
}
# fine if ($id_utenti_vecchi[$idutente_pers] != 1)
}
# fine if ($anno_mantieni[str_replace("giorno_vedi_ini_sett","",$idpersonalizza)])
}
# fine for $num1
}
# fine if ($mantieni_anni and @is_array($anno_mantieni))
if ($silenzio != "SI") {
echo "" . mex("Database creato", $pag) . "<br>";
}
$fatto = "SI";
if (($nuovo_db != "SI" or $database_esistente == "SI") and $character_set_db and ($character_set_db != "utf8" or $collation_db != "utf8_general_ci")) {
esegui_query2("alter database {$N_PHPR_DB_NAME} default character set '{$character_set_db}' collate '{$collation_db}'", $N_PHPR_DB_TYPE);
}
if (@is_array($contenuto_mod) and $N_PHPR_DB_TYPE == $PHPR_DB_TYPE) {
global $prima_parte_html, $lingua_mex;
echo "<br>";
$lingua_mex_orig = $lingua_mex;
if ($silenzio != "SI") {
$silenzio_mod = "SI";
} else {
$silenzio_mod = "totale";
}
global $anno_modello_presente, $num_periodi_date, $modello_esistente, $cambia_frasi, $lingua_modello, $percorso_cartella_modello, $nome_file;
include C_DATA_PATH . "/lingua.php";
$lingua_mex = $lingua[1];
$pag_orig = $pag;
$pag = "crea_modelli.php";
function assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE)
{
global $M_PHPR_DB_TYPE, $M_PHPR_DB_NAME, $M_PHPR_DB_HOST, $M_PHPR_DB_PORT, $M_PHPR_DB_USER, $M_PHPR_DB_PASS, $M_PHPR_LOAD_EXT, $M_PHPR_TAB_PRE;
$M_PHPR_DB_TYPE = $N_PHPR_DB_TYPE;
$M_PHPR_DB_NAME = $N_PHPR_DB_NAME;
$M_PHPR_DB_HOST = $N_PHPR_DB_HOST;
$M_PHPR_DB_PORT = $N_PHPR_DB_PORT;
$M_PHPR_DB_USER = $N_PHPR_DB_USER;
$M_PHPR_DB_PASS = $N_PHPR_DB_PASS;
$M_PHPR_LOAD_EXT = $N_PHPR_LOAD_EXT;
$M_PHPR_TAB_PRE = $N_PHPR_TAB_PRE;
}
# fine function assegna_var_conn_mod
$PHPR_TAB_PRE = $N_PHPR_TAB_PRE;
$tablepersonalizza = $PHPR_TAB_PRE . "personalizza";
include "./includes/funzioni_costi_agg.php";
include "./includes/templates/funzioni_modelli.php";
$modello_esistente = "SI";
$cambia_frasi = "NO";
include "./includes/templates/frasi_mod_disp.php";
include "./includes/templates/funzioni_mod_disp.php";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello]['mdl_disponibilita.php']) {
$lingua_modello = "ita";
$nome_file = mex2("mdl_disponibilita", $pag, $lingua_modello) . ".php";
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello]["{$nome_file}"], "{$percorso_cartella_modello}/{$nome_file_tmp}");
recupera_var_modello_disponibilita($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
crea_modello_disponibilita($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello]["mdl_disponibilita.php"])
}
# fine for $num_cart
$lang_dir = opendir("./includes/lang/");
include C_DATA_PATH . "/lingua.php";
while ($ini_lingua = readdir($lang_dir)) {
if ($ini_lingua != "." && $ini_lingua != "..") {
$nome_file = mex2("mdl_disponibilita", $pag, $ini_lingua) . ".php";
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello][$nome_file]) {
$lingua_modello = $ini_lingua;
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello][$nome_file], "{$percorso_cartella_modello}/{$nome_file_tmp}");
recupera_var_modello_disponibilita($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
crea_modello_disponibilita($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello][$nome_file])
}
# fine for $num_cart
}
# fine if ($file != "." && $file != "..")
}
# fine while ($file = readdir($lang_dig))
closedir($lang_dir);
$templates_dir = opendir("./includes/templates/");
while ($modello_ext = readdir($templates_dir)) {
if ($modello_ext != "." and $modello_ext != ".." and @is_dir("./includes/templates/{$modello_ext}")) {
include "./includes/templates/{$modello_ext}/name.php";
include "./includes/templates/{$modello_ext}/phrases.php";
include "./includes/templates/{$modello_ext}/functions.php";
$funz_recupera_var_modello = "recupera_var_modello_" . $modello_ext;
$funz_crea_modello = "crea_modello_" . $modello_ext;
$funz_mext = "mext_" . $modello_ext;
if ($template_file_name['ita']) {
$nome_file = $template_file_name['ita'];
} else {
$nome_file = "ita_" . $template_file_name["en"];
}
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello][$nome_file]) {
$lingua_modello = "ita";
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello][$nome_file], "{$percorso_cartella_modello}/{$nome_file_tmp}");
$funz_recupera_var_modello($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
$funz_crea_modello($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello][$nome_file])
}
# fine for $num_cart
$lang_dir = opendir("./includes/lang/");
while ($ini_lingua = readdir($lang_dir)) {
if ($ini_lingua != "." && $ini_lingua != "..") {
if ($template_file_name[$ini_lingua]) {
$nome_file = $template_file_name[$ini_lingua];
} else {
$nome_file = $ini_lingua . "_" . $template_file_name['en'];
}
$nome_file_tmp = substr($nome_file, 0, -4) . ".tmp";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if ($contenuto_mod[$percorso_cartella_modello][$nome_file]) {
$lingua_modello = $ini_lingua;
$num_periodi_date = "";
$anno_modello = "";
scrivi_file("<?php exit(); ?>\n" . $contenuto_mod[$percorso_cartella_modello]["{$nome_file}"], "{$percorso_cartella_modello}/{$nome_file_tmp}");
$funz_recupera_var_modello($nome_file_tmp, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
$prima_parte_html = str_replace("<?php exit(); ?>\n", "", $prima_parte_html);
if (substr($prima_parte_html, 0, 70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 70);
}
if (substr($prima_parte_html, 0, 74) == "<?php if (!@\$framed and !@\$_GET[\\'framed\\'] and !@\$_POST[\\'framed\\']) { ?>") {
$prima_parte_html = substr($prima_parte_html, 74);
}
unlink("{$percorso_cartella_modello}/{$nome_file_tmp}");
assegna_var_conn_mod($N_PHPR_DB_TYPE, $N_PHPR_DB_NAME, $N_PHPR_DB_HOST, $N_PHPR_DB_PORT, $N_PHPR_DB_USER, $N_PHPR_DB_PASS, $N_PHPR_LOAD_EXT, $N_PHPR_TAB_PRE);
$anno_modello = $anno_modello_presente;
$funz_crea_modello($percorso_cartella_modello, $anno_modello, $PHPR_TAB_PRE, $pag, $lingua_modello, $silenzio_mod, $fr_frase, $frase, $num_frasi, $tipo_periodi);
}
# fine if ($contenuto_mod[$percorso_cartella_modello][$nome_file])
}
# fine for $num_cart
}
# fine if ($file != "." && $file != "..")
}
# fine while ($file = readdir($lang_dir))
closedir($lang_dir);
}
# fine if ($modello_ext != "." and $modello_ext != ".." and...
}
# fine while ($file = readdir($lang_dig))
closedir($templates_dir);
$pag = $pag_orig;
$lingua_mex = $lingua_mex_orig;
}
# fine if (@is_array($contenuto_mod) and...
} else {
if ($silenzio != "SI") {
echo mex("Non è stato possibile connettersi al nuovo database, controllare i data per la connessione, i privilegi dell' utente o il nome del database", $pag) . ".<br>";
}
}
} else {
if ($silenzio != "SI") {
echo mex("Non è stato possibile creare il nuovo database, controllare i data per la connessione, i privilegi dell' utente, il nome del database o se esiste già un database chiamato", $pag) . " {$N_PHPR_DB_NAME}.<br>";
}
}
}
# fine else if ($file_coerente == "NO")
return $fatto;
}
function cambia_num_tar ($vecchio_num,$nuovo_num,$max_tar) {
global $LIKE,$PHPR_TAB_PRE,$anno;
$tablecostiprenota = $PHPR_TAB_PRE."costiprenota".$anno;
$tablenometariffe = $PHPR_TAB_PRE."ntariffe".$anno;
$tableperiodi = $PHPR_TAB_PRE."periodi".$anno;
$tableregole = $PHPR_TAB_PRE."regole".$anno;
$tableprivilegi = $PHPR_TAB_PRE."privilegi";
$tablemessaggi = $PHPR_TAB_PRE."messaggi";
$tabletransazioni = $PHPR_TAB_PRE."transazioni";
$tabletransazioniweb = $PHPR_TAB_PRE."transazioniweb";
$tabledescrizioni = $PHPR_TAB_PRE."descrizioni";
$tar_vecchia = "tariffa$vecchio_num";
$tar_nuova = "tariffa$nuovo_num";
esegui_query("update $tablenometariffe set $tar_nuova = $tar_vecchia ");
esegui_query("update $tableperiodi set $tar_nuova = $tar_vecchia ");
esegui_query("update $tableperiodi set $tar_nuova"."p = $tar_vecchia"."p ");
esegui_query("update $tableregole set tariffa_per_app = '$tar_nuova' where tariffa_per_app = '$tar_vecchia' ");
esegui_query("update $tableregole set tariffa_per_utente = '$tar_nuova' where tariffa_per_utente = '$tar_vecchia' ");
esegui_query("update $tableregole set tariffa_per_persone = '$tar_nuova' where tariffa_per_persone = '$tar_vecchia' ");
esegui_query("update $tabledescrizioni set nome = '$tar_nuova' where nome = '$tar_vecchia' and (tipo = 'tardescr' or tipo = 'tarfoto' or tipo = 'tarcommfoto') ");
$priv = esegui_query("select * from $tableprivilegi where tariffe_consentite $LIKE '%,$vecchio_num%' and anno = '$anno' ");
$num_priv = numlin_query($priv);
for ($num1 = 0 ; $num1 < $num_priv ; $num1++) {
$idut_priv = risul_query($priv,$num1,'idutente');
$tar_cons = risul_query($priv,$num1,'tariffe_consentite');
$n_tar_cons = substr(str_replace(",$vecchio_num,",",$nuovo_num,",$tar_cons.","),0,-1);
if ($n_tar_cons != $tar_cons) {
$tar_cons = explode(",",$n_tar_cons);
unset($tar_cons_vett);
for ($num2 = 1 ; $num2 < count($tar_cons) ; $num2++) $tar_cons_vett[$tar_cons[$num2]] = 1;
$tar_cons = $tar_cons[0].",";
for ($num2 = 1 ; $num2 <= $max_tar ; $num2++) if ($tar_cons_vett[$num2]) $tar_cons .= "$num2,";
if (strlen($tar_cons) > 2) $tar_cons = substr($tar_cons,0,-1);
esegui_query("update $tableprivilegi set tariffe_consentite = '$tar_cons' where idutente = '$idut_priv' and anno = '$anno'");
} # fine if ($n_tar_cons != $tar_cons)
} # fine for $num1
$costipren = esegui_query("select * from $tablecostiprenota where vartariffeincomp $LIKE '%$vecchio_num%' ");
$num_costipren = numlin_query($costipren);
for ($num1 = 0 ; $num1 < $num_costipren ; $num1++) {
$idcostp = risul_query($costipren,$num1,'idcostiprenota');
$tar_incomp = risul_query($costipren,$num1,'vartariffeincomp');
$n_tar_incomp = substr(str_replace(",$vecchio_num,",",$nuovo_num,",",".$tar_incomp.","),1,-1);
if ($n_tar_incomp != $tar_incomp) {
$tar_incomp = explode(",",$n_tar_incomp);
unset($tar_incomp_vett);
for ($num2 = 0 ; $num2 < count($tar_incomp) ; $num2++) $tar_incomp_vett[$tar_incomp[$num2]] = 1;
$tar_incomp = "";
for ($num2 = 1 ; $num2 <= $max_tar ; $num2++) if ($tar_incomp_vett[$num2]) $tar_incomp .= "$num2,";
$tar_incomp = substr($tar_incomp,0,-1);
esegui_query("update $tablecostiprenota set vartariffeincomp = '$tar_incomp' where idcostiprenota = '$idcostp' ");
} # fine if ($n_tar_incomp != $tar_incomp)
} # fine for $num1
$mess = esegui_query("select * from $tablemessaggi where tipo_messaggio = 'rprenota' and dati_messaggio6 $LIKE '%$vecchio_num%' and dati_messaggio18 = '$anno' ");
$num_mess = numlin_query($mess);
for ($num1 = 0 ; $num1 < $num_mess ; $num1++) {
$idmess = risul_query($mess,$num1,'idmessaggi');
$tar_mess_vett = explode(",",risul_query($mess,$num1,'dati_messaggio6'));
if ($tar_mess_vett[0] == $vecchio_num) $tar_mess = $nuovo_num;
else $tar_mess = $tar_mess_vett[0];
for ($num2 = 1 ; $num2 < count($tar_mess_vett) ; $num2++) {
if ($tar_mess_vett[$num2] == $vecchio_num) $tar_mess .= ",".$nuovo_num;
else $tar_mess .= ",".$tar_mess_vett[$num2];
} # fine for $num2
esegui_query("update $tablemessaggi set dati_messaggio6 = '$tar_mess' where idmessaggi = '$idmess' ");
} # fine for $num1
$ins_p = esegui_query("select * from $tabletransazioni where tipo_transazione = 'ins_p' and anno = '$anno' and dati_transazione5 $LIKE '%$tar_vecchia%' ");
$num_ins_p = numlin_query($ins_p);
for ($num1 = 0 ; $num1 < $num_ins_p ; $num1++) {
$idtrans = risul_query($ins_p,$num1,'idtransazioni');
$tar_ins_p_vett = explode(",",risul_query($ins_p,$num1,'dati_transazione5'));
if ($tar_ins_p_vett[0] == $tar_vecchia) $tar_ins_p = $tar_nuova;
else $tar_ins_p = $tar_ins_p_vett[0];
for ($num2 = 1 ; $num2 < count($tar_ins_p_vett) ; $num2++) {
if ($tar_ins_p_vett[$num2] == $tar_vecchia) $tar_ins_p .= ",".$tar_nuova;
else $tar_ins_p .= ",".$tar_ins_p_vett[$num2];
} # fine for $num2
esegui_query("update $tabletransazioni set dati_transazione5 = '$tar_ins_p' where idtransazioni = '$idtrans' ");
} # fine for $num1
$mod_p = esegui_query("select * from $tabletransazioni where tipo_transazione = 'mod_p' and anno = '$anno' ");
$num_mod_p = numlin_query($mod_p);
for ($num1 = 0 ; $num1 < $num_mod_p ; $num1++) {
$idtrans = risul_query($mod_p,$num1,'idtransazioni');
$tar_mod_p = risul_query($mod_p,$num1,'dati_transazione12');
$tar_mod_p_vett = unserialize($tar_mod_p);
$n_tar_mod_p_vett = $tar_mod_p_vett;
reset($tar_mod_p_vett);
while (list($idpr,$tar_idpr) = each($tar_mod_p_vett)) if ($tar_idpr == $tar_vecchia) $n_tar_mod_p_vett[$idpr] = $tar_nuova;
$n_tar_mod_p = serialize($n_tar_mod_p_vett);
if ($n_tar_mod_p != $tar_mod_p) esegui_query("update $tabletransazioni set dati_transazione12 = '".aggslashdb($n_tar_mod_p)."' where idtransazioni = '$idtrans' ");
} # fine for $num1
$pay = esegui_query("select * from $tabletransazioniweb where tipo_transazione $LIKE 'pay_%' and anno = '$anno' and dati_transazione6 $LIKE '%$vecchio_num%' ");
$num_pay = numlin_query($pay);
for ($num1 = 0 ; $num1 < $num_pay ; $num1++) {
$idtrans = risul_query($pay,$num1,'idtransazioni');
$tar_pay_vett = explode(",",risul_query($pay,$num1,'dati_transazione6'));
if ($tar_pay_vett[0] == $vecchio_num) $tar_pay = $nuovo_num;
else $tar_pay = $tar_pay_vett[0];
for ($num2 = 1 ; $num2 < count($tar_pay_vett) ; $num2++) {
if ($tar_pay_vett[$num2] == $vecchio_num) $tar_pay .= ",".$nuovo_num;
else $tar_pay .= ",".$tar_pay_vett[$num2];
} # fine for $num2
esegui_query("update $tabletransazioniweb set dati_transazione6 = '$tar_pay' where idtransazioni = '$idtrans' ");
} # fine for $num1
$file_interconnessioni = C_DATA_PATH."/dati_interconnessioni.php";
if (@is_file($file_interconnessioni)) {
$filelock = crea_lock_file($file_interconnessioni);
$cont_file = implode("",file($file_interconnessioni));
$cont_file = str_replace("\"$tar_vecchia\"","\"$tar_nuova\"",$cont_file);
scrivi_file($cont_file,$file_interconnessioni);
distruggi_lock_file($filelock,$file_interconnessioni);
} # fine if (@is_file($file_interconnessioni))
} # fine function cambia_num_tar
