$selected = " selected";
} else {
$selected = "";
}
echo "<option value=\"NO\"{$selected}>" . mex2("No", $pag, $lingua) . "</option>\n</select><small>(" . mex2("Se già esistente e non vuoto usare un prefisso non presente nel database per il nome delle tabelle", $pag, $lingua) . ")</small><br>\n" . mex2("Nome del computer a cui collegarsi", $pag, $lingua) . ":\n<input type=\"text\" name=\"host_phprdb\" value=\"" . C_CREADB_HOST . "\"><br>\n" . mex2("Numero della porta a cui collegarsi", $pag, $lingua) . ": \n<input type=\"text\" name=\"port_phprdb\" value=\"" . C_CREADB_PORT . "\" size=\"7\">(" . mex2("Normalmete 5432 o 5433 per Postgresql o 3306 per Mysql", $pag, $lingua) . ")<br>\n" . mex2("Nome per l'autenticazione al database", $pag, $lingua) . ": \n<input type=\"text\" name=\"user_phprdb\" value=\"" . C_CREADB_USER . "\"><br>\n" . mex2("Parola segreta per l'autenticazione al database", $pag, $lingua) . ": \n<input type=\"text\" name=\"password_phprdb\" value=\"" . C_CREADB_PASS . "\"><br>";
/*echo "".mex2("Caricare la libreria dinamica \"pgsql.so\" o \"mysql.so\"",$pag,$lingua)."?
<select name=\"carica_estensione\">";
if (C_CREADB_ESTENSIONE == "SI") $selected = " selected";
else $selected = "";
echo "<option value=\"SI\"$selected>".mex2("Si",$pag,$lingua)."</option>";
if (C_CREADB_ESTENSIONE == "NO") $selected = " selected";
else $selected = "";
echo "<option value=\"NO\"$selected>".mex2("No",$pag,$lingua)."</option>
</select> <small>(".mex2("scegliere si se non viene caricata automaticamente da php",$pag,$lingua).")</small><br>";*/
if ($lingua == "ita") {
include "./includes/unit.php";
} else {
include "./includes/lang/{$lingua}/unit.php";
}
echo "" . mex2("Nome del database a cui collegarsi temporaneamente", $pag, $lingua) . ":\n<input type=\"text\" name=\"tempdatabase\" value=\"" . C_CREADB_TEMPDB . "\"><small>(" . mex2("solo per Postgresql con database non esistente", $pag, $lingua) . ")</small><br>\n" . mex2("Prefisso nel nome delle tabelle", $pag, $lingua) . ":\n<input type=\"text\" name=\"prefisso_tab\" value=\"" . C_CREADB_PREFISSO_TAB . "\" maxlength=\"8\" size=\"9\"><small>(" . mex2("opzionale, utile per più installazioni di HotelDruid nello stesso database", $pag, $lingua) . ")</small><br>\n<div style=\"height: 8px\"></div>\n" . mex2("Nome delle unità da gestire", $pag, $lingua) . ": <select name=\"nomeappartamenti\">\n<option value=\"camere\">" . $trad_var['rooms'] . "</option>\n<option value=\"appartamenti\">" . $trad_var['apartments'] . "</option>\n</select><br>\n" . mex2("Numero di unità da gestire", $pag, $lingua) . ": \n<input type=\"text\" name=\"numappartamenti\" size=\"5\"><br>\n<div style=\"height: 6px\"></div>\n" . mex2("Nome delle unità singole da gestire", $pag, $lingua) . ": <em>" . $trad_var['beds'] . "</em> <small>(" . mex2("non incluse nelle unità normali", $pag, $lingua) . ")</small><br>\n" . mex2("Numero di unità singole da gestire", $pag, $lingua) . ": \n<input type=\"text\" name=\"numletti\" value=\"0\" size=\"5\"><br>\n<div style=\"text-align: center;\"><input class=\"sbutton\" type=\"submit\" name=\"creabase\" value=\"" . mex2("Crea il database", $pag, $lingua) . "\"></div><br>\n<input type=\"hidden\" name=\"lingua\" value=\"{$lingua}\">\n</div></form>";
}
# fine if ($mostra_form_iniziale != "NO")
if ($tema[$id_utente] and $tema[$id_utente] != "base" and @is_dir("./themes/" . $tema[$id_utente] . "/php")) {
include "./themes/" . $tema[$id_utente] . "/php/foot.php";
} else {
include "./includes/foot.php";
}
}
# fine if ($id_utente and $id_utente == 1)
}
# fine if (CREA_ULTIMO_ACCESSO != "SI" or !@is_file(C_DATI_PATH."/ultimo_accesso"))
$template_theme_name[1] = "default";
$template_theme_colors[1][1]['name'] = "font";
$template_theme_colors[1][1]['default'] = "#000000";
$template_theme_colors[1][2]['name'] = "background";
$template_theme_colors[1][2]['default'] = "#ffffff";
$template_theme_colors[1][3]['name'] = "background 2";
$template_theme_colors[1][3]['default'] = "#ebebeb";
$template_theme_values[1][1]['name'] = mex("URL della home",$pag);
$template_theme_values[1][1]['default'] = $dati_struttura[4];
$template_theme_values[1][1]['replace'] = "<div style=\"width: 100%; padding: 10px 0 10px 20px; margin: 0; border-bottom: 2px solid [theme_color_1]; background-color: [theme_color_3];\"><a href=\"[theme_value_1]\" style=\"color: [theme_color_1];\" target=\"_top\">[theme_value_2]</a></div>";
$template_theme_values[1][2]['name'] = mex("URL del logo",$pag);
$template_theme_values[1][2]['default'] = $dati_struttura[15];
$template_theme_values[1][2]['replace'] = "<img style=\"text-decoration: none; border: 0px;\" src=\"[theme_value_2]\" alt=\"[theme_value_3]\">";
$template_theme_values[1][2]['null'] = "[theme_value_3]";
$template_theme_values[1][3]['name'] = mex("Torna alla HOME",$pag);
$template_theme_values[1][3]['default'] = mex2("Torna alla HOME",$pag,$lingua_modello);
$template_theme_html_pre[1] = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\"
\"http://www.w3.org/TR/html4/strict.dtd\">
<html>
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\" >
<title> $nome_file </title>
<style type=\"text/css\">
.rates { background-color: [theme_color_3]; border-radius: 10px; }
.rates tr:first-child td:first-child { border-top-left-radius: 10px; }
.rates tr:first-child td:last-child { border-top-right-radius: 10px; }
.rates tr:last-child td:first-child { border-bottom-left-radius: 10px; }
.rates tr:last-child td:last-child { border-bottom-right-radius: 10px; }
</style>
</head>
<body style=\"background-color: [theme_color_2]; color: [theme_color_1]; padding: 0; margin: 0;\">
function crea_nuovo_anno($anno, $PHPR_TAB_PRE, $DATETIME, $tipo_periodi, $giorno_ini_fine, $mese_ini, $mese_fine, $importa_anno_prec, $silenzio, $pag)
{
allunga_tempo_limite();
global $lingua_mex, $LIKE, $ILIKE, $PHPR_DB_TYPE;
$lingua_mex_orig = $lingua_mex;
include_once "./includes/funzioni_menu.php";
include C_DATA_PATH . "/lingua.php";
$lingua_mex = $lingua[1];
$tableanni = $PHPR_TAB_PRE . "anni";
$tableprivilegi = $PHPR_TAB_PRE . "privilegi";
$tabletransazioni = $PHPR_TAB_PRE . "transazioni";
$tabletransazioniweb = $PHPR_TAB_PRE . "transazioniweb";
$tablepersonalizza = $PHPR_TAB_PRE . "personalizza";
$tablemessaggi = $PHPR_TAB_PRE . "messaggi";
$tableinterconnessioni = $PHPR_TAB_PRE . "interconnessioni";
$tablecontratti = $PHPR_TAB_PRE . "contratti";
$tableutenti = $PHPR_TAB_PRE . "utenti";
$tablerelclienti = $PHPR_TAB_PRE . "relclienti";
if ($PHPR_DB_TYPE == "mysql" or $PHPR_DB_TYPE == "mysqli") {
@esegui_query("SET default_storage_engine=MYISAM", 1);
}
$filelock = fopen(C_DATA_PATH . "/anni.lock", "w+");
if ($filelock) {
flock($filelock, 2);
$anno_esistente = esegui_query("select * from {$tableanni} where idanni = {$anno}");
if (numlin_query($anno_esistente) == 0) {
if (C_CAMBIA_TIPO_PERIODI == "NO") {
$tipo_periodi_esistenti = esegui_query("select * from {$tableanni} order by idanni desc");
if (numlin_query($tipo_periodi_esistenti) != 0) {
$tipo_periodi = risul_query($tipo_periodi_esistenti, 0, 'tipo_periodi');
}
}
# fine if (C_CAMBIA_TIPO_PERIODI == "NO")
if ($tipo_periodi != "g") {
$tipo_periodi = "s";
}
// creo la tabella con periodi settimanali e prezzi e la tabella con i nomi delle tariffe
$tableperiodi = $PHPR_TAB_PRE . "periodi" . $anno;
$tablenometariffe = $PHPR_TAB_PRE . "ntariffe" . $anno;
if ($importa_anno_prec == "SI") {
$anno_prec = $anno - 1;
$tablenometariffe_prec = $PHPR_TAB_PRE . "ntariffe" . $anno_prec;
$num_tariffe_tab = esegui_query("select nomecostoagg from {$tablenometariffe_prec} where idntariffe = 1");
$num_tariffe_tab = risul_query($num_tariffe_tab, 0, 'nomecostoagg');
} else {
$num_tariffe_tab = 8;
}
$query = "create table {$tableperiodi} (idperiodi integer primary key, datainizio date not null, datafine date";
$query2 = "create table {$tablenometariffe} (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";
$num_col_tariffe_db = $num_tariffe_tab;
if ($num_col_tariffe_db < 12) {
$num_col_tariffe_db = 12;
}
for ($num1 = 1; $num1 <= $num_col_tariffe_db; $num1++) {
$nome_nuova_tariffa = "tariffa" . $num1;
$query .= ", {$nome_nuova_tariffa} float8, {$nome_nuova_tariffa}" . "p float8";
$query2 .= ", {$nome_nuova_tariffa} varchar(40)";
}
# fine for $num1
$crea_tab = esegui_query($query . ")");
if ($crea_tab) {
esegui_query($query2 . ")");
function estrai_col_tabella($col_table)
{
$col_table = explode(",", $col_table);
for ($num1 = 0; $num1 < count($col_table); $num1++) {
$col = explode(" ", trim($col_table[$num1]));
$tutte_col .= $col[0] . ",";
}
# fine for $num1
return substr($tutte_col, 0, -1);
}
# fine function estrai_col_tabella
# Creo la tabella delle prernotazioni
$tableprenotazioni = $PHPR_TAB_PRE . "prenota" . $anno;
$col_tableprenota = "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, codice varchar(10), origine varchar(70), commento text, conferma varchar(4), checkin {$DATETIME}, checkout {$DATETIME}, id_anni_prec text, datainserimento {$DATETIME}, hostinserimento varchar(50), data_modifica {$DATETIME}, utente_inserimento integer ";
esegui_query("create table {$tableprenotazioni} ({$col_tableprenota})");
$col_tableprenota = estrai_col_tabella($col_tableprenota);
# Creo la tabella con i costi aggiuntivi delle prenotazioni
$tablecostiprenota = $PHPR_TAB_PRE . "costiprenota" . $anno;
$col_tablecostiprenota = "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";
esegui_query("create table {$tablecostiprenota} ({$col_tablecostiprenota})");
$col_tablecostiprenota = estrai_col_tabella($col_tablecostiprenota);
crea_indice($tablecostiprenota, "idprenota", $PHPR_TAB_PRE . "iidpcostiprenota" . $anno);
esegui_query("insert into {$tablecostiprenota} (idcostiprenota,numlimite) values ('1','1')");
# Creo la tabella le relazioni tra prenotazioni e clienti non titolari
$tablerclientiprenota = $PHPR_TAB_PRE . "rclientiprenota" . $anno;
$col_tablerclientiprenota = "idprenota integer, idclienti integer, num_ordine integer, parentela varchar(70), datainserimento {$DATETIME}, hostinserimento varchar(50), utente_inserimento integer";
esegui_query("create table {$tablerclientiprenota} ({$col_tablerclientiprenota})");
$col_tablerclientiprenota = estrai_col_tabella($col_tablerclientiprenota);
crea_indice($tablerclientiprenota, "idprenota", $PHPR_TAB_PRE . "iidprclientiprenota" . $anno);
# Creo la tabella per le regole di assegnazione
$tableregole = $PHPR_TAB_PRE . "regole" . $anno;
$col_tableregole = "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";
esegui_query("create table {$tableregole} ({$col_tableregole})");
$col_tableregole = estrai_col_tabella($col_tableregole);
# Creo la tabella con i costi di gestione
$tablecosti = $PHPR_TAB_PRE . "costi" . $anno;
$col_tablecosti = "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";
esegui_query("create table {$tablecosti} ({$col_tablecosti})");
$col_tablecosti = estrai_col_tabella($col_tablecosti);
# Creo la tabella per la storia entrate-uscite
$tablesoldi = $PHPR_TAB_PRE . "soldi" . $anno;
$col_tablesoldi = "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";
esegui_query("create table {$tablesoldi} ({$col_tablesoldi})");
$col_tablesoldi = estrai_col_tabella($col_tablesoldi);
$tabelle_lock = array($tableanni, $tableprenotazioni, $tablecostiprenota, $tablerclientiprenota, $tablenometariffe, $tableperiodi, $tablerelclienti, $tablecosti, $tableregole, $tablesoldi, $tablepersonalizza, $tableprivilegi, $tabletransazioni);
if ($importa_anno_prec == "SI") {
$anno_prec = $anno - 1;
$tablenometariffe_prec = $PHPR_TAB_PRE . "ntariffe" . $anno_prec;
$tableprenota_prec = $PHPR_TAB_PRE . "prenota" . $anno_prec;
$tablecostiprenota_prec = $PHPR_TAB_PRE . "costiprenota" . $anno_prec;
$tablerclientiprenota_prec = $PHPR_TAB_PRE . "rclientiprenota" . $anno_prec;
$tableperiodi_prec = $PHPR_TAB_PRE . "periodi" . $anno_prec;
$tableregole_prec = $PHPR_TAB_PRE . "regole" . $anno_prec;
$tablesoldi_prec = $PHPR_TAB_PRE . "soldi" . $anno_prec;
$tablecosti_prec = $PHPR_TAB_PRE . "costi" . $anno_prec;
$tabelle_lock = array($tableanni, $tableprenota_prec, $tableprenotazioni, $tablecostiprenota_prec, $tablecostiprenota, $tablerclientiprenota_prec, $tablerclientiprenota, $tablenometariffe, $tableperiodi, $tablerelclienti, $tablecosti_prec, $tablecosti, $tableregole, $tablesoldi_prec, $tablesoldi, $tableinterconnessioni, $tablemessaggi, $tablepersonalizza, $tableprivilegi, $tabletransazioni);
$altre_tab_lock = array($tablenometariffe_prec, $tableperiodi_prec, $tableregole_prec, $tablecontratti, $tableutenti);
$max_data_ini_prec = esegui_query("select max(datainizio) from {$tableperiodi_prec}");
if (numlin_query($max_data_ini_prec) != 0) {
$max_data_ini_prec = risul_query($max_data_ini_prec, 0, 0);
$max_mese_prec = 0;
if (substr($max_data_ini_prec, 0, 4) >= $anno) {
$max_mese_prec = substr($max_data_ini_prec, 5, 2);
}
if (substr($max_data_ini_prec, 0, 4) == $anno + 1) {
$max_mese_prec = $max_mese_prec + 12;
}
if (substr($max_data_ini_prec, 0, 4) == $anno + 2) {
$max_mese_prec = $max_mese_prec + 24;
}
if (substr($max_data_ini_prec, 0, 4) == $anno + 3) {
$max_mese_prec = $max_mese_prec + 36;
}
if (substr($max_data_ini_prec, 0, 4) == $anno + 4) {
$max_mese_prec = $max_mese_prec + 48;
}
if ($max_mese_prec > $mese_fine) {
$mese_fine = $max_mese_prec;
}
$data_ini_agg = date("Y-m-d", mktime(0, 0, 0, substr($max_data_ini_prec, 5, 2) + 1, 1, substr($max_data_ini_prec, 0, 4)));
} else {
$max_data_ini_prec = "";
$max_mese_prec = "";
$data_ini_agg = "";
}
# fine else if (numlin_query($max_data_ini_prec) != 0)
} else {
unset($altre_tab_lock);
}
$tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock);
# Elimino tutte le transazioni, potrebbero contenere date dell'anno creato
esegui_query("delete from {$tabletransazioni}");
# Inserisco l'anno nella tabella anni
esegui_query("insert into {$tableanni} (idanni,tipo_periodi) values ('{$anno}','{$tipo_periodi}')");
esegui_query("insert into {$tablecosti} (idcosti) values ('0')");
esegui_query("insert into {$tablesoldi} (idsoldi,motivazione,soldi_prima) values ('1','soldi_prenotazioni_cancellate','0')");
// trovo il primo giorno di inizio/fine dell'anno (nel caso di periodi settimanali)
$numgiorno = 1;
$giorno_ini_fine = (string) $giorno_ini_fine;
if ($giorno_ini_fine != "0" and $giorno_ini_fine != "1" and $giorno_ini_fine != "2" and $giorno_ini_fine != "3" and $giorno_ini_fine != "4" and $giorno_ini_fine != "5" and $giorno_ini_fine != "6") {
$giorno_ini_fine = 6;
}
do {
$nomegiorno = date("w", mktime(0, 0, 0, 1, $numgiorno, $anno));
$numgiorno = $numgiorno + 1;
} while ($nomegiorno != $giorno_ini_fine);
$numgiorno = $numgiorno - 1;
if ($tipo_periodi == "g") {
$numgiorno = 1;
$aggiungi_giorni = 1;
} else {
$aggiungi_giorni = 7;
}
if ($mese_ini > $mese_fine) {
if ($silenzio != "SI") {
echo mex("I mesi erano indicati erroneamente, sono stati inseriti i mesi da Gennaio a Dicembre", $pag) . ".<br>";
}
$mese_ini = 1;
if ($mese_fine < 12) {
$mese_fine = 12;
}
}
# fine if ($mese_ini > $mese_fine)
$anno_fine = $anno + 3;
$idperiodi = 1;
$fileaperto = fopen(C_DATA_PATH . "/selectperiodi{$anno}.1.php", "a+");
flock($fileaperto, 2);
$date_option = "";
$n_date_menu = 0;
do {
$datainizio = date("Y-m-d", mktime(0, 0, 0, 1, $numgiorno, $anno));
$annocreato = date("Y", mktime(0, 0, 0, 1, $numgiorno, $anno));
$mesecreato = date("n", mktime(0, 0, 0, 1, $numgiorno, $anno));
$nome_giorno = date("D", mktime(0, 0, 0, 1, $numgiorno, $anno));
$nome_mese = date("M", mktime(0, 0, 0, 1, $numgiorno, $anno));
$numero_giorno = date("d", mktime(0, 0, 0, 1, $numgiorno, $anno));
$numero_anno = $annocreato;
$numgiorno = $numgiorno + $aggiungi_giorni;
$datafine = date("Y-m-d", mktime(0, 0, 0, 1, $numgiorno, $anno));
$annocreato2 = date("Y", mktime(0, 0, 0, 1, $numgiorno, $anno));
$mesecreato2 = date("n", mktime(0, 0, 0, 1, $numgiorno, $anno));
if ($annocreato > $anno) {
$diff = $annocreato - $anno;
$mesecreato = $diff * 12 + $mesecreato;
}
# fine if ($annocreato > $anno)
if ($annocreato2 > $anno) {
$diff = $annocreato2 - $anno;
$mesecreato2 = $diff * 12 + $mesecreato2;
}
# fine if ($annocreato2 > $anno)
if ($mesecreato >= $mese_ini and $mesecreato <= $mese_fine) {
esegui_query("insert into {$tableperiodi} ( idperiodi, datainizio, datafine) values ( {$idperiodi}, '{$datainizio}', '{$datafine}')");
if ($tipo_periodi == "g") {
if ($nome_giorno == "Sun") {
$nome_giorno = mex(" Do", $pag);
}
if ($nome_giorno == "Mon") {
$nome_giorno = mex(" Lu", $pag);
}
if ($nome_giorno == "Tue") {
$nome_giorno = mex(" Ma", $pag);
}
if ($nome_giorno == "Wed") {
$nome_giorno = mex(" Me", $pag);
}
if ($nome_giorno == "Thu") {
$nome_giorno = mex(" Gi", $pag);
}
if ($nome_giorno == "Fri") {
$nome_giorno = mex(" Ve", $pag);
}
if ($nome_giorno == "Sat") {
$nome_giorno = mex(" Sa", $pag);
}
} else {
$nome_giorno = "";
}
if ($nome_mese == "Jan") {
$nome_mese = mex("Gen", $pag);
}
if ($nome_mese == "Feb") {
$nome_mese = mex("Feb", $pag);
}
if ($nome_mese == "Mar") {
$nome_mese = mex("Mar", $pag);
}
if ($nome_mese == "Apr") {
$nome_mese = mex("Apr", $pag);
}
if ($nome_mese == "May") {
$nome_mese = mex("Mag", $pag);
}
if ($nome_mese == "Jun") {
$nome_mese = mex("Giu", $pag);
}
if ($nome_mese == "Jul") {
$nome_mese = mex("Lug", $pag);
}
if ($nome_mese == "Aug") {
$nome_mese = mex("Ago", $pag);
}
if ($nome_mese == "Sep") {
$nome_mese = mex("Set", $pag);
}
if ($nome_mese == "Oct") {
$nome_mese = mex("Ott", $pag);
}
if ($nome_mese == "Nov") {
$nome_mese = mex("Nov", $pag);
}
if ($nome_mese == "Dec") {
$nome_mese = mex("Dic", $pag);
}
if (!$date_option) {
$a_ini_menu = substr($datainizio, 0, 4);
$m_ini_menu = substr($datainizio, 5, 2) - 1;
$g_ini_menu = substr($datainizio, 8, 2);
}
# fine if (!$date_option)
$n_date_menu++;
$date_option .= "<option value=\\\"{$datainizio}\\\">{$nome_mese} {$numero_giorno}{$nome_giorno}, {$numero_anno}</option>\n";
$idperiodi = $idperiodi + 1;
$datafine2 = $datafine;
}
# fine if ($mesecreato >= $mese_ini and $mesecreato <= $mese_fine)
} while ($annocreato2 <= $anno_fine or $mesecreato2 == 48);
$numero_mese = substr($datafine2, 5, 2);
if ($numero_mese == "01") {
$nome_mese = mex("Gen", $pag);
}
if ($numero_mese == "02") {
$nome_mese = mex("Feb", $pag);
}
if ($numero_mese == "03") {
$nome_mese = mex("Mar", $pag);
}
if ($numero_mese == "04") {
$nome_mese = mex("Apr", $pag);
}
if ($numero_mese == "05") {
$nome_mese = mex("Mag", $pag);
}
if ($numero_mese == "06") {
$nome_mese = mex("Giu", $pag);
}
if ($numero_mese == "07") {
$nome_mese = mex("Lug", $pag);
}
if ($numero_mese == "08") {
$nome_mese = mex("Ago", $pag);
}
if ($numero_mese == "09") {
$nome_mese = mex("Set", $pag);
}
if ($numero_mese == "10") {
$nome_mese = mex("Ott", $pag);
}
if ($numero_mese == "11") {
$nome_mese = mex("Nov", $pag);
}
if ($numero_mese == "12") {
$nome_mese = mex("Dic", $pag);
}
$numero_giorno = substr($datafine2, 8, 2);
$numero_anno = substr($datafine2, 0, 4);
$n_date_menu++;
$date_option .= "<option value=\\\"{$datafine2}\\\">{$nome_mese} {$numero_giorno}, {$numero_anno}</option>\n";
fwrite($fileaperto, "<?php \n\n\$y_ini_menu[0] = \"{$a_ini_menu}\";\n\$m_ini_menu[0] = \"{$m_ini_menu}\";\n\$d_ini_menu[0] = \"{$g_ini_menu}\";\n\$n_dates_menu[0] = \"{$n_date_menu}\";\n\$d_increment[0] = \"{$aggiungi_giorni}\";\n\$d_names = \"\\\"" . mex(" Do", $pag) . "\\\",\\\"" . mex(" Lu", $pag) . "\\\",\\\"" . mex(" Ma", $pag) . "\\\",\\\"" . mex(" Me", $pag) . "\\\",\\\"" . mex(" Gi", $pag) . "\\\",\\\"" . mex(" Ve", $pag) . "\\\",\\\"" . mex(" Sa", $pag) . "\\\"\";\n\$m_names = \"\\\"" . mex("Gen", $pag) . "\\\",\\\"" . mex("Feb", $pag) . "\\\",\\\"" . mex("Mar", $pag) . "\\\",\\\"" . mex("Apr", $pag) . "\\\",\\\"" . mex("Mag", $pag) . "\\\",\\\"" . mex("Giu", $pag) . "\\\",\\\"" . mex("Lug", $pag) . "\\\",\\\"" . mex("Ago", $pag) . "\\\",\\\"" . mex("Set", $pag) . "\\\",\\\"" . mex("Ott", $pag) . "\\\",\\\"" . mex("Nov", $pag) . "\\\",\\\"" . mex("Dic", $pag) . "\\\"\";\n\n\$dates_options_list = \"\n\n{$date_option}\n\";\n\n?>");
flock($fileaperto, 3);
fclose($fileaperto);
if ($importa_anno_prec == "SI" and @is_file(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".1.php")) {
estendi_menu_date(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".1.php", C_DATA_PATH . "/selperiodimenu{$anno}.1.php", $tipo_periodi, date("Y-m-d", mktime(0, 0, 0, $mese_ini, 1, $anno)), $data_ini_agg, date("Y-m-d", mktime(0, 0, 0, $mese_fine + 1, 1, $anno)), $anno, $pag);
} else {
copy(C_DATA_PATH . "/selectperiodi{$anno}.1.php", C_DATA_PATH . "/selperiodimenu{$anno}.1.php");
}
$lista_clienti_importati = "";
# Importo eventuali prenotazioni, tariffe e regole dell'anno precedente
if ($importa_anno_prec == "SI") {
$tableprenota = $tableprenotazioni;
$data_inizio_periodi = esegui_query("select * from {$tableperiodi} where idperiodi = 1");
$data_inizio_periodi = risul_query($data_inizio_periodi, 0, 'datainizio');
$ini_periodo_interferenza = esegui_query("select * from {$tableperiodi_prec} where datainizio = '{$data_inizio_periodi}'");
$num_periodo_interferenza = numlin_query($ini_periodo_interferenza);
$tipo_periodi_prec = esegui_query("select * from {$tableanni} where idanni = {$anno_prec}");
$tipo_periodi_prec = risul_query($tipo_periodi_prec, 0, 'tipo_periodi');
if ($tipo_periodi_prec != $tipo_periodi) {
$num_periodo_interferenza = 0;
}
if ($num_periodo_interferenza == 0) {
if ($silenzio != "SI") {
echo mex("Non ci sono periodi che riguardano il ", $pag) . $anno . mex(" nel ", $pag) . $anno_prec . mex(", o il giorno di inizio/fine locazione era differente, sono stati importati solo i data riguardanti costi aggiuntivi, caparra, nome delle tariffe, privilegi degli utenti e regole di assegnazione 2 e 3", $pag) . ".<br>";
}
} else {
$id_data_fine_periodi = esegui_query("select max(idperiodi) from {$tableperiodi}");
$id_data_fine_periodi = risul_query($id_data_fine_periodi, 0, 0);
$id_data_ini_periodi_prec = risul_query($ini_periodo_interferenza, 0, 'idperiodi');
$id_data_fine_periodi_prec = esegui_query("select max(idperiodi) from {$tableperiodi_prec}");
$id_data_fine_periodi_prec = risul_query($id_data_fine_periodi_prec, 0, 0);
$num_periodi_prec = $id_data_fine_periodi_prec - $id_data_ini_periodi_prec + 1;
if ($num_periodi_prec > $id_data_fine_periodi) {
$id_data_fine_periodi_prec = $id_data_ini_periodi_prec + $id_data_fine_periodi - 1;
$prenota_non_importabili = esegui_query("select * from {$tableprenota_prec} where iddatafine > {$id_data_fine_periodi_prec} ");
$num_prenota_non_importabili = numlin_query($prenota_non_importabili);
if ($num_prenota_non_importabili != 0) {
echo "<br>ERROR<br>";
}
}
# fine if ($num_periodi_prec > $id_data_fine_periodi)
$idprenota_corr = 0;
$max_idprenota_prec = esegui_query("select max(idprenota) from {$tableprenota_prec}");
$max_idprenota_prec = risul_query($max_idprenota_prec, 0, 0) + 1;
$max_idcostiprenota_prec = esegui_query("select max(idcostiprenota) from {$tablecostiprenota_prec}");
$max_idcostiprenota_prec = risul_query($max_idcostiprenota_prec, 0, 0) + 1;
$prenota_gia_iniziate = esegui_query("select * from {$tableprenota_prec} where iddatainizio < {$id_data_ini_periodi_prec} and iddatafine >= {$id_data_ini_periodi_prec} and iddatafine <= {$id_data_fine_periodi_prec} ");
$num_prenota_gia_iniziate = numlin_query($prenota_gia_iniziate);
for ($num1 = 0; $num1 < $num_prenota_gia_iniziate; $num1 = $num1 + 1) {
$idprenota = risul_query($prenota_gia_iniziate, $num1, 'idprenota');
$idclienti = risul_query($prenota_gia_iniziate, $num1, 'idclienti');
$lista_clienti_importati .= "and idclienti != '{$idclienti}' ";
$idappartamenti = risul_query($prenota_gia_iniziate, $num1, 'idappartamenti');
$iddatafine = risul_query($prenota_gia_iniziate, $num1, 'iddatafine');
$iddatafine = $iddatafine - $id_data_ini_periodi_prec + 1;
$datainserimento = risul_query($prenota_gia_iniziate, $num1, 'datainserimento');
$hostinserimento = risul_query($prenota_gia_iniziate, $num1, 'hostinserimento');
$data_modifica = risul_query($prenota_gia_iniziate, $num1, 'data_modifica');
$utente_inserimento = risul_query($prenota_gia_iniziate, $num1, 'utente_inserimento');
$checkin = risul_query($prenota_gia_iniziate, $num1, 'checkin');
$checkout = risul_query($prenota_gia_iniziate, $num1, 'checkout');
$codice = risul_query($prenota_gia_iniziate, $num1, 'codice');
$idprenota_corr++;
esegui_query("insert into {$tableprenota} (idprenota,idclienti,idappartamenti,iddatainizio,iddatafine,assegnazioneapp,commento,codice,datainserimento,hostinserimento,utente_inserimento) values ('{$idprenota_corr}','{$idclienti}','{$idappartamenti}','0',{$iddatafine},'k','{$idprenota}','{$codice}','{$datainserimento}','{$hostinserimento}','{$utente_inserimento}') ");
if ($checkin) {
esegui_query("update {$tableprenota} set checkin = '" . aggslashdb($checkin) . "' where idprenota = '{$idprenota_corr}'");
}
if ($checkout) {
esegui_query("update {$tableprenota} set checkout = '" . aggslashdb($checkout) . "' where idprenota = '{$idprenota_corr}'");
}
esegui_query("update {$tablecostiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'");
esegui_query("insert into {$tablecostiprenota} select {$col_tablecostiprenota} from {$tablecostiprenota_prec} where idprenota = '{$max_idprenota_prec}' ");
esegui_query("update {$tablecostiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tablecostiprenota_prec} set idprenota = '{$idprenota}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tablerclientiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'");
esegui_query("insert into {$tablerclientiprenota} select {$col_tablerclientiprenota} from {$tablerclientiprenota_prec} where idprenota = '{$max_idprenota_prec}' ");
esegui_query("update {$tablerclientiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tablerclientiprenota_prec} set idprenota = '{$idprenota}' where idprenota = '{$max_idprenota_prec}'");
}
# fine for $num1
$nuovo_idprenota = "";
$nuovo_iddatainizio = "";
$nuovo_iddatafine = "";
$prenota_importate = esegui_query("select * from {$tableprenota_prec} where iddatainizio >= '{$id_data_ini_periodi_prec}' and iddatafine <= '{$id_data_fine_periodi_prec}' order by idprenota ");
$num_prenota_importate = numlin_query($prenota_importate);
for ($num1 = 0; $num1 < $num_prenota_importate; $num1 = $num1 + 1) {
$idprenota = risul_query($prenota_importate, $num1, 'idprenota');
$iddatainizio = risul_query($prenota_importate, $num1, 'iddatainizio');
$iddatainizio = $iddatainizio - $id_data_ini_periodi_prec + 1;
$iddatafine = risul_query($prenota_importate, $num1, 'iddatafine');
$iddatafine = $iddatafine - $id_data_ini_periodi_prec + 1;
$idclienti = risul_query($prenota_importate, $num1, 'idclienti');
$lista_clienti_importati .= "and idclienti != '{$idclienti}' ";
$id_anni_prec = risul_query($prenota_importate, $num1, 'id_anni_prec');
if (!$id_anni_prec) {
$id_anni_prec = ";";
}
$id_anni_prec .= "{$anno_prec},{$idprenota};";
$idprenota_corr++;
esegui_query("update {$tableprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'");
esegui_query("insert into {$tableprenota} select {$col_tableprenota} from {$tableprenota_prec} where idprenota = '{$max_idprenota_prec}' ");
esegui_query("update {$tableprenota} set iddatainizio = '{$iddatainizio}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tableprenota} set iddatafine = '{$iddatafine}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tableprenota} set id_anni_prec = '{$id_anni_prec}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tableprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("delete from {$tableprenota_prec} where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tablecostiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'");
esegui_query("insert into {$tablecostiprenota} select {$col_tablecostiprenota} from {$tablecostiprenota_prec} where idprenota = '{$max_idprenota_prec}' ");
esegui_query("update {$tablecostiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("delete from {$tablecostiprenota_prec} where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tablerclientiprenota_prec} set idprenota = '{$max_idprenota_prec}' where idprenota = '{$idprenota}'");
esegui_query("insert into {$tablerclientiprenota} select {$col_tablerclientiprenota} from {$tablerclientiprenota_prec} where idprenota = '{$max_idprenota_prec}' ");
esegui_query("update {$tablerclientiprenota} set idprenota = '{$idprenota_corr}' where idprenota = '{$max_idprenota_prec}'");
esegui_query("delete from {$tablerclientiprenota_prec} where idprenota = '{$max_idprenota_prec}'");
esegui_query("update {$tableinterconnessioni} set idlocale = '{$idprenota_corr}', anno = '{$anno}' where idlocale = '{$idprenota}' and ( tipoid = 'prenota' or tipoid = 'mess' ) and anno = '{$anno_prec}' ");
$nuovo_idprenota[$idprenota] = $idprenota_corr;
$nuovo_iddatainizio[$idprenota] = $iddatainizio;
$nuovo_iddatafine[$idprenota] = $iddatafine;
}
# fine for $num1
esegui_query("update {$tablecostiprenota} set numlimite = '" . ($idprenota_corr + 1) . "' where idcostiprenota = '1'");
$prenota_compagne = esegui_query("select idprenota,idprenota_compagna from {$tableprenota} where idprenota_compagna != '' ");
$num_prenota_compagne = numlin_query($prenota_compagne);
for ($num1 = 0; $num1 < $num_prenota_compagne; $num1++) {
$idprenota = risul_query($prenota_compagne, $num1, 'idprenota');
$idprenota_compagna = risul_query($prenota_compagne, $num1, 'idprenota_compagna');
$idprenota_compagna = explode(",", $idprenota_compagna);
$n_idprenota_compagna = $nuovo_idprenota[$idprenota_compagna[0]];
for ($num2 = 1; $num2 < count($idprenota_compagna); $num2++) {
$n_idprenota_compagna .= "," . $nuovo_idprenota[$idprenota_compagna[$num2]];
}
esegui_query("update {$tableprenota} set idprenota_compagna = '{$n_idprenota_compagna}' where idprenota = '{$idprenota}'");
}
# fine for $num1
$id_costi_agg_importati = esegui_query("select idcostiprenota from {$tablecostiprenota} where idcostiprenota != '1' order by idcostiprenota");
$num_id_costi_agg_importati = numlin_query($id_costi_agg_importati);
for ($num1 = 0; $num1 < $num_costi_agg_importati; $num1++) {
$idcostiprenota = risul_query($id_costi_agg_importati, $num1, 'idcostiprenota');
$max_idcostiprenota_prec++;
esegui_query("update {$tablecostiprenota} set idcostiprenota = '{$max_idcostiprenota_prec}' where idcostiprenota = '{$idcostiprenota}'");
}
# fine for $num1
$costi_agg_importati = esegui_query("select * from {$tablecostiprenota} where idcostiprenota != '1' order by idcostiprenota");
$num_costi_agg_importati = numlin_query($costi_agg_importati);
for ($num1 = 0; $num1 < $num_costi_agg_importati; $num1++) {
$idcostiprenota = risul_query($costi_agg_importati, $num1, 'idcostiprenota');
$settimane = risul_query($costi_agg_importati, $num1, 'settimane');
if (str_replace(",", "", $settimane) != $settimane) {
$settimane = explode(",", $settimane);
$settimane_nuove = ",";
for ($num2 = 1; $num2 < count($settimane) - 1; $num2++) {
$settimane_nuove .= $settimane[$num2] - $id_data_ini_periodi_prec + 1 . ",";
}
esegui_query("update {$tablecostiprenota} set settimane = '{$settimane_nuove}' where idcostiprenota = '{$idcostiprenota}'");
}
# fine if (str_replace(",","",$settimane) != $settimane)
$varperiodipermessi = risul_query($costi_agg_importati, $num1, 'varperiodipermessi');
if ($varperiodipermessi) {
$vpp_nuovi = substr($varperiodipermessi, 0, 1);
$varperiodipermessi = explode(",", substr($varperiodipermessi, 1));
for ($num2 = 0; $num2 < count($varperiodipermessi); $num2++) {
$id_data_fine_vpp = explode("-", $varperiodipermessi[$num2]);
$id_data_inizio_vpp = $id_data_fine_vpp[0];
$id_data_fine_vpp = $id_data_fine_vpp[1];
if ($id_data_fine_vpp >= $id_data_ini_periodi_prec and $id_data_inizio_vpp <= $id_data_fine_periodi_prec) {
if ($id_data_inizio_vpp < $id_data_ini_periodi_prec) {
$id_data_inizio_vpp = $id_data_ini_periodi_prec;
}
if ($id_data_fine_vpp > $id_data_fine_periodi_prec) {
$id_data_fine_vpp = $id_data_fine_periodi_prec;
}
$id_data_inizio_vpp = $id_data_inizio_vpp - $id_data_ini_periodi_prec + 1;
$id_data_fine_vpp = $id_data_fine_vpp - $id_data_ini_periodi_prec + 1;
$vpp_nuovi .= $id_data_inizio_vpp . "-" . $id_data_fine_vpp . ",";
}
# fine if ($id_data_fine_vpp >= $id_data_ini_periodi_prec and...
}
# fine for $num2
if (strlen($vpp_nuovi) > 1) {
$vpp_nuovi = substr($vpp_nuovi, 0, -1);
}
esegui_query("update {$tablecostiprenota} set varperiodipermessi = '{$vpp_nuovi}' where idcostiprenota = '{$idcostiprenota}'");
}
# fine if ($varperiodipermessi)
esegui_query("update {$tablecostiprenota} set idcostiprenota = '" . ($num1 + 2) . "' where idcostiprenota = '{$idcostiprenota}'");
}
# fine for $num1
$tariffe_importate = esegui_query("select * from {$tableperiodi_prec} where idperiodi >= '{$id_data_ini_periodi_prec}' and idperiodi <= '{$id_data_fine_periodi_prec}' ");
$num_tariffe_iportate = numlin_query($tariffe_importate);
for ($num1 = 0; $num1 < $num_tariffe_iportate; $num1 = $num1 + 1) {
$idperiodi = risul_query($tariffe_importate, $num1, 'idperiodi');
$idperiodi = $idperiodi - $id_data_ini_periodi_prec + 1;
for ($num2 = 1; $num2 <= $num_tariffe_tab; $num2++) {
$tariffa = (string) risul_query($tariffe_importate, $num1, "tariffa" . $num2);
if (strcmp($tariffa, "")) {
esegui_query("update {$tableperiodi} set tariffa{$num2} = '{$tariffa}' where idperiodi = {$idperiodi} ");
}
$tariffap = (string) risul_query($tariffe_importate, $num1, "tariffa" . $num2 . "p");
if (strcmp($tariffap, "")) {
esegui_query("update {$tableperiodi} set tariffa{$num2}" . "p = '{$tariffap}' where idperiodi = {$idperiodi} ");
}
}
# fine for $num2
}
# fine for $num1
$regole_prec = esegui_query("select * from {$tableregole_prec} where iddatafine >= '{$id_data_ini_periodi_prec}' ");
$num_regole_prec = numlin_query($regole_prec);
for ($num1 = 0; $num1 < $num_regole_prec; $num1 = $num1 + 1) {
$idregole = risul_query($regole_prec, $num1, 'idregole');
$app_agenzia = risul_query($regole_prec, $num1, 'app_agenzia');
$tariffa_chiusa = risul_query($regole_prec, $num1, 'tariffa_chiusa');
$tariffa_commissioni = risul_query($regole_prec, $num1, 'tariffa_commissioni');
$iddatainizio = risul_query($regole_prec, $num1, 'iddatainizio');
$motivazione = risul_query($regole_prec, $num1, 'motivazione');
$motivazione2 = risul_query($regole_prec, $num1, 'motivazione2');
if ($iddatainizio < $id_data_ini_periodi_prec) {
$iddatainizio = $id_data_ini_periodi_prec;
}
$iddatainizio = $iddatainizio - $id_data_ini_periodi_prec + 1;
$iddatafine = risul_query($regole_prec, $num1, 'iddatafine');
if ($iddatafine > $id_data_fine_periodi_prec) {
$iddatafine = $id_data_fine_periodi_prec;
}
$iddatafine = $iddatafine - $id_data_ini_periodi_prec + 1;
if ($tariffa_commissioni) {
esegui_query("insert into {$tableregole} (idregole,tariffa_commissioni,iddatainizio,iddatafine) values ('{$idregole}','{$tariffa_commissioni}','{$iddatainizio}','{$iddatafine}') ");
} else {
if ($tariffa_chiusa) {
esegui_query("insert into {$tableregole} (idregole,tariffa_chiusa,iddatainizio,iddatafine) values ('{$idregole}','{$tariffa_chiusa}','{$iddatainizio}','{$iddatafine}') ");
} else {
esegui_query("insert into {$tableregole} (idregole,app_agenzia,iddatainizio,iddatafine) values ('{$idregole}','{$app_agenzia}','{$iddatainizio}','{$iddatafine}') ");
}
}
# fine else $tariffa_commissioni)
if (strcmp($motivazione, "")) {
esegui_query("update {$tableregole} set motivazione = '" . aggslashdb($motivazione) . "' where idregole = '{$idregole}' ");
}
if (strcmp($motivazione2, "")) {
esegui_query("update {$tableregole} set motivazione2 = '" . aggslashdb($motivazione2) . "' where idregole = '{$idregole}' ");
}
}
# fine for $num1
$soldi_importati = esegui_query("select * from {$tablesoldi_prec} where data_inserimento >= '{$data_inizio_periodi}' and saldo_prenota is not NULL order by idsoldi");
$num_soldi_importati = numlin_query($soldi_importati);
$idsoldi_corr = 1;
for ($num1 = 0; $num1 < $num_soldi_importati; $num1++) {
$motiv = explode(";", risul_query($soldi_importati, $num1, 'motivazione'));
if ($nuovo_idprenota[$motiv[3]]) {
$idsoldi_corr++;
$idsoldi_prec = risul_query($soldi_importati, $num1, 'idsoldi');
$n_motiv = $motiv[0] . ";" . $nuovo_iddatainizio[$motiv[3]] . ";" . $nuovo_iddatafine[$motiv[3]] . ";" . $nuovo_idprenota[$motiv[3]];
esegui_query("insert into {$tablesoldi} select {$col_tablesoldi} from {$tablesoldi_prec} where idsoldi = '{$idsoldi_prec}' ");
esegui_query("delete from {$tablesoldi_prec} where idsoldi = '{$idsoldi_prec}' ");
esegui_query("update {$tablesoldi} set motivazione = '{$n_motiv}' where idsoldi = '{$idsoldi_prec}' ");
esegui_query("update {$tablesoldi} set idsoldi = '{$idsoldi_corr}' where idsoldi = '{$idsoldi_prec}' ");
}
# fine if ($nuovo_idprenota[$motiv[3]])
}
# fine for $num1
$costi_importati = esegui_query("select * from {$tablecosti_prec} where datainserimento >= '{$data_inizio_periodi}' and tipo_costo is not NULL order by idcosti");
$num_costi_importati = numlin_query($costi_importati);
$idcosti_corr = 0;
for ($num1 = 0; $num1 < $num_costi_importati; $num1++) {
$idcosti_corr++;
$idcosti_prec = risul_query($costi_importati, $num1, 'idcosti');
esegui_query("insert into {$tablecosti} select {$col_tablecosti} from {$tablecosti_prec} where idcosti = '{$idcosti_prec}' ");
esegui_query("delete from {$tablecosti_prec} where idcosti = '{$idcosti_prec}' ");
esegui_query("update {$tablecosti} set idcosti = '{$idcosti_corr}' where idcosti = '{$idcosti_prec}' ");
}
# fine for $num1
$costo_cassa = 0;
$data_lim = $anno + 1 . "-01-01 00:00:00";
$costi_cassa = esegui_query("select * from {$tablecosti} where tipo_costo = 'e' and provenienza_costo = 'p' and datainserimento < '{$data_lim}' ");
$num_costi_cassa = numlin_query($costi_cassa);
for ($num2 = 0; $num2 < $num_costi_cassa; $num2++) {
$costo_cassa = $costo_cassa + risul_query($costi_cassa, $num2, 'val_costo');
}
if ($costo_cassa) {
esegui_query("update {$tablecosti} set val_costo = '{$costo_cassa}' where idcosti = '0' ");
}
unset($cassa_prec);
$costi_non_importati = esegui_query("select * from {$tablecosti_prec} where tipo_costo is not NULL order by idcosti");
$num_costi_non_importati = numlin_query($costi_non_importati);
for ($num1 = 0; $num1 < $num_costi_non_importati; $num1++) {
$tipo_costo = risul_query($costi_non_importati, $num1, 'tipo_costo');
$val_costo = risul_query($costi_non_importati, $num1, 'val_costo');
$utente_costo = risul_query($costi_non_importati, $num1, 'utente_inserimento');
if ($tipo_costo == "e") {
$cassa_prec[$utente_costo] = $cassa_prec[$utente_costo] + (double) $val_costo;
} else {
$cassa_prec[$utente_costo] = $cassa_prec[$utente_costo] - (double) $val_costo;
}
}
# fine for $num1
if (@is_array($cassa_prec)) {
$datainserimento = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600);
reset($cassa_prec);
while (list($utente_costo, $val_costo) = each($cassa_prec)) {
$idcosti_corr++;
esegui_query("insert into {$tablecosti} (idcosti,nome_costo,val_costo,persona_costo,tipo_costo,datainserimento,hostinserimento,utente_inserimento) values ('{$idcosti_corr}','{$anno_prec}','{$val_costo}','','e','{$datainserimento}','{$HOSTNAME}','{$utente_costo}') ");
}
# fine (list($utente_costo,$val_costo) = each($cassa_prec))
}
# fine if (@is_array($cassa_prec))
# aggiorno i messaggi con prenotazioni del nuovo anno già inserite, quelli da inserire sono aggiornati con i modelli internet
$messaggi_importati = esegui_query("select * from {$tablemessaggi} where stato = 'ins' and dati_messaggio18 = '{$anno_prec}' ");
$num_messaggi_importati = numlin_query($messaggi_importati);
for ($num1 = 0; $num1 < $num_messaggi_importati; $num1++) {
$agg_mess = 1;
$n_lista_pren = "";
$lista_pren = explode(",", risul_query($messaggi_importati, $num1, 'dati_messaggio1'));
for ($num2 = 0; $num2 < count($lista_pren); $num2++) {
if ($nuovo_idprenota[$lista_pren[$num2]]) {
$n_lista_pren .= $nuovo_idprenota[$lista_pren[$num2]] . ",";
} else {
$agg_mess = 0;
}
}
# fine for $num2
if ($agg_mess) {
$idmess = risul_query($messaggi_importati, $num1, 'idmessaggi');
$n_lista_pren = substr($n_lista_pren, 0, -1);
esegui_query("update {$tablemessaggi} set dati_messaggio1 = '{$n_lista_pren}', dati_messaggio18 = '{$anno}' where idmessaggi = '{$idmess}' ");
}
# fine if ($agg_mess)
}
# fine for $num1
# aggiorno i numeri delle prenotazioni importate nei nomi dei documenti già creati nel nuovo anno
$dirs_salva = esegui_query("select * from {$tablecontratti} where tipo = 'dir'");
$num_dirs_salva = numlin_query($dirs_salva);
if ($num_dirs_salva) {
unset($contr_salva_in);
$max_contr = esegui_query("select max(numero) from {$tablecontratti} where tipo {$LIKE} 'contr%'");
$max_contr = risul_query($max_contr, 0, 0);
if (defined("C_CARTELLA_CREA_MODELLI") and C_CARTELLA_CREA_MODELLI != "") {
if (C_CARTELLA_DOC != "" and @is_dir(C_CARTELLA_CREA_MODELLI . "/" . C_CARTELLA_DOC)) {
$dir_salva_home = C_CARTELLA_DOC;
} else {
$dir_salva_home = "";
}
} else {
$dir_salva_home = C_DATA_PATH;
}
$utenti = esegui_query("select * from " . $PHPR_TAB_PRE . "utenti order by idutenti");
$num_utenti = numlin_query($utenti);
unset($nomi_contr_ut);
$parola_documento = mex("documento", 'visualizza_contratto.php');
for ($num1 = 0; $num1 < $num_utenti; $num1++) {
$idutente_contr = risul_query($utenti, $num1, 'idutenti');
for ($num2 = 1; $num2 <= $max_contr; $num2++) {
$nomi_contr_ut[$idutente_contr][$num2] = $parola_documento . $num2;
}
$nomi_contratti = esegui_query("select valpersonalizza from {$tablepersonalizza} where idpersonalizza = 'nomi_contratti' and idutente = '{$idutente_contr}'");
$nomi_contratti = risul_query($nomi_contratti, 0, 'valpersonalizza');
$nomi_contratti = explode("#@&", $nomi_contratti);
$num_nomi_contratti = count($nomi_contratti);
for ($num2 = 0; $num2 < $num_nomi_contratti; $num2++) {
$dati_nome_contratto = explode("#?&", $nomi_contratti[$num2]);
$nomi_contr_ut[$idutente_contr][$dati_nome_contratto[0]] = $dati_nome_contratto[1];
}
# fine for $num2
}
# fine for $num1
unset($prefissi_contr);
for ($num1 = 0; $num1 < $num_dirs_salva; $num1++) {
$dir_salva = risul_query($dirs_salva, 0, 'testo');
if ($dir_salva == "~") {
$dir_salva = $dir_salva_home;
}
if (defined('C_CARTELLA_CREA_MODELLI') and C_CARTELLA_CREA_MODELLI != "") {
$dir_salva = C_CARTELLA_CREA_MODELLI . "/" . str_replace("..", "", $dir_salva);
}
if (!@is_dir($dir_salva)) {
$dir_salva = "";
}
$num_contr = risul_query($dirs_salva, 0, 'numero');
$tipo_contratto = esegui_query("select tipo from " . $PHPR_TAB_PRE . "contratti where numero = '{$num_contr}' and tipo {$LIKE} 'contr%' ");
$tipo_contratto = risul_query($tipo_contratto, 0, 'tipo');
$suff_file = "html";
if ($tipo_contratto == "contrrtf") {
$suff_file = "rtf";
}
if ($tipo_contratto == "contrtxt") {
$suff_file = "txt";
}
$filelock_contr = fopen($dir_salva . "/crea_contr.lock", "w+");
flock($filelock_contr, 2);
for ($num2 = 0; $num2 < $num_utenti; $num2++) {
$idutente_contr = risul_query($utenti, $num1, 'idutenti');
if (!$prefissi_contr[$dir_salva . "/" . $nomi_contr_ut[$idutente_contr][$num_contr]]) {
$nome_contratto = $nomi_contr_ut[$idutente_contr][$num_contr];
$prefissi_contr[$dir_salva . "/" . $nome_contratto] = 1;
$contr_dir = opendir($dir_salva . "/");
while ($contr_corr = readdir($contr_dir)) {
if ($contr_corr != "." and $contr_corr != ".." and is_file($dir_salva . "/" . $contr_corr)) {
if (substr($contr_corr, 0, strlen($nome_contratto)) == $nome_contratto) {
$resto_nome_contr = substr($contr_corr, strlen($nome_contratto));
if (substr($resto_nome_contr, 0, 6) == "_{$anno}" . "_") {
if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}(_[0-9]+(-[0-9]+)?)*\\.{$suff_file}/", "", $resto_nome_contr) == "") {
$num_pren_esist = substr($resto_nome_contr, 12);
$num_pren_esist = substr($num_pren_esist, 0, -1 * (strlen($suff_file) + 1));
if ($num_pren_esist) {
$agg_contr = 1;
$n_lista_pren = "";
$num_pren_esist = explode("_", $num_pren_esist);
for ($num3 = 0; $num3 < count($num_pren_esist); $num3++) {
$num_pren_esist2 = explode("-", $num_pren_esist[$num3]);
$fine_for = $num_pren_esist2[count($num_pren_esist2) - 1];
for ($num4 = $num_pren_esist2[0]; $num4 <= $fine_for; $num4++) {
if (!$nuovo_idprenota[$num4]) {
$agg_contr = 0;
break;
}
# fine if (!$nuovo_idprenota[$num4])
if ($num4 == $num_pren_esist2[0]) {
$n_lista_pren .= "_" . $nuovo_idprenota[$num4];
} elseif ($num4 == $fine_for) {
$n_lista_pren .= "-" . $nuovo_idprenota[$num4];
}
}
# fine for $num4
}
# fine for $num3
if ($agg_contr) {
$n_nome_contr = $nome_contratto . substr($resto_nome_contr, 0, 11) . $n_lista_pren . ".{$suff_file}";
rename($dir_salva . "/" . $contr_corr, $dir_salva . "/" . $n_nome_contr);
}
# fine if ($agg_contr)
}
# fine if ($num_pren_esist)
}
# fine if (preg_replace("/_[0-9]{4,4}_[0-9]{5,5}\.$suff_file/","",$resto_nome_contr) == "")
}
# fine if (substr($resto_nome_contr,0,6) == "_$anno"."_")
}
# fine if (substr($contr_corr,0,strlen($nome_contratto)) == $nome_contratto)
}
# fine if ($contr_corr != "." and $contr_corr != ".." and...
}
# fine while ($fattura_corr = readdir($fatture_dir))
closedir($contr_dir);
}
# fine if (!$prefissi_contr[$dir_salva."/".$nomi_contr_ut[$idutente_contr][$num_contr]])
}
# fine for $num2
flock($filelock_contr, 3);
fclose($filelock_contr);
unlink($dir_salva . "/crea_contr.lock");
}
# fine for $num1
}
# fine if ($num_dirs_salva)
}
# fine else if ($num_periodo_interferenza == 0)
$colonne = "idntariffe,nomecostoagg,tipo_ca,valore_ca,valore_perc_ca,arrotonda_ca,tasseperc_ca,associasett_ca,numsett_ca,moltiplica_ca,periodipermessi_ca,beniinv_ca,appincompatibili_ca,variazione_ca,mostra_ca,categoria_ca,letto_ca,numlimite_ca,regoleassegna_ca,utente_inserimento";
for ($num1 = 1; $num1 <= $num_tariffe_tab; $num1++) {
$nome_nuova_tariffa = "tariffa" . $num1;
$colonne .= ",{$nome_nuova_tariffa}";
}
# fine for $num1
esegui_query("insert into {$tablenometariffe} ({$colonne}) select {$colonne} from {$tablenometariffe_prec}");
$costi_agg_importati = esegui_query("select * from {$tablenometariffe} where idntariffe > 10 ");
$num_costi_agg_importati = numlin_query($costi_agg_importati);
for ($num1 = 0; $num1 < $num_costi_agg_importati; $num1++) {
$idntariffe = risul_query($costi_agg_importati, $num1, 'idntariffe');
$periodipermessi = risul_query($costi_agg_importati, $num1, 'periodipermessi_ca');
if ($periodipermessi) {
$pp_nuovi = substr($periodipermessi, 0, 1);
$periodipermessi = explode(",", substr($periodipermessi, 1));
for ($num2 = 0; $num2 < count($periodipermessi); $num2++) {
$id_data_fine_pp = explode("-", $periodipermessi[$num2]);
$id_data_inizio_pp = $id_data_fine_pp[0];
$id_data_fine_pp = $id_data_fine_pp[1];
if ($id_data_fine_pp >= $id_data_ini_periodi_prec and $id_data_inizio_pp <= $id_data_fine_periodi_prec) {
if ($id_data_inizio_pp < $id_data_ini_periodi_prec) {
$id_data_inizio_pp = $id_data_ini_periodi_prec;
}
if ($id_data_fine_pp > $id_data_fine_periodi_prec) {
$id_data_fine_pp = $id_data_fine_periodi_prec;
}
$id_data_inizio_pp = $id_data_inizio_pp - $id_data_ini_periodi_prec + 1;
$id_data_fine_pp = $id_data_fine_pp - $id_data_ini_periodi_prec + 1;
$pp_nuovi .= $id_data_inizio_pp . "-" . $id_data_fine_pp . ",";
}
# fine if ($id_data_fine_pp >= $id_data_ini_periodi_prec and...
}
# fine for $num2
if (strlen($pp_nuovi) > 1) {
$pp_nuovi = substr($pp_nuovi, 0, -1);
}
esegui_query("update {$tablenometariffe} set periodipermessi_ca = '{$pp_nuovi}' where idntariffe = '{$idntariffe}'");
}
# fine if ($periodipermessi)
}
# fine for $num1
esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_per_app != ''");
esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_per_utente != ''");
esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_per_persone != ''");
esegui_query("insert into {$tableregole} select {$col_tableregole} from {$tableregole_prec} where tariffa_commissioni is not NULL and iddatainizio is NULL ");
$privilegi_prec = esegui_query("select * from {$tableprivilegi} where anno = '{$anno_prec}'");
for ($num1 = 0; $num1 < numlin_query($privilegi_prec); $num1++) {
$idutente_p = risul_query($privilegi_prec, $num1, 'idutente');
$regole1_consentite_p = risul_query($privilegi_prec, $num1, 'regole1_consentite');
$tariffe_consentite_p = risul_query($privilegi_prec, $num1, 'tariffe_consentite');
$costi_agg_consentiti_p = risul_query($privilegi_prec, $num1, 'costi_agg_consentiti');
$contratti_consentiti_p = risul_query($privilegi_prec, $num1, 'contratti_consentiti');
$cassa_pagamenti_p = aggslashdb(risul_query($privilegi_prec, $num1, 'cassa_pagamenti'));
$priv_ins_prenota_p = risul_query($privilegi_prec, $num1, 'priv_ins_prenota');
$priv_mod_prenota_p = risul_query($privilegi_prec, $num1, 'priv_mod_prenota');
$priv_mod_pers_p = risul_query($privilegi_prec, $num1, 'priv_mod_pers');
$priv_ins_clienti_p = risul_query($privilegi_prec, $num1, 'priv_ins_clienti');
$prefisso_clienti_p = risul_query($privilegi_prec, $num1, 'prefisso_clienti');
$priv_ins_costi_p = risul_query($privilegi_prec, $num1, 'priv_ins_costi');
$priv_vedi_tab_p = risul_query($privilegi_prec, $num1, 'priv_vedi_tab');
$priv_ins_tariffe_p = risul_query($privilegi_prec, $num1, 'priv_ins_tariffe');
$priv_ins_regole_p = risul_query($privilegi_prec, $num1, 'priv_ins_regole');
esegui_query("insert into {$tableprivilegi} (idutente,anno,regole1_consentite,tariffe_consentite,costi_agg_consentiti,contratti_consentiti,cassa_pagamenti,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) values ('{$idutente_p}','{$anno}','{$regole1_consentite_p}','{$tariffe_consentite_p}','{$costi_agg_consentiti_p}','{$contratti_consentiti_p}','{$cassa_pagamenti_p}','{$priv_ins_prenota_p}','{$priv_mod_prenota_p}','{$priv_mod_pers_p}','{$priv_ins_clienti_p}','{$prefisso_clienti_p}','{$priv_ins_costi_p}','{$priv_vedi_tab_p}','{$priv_ins_tariffe_p}','{$priv_ins_regole_p}')");
$lingua_mex = $lingua[$idutente_p];
crea_menu_date(C_DATA_PATH . "/selectperiodi{$anno}.1.php", C_DATA_PATH . "/selectperiodi{$anno}.{$idutente_p}.php", $tipo_periodi);
if (@is_file(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".{$idutente_p}.php")) {
estendi_menu_date(C_DATA_PATH . "/selperiodimenu" . ($anno - 1) . ".{$idutente_p}.php", C_DATA_PATH . "/selperiodimenu{$anno}.{$idutente_p}.php", $tipo_periodi, date("Y-m-d", mktime(0, 0, 0, $mese_ini, 1, $anno)), $data_ini_agg, date("Y-m-d", mktime(0, 0, 0, $mese_fine + 1, 1, $anno)), $anno, $pag);
} else {
copy(C_DATA_PATH . "/selectperiodi{$anno}.{$idutente_p}.php", C_DATA_PATH . "/selperiodimenu{$anno}.{$idutente_p}.php");
}
$lingua_mex = $lingua[1];
$giorno_vedi_ini_sett = esegui_query("select valpersonalizza_num from {$tablepersonalizza} where idpersonalizza = 'giorno_vedi_ini_sett{$anno_prec}' and idutente = '{$idutente_p}'");
if (numlin_query($giorno_vedi_ini_sett) == 1 and $tipo_periodi == "g") {
esegui_query("insert into {$tablepersonalizza} (idpersonalizza,valpersonalizza_num,idutente) values ('giorno_vedi_ini_sett{$anno}','" . risul_query($giorno_vedi_ini_sett, 0, "valpersonalizza_num") . "','{$idutente_p}')");
}
}
# fine for $num1
$giorno_vedi_ini_sett = esegui_query("select valpersonalizza_num from {$tablepersonalizza} where idpersonalizza = 'giorno_vedi_ini_sett{$anno_prec}' and idutente = '1'");
if (numlin_query($giorno_vedi_ini_sett) == 1 and $tipo_periodi == "g") {
esegui_query("insert into {$tablepersonalizza} (idpersonalizza,valpersonalizza_num,idutente) values ('giorno_vedi_ini_sett{$anno}','" . risul_query($giorno_vedi_ini_sett, 0, "valpersonalizza_num") . "','1')");
}
$inserisci_in_ntariffe = "NO";
}
# fine if ($importa_anno_prec == "SI")
if ($inserisci_in_ntariffe != "NO") {
# rigo 1: nomi tariffe; 2-3: caparra (% e arrotondo).
for ($numtariffe = 1; $numtariffe <= 6; $numtariffe = $numtariffe + 1) {
esegui_query("insert into {$tablenometariffe} (idntariffe) values ('{$numtariffe}')");
}
# fine for $numtariffe
esegui_query("update {$tablenometariffe} set nomecostoagg = '8' where idntariffe = '1'");
esegui_query("update {$tablenometariffe} set numlimite_ca = '11' where idntariffe = '1'");
}
# fine if ($inserisci_in_ntariffe != "NO")
esegui_query("delete from {$tablerelclienti} where tipo = 'cc' {$lista_clienti_importati}");
unlock_tabelle($tabelle_lock);
if ($silenzio != "SI") {
echo "<br> " . mex("Anno ", $pag) . $anno . mex(" creato", $pag) . "! <br><br>";
}
if ($importa_anno_prec == "SI" and C_RESTRIZIONI_DEMO_ADMIN != "SI") {
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;
$pag_orig = $pag;
$pag = "crea_modelli.php";
include "./includes/templates/funzioni_modelli.php";
$modello_esistente = "SI";
$cambia_frasi = "NO";
$anno_modello = $anno;
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 (@is_file("{$percorso_cartella_modello}/mdl_disponibilita.php")) {
$lingua_modello = "ita";
$nome_file = mex2("mdl_disponibilita", $pag, $lingua_modello) . ".php";
$num_periodi_date = "";
recupera_var_modello_disponibilita($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
if ($anno_modello_presente == $anno_prec) {
aggiorna_var_anno_modello_disponibilita($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi);
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 ($anno_modello_presente == $anno_prec)
}
# fine if (@is_file("$percorso_cartella_modello/modello_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";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) {
$lingua_modello = $ini_lingua;
$num_periodi_date = "";
recupera_var_modello_disponibilita($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
if ($anno_modello_presente == $anno_prec) {
aggiorna_var_anno_modello_disponibilita($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi);
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 ($anno_modello_presente == $anno_prec)
}
# fine if (@is_file("$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_aggiorna_var_anno_modello = "aggiorna_var_anno_modello_" . $modello_ext;
if ($template_file_name["ita"]) {
$nome_file = $template_file_name["ita"];
} else {
$nome_file = "ita_" . $template_file_name["en"];
}
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) {
$lingua_modello = "ita";
$num_periodi_date = "";
$funz_recupera_var_modello($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
if ($anno_modello_presente == $anno_prec) {
$funz_aggiorna_var_anno_modello($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi);
$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 ($anno_modello_presente == $anno_prec)
}
# fine if (@is_file("$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"];
}
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) {
$lingua_modello = $ini_lingua;
$num_periodi_date = "";
$funz_recupera_var_modello($nome_file, $percorso_cartella_modello, $pag, $fr_frase, $num_frasi, $var_mod, $num_var_mod, $tipo_periodi, "SI", $anno_modello, $PHPR_TAB_PRE);
if ($anno_modello_presente == $anno_prec) {
$funz_aggiorna_var_anno_modello($id_data_ini_periodi_prec, $tableperiodi_prec, $tableperiodi, $tabletransazioniweb, $tablemessaggi, $tipo_periodi);
$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 ($anno_modello_presente == $anno_prec)
}
# fine if (@is_file("$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;
if ($silenzio != "SI") {
echo "<br>";
}
}
# fine if ($importa_anno_prec == "SI" and C_RESTRIZIONI_DEMO_ADMIN != "SI")
} else {
if ($silenzio != "SI") {
echo mex("Non ho i permessi per creare nuove tabelle nel database", $pag) . ".<br>";
}
}
} else {
if ($silenzio != "SI") {
echo mex("Anno già creato", $pag) . ".<br>";
}
}
flock($filelock, 3);
fclose($filelock);
unlink(C_DATA_PATH . "/anni.lock");
} else {
if ($silenzio != "SI") {
echo mex("Non ho i permessi di scrittura sulla cartella data", $pag) . ".<br>";
}
}
$lingua_mex = $lingua_mex_orig;
}
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 crea_modello_rat ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) {
global $num_periodi_date,$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,$estendi_ultima_data;
global $m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$mostra_caparra,$modello_esistente,$cambia_frasi,$template_data_dir,$template_file_name,$parola_settimane;
global $apertura_tag_font,$chiusura_tag_font,$stile_tabella_tariffe,$m_valuta_sing,$m_valuta_plur,$prima_parte_html,$ultima_parte_html,$file_css_frame,$tema_modello;
$tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello;
$tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello;
$tableanni = $PHPR_TAB_PRE."anni";
if (controlla_anno($anno_modello) != "SI") {
$continua = "NO";
$anno_modello = "";
} # fine if (controlla_anno($anno_modello) != "SI")
else {
$anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'");
if (numlin_query($anno_esistente) != 1) $continua = "NO";
} # fine else if (controlla_anno($anno_modello) != "SI")
if ($continua != "NO") {
if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO";
$date_in_menu = "";
$idfineperiodo_prec = -10;
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1};
$inizioperiodo = aggslashdb(${"inizioperiodo".$num1});
$fineperiodo = aggslashdb(${"fineperiodo".$num1});
$idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; }
else { $idinizioperiodo = risul_query($idinizioperiodo,0,idperiodi); }
$inizioperiodo = $idinizioperiodo;
if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) {
$idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello");
$idfineperiodo = risul_query($idfineperiodo,0,0);
} # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
else {
$idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) { $idfineperiodo = -1; }
else { $idfineperiodo = risul_query($idfineperiodo,0,idperiodi); }
} # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
$fineperiodo = $idfineperiodo ;
${"inizioperiodo".$num1} = $inizioperiodo;
${"fineperiodo".$num1} = $fineperiodo;
if ($idfineperiodo < $idinizioperiodo) $continua = "NO";
if (($idfineperiodo_prec + 1) > $idinizioperiodo) $continua = "NO";
$idfineperiodo_prec = $idfineperiodo;
${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1});
if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO";
} # fine for $num1
if ($continua == "NO") {
if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>";
} # fine if ($continua == "NO")
else {
$file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php");
$num_linee_file_intero = count($file_intero);
$pag_gm = "giorni_mesi.php";
$m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'");
$m_tipo_periodi = risul_query($m_tipo_periodi,0,0);
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
$inizioperiodo = ${"inizioperiodo".$num1};
$fineperiodo = ${"fineperiodo".$num1};
$num_intervallo = 1;
for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) {
if (substr($file_intero[$num2],0,7) == "<option") {
$data_option = substr($file_intero[$num2],16,10);
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' ");
$esiste_data_option = numlin_query($id_data_option);
if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,idperiodi);
else {
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' ");
$id_data_option = risul_query($id_data_option,0,idperiodi);
} # fine else if ($esiste_data_option == 1)
if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) {
if ($num_intervallo == 1) {
$giorno_option = substr($data_option,8,2);
$mese_option = substr($data_option,5,2);
$anno_option = substr($data_option,0,4);
$nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
$nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
if ($m_tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello);
if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello);
if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello);
if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello);
if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello);
if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello);
if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello);
} # fine if ($m_tipo_periodi == "g")
else $nome_giorno = "";
if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello);
if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello);
if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello);
if ($nome_mese == "Apr") $nome_mese = mex2("Apr",$pag_gm,$lingua_modello);
if ($nome_mese == "May") $nome_mese = mex2("Mag",$pag_gm,$lingua_modello);
if ($nome_mese == "Jun") $nome_mese = mex2("Giu",$pag_gm,$lingua_modello);
if ($nome_mese == "Jul") $nome_mese = mex2("Lug",$pag_gm,$lingua_modello);
if ($nome_mese == "Aug") $nome_mese = mex2("Ago",$pag_gm,$lingua_modello);
if ($nome_mese == "Sep") $nome_mese = mex2("Set",$pag_gm,$lingua_modello);
if ($nome_mese == "Oct") $nome_mese = mex2("Ott",$pag_gm,$lingua_modello);
if ($nome_mese == "Nov") $nome_mese = mex2("Nov",$pag_gm,$lingua_modello);
if ($nome_mese == "Dec") $nome_mese = mex2("Dic",$pag_gm,$lingua_modello);
$date_in_menu .= "<option value=\\\"$data_option\\\">$nome_mese $giorno_option$nome_giorno, $anno_option</option>
";
} # fine if ($num_intervallo == 1)
if ($num_intervallo == ${"intervalloperiodo".$num1}) $num_intervallo = 1;
else $num_intervallo++;
} # fine if ($id_data_option > $inizioperiodo and...
} # fine if (substr($file_intero[$num2],0,7) == "<option")
} # fine for $num2
} # fine for $num1
} # fine else if ($continua == "NO")
$dati_ca = dati_costi_agg_ntariffe($tablenometariffe_modello,"NO");
} # fine if ($continua != "NO")
if ($continua != "NO") {
$rigatariffe = esegui_query("select * from $tablenometariffe_modello where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,nomecostoagg);
$tariffe_mostra = "";
$nomi_tariffe_imposte = "";
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa++) {
$tariffa = "tariffa".$numtariffa;
global $$tariffa;
if ($$tariffa == "SI") $tariffe_mostra .= " $numtariffa => \"".mex("SI",$pag)."\",";
$nome_tariffa_imposto = "nome_tariffa_imposto".$numtariffa;
global $$nome_tariffa_imposto;
$$nome_tariffa_imposto = formatta_input_var_x_file($$nome_tariffa_imposto);
if ($$nome_tariffa_imposto) $nomi_tariffe_imposte .= "$numtariffa => \"".$$nome_tariffa_imposto."\",";
} # fine for $numtariffa
if ($tariffe_mostra) $tariffe_mostra = substr($tariffe_mostra,0,-1);
if ($nomi_tariffe_imposte) $nomi_tariffe_imposte = substr($nomi_tariffe_imposte,0,-1);
unset($nomi_costi_imposti);
unset($costi_attivati);
for ($numca = 0 ; $numca < $dati_ca[num] ; $numca++) {
global ${"attiva_costo".$dati_ca[$numca][id]};
if (${"attiva_costo".$dati_ca[$numca][id]} == "SI") {
$costi_attivati .= " ".$dati_ca[$numca][id]." => \"".mex("SI",$pag)."\",";
$nome_costo_imposto = "nome_costo_imposto".$dati_ca[$numca][id];
global $$nome_costo_imposto;
$$nome_costo_imposto = formatta_input_var_x_file($$nome_costo_imposto);
if ($$nome_costo_imposto) $nomi_costi_imposti .= $dati_ca[$numca][id]." => \"".$$nome_costo_imposto."\",";
} # fine if (${"attiva_costo".$dati_ca[$numca][id]} == "SI")
} # fine for $num1
if ($nomi_costi_imposti) $nomi_costi_imposti = substr($nomi_costi_imposti,0,-1);
if ($costi_attivati) $costi_attivati = substr($costi_attivati,0,-1);
if ($file_css_frame == "http://") $file_css_frame = "";
$num_colori = 0;
$extra_head_frame = "";
if (strcmp($tema_modello,"")) {
include("./includes/templates/$template_data_dir/themes.php");
$num_temi = count($template_theme_name);
for ($num1 = 1 ; $num1 <= $num_temi ; $num1++) {
if ($tema_modello == $template_theme_name[$num1]) {
$tema_trovato = 1;
$tema_sel = $num1;
} # fine if ($tema_modello == $template_theme_name[$num1])
} # fine for $num1
if ($tema_trovato) {
$prima_parte_html = $template_theme_html_pre[$tema_sel];
$ultima_parte_html = $template_theme_html_post[$tema_sel];
$extra_head_frame = $framed_mode_extra_head[$tema_sel];
$valori_tema = $template_theme_values[$tema_sel];
$num_valori = count($valori_tema);
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) {
global ${"valore_tema_".$num1};
${"valore_tema_".$num1} = formatta_input_var_x_file(${"valore_tema_".$num1});
$valore_sost = ${"valore_tema_".$num1};
if (!strcmp($valore_sost,"")) $valore_sost = $valori_tema[$num1]['null'];
elseif (strcmp($valori_tema[$num1]['replace'],"")) $valore_sost = str_replace("[theme_value_$num1]",$valore_sost,$valori_tema[$num1]['replace']);
$prima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$prima_parte_html);
$ultima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$ultima_parte_html);
$extra_head_frame = str_replace("[theme_value_$num1]",$valore_sost,$extra_head_frame);
} # fine for $num1
$colori_tema = $template_theme_colors[$tema_sel];
$num_colori = count($colori_tema);
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) {
global ${"colore_tema_".$num1};
if (!preg_match("/^#[0-9a-f]{3,3}$/i",${"colore_tema_".$num1}) and !preg_match("/^#[0-9a-f]{6,6}$/i",${"colore_tema_".$num1})) ${"colore_tema_".$num1} = $colori_tema[$num1]['default'];
$prima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$prima_parte_html);
$ultima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$ultima_parte_html);
$extra_head_frame = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$extra_head_frame);
} # fine for $num1
} # fine if ($tema_trovato)
else $tema_modello = "";
} # fine if (strcmp($tema_modello,""))
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) $M_PHPR_DB_TYPE = "";
if ($HOTELD_DB_NAME) $M_PHPR_DB_NAME = "";
if ($HOTELD_DB_HOST) $M_PHPR_DB_HOST = "";
if (strcmp($HOTELD_DB_PORT,"")) $M_PHPR_DB_PORT = "";
if ($HOTELD_DB_USER) $M_PHPR_DB_USER = "";
if (strcmp($HOTELD_DB_PASS,"")) $M_PHPR_DB_PASS = "";
if ($HOTELD_TAB_PRE) $M_PHPR_TAB_PRE = "";
} # fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
$M_PHPR_DB_TYPE = formatta_input_var_x_file($M_PHPR_DB_TYPE);
$M_PHPR_DB_NAME = formatta_input_var_x_file($M_PHPR_DB_NAME);
$M_PHPR_DB_HOST = formatta_input_var_x_file($M_PHPR_DB_HOST);
$M_PHPR_DB_PORT = formatta_input_var_x_file($M_PHPR_DB_PORT);
$M_PHPR_DB_USER = formatta_input_var_x_file($M_PHPR_DB_USER);
$M_PHPR_DB_PASS = formatta_input_var_x_file($M_PHPR_DB_PASS);
$M_PHPR_LOAD_EXT = formatta_input_var_x_file($M_PHPR_LOAD_EXT);
$M_PHPR_TAB_PRE = formatta_input_var_x_file($M_PHPR_TAB_PRE);
$m_stile_soldi = formatta_input_var_x_file($m_stile_soldi);
$m_stile_data = formatta_input_var_x_file($m_stile_data);
$anteponi_nome_valuta = formatta_input_var_x_file($anteponi_nome_valuta);
$mostra_caparra = formatta_input_var_x_file($mostra_caparra);
$apertura_tag_font = formatta_input_var_x_file($apertura_tag_font);
$chiusura_tag_font = formatta_input_var_x_file($chiusura_tag_font);
$stile_tabella_tariffe = formatta_input_var_x_file($stile_tabella_tariffe);
$m_valuta_sing = formatta_input_var_x_file($m_valuta_sing);
$m_valuta_plur = formatta_input_var_x_file($m_valuta_plur);
$file_css_frame = formatta_input_var_x_file($file_css_frame);
$extra_head_frame = formatta_input_var_x_file($extra_head_frame);
if (get_magic_quotes_gpc()) $prima_parte_html = stripslashes($prima_parte_html);
$prima_parte_html = str_replace("<?","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("?>","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("<%","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("%>","ERROR",$prima_parte_html);
$prima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$prima_parte_html);
if (get_magic_quotes_gpc()) $ultima_parte_html = stripslashes($ultima_parte_html);
$ultima_parte_html = str_replace("<?","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("?>","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("<%","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("%>","ERROR",$ultima_parte_html);
$ultima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$ultima_parte_html);
# FRASI
if ($cambia_frasi == "SI" or $modello_esistente == "SI") {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) {
global ${$fr_frase[$num_fr]};
${$fr_frase[$num_fr]} = formatta_input_var_x_file(${$fr_frase[$num_fr]});
} # fine for $num_fr
} # fine if ($cambia_frasi == "SI" or $modello_esistente == "SI")
else {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) ${$fr_frase[$num_fr]} = mext_rat($frase[$num_fr],$pag,$lingua_modello);
} # fine else if ($cambia_frasi == "SI" or $modello_esistente == "SI")
$cost_percorso_a_dati = "";
if (function_exists("realpath")) {
if (realpath(C_DATA_PATH."/")) $cost_percorso_a_dati = realpath(C_DATA_PATH."/")."/";
} # fine if (function_exists("realpath"))
if ((string) $cost_percorso_a_dati == "") {
if (substr(C_DATA_PATH,0,1) == "/") $cost_percorso_a_dati = C_DATA_PATH;
else {
$dati_path = C_DATA_PATH;
if (substr($dati_path,0,2) == "./") $dati_path = substr($dati_path,1);
else $dati_path = "/".$dati_path;
if ($_SERVER["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($_SERVER["SCRIPT_FILENAME"]).$dati_path;
else {
if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($HTTP_SERVER_VARS["SCRIPT_FILENAME"]).$dati_path;
else {
if ($SCRIPT_FILENAME) $cost_percorso_a_dati = dirname($SCRIPT_FILENAME).$dati_path;
else $cost_percorso_a_dati = "./";
} # fine else if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"])
} # fine else if ($_SERVER["SCRIPT_FILENAME"])
} # fine else if (substr(C_DATI_PATH,0,1) == "/")
} # fine if ((string) $cost_percorso_a_dati == "")
if ($template_file_name[$lingua_modello]) $nome_file = $template_file_name[$lingua_modello];
else {
$template_file_name_m = mext_rat($template_file_name['ita'],$pag,$lingua_modello);
if ($template_file_name_m != $template_file_name['ita'] and $template_file_name_m != $template_file_name['en'] and $template_file_name_m != $template_file_name['es']) $nome_file = $template_file_name_m;
else $nome_file = $lingua_modello."_".$template_file_name['en'];
} # fine else if ($template_file_name[$lingua_modello])
$file = @fopen("$percorso_cartella_modello/$nome_file","w+");
if ($file) {
flock($file,2);
fwrite($file,"<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>$prima_parte_html
<!-- ".mex("FINE DELLA PRIMA PARTE DELL'HTML PERSONALE",$pag)." -->
<?php
} # fine if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed'])
# ".mex("INIZIO VARIABILI MODIFICABILI",$pag)." (".mex("modificare il valore sulla destra",$pag).")
# ".mex("Inserire in questa variabile il nome della pagina se \$PHP_SELF non è definita",$pag)."
\$".mex("var_nome_pagina",$pag)." = \"\";
\$".mex("var_anno",$pag)." = $anno_modello;
\$".mex("var_tipo_db",$pag)." = \"$M_PHPR_DB_TYPE\";
\$".mex("var_nome_db",$pag)." = \"$M_PHPR_DB_NAME\";
\$".mex("var_computer_db",$pag)." = \"$M_PHPR_DB_HOST\";
\$".mex("var_porta_db",$pag)." = \"$M_PHPR_DB_PORT\";
\$".mex("var_utente_db",$pag)." = \"$M_PHPR_DB_USER\";
\$".mex("var_password_db",$pag)." = \"$M_PHPR_DB_PASS\";
\$".mex("var_carica_estensione_db",$pag)." = \"".mex("$M_PHPR_LOAD_EXT",$pag)."\";
\$".mex("var_prefisso_tabelle_db",$pag)." = \"$M_PHPR_TAB_PRE\";
\$".mex("var_lingua_modello",$pag)." = \"$lingua_modello\";
\$".mex("var_stile_soldi",$pag)." = \"".mex("$m_stile_soldi",$pag)."\";
\$".mex("var_stile_data",$pag)." = \"".mex("$m_stile_data",$pag)."\";
\$".mex("var_anteponi_nome_valuta",$pag)." = \"".mex("$anteponi_nome_valuta",$pag)."\";
\$".mex("var_estendi_ultima_data",$pag)." = \"".mex("$estendi_ultima_data",$pag)."\";
\$".mex("var_tariffe_mostra",$pag)." = array($tariffe_mostra);
\$".mex("var_nomi_tariffe_imposte",$pag)." = array($nomi_tariffe_imposte);
\$".mex("var_costi_aggiuntivi_mostra",$pag)." = array($costi_attivati);
\$".mex("var_nomi_costi_agg_imposti",$pag)." = array($nomi_costi_imposti);
\$".mex("var_mostra_caparra",$pag)." = \"".mex("$mostra_caparra",$pag)."\";
\$".mex("var_apertura_tag_font",$pag)." = \"$apertura_tag_font\";
\$".mex("var_chiusura_tag_font",$pag)." = \"$chiusura_tag_font\";
\$".mext_rat("var_stile_tabella_tariffe",$pag)." = \"$stile_tabella_tariffe\";
\$".mex("var_file_css_frame",$pag)." = \"$file_css_frame\";
\$".mex("var_tema_modello",$pag)." = \"$tema_modello\";
");
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) fwrite($file,"\$".mex("var_colore_tema",$pag)."_$num1 = \"".${"colore_tema_".$num1}."\";
");
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) fwrite($file,"\$".mex("var_valore_tema",$pag)."_$num1 = \"".${"valore_tema_".$num1}."\";
");
fwrite($file,"
# ".mex("FRASI",$pag)."
\$".mex("var_fr_Valuta_sing",$pag)." = \"".$m_valuta_sing."\";
\$".mex("var_fr_Valuta_plur",$pag)." = \"".$m_valuta_plur."\";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".mext_rat("var_".$fr_frase[$num_fr],$pag)." = \"".${$fr_frase[$num_fr]}."\";
");
fwrite($file,"
# ".mex("PERIODI NEI MENU",$pag)."
\$".mex("var_periodi_menu",$pag)." = \"$date_in_menu\";
# ".mex("FINE VARIABILI MODIFICABILI",$pag)."
############################################################################
### ".mex("NON MODIFICARE NIENTE A PARTIRE DA QUI",$pag)."
############################################################################
error_reporting(E_ALL ^ E_NOTICE);
\$PHPR_LOG = \"NO\";
\$pag = \$".mex("var_nome_pagina",$pag).";
if (!\$pag) {
if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or @\$HTTP_SERVER_VARS[\"PHP_SELF\"]) {
if (@\$_SERVER[\"PHP_SELF\"]) \$PHP_SELF = \$_SERVER[\"PHP_SELF\"];
else if (@\$HTTP_SERVER_VARS[\"PHP_SELF\"]) \$PHP_SELF = \$HTTP_SERVER_VARS[\"PHP_SELF\"];
\$pag = explode(\"/\",\$PHP_SELF);
\$pag = \$pag[(count(\$pag)-1)];
} # fine if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or...
else echo \"".mex("La variabile \\\$PHP_SELF non è definita, si dovrà editare a mano questa pagina per inserirne il nome",$pag).".<br>\";
} # fine if (!\$pag)
define(C_PERCORSO_A_DATI,\"$cost_percorso_a_dati\");
\$anno = \$".mex("var_anno",$pag).";
\$PHPR_DB_TYPE = \$".mex("var_tipo_db",$pag).";
\$PHPR_DB_NAME = \$".mex("var_nome_db",$pag).";
\$PHPR_DB_HOST = \$".mex("var_computer_db",$pag).";
\$PHPR_DB_PORT = \$".mex("var_porta_db",$pag).";
\$PHPR_DB_USER = \$".mex("var_utente_db",$pag).";
\$PHPR_DB_PASS = \$".mex("var_password_db",$pag).";
if (strtoupper(\$".mex("var_carica_estensione_db",$pag).") == \"".mex("SI",$pag)."\") \$PHPR_LOAD_EXT = \"SI\";
else \$PHPR_LOAD_EXT = \"NO\";
\$PHPR_TAB_PRE = \$".mex("var_prefisso_tabelle_db",$pag).";
");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) fwrite($file,"\$HOTELD_DB_TYPE = \"\";
\$HOTELD_DB_NAME = \"\";
\$HOTELD_DB_HOST = \"\";
\$HOTELD_DB_PORT = \"\";
\$HOTELD_DB_USER = \"\";
\$HOTELD_DB_PASS = \"\";
\$HOTELD_TAB_PRE = \"\";
require('".C_EXT_DB_DATA_PATH."');
if (\$HOTELD_DB_TYPE) \$PHPR_DB_TYPE = \$HOTELD_DB_TYPE;
if (\$HOTELD_DB_NAME) \$PHPR_DB_NAME = \$HOTELD_DB_NAME;
if (\$HOTELD_DB_HOST) \$PHPR_DB_HOST = \$HOTELD_DB_HOST;
if (strcmp(\$HOTELD_DB_PORT,\"\")) \$PHPR_DB_PORT = \$HOTELD_DB_PORT;
if (\$HOTELD_DB_USER) \$PHPR_DB_USER = \$HOTELD_DB_USER;
if (strcmp(\$HOTELD_DB_PASS,\"\")) \$PHPR_DB_PASS = \$HOTELD_DB_PASS;
if (\$HOTELD_TAB_PRE) \$PHPR_TAB_PRE = \$HOTELD_TAB_PRE;
");
fwrite($file,"\$lingua_modello = \$".mex("var_lingua_modello",$pag).";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("europa",$pag)."\") \$stile_soldi = \"europa\";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("usa",$pag)."\") \$stile_soldi = \"usa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("europa",$pag)."\") \$stile_data = \"europa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("usa",$pag)."\") \$stile_data = \"usa\";
if (strtoupper(\$".mex("var_anteponi_nome_valuta",$pag).") == \"".mex("SI",$pag)."\") \$anteponi_nome_valuta = \"SI\";
else \$anteponi_nome_valuta = \"NO\";
if (strtoupper(\$".mex("var_estendi_ultima_data",$pag).") == \"".mex("SI",$pag)."\") \$estendi_ultima_data = \"SI\";
else \$estendi_ultima_data = \"NO\";
unset(\$tariffe_mostra);
reset (\$".mex("var_tariffe_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_tariffe_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$tariffe_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$tariffe_mostra[\$key] = \"NO\";
} # fine while
\$n_tariffe_imposte = \$".mex("var_nomi_tariffe_imposte",$pag).";
unset(\$costi_agg_mostra);
reset (\$".mex("var_costi_aggiuntivi_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_costi_aggiuntivi_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$costi_agg_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$costi_agg_mostra[\$key] = \"NO\";
} # fine while
\$n_costi_agg_imposti = \$".mex("var_nomi_costi_agg_imposti",$pag).";
if (strtoupper(\$".mex("var_mostra_caparra",$pag).") == \"".mex("SI",$pag)."\") \$mostra_caparra = \"SI\";
else \$mostra_caparra = \"NO\";
\$apertura_tag_font = \$".mex("var_apertura_tag_font",$pag).";
\$chiusura_tag_font = \$".mex("var_chiusura_tag_font",$pag).";
\$stile_tabella_tariffe = \$".mext_rat("var_stile_tabella_tariffe",$pag).";
\$file_css_frame = \$".mex("var_file_css_frame",$pag).";
\$extra_head_frame = \"$extra_head_frame\";
\$tipo_periodi = \"$m_tipo_periodi\";
# FRASI
\$fr_Euro = \$".mex("var_fr_Valuta_sing",$pag).";
\$fr_Euros = \$".mex("var_fr_Valuta_plur",$pag).";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".$fr_frase[$num_fr]." = \$".mext_rat("var_".$fr_frase[$num_fr],$pag).";
");
fwrite($file,"
# PERIODI NEI MENU
\$menu_periodi = \$".mex("var_periodi_menu",$pag).";
function mex_data(\$messaggio) {
");
if ($lingua_modello != "ita") {
if (@is_file("./includes/lang/$lingua_modello/giorni_mesi.php")) includi_file("./includes/lang/$lingua_modello/giorni_mesi.php",$file);
else if (@is_file("./includes/lang/en/giorni_mesi.php")) includi_file("./includes/lang/en/giorni_mesi.php",$file);
} # fine if ($lingua_modello != "ita")
fwrite($file,"
return \$messaggio;
} # fine function mex_data
");
includi_file("./includes/funzioni_".$M_PHPR_DB_TYPE.".php",$file);
fwrite($file,"
\$numconnessione = connetti_db(\$PHPR_DB_NAME,\$PHPR_DB_HOST,\$PHPR_DB_PORT,\$PHPR_DB_USER,\$PHPR_DB_PASS,\$PHPR_LOAD_EXT);
");
includi_file("./includes/funzioni.php",$file);
includi_file(C_DATA_PATH."/versione.php",$file);
includi_file("./includes/funzioni_testo.php",$file);
includi_file("./includes/funzioni_tariffe.php",$file);
includi_file("./includes/funzioni_costi_agg.php",$file);
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") {
$f_scad_acc = explode("/",$percorso_cartella_modello);
$num_f_scad_acc = count($f_scad_acc);
$file_scad_acc = "";
for ($num1 = 0 ; $num1 < $num_f_scad_acc ; $num1++) if ($f_scad_acc[$num1] != ".") $file_scad_acc .= "../";
$file_scad_acc .= C_FILE_SCADENZA_ACCOUNT;
fwrite($file,"
\$disattivato = \"\";
\$scadenza = trim(@implode(@file(\"$file_scad_acc\")));
\$adesso = date(\"YmdHis\");
if (!\$scadenza or \$scadenza < \$adesso) {
\$disattivato = \"SI\";
echo \"Expired account.<br>\";
} # fine (!\$scadenza or \$scadenza < \$adesso)
if (!\$disattivato) {
");
} # fine if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "")
includi_file("./includes/templates/$template_data_dir/template.php",$file);
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") fwrite($file,"
} # fine if (!\$disattivato)
");
fwrite($file,"
if (!\$framed) {
?>
<!-- ".mex("INIZIO DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->
$ultima_parte_html
<!-- ".mex("FINE DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." --><?php } # fine if (!\$framed) ?>");
flock($file,3);
fclose($file);
$exec_crea_mod = substr(decoct(@fileperms('./crea_modelli.php')),-3,1);
if ((defined('C_CHMOD_EXEC_MODELLI') and C_CHMOD_EXEC_MODELLI == "SI") or $exec_crea_mod == "7" or $exec_crea_mod == "5") @chmod("$percorso_cartella_modello/$nome_file", 0750);
else @chmod("$percorso_cartella_modello/$nome_file", 0640);
$url_pagina = "";
if ($silenzio != "totale") {
$url_pagina = trova_url_pagina($nome_file,$percorso_cartella_modello,$pag);
if ($url_pagina) $url_pagina_link = $url_pagina;
else $url_pagina_link = "$percorso_cartella_modello/$nome_file";
} # fine if ($silenzio != "totale")
if ($silenzio == "NO") echo "<br>";
if ($silenzio != "totale") echo mex("Una pagina chiamata",$pag)." <b><a href=\"$url_pagina_link\" target=\"_blank\">$nome_file</a></b> ".mex("è stata creata nella directory",$pag)." \"$percorso_cartella_modello\".<br>";
if (defined("C_CARTELLA_CREA_MODELLI") and $silenzio == "NO") echo mex("Si può creare un link verso questa pagina dal proprio sito internet",$pag).".<br>";
else if ($silenzio == "NO") echo mex("Si può cambiare la directory dove vengono create le pagine da \"configura e personalizza\"",$pag).".<br>";
} # fine if ($file)
else if ($silenzio == "NO") echo mex("Non ho il permesso di scrittura nella cartella",$pag)." $percorso_cartella_modello.<br>";
} # fine if ($continua != "NO")
} # fine function crea_modello_rat
function mext_rat ($messaggio,$pag,$lingua="") {
if ($lingua) $lingua_mex = $lingua;
else global $lingua_mex;
if ($lingua_mex != "en" and $lingua_mex != "ita" and $lingua_mex != "es") {
if (@is_file("./includes/lang/$lingua_mex/modt_rat.php")) include("./includes/lang/$lingua_mex/modt_rat.php");
} # fine if ($lingua_mex != "en" and...
if ($tr != 1) {
# messaggi in inglese di default
if ($lingua_mex != "es" and $lingua_mex != "ita") {
switch ($messaggio) {
case "Pagina della tabella con le tariffe": $messaggio = "Page of the rates table"; $tr = 1; break;
case "Crea la pagina con la tabella delle tariffe": $messaggio = "Create the rates table page"; $tr = 1; break;
case "Mostra tariffe": $messaggio = "Show rates"; $tr = 1; break;
case "Tabella Tariffe": $messaggio = "Rates Table"; $tr = 1; break;
case "Stile tabella tariffe": $messaggio = "Rates table style"; $tr = 1; break;
case "Costi aggiuntivi": $messaggio = "Extra costs"; $tr = 1; break;
case "della tariffa": $messaggio = "of the rate"; $tr = 1; break;
case "della tariffa senza persone": $messaggio = "of the rate without persons"; $tr = 1; break;
case "della tariffa di una persona": $messaggio = "of the rate of one person"; $tr = 1; break;
case "del prezzo totale": $messaggio = "of total price"; $tr = 1; break;
case "della caparra": $messaggio = "of deposit"; $tr = 1; break;
case "del resto della caparra": $messaggio = "of deposit rest"; $tr = 1; break;
case "alla settimana": $messaggio = "per week"; $tr = 1; break;
case "al giorno": $messaggio = "per day"; $tr = 1; break;
case "a persona": $messaggio = "per person"; $tr = 1; break;
case "obbligatorio con": $messaggio = "obligatory with"; $tr = 1; break;
case "tutte le tariffe": $messaggio = "all rates"; $tr = 1; break;
case "*p": $messaggio = "*p"; $tr = 1; break;
case "": $messaggio = ""; $tr = 1; break;
case "": $messaggio = ""; $tr = 1; break;
case "var_stile_tabella_tariffe": $messaggio = "var_rates_table_style"; $tr = 1; break;
case "var_fr_Costi_aggiuntivi": $messaggio = "var_phr_Extra_costs"; $tr = 1; break;
case "var_fr_della_tariffa": $messaggio = "var_phr_of_the_rate"; $tr = 1; break;
case "var_fr_della_tariffa_senza_persone": $messaggio = "var_phr_of_the_rate_without_persons"; $tr = 1; break;
case "var_fr_della_tariffa_di_una_persona": $messaggio = "var_phr_of_the_rate_of_one_person"; $tr = 1; break;
case "var_fr_del_prezzo_totale": $messaggio = "var_phr_of_total_price"; $tr = 1; break;
case "var_fr_della_caparra": $messaggio = "var_phr_of_deposit"; $tr = 1; break;
case "var_fr_del_resto_della_caparra": $messaggio = "var_phr_of_deposit_rest"; $tr = 1; break;
case "var_fr_alla_settimana": $messaggio = "var_phr_per_week"; $tr = 1; break;
case "var_fr_a_persona": $messaggio = "var_phr_per_person"; $tr = 1; break;
case "var_fr_obbligatorio_con": $messaggio = "var_phr_obligatory_with"; $tr = 1; break;
case "var_fr_tutte_le_tariffe": $messaggio = "var_phr_all_rates"; $tr = 1; break;
case "var_fr_per_p": $messaggio = "var_phr_per_p"; $tr = 1; break;
case "var_fr_": $messaggio = "var_phr_"; $tr = 1; break;
case "var_fr_": $messaggio = "var_phr_"; $tr = 1; break;
} # fine switch ($messaggio)
} # fine if ($lingua_mex != "es" and $lingua_mex != "ita")
if ($lingua_mex == "es") {
switch ($messaggio) {
case "Pagina della tabella con le tariffe": $messaggio = "Página de la tabla con las tarifas"; $tr = 1; break;
case "Crea la pagina con la tabella delle tariffe": $messaggio = "Crea la página con la tabla de las tarifas"; $tr = 1; break;
case "Mostra tariffe": $messaggio = "Enseñar las tarifas"; $tr = 1; break;
case "Tabella Tariffe": $messaggio = "Tabla de las Tarifas"; $tr = 1; break;
case "Stile tabella tariffe": $messaggio = "Estilo de la tabla de las tarifas"; $tr = 1; break;
case "Costi aggiuntivi": $messaggio = "Costes añadidos"; $tr = 1; break;
case "della tariffa": $messaggio = "de la tarifa"; $tr = 1; break;
case "della tariffa senza persone": $messaggio = "de la tarifa sin personas"; $tr = 1; break;
case "della tariffa di una persona": $messaggio = "de la tarifa de una persona"; $tr = 1; break;
case "del prezzo totale": $messaggio = "del precio total"; $tr = 1; break;
case "della caparra": $messaggio = "de la fianza"; $tr = 1; break;
case "del resto della caparra": $messaggio = "del resto de la fianza"; $tr = 1; break;
case "alla settimana": $messaggio = "a la semana"; $tr = 1; break;
case "al giorno": $messaggio = "al día"; $tr = 1; break;
case "a persona": $messaggio = "por persona"; $tr = 1; break;
case "obbligatorio con": $messaggio = "obligatorio con"; $tr = 1; break;
case "tutte le tariffe": $messaggio = "todas las tarifas"; $tr = 1; break;
case "*p": $messaggio = "*p"; $tr = 1; break;
case "": $messaggio = ""; $tr = 1; break;
case "": $messaggio = ""; $tr = 1; break;
case "var_stile_tabella_tariffe": $messaggio = "var_estilo_tabla_reservas"; $tr = 1; break;
case "var_fr_Costi_aggiuntivi": $messaggio = "var_fr_Costes_agnadidos"; $tr = 1; break;
case "var_fr_della_tariffa": $messaggio = "var_fr_de_la_tarifa"; $tr = 1; break;
case "var_fr_della_tariffa_senza_persone": $messaggio = "var_fr_de_la_tarifa_sin_personas"; $tr = 1; break;
case "var_fr_della_tariffa_di_una_persona": $messaggio = "var_fr_de_la_tarifa_de_una_persona"; $tr = 1; break;
case "var_fr_del_prezzo_totale": $messaggio = "var_fr_del_precio_total"; $tr = 1; break;
case "var_fr_della_caparra": $messaggio = "var_fr_de_la_fianza"; $tr = 1; break;
case "var_fr_del_resto_della_caparra": $messaggio = "var_fr_del_resto_de_la_fianza"; $tr = 1; break;
case "var_fr_alla_settimana": $messaggio = "var_fr_a_la_semana"; $tr = 1; break;
case "var_fr_a_persona": $messaggio = "var_fr_por_persona"; $tr = 1; break;
case "var_fr_obbligatorio_con": $messaggio = "var_fr_obligatorio_con"; $tr = 1; break;
case "var_fr_tutte_le_tariffe": $messaggio = "var_fr_todas_las_tarifas"; $tr = 1; break;
case "var_fr_per_p": $messaggio = "var_fr_por_p"; $tr = 1; break;
case "var_fr_": $messaggio = "var_fr_"; $tr = 1; break;
case "var_fr_": $messaggio = "var_fr_"; $tr = 1; break;
} # fine switch ($messaggio)
} # fine if ($lingua_mex == "es")
if ($tr != 1) {
if ($lingua) $messaggio = mex2($messaggio,$pag,$lingua);
else $messaggio = mex($messaggio,$pag);
} # fine if ($tr != 1)
} # fine if ($tr != 1)
return $messaggio;
} # fine function mext_rat
function crea_modello_disponibilita ($percorso_cartella_modello,$anno_modello,$PHPR_TAB_PRE,$pag,$lingua_modello,$silenzio,$fr_frase,$frase,$num_frasi,$tipo_periodi) {
global $num_periodi_date,$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,$estendi_ultima_data,$max_num_app_tipologia,$chiedi_num_app_tipologia,$parola_appartamenti,$parola_appartamento,$aggiungi_tipologie,$max_num_tipologie,$chiedi_num_persone,$max_num_persone,$costo_aggiungi_letti,$max_num_aggiungi_letti,$sett_no_prenota;
global $mostra_richiesta_via_mail,$mostra_costi_aggiuntivi,$num_colonne_costi_agg,$num_motivazioni,$mostra_quadro_disp,$mostra_numero_liberi_quadro_disponibilita,$allinea_disponibilita_con_arrivo,$m_stile_soldi,$m_stile_data,$anteponi_nome_valuta,$utente_lis,$aggiungi_costi_fissi,$assegna_con_regola2,$mostra_frase_alternativa_regola1,$mostra_caparra,$ind_email,$maschera_envelope,$manda_copia_richiesta_email;
global $colore_sfondo_quadro_disponibilita,$colore_inizio_settimana_quadro_disponibilita,$colore_libero_quadro_disponibilita,$colore_occupato_quadro_disponibilita,$apertura_font_quadro_disponibilita,$chiusura_font_quadro_disponibilita,$apertura_tag_font,$chiusura_tag_font,$apertura_tag_font_rosse,$chiusura_tag_font_rosse,$stile_tabella_prenotazione,$m_valuta_sing,$m_valuta_plur,$frase_alternativa_regola1;
global $cambia_frasi,$utente_mess,$orig_prenota,$num_metodi_pagamento,$num_campi_pers,$num_campi_doc_cond,$chiedi_cognome,$chiedi_nome,$chiedi_email,$chiedi_sesso,$chiedi_datanascita,$chiedi_documento,$chiedi_nazione,$chiedi_citta,$chiedi_regione,$chiedi_via,$chiedi_numcivico,$chiedi_cap,$chiedi_telefono,$chiedi_telefono2,$chiedi_telefono3,$chiedi_fax,$chiedi_commento,$chiedi_oracheckin,$chiedi_metodopagamento;
global $mostra_bottone_paypal,$nome_modello_paypal,$mostra_calendario_scelta_date,$stile_riquadro_calendario,$stile_tabella_calendario,$stile_bottoni_calendario,$stile_bottone_apertura_calendario,$spostamento_orizzontale_calendario,$colore_data_attiva_calendario,$colore_data_selezionata_calendario,$prima_parte_html,$ultima_parte_html,$mostra_giorni_pieni,$modello_esistente;
global $file_css_frame,$apri_nuova_finestra_da_frame,$altezza_finestra_da_frame,$larghezza_finestra_da_frame,$tema_modello;
$tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello;
$tableperiodi_modello = $PHPR_TAB_PRE."periodi".$anno_modello;
$tableanni = $PHPR_TAB_PRE."anni";
$tableutenti = $PHPR_TAB_PRE."utenti";
$tablepersonalizza = $PHPR_TAB_PRE."personalizza";
$tablecontratti = $PHPR_TAB_PRE."contratti";
if (controlla_anno($anno_modello) != "SI") {
$continua = "NO";
$anno_modello = "";
} # fine if (controlla_anno($anno_modello) != "SI")
else {
$anno_esistente = esegui_query("select * from $tableanni where idanni = '$anno_modello'");
if (numlin_query($anno_esistente) != 1) $continua = "NO";
} # fine else if (controlla_anno($anno_modello) != "SI")
if ($continua != "NO") {
if ($estendi_ultima_data != "SI") $estendi_ultima_data = "NO";
$date_in_menu = "";
$idfineperiodo_prec = -10;
if (!$num_periodi_date or controlla_num_pos($num_periodi_date) == "NO") $num_periodi_date = 1;
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
global ${"inizioperiodo".$num1},${"fineperiodo".$num1},${"intervalloperiodo".$num1};
$inizioperiodo = aggslashdb(${"inizioperiodo".$num1});
$fineperiodo = aggslashdb(${"fineperiodo".$num1});
$idinizioperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$inizioperiodo' ");
$num_idinizioperiodo = numlin_query($idinizioperiodo);
if ($num_idinizioperiodo == 0) { $idinizioperiodo = 10000; }
else { $idinizioperiodo = risul_query($idinizioperiodo,0,'idperiodi'); }
$inizioperiodo = $idinizioperiodo;
if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1)) {
$idfineperiodo = esegui_query("select max(idperiodi) from $tableperiodi_modello");
$idfineperiodo = risul_query($idfineperiodo,0,0);
} # fine if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
else {
$idfineperiodo = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$fineperiodo' ");
$num_idfineperiodo = numlin_query($idfineperiodo);
if ($num_idfineperiodo == 0) { $idfineperiodo = -1; }
else { $idfineperiodo = risul_query($idfineperiodo,0,'idperiodi'); }
} # fine else if ($estendi_ultima_data == "SI" and $num1 == ($num_periodi_date - 1))
$fineperiodo = $idfineperiodo;
${"inizioperiodo".$num1} = $inizioperiodo;
${"fineperiodo".$num1} = $fineperiodo;
if ($idfineperiodo < $idinizioperiodo) $continua = "NO";
if (($idfineperiodo_prec + 1) >= $idinizioperiodo) $continua = "NO";
$idfineperiodo_prec = $idfineperiodo;
${"intervalloperiodo".$num1} = aggslashdb(${"intervalloperiodo".$num1});
if (!${"intervalloperiodo".$num1} or controlla_num_pos(${"intervalloperiodo".$num1}) == "NO" or ${"intervalloperiodo".$num1} > 99) $continua = "NO";
} # fine for $num1
if ($continua == "NO") {
if ($silenzio == "NO") echo mex("Le date sono sbagliate",$pag).". <br>";
} # fine if ($continua == "NO")
else {
$file_intero = file(C_DATA_PATH."/selectperiodi$anno_modello.1.php");
$num_linee_file_intero = count($file_intero);
$pag_gm = "giorni_mesi.php";
$m_tipo_periodi = esegui_query("select tipo_periodi from $tableanni where idanni = '$anno_modello'");
$m_tipo_periodi = risul_query($m_tipo_periodi,0,0);
for ($num1 = 0 ; $num1 < $num_periodi_date ; $num1++) {
$inizioperiodo = ${"inizioperiodo".$num1};
$fineperiodo = ${"fineperiodo".$num1};
$num_intervallo = 1;
for ($num2 = 0 ; $num2 < $num_linee_file_intero ; $num2++) {
if (substr($file_intero[$num2],0,7) == "<option") {
$data_option = substr($file_intero[$num2],16,10);
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datainizio = '$data_option' ");
$esiste_data_option = numlin_query($id_data_option);
if ($esiste_data_option == 1) $id_data_option = risul_query($id_data_option,0,'idperiodi');
else {
$id_data_option = esegui_query("select idperiodi from $tableperiodi_modello where datafine = '$data_option' ");
$id_data_option = risul_query($id_data_option,0,'idperiodi');
} # fine else if ($esiste_data_option == 1)
if ($id_data_option >= $inizioperiodo and $id_data_option <= ($fineperiodo + 1)) {
if ($num_intervallo == 1) {
$giorno_option = substr($data_option,8,2);
$mese_option = substr($data_option,5,2);
$anno_option = substr($data_option,0,4);
$nome_giorno = date("D" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
$nome_mese = date("M" , mktime(0,0,0,$mese_option,$giorno_option,$anno_option));
if ($m_tipo_periodi == "g") {
if ($nome_giorno == "Sun") $nome_giorno = mex2(" Do",$pag_gm,$lingua_modello);
if ($nome_giorno == "Mon") $nome_giorno = mex2(" Lu",$pag_gm,$lingua_modello);
if ($nome_giorno == "Tue") $nome_giorno = mex2(" Ma",$pag_gm,$lingua_modello);
if ($nome_giorno == "Wed") $nome_giorno = mex2(" Me",$pag_gm,$lingua_modello);
if ($nome_giorno == "Thu") $nome_giorno = mex2(" Gi",$pag_gm,$lingua_modello);
if ($nome_giorno == "Fri") $nome_giorno = mex2(" Ve",$pag_gm,$lingua_modello);
if ($nome_giorno == "Sat") $nome_giorno = mex2(" Sa",$pag_gm,$lingua_modello);
} # fine if ($m_tipo_periodi == "g")
else $nome_giorno = "";
if ($nome_mese == "Jan") $nome_mese = mex2("Gen",$pag_gm,$lingua_modello);
if ($nome_mese == "Feb") $nome_mese = mex2("Feb",$pag_gm,$lingua_modello);
if ($nome_mese == "Mar") $nome_mese = mex2("Mar",$pag_gm,$lingua_modello);
if ($nome_mese == "Apr") $nome_mese = mex2("Apr",$pag_gm,$lingua_modello);
if ($nome_mese == "May") $nome_mese = mex2("Mag",$pag_gm,$lingua_modello);
if ($nome_mese == "Jun") $nome_mese = mex2("Giu",$pag_gm,$lingua_modello);
if ($nome_mese == "Jul") $nome_mese = mex2("Lug",$pag_gm,$lingua_modello);
if ($nome_mese == "Aug") $nome_mese = mex2("Ago",$pag_gm,$lingua_modello);
if ($nome_mese == "Sep") $nome_mese = mex2("Set",$pag_gm,$lingua_modello);
if ($nome_mese == "Oct") $nome_mese = mex2("Ott",$pag_gm,$lingua_modello);
if ($nome_mese == "Nov") $nome_mese = mex2("Nov",$pag_gm,$lingua_modello);
if ($nome_mese == "Dec") $nome_mese = mex2("Dic",$pag_gm,$lingua_modello);
$date_in_menu .= "<option value=\\\"$data_option\\\">$nome_mese $giorno_option$nome_giorno, $anno_option</option>
";
} # fine if ($num_intervallo == 1)
if ($num_intervallo == ${"intervalloperiodo".$num1}) $num_intervallo = 1;
else $num_intervallo++;
} # fine if ($id_data_option > $inizioperiodo and...
} # fine if (substr($file_intero[$num2],0,7) == "<option")
} # fine for $num2
} # fine for $num1
$d_names = "\\\"". mex2(" Do",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Lu",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Ma",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Me",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Gi",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Ve",$pag_gm,$lingua_modello)."\\\",\\\"". mex2(" Sa",$pag_gm,$lingua_modello)."\\\"";
$m_names = "\\\"". mex2("Gen",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Feb",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Mar",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Apr",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Mag",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Giu",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Lug",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Ago",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Set",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Ott",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Nov",$pag_gm,$lingua_modello)."\\\",\\\"". mex2("Dic",$pag_gm,$lingua_modello)."\\\"";
} # fine else if ($continua == "NO")
if (controlla_num_pos($sett_no_prenota) == "NO" or $sett_no_prenota < 0 or $sett_no_prenota > 365) {
$continua = "NO";
global $parola_settimane;
if ($silenzio == "NO") echo mex("Numero di $parola_settimane dopo cui prendere richieste errato",$pag).".<br>";
} # fine if (controlla_num_pos($sett_no_prenota) == "NO" or $sett_no_prenota < 1 or $sett_no_prenota > 365)
$utente_liste = $utente_lis;
if (@get_magic_quotes_gpc()) $utente_liste = stripslashes($utente_liste);
$utente_esistente = esegui_query("select idutenti from $tableutenti where nome_utente = '".aggslashdb($utente_liste)."'");
if (numlin_query($utente_esistente) != 1) {
$utente_liste = esegui_query("select nome_utente from $tableutenti where idutenti = '1'");
$utente_liste = risul_query($utente_liste,0,'nome_utente');
} # fine if (numlin_query($utente_esistente) != 1)
if ($chiedi_num_app_tipologia != "SI") $chiedi_num_app_tipologia = "NO";
if ($chiedi_num_app_tipologia == "SI" and controlla_num_pos($max_num_app_tipologia) == "NO") {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di appartamenti per tipologia errato",'unit.php').".<br>";
} # fine if ($chiedi_num_app_tipologia == "SI" and controlla_num_pos($max_num_app_tipologia) == "NO")
if ($chiedi_num_app_tipologia == "NO" and controlla_num_pos($max_num_app_tipologia) == "NO") $max_num_app_tipologia = 0;
if ($chiedi_num_app_tipologia == "SI" and !$parola_appartamenti) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Si deve inserire la parola per indicare gli appartamenti",'unit.php').".<br>";
} # fine if ($chiedi_num_app_tipologia == "SI" and !$parola_appartamenti)
if ($chiedi_num_app_tipologia != "SI" and !$parola_appartamento) $parola_appartamento = mex2("appartamento",'unit.php',$lingua_modello);
if ($chiedi_num_app_tipologia != "SI" and !$parola_appartamenti) $parola_appartamenti = mex2("appartamenti",'unit.php',$lingua_modello);
if ($aggiungi_tipologie != "SI") $aggiungi_tipologie = "NO";
if ($aggiungi_tipologie == "SI" and (controlla_num_pos($max_num_tipologie) == "NO" or $max_num_tipologie == 0)) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di tipologie errato",$pag).".<br>";
} # fine if ($aggiungi_tipologie == "SI" and controlla_num_pos($max_num_tipologie) == "NO" and $max_num_tipologie != 0)
if ($aggiungi_tipologie != "SI" and (controlla_num_pos($max_num_tipologie) == "NO" or $max_num_tipologie == 0)) $max_num_tipologie = 3;
if ($chiedi_num_persone == "SI" and controlla_num_pos($max_num_persone) == "NO") {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di persone errato",$pag).".<br>";
} # fine if ($chiedi_num_persone == "SI" and controlla_num_pos($max_num_persone) == "NO")
if ($chiedi_num_persone != "SI" and controlla_num_pos($max_num_persone) == "NO") $max_num_persone = 0;
$dati_ca = dati_costi_agg_ntariffe($tablenometariffe_modello,"NO");
if ($chiedi_num_persone != "SI") $costo_aggiungi_letti = "";
if ($costo_aggiungi_letti != "" and ($dati_ca[$dati_ca['id'][$costo_aggiungi_letti]]['letto'] != "s" or $dati_ca[$dati_ca['id'][$costo_aggiungi_letti]]['numsett'] == "c" or $dati_ca[$dati_ca['id'][$costo_aggiungi_letti]]['mostra'] != "s" or $dati_ca[$costo_aggiungi_letti]['combina'] == "s")) $continua = "NO";
if ($chiedi_num_persone == "SI" and $costo_aggiungi_letti != "" and (controlla_num_pos($max_num_aggiungi_letti) == "NO" or $max_num_aggiungi_letti == 0)) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero massimo di letti aggiuntivi errato",$pag).".<br>";
} # fine if ($chiedi_num_persone == "SI" and $costo_aggiungi_letti != "" and...
if (($chiedi_num_persone != "SI" or $costo_aggiungi_letti == "") and (controlla_num_pos($max_num_aggiungi_letti) == "NO" or $max_num_aggiungi_letti == 0)) $max_num_aggiungi_letti = 2;
if ($mostra_costi_aggiuntivi == "SI" and (controlla_num_pos($num_colonne_costi_agg) == "NO" or $num_colonne_costi_agg == 0)) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Numero di colonne dei costi aggiuntivi errato",$pag).".<br>";
} # fine if ($mostra_costi_aggiuntivi == "SI" and (controlla_num_pos($num_colonne_costi_agg) == "NO" or $num_colonne_costi_agg == 0))
if ($mostra_costi_aggiuntivi != "SI" and (controlla_num_pos($num_colonne_costi_agg) == "NO" or $num_colonne_costi_agg == 0)) $num_colonne_costi_agg = 2;
if (str_replace("..","",$nome_modello_paypal) != $nome_modello_paypal) $nome_modello_paypal = "";
if (str_replace("/","",$nome_modello_paypal) != $nome_modello_paypal) $nome_modello_paypal = "";
if ($mostra_bottone_paypal != "SI") $nome_modello_paypal = "";
if (!$nome_modello_paypal) $mostra_bottone_paypal = "NO";
$indirizzo_email = $ind_email;
$utente_messaggio = $utente_mess;
if ($mostra_richiesta_via_mail == "SI" and !preg_match('/^[_\.0-9a-z-]+@([0-9a-z][0-9a-z-]+\.)+[a-z]{2,4}$/i',$indirizzo_email) and !$utente_messaggio) {
$continua = "NO";
if ($silenzio == "NO") echo mex("Indirizzo email non valido",$pag).".<br>";
} # fine if ($mostra_richiesta_via_mail == "SI" and ...
if ($utente_messaggio and $utente_messaggio != "tutti") {
if (@get_magic_quotes_gpc()) $utente_messaggio = stripslashes($utente_messaggio);
$utente_esistente = esegui_query("select idutenti from $tableutenti where nome_utente = '".aggslashdb($utente_messaggio)."'");
if (numlin_query($utente_esistente) != 1) $continua = "NO";
} # fine if ($utente_messaggio and $utente_messaggio != "tutti")
if ((string) $orig_prenota != "") {
$origini_prenota = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'origini_prenota' and idutente = '1'");
$origini_prenota = risul_query($origini_prenota,0,'valpersonalizza');
if ($origini_prenota) {
if (get_magic_quotes_gpc()) $orig_prenota = stripslashes($orig_prenota);
$origini_prenota = explode(",",$origini_prenota);
$trovato = "NO";
for ($num1 = 0 ; $num1 < count($origini_prenota) ; $num1++) if ($origini_prenota[$num1] == $orig_prenota) $trovato = "SI";
if ($trovato == "NO") $orig_prenota = "";
} # fine if ($origini_prenota)
else $orig_prenota = "";
} # fine if ((string) $orig_prenota != "")
if ($chiedi_cognome != "SI" and $chiedi_cognome != "opzionale" and $chiedi_cognome != "NO") $chiedi_cognome = "NO";
if ($chiedi_nome != "SI" and $chiedi_nome != "opzionale" and $chiedi_nome != "NO") $chiedi_nome = "opzionale";
if ($chiedi_email != "SI" and $chiedi_email != "opzionale" and $chiedi_email != "NO") $chiedi_email = "SI";
if ($chiedi_sesso != "SI" and $chiedi_sesso != "opzionale" and $chiedi_sesso != "NO") $chiedi_sesso = "NO";
if ($chiedi_datanascita != "SI" and $chiedi_datanascita != "opzionale" and $chiedi_datanascita != "NO") $chiedi_datanascita = "NO";
if ($chiedi_documento != "SI" and $chiedi_documento != "opzionale" and $chiedi_documento != "NO") $chiedi_documento = "NO";
if ($chiedi_nazione != "SI" and $chiedi_nazione != "opzionale" and $chiedi_nazione != "NO") $chiedi_nazione = "NO";
if ($chiedi_citta != "SI" and $chiedi_citta != "opzionale" and $chiedi_citta != "NO") $chiedi_citta = "NO";
if ($chiedi_regione != "SI" and $chiedi_regione != "opzionale" and $chiedi_regione != "NO") $chiedi_regione = "NO";
if ($chiedi_via != "SI" and $chiedi_via != "opzionale" and $chiedi_via != "NO") $chiedi_via = "NO";
if ($chiedi_numcivico != "SI" and $chiedi_numcivico != "opzionale" and $chiedi_numcivico != "NO") $chiedi_numcivico = "NO";
if ($chiedi_cap != "SI" and $chiedi_cap != "opzionale" and $chiedi_cap != "NO") $chiedi_cap = "NO";
if ($chiedi_telefono != "SI" and $chiedi_telefono != "opzionale" and $chiedi_telefono != "NO") $chiedi_telefono = "NO";
if ($chiedi_telefono2 != "SI" and $chiedi_telefono2 != "opzionale" and $chiedi_telefono2 != "NO") $chiedi_telefono2 = "NO";
if ($chiedi_telefono3 != "SI" and $chiedi_telefono3 != "opzionale" and $chiedi_telefono3 != "NO") $chiedi_telefono3 = "NO";
if ($chiedi_fax != "SI" and $chiedi_fax != "opzionale" and $chiedi_fax != "NO") $chiedi_fax = "NO";
if ($chiedi_commento != "SI" and $chiedi_commento != "opzionale" and $chiedi_commento != "NO") $chiedi_commento = "opzionale";
if ($chiedi_oracheckin != "SI" and $chiedi_oracheckin != "opzionale" and $chiedi_oracheckin != "NO") $chiedi_oracheckin = "NO";
if ($chiedi_metodopagamento != "SI" and $chiedi_metodopagamento != "opzionale" and $chiedi_metodopagamento != "NO") $chiedi_metodopagamento = "NO";
if (!$num_metodi_pagamento) $num_metodi_pagamento = 0;
if (!$num_campi_pers) $num_campi_pers = 0;
if (controlla_num_pos($num_metodi_pagamento) == "NO") $continua = "NO";
if (controlla_num_pos($num_campi_pers) == "NO") $continua = "NO";
$campi_form_doc_condizioni = "";
$chiedi_campi_form_doc_condizioni = "";
if (!$num_campi_doc_cond) $num_campi_doc_cond = 0;
if (controlla_num_pos($num_campi_doc_cond) == "NO") $continua = "NO";
else {
$num_campo_doc_cond = 0;
$doc_usati = "";
for ($num1 = 1 ; $num1 <= $num_campi_doc_cond ; $num1++) {
$num_doc_cond = "num_doc_cond".$num1;
$chiedi_num_doc_cond = "chiedi_num_doc_cond".$num1;
global $$num_doc_cond,$$chiedi_num_doc_cond;
if (strcmp($$num_doc_cond,"") and !$doc_usati[$$num_doc_cond]) {
if (controlla_num_pos($$num_doc_cond) == "NO") $continua = "NO";
else {
$contr_txt = esegui_query("select numero from $tablecontratti where (tipo = 'contrtxt' or tipo = 'contrhtm') and numero = '".$$num_doc_cond."' ");
if (!numlin_query($contr_txt)) {
if ($silenzio == "NO") $continua = "NO";
} # fine if (!numlin_query($contr_txt))
else {
$salva_contr = esegui_query("select * from $tablecontratti where numero = '".$$num_doc_cond."' and tipo = 'dir' ");
if (numlin_query($salva_contr)) {
if ($silenzio == "NO") $continua = "NO";
} # fine if (numlin_query($salva_contr))
else {
$doc_usati[$$num_doc_cond] = 1;
$num_campo_doc_cond++;
$campi_form_doc_condizioni .= "\"".$num_campo_doc_cond."\" => \"".$$num_doc_cond."\",";
$chiedi_campi_form_doc_condizioni .= "\"".$num_campo_doc_cond."\" => \"".mex($$chiedi_num_doc_cond,$pag)."\",";
} # fine else if (numlin_query($salva_contr))
} # fine else if (!numlin_query($contr_txt))
} # fine else if (controlla_num_pos($num_doc_email_conferma) == "NO")
} # fine if (strcmp($$num_doc_cond,"") and !$doc_usati[$$num_doc_cond])
} # fine for $num1
if ($campi_form_doc_condizioni) $campi_form_doc_condizioni = substr($campi_form_doc_condizioni,0,-1);
if ($chiedi_campi_form_doc_condizioni) $chiedi_campi_form_doc_condizioni = substr($chiedi_campi_form_doc_condizioni,0,-1);
} # fine else if (controlla_num_pos($num_campi_doc_cond) == "NO")
} # fine if ($continua != "NO")
if ($continua != "NO") {
$rigatariffe = esegui_query("select * from $tablenometariffe_modello where idntariffe = 1 ");
$numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg');
$tariffe_mostra = "";
$nomi_tariffe_imposte = "";
for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa++) {
$tariffa = "tariffa".$numtariffa;
global $$tariffa;
if ($$tariffa == "SI") $tariffe_mostra .= " $numtariffa => \"".mex("SI",$pag)."\",";
$nome_tariffa_imposto = "nome_tariffa_imposto".$numtariffa;
global $$nome_tariffa_imposto;
$$nome_tariffa_imposto = formatta_input_var_x_file($$nome_tariffa_imposto);
if ($$nome_tariffa_imposto) $nomi_tariffe_imposte .= "$numtariffa => \"".$$nome_tariffa_imposto."\",";
} # fine for $numtariffa
if ($tariffe_mostra) $tariffe_mostra = substr($tariffe_mostra,0,-1);
if ($nomi_tariffe_imposte) $nomi_tariffe_imposte = substr($nomi_tariffe_imposte,0,-1);
unset($nomi_costi_imposti);
unset($costi_attivati);
unset($nomi_categorie_imposte);
unset($nomi_cat_presenti);
for ($numca = 0 ; $numca < $dati_ca['num'] ; $numca++) {
global ${"attiva_costo".$dati_ca[$numca]['id']};
if (${"attiva_costo".$dati_ca[$numca]['id']} == "SI") {
$costi_attivati .= " ".$dati_ca[$numca]['id']." => \"".mex("SI",$pag)."\",";
$nome_costo_imposto = "nome_costo_imposto".$dati_ca[$numca]['id'];
global $$nome_costo_imposto;
$$nome_costo_imposto = formatta_input_var_x_file($$nome_costo_imposto);
if ($$nome_costo_imposto) $nomi_costi_imposti .= $dati_ca[$numca]['id']." => \"".$$nome_costo_imposto."\",";
} # fine if (${"attiva_costo".$dati_ca[$numca]['id']} == "SI")
if ($dati_ca[$numca]['combina'] == "s" and !$nomi_cat_presenti[$dati_ca[$numca]['categoria']]) {
$nome_cat_imp = "nome_cat_imp".$dati_ca[$numca]['id'];
global $$nome_cat_imp;
$$nome_cat_imp = formatta_input_var_x_file($$nome_cat_imp);
if ($$nome_cat_imp) {
$nomi_cat_presenti[$dati_ca[$numca]['categoria']] = 1;
$categoria = formatta_input_var_x_file($dati_ca[$numca]['categoria']);
$nomi_categorie_imposte .= "\"$categoria\" => \"".$$nome_cat_imp."\",";
} # fine if ($$nome_cat_imp)
} # fine if ($dati_ca[$numca]['combina'] == "s")
} # fine for $numca
if ($nomi_costi_imposti) $nomi_costi_imposti = substr($nomi_costi_imposti,0,-1);
if ($costi_attivati) $costi_attivati = substr($costi_attivati,0,-1);
if ($nomi_categorie_imposte) $nomi_categorie_imposte = substr($nomi_categorie_imposte,0,-1);
$motivazioni_regola1 = "";
for ($num1 = 0 ; $num1 < $num_motivazioni ; $num1 = $num1 + 1) {
$var_motivazione = "var_mot_".$num1;
global $$var_motivazione;
$motivazione = $$var_motivazione;
if ($motivazione) {
$motivazione = formatta_input_var_x_file($motivazione);
$motivazioni_regola1 .= "\"$motivazione\" => \"".mex("SI",$pag)."\",";
} # fine if ($motivazione)
} # fine for $num1
if ($motivazioni_regola1) $motivazioni_regola1 = substr($motivazioni_regola1,0,-1);
if ($utente_messaggio == "tutti") $utente_messaggio = mex("tutti",$pag);
$metodi_pagamento_da_chiedere = "";
$nomi_metodi_pagamento_imposti = "";
$metodi_pagamento = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'metodi_pagamento' and idutente = '1'");
$metodi_pagamento = risul_query($metodi_pagamento,0,'valpersonalizza');
$metodi_pagamento = explode(",",$metodi_pagamento);
for ($num1 = 0 ; $num1 < count($metodi_pagamento) ; $num1++) $esiste_met_paga[$metodi_pagamento[$num1]] = "SI";
for ($num1 = 0 ; $num1 < $num_metodi_pagamento ; $num1++) {
$var_met_paga = "var_met_paga_".$num1;
$nome_met_paga_imposto = "nome_met_paga_imposto_".$num1;
global $$var_met_paga,$$nome_met_paga_imposto;
$met_paga_compara = $$var_met_paga;
if (@get_magic_quotes_gpc()) $met_paga_compara = stripslashes($met_paga_compara);
else $met_paga_compara = $$var_met_paga;
if ($$var_met_paga and $esiste_met_paga[$met_paga_compara]) {
$$var_met_paga = formatta_input_var_x_file($$var_met_paga);
$$nome_met_paga_imposto = formatta_input_var_x_file($$nome_met_paga_imposto);
$metodi_pagamento_da_chiedere .= "\"".$$var_met_paga."\" => \"".mex("SI",$pag)."\",";
if ($$nome_met_paga_imposto) $nomi_metodi_pagamento_imposti .= "\"".$$var_met_paga."\" => \"".$$nome_met_paga_imposto."\",";
} # fine ($$var_met_paga and $esiste_met_paga[$$var_met_paga])
} # fine for $num1
if ($metodi_pagamento_da_chiedere) $metodi_pagamento_da_chiedere = substr($metodi_pagamento_da_chiedere,0,-1);
if ($nomi_metodi_pagamento_imposti) $nomi_metodi_pagamento_imposti = substr($nomi_metodi_pagamento_imposti,0,-1);
$campi_form_personalizzati = "";
$chiedi_campi_form_personalizzati = "";
$num_campo_pers = 0;
for ($num1 = 1 ; $num1 <= $num_campi_pers ; $num1++) {
$campo_pers = "campo_pers".$num1;
$chiedi_campo_pers = "chiedi_campo_pers".$num1;
global $$campo_pers,$$chiedi_campo_pers;
if (get_magic_quotes_gpc()) $$campo_pers = stripslashes($$campo_pers);
$$campo_pers = formatta_input_var_x_file($$campo_pers);
if ($$campo_pers and ($$chiedi_campo_pers == "SI" or $$chiedi_campo_pers == "opzionale")) {
$num_campo_pers++;
$campi_form_personalizzati .= "\"".$num_campo_pers."\" => \"".$$campo_pers."\",";
$chiedi_campi_form_personalizzati .= "\"".$num_campo_pers."\" => \"".mex($$chiedi_campo_pers,$pag)."\",";
} # fine if ($$campo_pers and...
} # fine for $num1
if ($campi_form_personalizzati) $campi_form_personalizzati = substr($campi_form_personalizzati,0,-1);
if ($chiedi_campi_form_personalizzati) $chiedi_campi_form_personalizzati = substr($chiedi_campi_form_personalizzati,0,-1);
if (!$mostra_quadro_disp) {
$mostra_quadro_disponibilita = "NO";
$raggruppa_quadro_disponibilita_con_regola_2 = "NO";
$raggruppa_quadro_disponibilita_con_persone = "NO";
} # fine if (!$mostra_quadro_disp)
else {
$mostra_quadro_disponibilita = "SI";
if ($mostra_quadro_disp == "reg2") $raggruppa_quadro_disponibilita_con_regola_2 = "SI";
else $raggruppa_quadro_disponibilita_con_regola_2 = "NO";
if ($mostra_quadro_disp == "pers") $raggruppa_quadro_disponibilita_con_persone = "SI";
else $raggruppa_quadro_disponibilita_con_persone = "NO";
} # fine else if (!$mostra_quadro_disp)
if ($mostra_numero_liberi_quadro_disponibilita != "SI") $mostra_numero_liberi_quadro_disponibilita = "NO";
if ($allinea_disponibilita_con_arrivo != "SI") $allinea_disponibilita_con_arrivo = "NO";
if (substr($spostamento_orizzontale_calendario,0,1) == "+") $spostamento_orizzontale_calendario = substr($spostamento_orizzontale_calendario,1);
if (!strcmp($spostamento_orizzontale_calendario,"") or controlla_num($spostamento_orizzontale_calendario) == "NO") $spostamento_orizzontale_calendario = 2;
if (defined("C_MASCHERA_EMAIL") and C_MASCHERA_EMAIL != "") $maschera_envelope = C_MASCHERA_EMAIL;
if (C_RESTRIZIONI_DEMO_ADMIN == "SI") {
$indirizzo_email = C_EMAIL_DEMO_ADMIN;
$manda_copia_richiesta_email = "NO";
} # fine if (C_RESTRIZIONI_DEMO_ADMIN == "SI")
if ($file_css_frame == "http://") $file_css_frame = "";
if ($apri_nuova_finestra_da_frame != "SI") $apri_nuova_finestra_da_frame = "NO";
if (!$larghezza_finestra_da_frame or controlla_num_pos($larghezza_finestra_da_frame) == "NO") $larghezza_finestra_da_frame = "700";
if (!$altezza_finestra_da_frame or controlla_num_pos($altezza_finestra_da_frame) == "NO") $altezza_finestra_da_frame = "620";
$num_colori = 0;
$extra_head_frame = "";
if (strcmp($tema_modello,"")) {
include("./includes/templates/temi_mod_disp.php");
$num_temi = count($template_theme_name);
for ($num1 = 1 ; $num1 <= $num_temi ; $num1++) {
if ($tema_modello == $template_theme_name[$num1]) {
$tema_trovato = 1;
$tema_sel = $num1;
} # fine if ($tema_modello == $template_theme_name[$num1])
} # fine for $num1
if ($tema_trovato) {
$prima_parte_html = $template_theme_html_pre[$tema_sel];
$ultima_parte_html = $template_theme_html_post[$tema_sel];
$extra_head_frame = $framed_mode_extra_head[$tema_sel];
$valori_tema = $template_theme_values[$tema_sel];
$num_valori = count($valori_tema);
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) {
global ${"valore_tema_".$num1};
${"valore_tema_".$num1} = formatta_input_var_x_file(${"valore_tema_".$num1});
$valore_sost = ${"valore_tema_".$num1};
if (!strcmp($valore_sost,"")) $valore_sost = $valori_tema[$num1]['null'];
elseif (strcmp($valori_tema[$num1]['replace'],"")) $valore_sost = str_replace("[theme_value_$num1]",$valore_sost,$valori_tema[$num1]['replace']);
$prima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$prima_parte_html);
$ultima_parte_html = str_replace("[theme_value_$num1]",$valore_sost,$ultima_parte_html);
$extra_head_frame = str_replace("[theme_value_$num1]",$valore_sost,$extra_head_frame);
} # fine for $num1
$colori_tema = $template_theme_colors[$tema_sel];
$num_colori = count($colori_tema);
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) {
global ${"colore_tema_".$num1};
if (!preg_match("/^#[0-9a-f]{3,3}$/i",${"colore_tema_".$num1}) and !preg_match("/^#[0-9a-f]{6,6}$/i",${"colore_tema_".$num1})) ${"colore_tema_".$num1} = $colori_tema[$num1]['default'];
$prima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$prima_parte_html);
$ultima_parte_html = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$ultima_parte_html);
$extra_head_frame = str_replace("[theme_color_$num1]",${"colore_tema_".$num1},$extra_head_frame);
} # fine for $num1
} # fine if ($tema_trovato)
else $tema_modello = "";
} # fine if (strcmp($tema_modello,""))
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) $M_PHPR_DB_TYPE = "";
if ($HOTELD_DB_NAME) $M_PHPR_DB_NAME = "";
if ($HOTELD_DB_HOST) $M_PHPR_DB_HOST = "";
if (strcmp($HOTELD_DB_PORT,"")) $M_PHPR_DB_PORT = "";
if ($HOTELD_DB_USER) $M_PHPR_DB_USER = "";
if (strcmp($HOTELD_DB_PASS,"")) $M_PHPR_DB_PASS = "";
if ($HOTELD_TAB_PRE) $M_PHPR_TAB_PRE = "";
} # fine if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH)
$M_PHPR_DB_TYPE = formatta_input_var_x_file($M_PHPR_DB_TYPE);
$M_PHPR_DB_NAME = formatta_input_var_x_file($M_PHPR_DB_NAME);
$M_PHPR_DB_HOST = formatta_input_var_x_file($M_PHPR_DB_HOST);
$M_PHPR_DB_PORT = formatta_input_var_x_file($M_PHPR_DB_PORT);
$M_PHPR_DB_USER = formatta_input_var_x_file($M_PHPR_DB_USER);
$M_PHPR_DB_PASS = formatta_input_var_x_file($M_PHPR_DB_PASS);
$M_PHPR_LOAD_EXT = formatta_input_var_x_file($M_PHPR_LOAD_EXT);
$M_PHPR_TAB_PRE = formatta_input_var_x_file($M_PHPR_TAB_PRE);
$m_stile_soldi = formatta_input_var_x_file($m_stile_soldi);
$m_stile_data = formatta_input_var_x_file($m_stile_data);
$anteponi_nome_valuta = formatta_input_var_x_file($anteponi_nome_valuta);
$parola_appartamenti = formatta_input_var_x_file($parola_appartamenti);
$parola_appartamento = formatta_input_var_x_file($parola_appartamento);
$chiedi_num_persone = formatta_input_var_x_file($chiedi_num_persone);
$aggiungi_costi_fissi = formatta_input_var_x_file($aggiungi_costi_fissi);
$mostra_costi_aggiuntivi = formatta_input_var_x_file($mostra_costi_aggiuntivi);
$assegna_con_regola2 = formatta_input_var_x_file($assegna_con_regola2);
$mostra_frase_alternativa_regola1 = formatta_input_var_x_file($mostra_frase_alternativa_regola1);
$mostra_caparra = formatta_input_var_x_file($mostra_caparra);
$mostra_richiesta_via_mail = formatta_input_var_x_file($mostra_richiesta_via_mail);
$indirizzo_email = formatta_input_var_x_file($indirizzo_email);
$manda_copia_richiesta_email = formatta_input_var_x_file($manda_copia_richiesta_email);
$maschera_envelope = formatta_input_var_x_file($maschera_envelope);
$mostra_giorni_pieni = formatta_input_var_x_file($mostra_giorni_pieni);
$orig_prenota = formatta_input_var_x_file($orig_prenota);
$mostra_bottone_paypal = formatta_input_var_x_file($mostra_bottone_paypal);
$nome_modello_paypal = formatta_input_var_x_file($nome_modello_paypal);
$colore_sfondo_quadro_disponibilita = formatta_input_var_x_file($colore_sfondo_quadro_disponibilita);
$colore_inizio_settimana_quadro_disponibilita = formatta_input_var_x_file($colore_inizio_settimana_quadro_disponibilita);
$colore_libero_quadro_disponibilita = formatta_input_var_x_file($colore_libero_quadro_disponibilita);
$colore_occupato_quadro_disponibilita = formatta_input_var_x_file($colore_occupato_quadro_disponibilita);
$apertura_font_quadro_disponibilita = formatta_input_var_x_file($apertura_font_quadro_disponibilita);
$chiusura_font_quadro_disponibilita = formatta_input_var_x_file($chiusura_font_quadro_disponibilita);
$apertura_tag_font = formatta_input_var_x_file($apertura_tag_font);
$chiusura_tag_font = formatta_input_var_x_file($chiusura_tag_font);
$apertura_tag_font_rosse = formatta_input_var_x_file($apertura_tag_font_rosse);
$chiusura_tag_font_rosse = formatta_input_var_x_file($chiusura_tag_font_rosse);
$stile_tabella_prenotazione = formatta_input_var_x_file($stile_tabella_prenotazione);
$mostra_calendario_scelta_date = formatta_input_var_x_file($mostra_calendario_scelta_date);
$stile_riquadro_calendario = formatta_input_var_x_file($stile_riquadro_calendario);
$stile_tabella_calendario = formatta_input_var_x_file($stile_tabella_calendario);
$stile_bottoni_calendario = formatta_input_var_x_file($stile_bottoni_calendario);
$stile_bottone_apertura_calendario = formatta_input_var_x_file($stile_bottone_apertura_calendario);
$colore_data_attiva_calendario = formatta_input_var_x_file($colore_data_attiva_calendario);
$colore_data_selezionata_calendario = formatta_input_var_x_file($colore_data_selezionata_calendario);
$m_valuta_sing = formatta_input_var_x_file($m_valuta_sing);
$m_valuta_plur = formatta_input_var_x_file($m_valuta_plur);
$frase_alternativa_regola1 = formatta_input_var_x_file($frase_alternativa_regola1);
$file_css_frame = formatta_input_var_x_file($file_css_frame);
$extra_head_frame = formatta_input_var_x_file($extra_head_frame);
if (get_magic_quotes_gpc()) $prima_parte_html = stripslashes($prima_parte_html);
$prima_parte_html = str_replace("<?","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("?>","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("<%","ERROR",$prima_parte_html);
$prima_parte_html = str_replace("%>","ERROR",$prima_parte_html);
$prima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$prima_parte_html);
if (get_magic_quotes_gpc()) $ultima_parte_html = stripslashes($ultima_parte_html);
$ultima_parte_html = str_replace("<?","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("?>","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("<%","ERROR",$ultima_parte_html);
$ultima_parte_html = str_replace("%>","ERROR",$ultima_parte_html);
$ultima_parte_html = preg_replace("/<script +language *= *\"?php\"? *>/i","ERROR",$ultima_parte_html);
# FRASI
if ($cambia_frasi == "SI" or $modello_esistente == "SI") {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) {
global ${$fr_frase[$num_fr]};
${$fr_frase[$num_fr]} = formatta_input_var_x_file(${$fr_frase[$num_fr]});
} # fine for $num_fr
} # fine if ($cambia_frasi == "SI" or $modello_esistente == "SI")
else {
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) ${$fr_frase[$num_fr]} = mex2($frase[$num_fr],$pag,$lingua_modello);
} # fine else if ($cambia_frasi == "SI" or $modello_esistente == "SI")
$cost_percorso_a_dati = "";
if (function_exists("realpath")) {
if (realpath(C_DATA_PATH."/")) $cost_percorso_a_dati = realpath(C_DATA_PATH."/")."/";
} # fine if (function_exists("realpath"))
if ((string) $cost_percorso_a_dati == "") {
if (substr(C_DATA_PATH,0,1) == "/") $cost_percorso_a_dati = C_DATA_PATH;
else {
$dati_path = C_DATA_PATH;
if (substr($dati_path,0,2) == "./") $dati_path = substr($dati_path,1);
else $dati_path = "/".$dati_path;
if ($_SERVER["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($_SERVER["SCRIPT_FILENAME"]).$dati_path;
else {
if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"]) $cost_percorso_a_dati = dirname($HTTP_SERVER_VARS["SCRIPT_FILENAME"]).$dati_path;
else {
if ($SCRIPT_FILENAME) $cost_percorso_a_dati = dirname($SCRIPT_FILENAME).$dati_path;
else $cost_percorso_a_dati = "./";
} # fine else if ($HTTP_SERVER_VARS["SCRIPT_FILENAME"])
} # fine else if ($_SERVER["SCRIPT_FILENAME"])
} # fine else if (substr(C_DATI_PATH,0,1) == "/")
} # fine if ((string) $cost_percorso_a_dati == "")
$nome_file = mex2("mdl_disponibilita",$pag,$lingua_modello).".php";
$file = @fopen("$percorso_cartella_modello/$nome_file","w+");
if ($file) {
flock($file,2);
fwrite($file,"<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>$prima_parte_html
<!-- ".mex("FINE DELLA PRIMA PARTE DELL'HTML PERSONALE",$pag)." -->
<?php
} # fine if (!\$framed and !\$_GET['framed'] and !\$_POST['framed'])
# ".mex("INIZIO VARIABILI MODIFICABILI",$pag)." (".mex("modificare il valore sulla destra",$pag).")
# ".mex("Inserire in questa variabile il nome della pagina se \$PHP_SELF non è definita",$pag)."
\$".mex("var_nome_pagina",$pag)." = \"\";
\$".mex("var_anno",$pag)." = $anno_modello;
\$".mex("var_tipo_db",$pag)." = \"$M_PHPR_DB_TYPE\";
\$".mex("var_nome_db",$pag)." = \"$M_PHPR_DB_NAME\";
\$".mex("var_computer_db",$pag)." = \"$M_PHPR_DB_HOST\";
\$".mex("var_porta_db",$pag)." = \"$M_PHPR_DB_PORT\";
\$".mex("var_utente_db",$pag)." = \"$M_PHPR_DB_USER\";
\$".mex("var_password_db",$pag)." = \"$M_PHPR_DB_PASS\";
\$".mex("var_carica_estensione_db",$pag)." = \"".mex("$M_PHPR_LOAD_EXT",$pag)."\";
\$".mex("var_prefisso_tabelle_db",$pag)." = \"$M_PHPR_TAB_PRE\";
\$".mex("var_lingua_modello",$pag)." = \"$lingua_modello\";
\$".mex("var_stile_soldi",$pag)." = \"".mex("$m_stile_soldi",$pag)."\";
\$".mex("var_stile_data",$pag)." = \"".mex("$m_stile_data",$pag)."\";
\$".mex("var_anteponi_nome_valuta",$pag)." = \"".mex("$anteponi_nome_valuta",$pag)."\";
\$".mex("var_utente_liste",$pag)." = \"".mex("$utente_liste",$pag)."\";
\$".mex("var_estendi_ultima_data",$pag)." = \"".mex("$estendi_ultima_data",$pag)."\";
\$".mex("var_periodi_no_richieste",$pag)." = \"$sett_no_prenota\";
\$".mex("var_tariffe_mostra",$pag)." = array($tariffe_mostra);
\$".mex("var_nomi_tariffe_imposte",$pag)." = array($nomi_tariffe_imposte);
\$".mex("var_chiedi_numero_appartamenti_per_tipologia",$pag)." = \"".mex("$chiedi_num_app_tipologia",$pag)."\";
\$".mex("var_massimo_numero_appartamenti_per_tipologia",$pag)." = \"$max_num_app_tipologia\";
\$".mex("var_aggiungi_altre_tipologie",$pag)." = \"".mex("$aggiungi_tipologie",$pag)."\";
\$".mex("var_massimo_numero_altre_tipologie",$pag)." = \"$max_num_tipologie\";
\$".mex("var_chiedi_numero_persone",$pag)." = \"".mex("$chiedi_num_persone",$pag)."\";
\$".mex("var_massimo_numero_persone",$pag)." = \"$max_num_persone\";
\$".mex("var_costo_aggiungi_letti",$pag)." = \"$costo_aggiungi_letti\";
\$".mex("var_massimo_numero_letti_aggiuntivi",$pag)." = \"$max_num_aggiungi_letti\";
\$".mex("var_aggiungi_costi_fissi",$pag)." = \"".mex("$aggiungi_costi_fissi",$pag)."\";
\$".mex("var_chiedi_costi_aggiuntivi_di_pag_inserzione",$pag)." = \"".mex("$mostra_costi_aggiuntivi",$pag)."\";
\$".mex("var_numero_colonne_costi_aggiuntivi",$pag)." = \"$num_colonne_costi_agg\";
\$".mex("var_costi_aggiuntivi_mostra",$pag)." = array($costi_attivati);
\$".mex("var_nomi_costi_agg_imposti",$pag)." = array($nomi_costi_imposti);
\$".mex("var_categorie_costi_agg_imposte",$pag)." = array($nomi_categorie_imposte);
\$".mex("var_assegna_con_regola2",$pag)." = \"".mex("$assegna_con_regola2",$pag)."\";
\$".mex("var_considera_motivazioni_regola1",$pag)." = array($motivazioni_regola1);
\$".mex("var_mostra_frase_alternativa_regola1",$pag)." = \"".mex("$mostra_frase_alternativa_regola1",$pag)."\";
\$".mex("var_mostra_caparra",$pag)." = \"".mex("$mostra_caparra",$pag)."\";
\$".mex("var_mostra_richiesta_via_mail",$pag)." = \"".mex("$mostra_richiesta_via_mail",$pag)."\";
\$".mex("var_indirizzo_email",$pag)." = \"$indirizzo_email\";
\$".mex("var_manda_copia_richiesta_email",$pag)." = \"".mex("$manda_copia_richiesta_email",$pag)."\";
\$".mex("var_maschera_email",$pag)." = \"".mex("$maschera_envelope",$pag)."\";
\$".mex("var_mostra_giorni_pieni",$pag)." = \"".mex("$mostra_giorni_pieni",$pag)."\";
\$".mex("var_mostra_bottone_paypal",$pag)." = \"".mex("$mostra_bottone_paypal",$pag)."\";
\$".mex("var_nome_modello_paypal",$pag)." = \"".$nome_modello_paypal."\";
\$".mex("var_utente_messaggio",$pag)." = \"$utente_messaggio\";
\$".mex("var_origine_prenotazione",$pag)." = \"".$orig_prenota."\";
\$".mex("var_chiedi_cognome",$pag)." = \"".mex("$chiedi_cognome",$pag)."\";
\$".mex("var_chiedi_nome",$pag)." = \"".mex("$chiedi_nome",$pag)."\";
\$".mex("var_chiedi_email",$pag)." = \"".mex("$chiedi_email",$pag)."\";
\$".mex("var_chiedi_sesso",$pag)." = \"".mex("$chiedi_sesso",$pag)."\";
\$".mex("var_chiedi_datanascita",$pag)." = \"".mex("$chiedi_datanascita",$pag)."\";
\$".mex("var_chiedi_documento",$pag)." = \"".mex("$chiedi_documento",$pag)."\";
\$".mex("var_chiedi_nazione",$pag)." = \"".mex("$chiedi_nazione",$pag)."\";
\$".mex("var_chiedi_citta",$pag)." = \"".mex("$chiedi_citta",$pag)."\";
\$".mex("var_chiedi_regione",$pag)." = \"".mex("$chiedi_regione",$pag)."\";
\$".mex("var_chiedi_via",$pag)." = \"".mex("$chiedi_via",$pag)."\";
\$".mex("var_chiedi_numcivico",$pag)." = \"".mex("$chiedi_numcivico",$pag)."\";
\$".mex("var_chiedi_cap",$pag)." = \"".mex("$chiedi_cap",$pag)."\";
\$".mex("var_chiedi_telefono",$pag)." = \"".mex("$chiedi_telefono",$pag)."\";
\$".mex("var_chiedi_telefono2",$pag)." = \"".mex("$chiedi_telefono2",$pag)."\";
\$".mex("var_chiedi_telefono3",$pag)." = \"".mex("$chiedi_telefono3",$pag)."\";
\$".mex("var_chiedi_fax",$pag)." = \"".mex("$chiedi_fax",$pag)."\";
\$".mex("var_chiedi_commento",$pag)." = \"".mex("$chiedi_commento",$pag)."\";
\$".mex("var_chiedi_oracheckin",$pag)." = \"".mex("$chiedi_oracheckin",$pag)."\";
\$".mex("var_chiedi_metodopagamento",$pag)." = \"".mex("$chiedi_metodopagamento",$pag)."\";
\$".mex("var_metodi_pagamento_da_chiedere",$pag)." = array($metodi_pagamento_da_chiedere);
\$".mex("var_nomi_metodi_pagamento_imposti",$pag)." = array($nomi_metodi_pagamento_imposti);
\$".mex("var_campi_form_personalizzati",$pag)." = array($campi_form_personalizzati);
\$".mex("var_chiedi_campi_form_personalizzati",$pag)." = array($chiedi_campi_form_personalizzati);
\$".mex("var_campi_form_doc_condizioni",$pag)." = array($campi_form_doc_condizioni);
\$".mex("var_chiedi_campi_form_doc_condizioni",$pag)." = array($chiedi_campi_form_doc_condizioni);
\$".mex("var_mostra_quadro_disponibilita",$pag)." = \"".mex("$mostra_quadro_disponibilita",$pag)."\";
\$".mex("var_raggruppa_quadro_disponibilita_con_regola_2",$pag)." = \"".mex("$raggruppa_quadro_disponibilita_con_regola_2",$pag)."\";
\$".mex("var_raggruppa_quadro_disponibilita_con_persone",$pag)." = \"".mex("$raggruppa_quadro_disponibilita_con_persone",$pag)."\";
\$".mex("var_colore_sfondo_quadro_disponibilita",$pag)." = \"$colore_sfondo_quadro_disponibilita\";
\$".mex("var_colore_inizio_settimana_quadro_disponibilita",$pag)." = \"$colore_inizio_settimana_quadro_disponibilita\";
\$".mex("var_colore_libero_quadro_disponibilita",$pag)." = \"$colore_libero_quadro_disponibilita\";
\$".mex("var_colore_occupato_quadro_disponibilita",$pag)." = \"$colore_occupato_quadro_disponibilita\";
\$".mex("var_apertura_font_quadro_disponibilita",$pag)." = \"$apertura_font_quadro_disponibilita\";
\$".mex("var_chiusura_font_quadro_disponibilita",$pag)." = \"$chiusura_font_quadro_disponibilita\";
\$".mex("var_mostra_numero_liberi_quadro_disponibilita",$pag)." = \"".mex("$mostra_numero_liberi_quadro_disponibilita",$pag)."\";
\$".mex("var_allinea_disponibilita_con_arrivo",$pag)." = \"".mex("$allinea_disponibilita_con_arrivo",$pag)."\";
\$".mex("var_mostra_calendario_scelta_date",$pag)." = \"".mex("$mostra_calendario_scelta_date",$pag)."\";
\$".mex("var_stile_riquadro_calendario",$pag)." = \"$stile_riquadro_calendario\";
\$".mex("var_stile_tabella_calendario",$pag)." = \"$stile_tabella_calendario\";
\$".mex("var_stile_bottoni_calendario",$pag)." = \"$stile_bottoni_calendario\";
\$".mex("var_stile_bottone_apertura_calendario",$pag)." = \"$stile_bottone_apertura_calendario\";
\$".mex("var_spostamento_orizzontale_calendario",$pag)." = \"$spostamento_orizzontale_calendario\";
\$".mex("var_colore_data_attiva_calendario",$pag)." = \"$colore_data_attiva_calendario\";
\$".mex("var_colore_data_selezionata_calendario",$pag)." = \"$colore_data_selezionata_calendario\";
\$".mex("var_apertura_tag_font",$pag)." = \"$apertura_tag_font\";
\$".mex("var_chiusura_tag_font",$pag)." = \"$chiusura_tag_font\";
\$".mex("var_apertura_tag_font_rosse",$pag)." = \"$apertura_tag_font_rosse\";
\$".mex("var_chiusura_tag_font_rosse",$pag)." = \"$chiusura_tag_font_rosse\";
\$".mex("var_stile_tabella_prenotazione",$pag)." = \"$stile_tabella_prenotazione\";
\$".mex("var_file_css_frame",$pag)." = \"$file_css_frame\";
\$".mex("var_apri_nuova_finestra_da_frame",$pag)." = \"".mex("$apri_nuova_finestra_da_frame",$pag)."\";
\$".mex("var_larghezza_finestra_da_frame",$pag)." = \"$larghezza_finestra_da_frame\";
\$".mex("var_altezza_finestra_da_frame",$pag)." = \"$altezza_finestra_da_frame\";
\$".mex("var_tema_modello",$pag)." = \"$tema_modello\";
");
for ($num1 = 1 ; $num1 <= $num_colori ; $num1++) fwrite($file,"\$".mex("var_colore_tema",$pag)."_$num1 = \"".${"colore_tema_".$num1}."\";
");
for ($num1 = 1 ; $num1 <= $num_valori ; $num1++) fwrite($file,"\$".mex("var_valore_tema",$pag)."_$num1 = \"".${"valore_tema_".$num1}."\";
");
fwrite($file,"
# ".mex("FRASI",$pag)."
\$".mex("var_fr_Valuta_sing",$pag)." = \"".$m_valuta_sing."\";
\$".mex("var_fr_Valuta_plur",$pag)." = \"".$m_valuta_plur."\";
\$".mex("var_fr_appartamenti",$pag)." = \"".$parola_appartamenti."\";
\$".mex("var_fr_appartamento",$pag)." = \"".$parola_appartamento."\";
\$".mex("var_fr_alternativa_regola1",$pag)." = \"".$frase_alternativa_regola1."\";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".mex("var_".$fr_frase[$num_fr],$pag)." = \"".${$fr_frase[$num_fr]}."\";
");
fwrite($file,"
# ".mex("FRASI EMAIL",$pag)."
\$".mex("var_fre_Email",$pag)." = \"".mex("Email",$pag)."\";
\$".mex("var_fre_Nome",$pag)." = \"".mex("Nome",$pag)."\";
\$".mex("var_fre_Commento",$pag)." = \"".mex("Commento",$pag)."\";
\$".mex("var_fre_Periodo",$pag)." = \"".mex("Periodo",$pag)."\";
\$".mex("var_fre_dal",$pag)." = \"".mex("dal",$pag)."\";
\$".mex("var_fre_al",$pag)." = \"".mex("al",$pag)."\";
\$".mex("var_fre_Tariffa",$pag)." = \"".mex("Tariffa",$pag)."\";
\$".mex("var_fre_Costi_aggiuntivi",$pag)." = \"".mex("Costi aggiuntivi",$pag)."\";
\$".mex("var_fre_sett",$pag)." = \"".mex("$parola_settimane",$pag)."\";
\$".mex("var_fre_Numero_di_appartamenti",$pag)." = \"".mex("Numero di appartamenti",'unit.php')."\";
\$".mex("var_fre_Prezzo_totale",$pag)." = \"".mex("Prezzo totale",$pag)."\";
\$".mex("var_fre_Riferimento",$pag)." = \"".mex("Riferimento",$pag)."\";
\$".mex("var_fre_Richesta_prenotazione",$pag)." = \"".mex("Richesta prenotazione",$pag)."\";
\$".mex("var_fre_Caparra",$pag)." = \"".mex("Caparra",$pag)."\";
\$".mex("var_fre_Persone",$pag)." = \"".mex("Persone",$pag)."\";
\$".mex("var_fre_Cognome",$pag)." = \"".mex("Cognome",$pag)."\";
\$".mex("var_fre_Genere",$pag)." = \"".mex("Genere",$pag)."\";
\$".mex("var_fre_Data_di_nascita",$pag)." = \"".mex("Data di nascita",$pag)."\";
\$".mex("var_fre_Documento",$pag)." = \"".mex("Documento",$pag)."\";
\$".mex("var_fre_Nazione",$pag)." = \"".mex("Nazione",$pag)."\";
\$".mex("var_fre_Citta",$pag)." = \"".mex("Città",$pag)."\";
\$".mex("var_fre_Regione",$pag)." = \"".mex("Regione",$pag)."\";
\$".mex("var_fre_Via",$pag)." = \"".mex("Via",$pag)."\";
\$".mex("var_fre_Numero_civico",$pag)." = \"".mex("Numero civico",$pag)."\";
\$".mex("var_fre_Codice_postale",$pag)." = \"".mex("Codice postale",$pag)."\";
\$".mex("var_fre_Telefono",$pag)." = \"".mex("Telefono",$pag)."\";
\$".mex("var_fre_Secondo_telefono",$pag)." = \"".mex("Secondo telefono",$pag)."\";
\$".mex("var_fre_Terzo_telefono",$pag)." = \"".mex("Terzo telefono",$pag)."\";
\$".mex("var_fre_Fax",$pag)." = \"".mex("Fax",$pag)."\";
\$".mex("var_fre_Orario_stimato_di_arrivo",$pag)." = \"".mex("Orario stimato di arrivo",$pag)."\";
\$".mex("var_fre_Metodo_di_pagamento_della_caparra",$pag)." = \"".mex("Metodo di pagamento della caparra",$pag)."\";
# ".mex("PERIODI NEI MENU",$pag)."
\$".mex("var_periodi_menu",$pag)." = \"$date_in_menu\";
\$d_names = \"$d_names\";
\$m_names = \"$m_names\";
# ".mex("FINE VARIABILI MODIFICABILI",$pag)."
############################################################################
### ".mex("NON MODIFICARE NIENTE A PARTIRE DA QUI",$pag)."
############################################################################
error_reporting(E_ALL ^ E_NOTICE);
\$PHPR_LOG = \"NO\";
\$pag = \$".mex("var_nome_pagina",$pag).";
if (!\$pag) {
if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or @\$HTTP_SERVER_VARS[\"PHP_SELF\"]) {
if (@\$_SERVER[\"PHP_SELF\"]) \$PHP_SELF = \$_SERVER[\"PHP_SELF\"];
else if (@\$HTTP_SERVER_VARS[\"PHP_SELF\"]) \$PHP_SELF = \$HTTP_SERVER_VARS[\"PHP_SELF\"];
\$pag = explode(\"/\",\$PHP_SELF);
\$pag = \$pag[(count(\$pag)-1)];
} # fine if (@\$PHP_SELF or @\$_SERVER[\"PHP_SELF\"] or...
else echo \"".mex("La variabile \\\$PHP_SELF non è definita, si dovrà editare a mano questa pagina per inserirne il nome",$pag).".<br>\";
} # fine if (!\$pag)
define(C_PERCORSO_A_DATI,\"$cost_percorso_a_dati\");
\$anno = \$".mex("var_anno",$pag).";
\$PHPR_DB_TYPE = \$".mex("var_tipo_db",$pag).";
\$PHPR_DB_NAME = \$".mex("var_nome_db",$pag).";
\$PHPR_DB_HOST = \$".mex("var_computer_db",$pag).";
\$PHPR_DB_PORT = \$".mex("var_porta_db",$pag).";
\$PHPR_DB_USER = \$".mex("var_utente_db",$pag).";
\$PHPR_DB_PASS = \$".mex("var_password_db",$pag).";
if (strtoupper(\$".mex("var_carica_estensione_db",$pag).") == \"".mex("SI",$pag)."\") \$PHPR_LOAD_EXT = \"SI\";
else \$PHPR_LOAD_EXT = \"NO\";
\$PHPR_TAB_PRE = \$".mex("var_prefisso_tabelle_db",$pag).";
");
if (defined('C_EXT_DB_DATA_PATH') and C_EXT_DB_DATA_PATH) fwrite($file,"\$HOTELD_DB_TYPE = \"\";
\$HOTELD_DB_NAME = \"\";
\$HOTELD_DB_HOST = \"\";
\$HOTELD_DB_PORT = \"\";
\$HOTELD_DB_USER = \"\";
\$HOTELD_DB_PASS = \"\";
\$HOTELD_TAB_PRE = \"\";
require('".C_EXT_DB_DATA_PATH."');
if (\$HOTELD_DB_TYPE) \$PHPR_DB_TYPE = \$HOTELD_DB_TYPE;
if (\$HOTELD_DB_NAME) \$PHPR_DB_NAME = \$HOTELD_DB_NAME;
if (\$HOTELD_DB_HOST) \$PHPR_DB_HOST = \$HOTELD_DB_HOST;
if (strcmp(\$HOTELD_DB_PORT,\"\")) \$PHPR_DB_PORT = \$HOTELD_DB_PORT;
if (\$HOTELD_DB_USER) \$PHPR_DB_USER = \$HOTELD_DB_USER;
if (strcmp(\$HOTELD_DB_PASS,\"\")) \$PHPR_DB_PASS = \$HOTELD_DB_PASS;
if (\$HOTELD_TAB_PRE) \$PHPR_TAB_PRE = \$HOTELD_TAB_PRE;
");
fwrite($file,"\$lingua_modello = \$".mex("var_lingua_modello",$pag).";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("europa",$pag)."\") \$stile_soldi = \"europa\";
if (\$".mex("var_stile_soldi",$pag)." == \"".mex("usa",$pag)."\") \$stile_soldi = \"usa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("europa",$pag)."\") \$stile_data = \"europa\";
if (\$".mex("var_stile_data",$pag)." == \"".mex("usa",$pag)."\") \$stile_data = \"usa\";
if (strtoupper(\$".mex("var_anteponi_nome_valuta",$pag).") == \"".mex("SI",$pag)."\") \$anteponi_nome_valuta = \"SI\";
else \$anteponi_nome_valuta = \"NO\";
\$utente_liste = \$".mex("var_utente_liste",$pag).";
if (strtoupper(\$".mex("var_estendi_ultima_data",$pag).") == \"".mex("SI",$pag)."\") \$estendi_ultima_data = \"SI\";
else \$estendi_ultima_data = \"NO\";
\$sett_no_prenota = \$".mex("var_periodi_no_richieste",$pag).";
unset(\$tariffe_mostra);
reset (\$".mex("var_tariffe_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_tariffe_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$tariffe_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$tariffe_mostra[\$key] = \"NO\";
} # fine while
\$n_tariffe_imposte = \$".mex("var_nomi_tariffe_imposte",$pag).";
if (strtoupper(\$".mex("var_chiedi_numero_appartamenti_per_tipologia",$pag).") == \"".mex("SI",$pag)."\") \$chiedi_num_app_tipologia = \"SI\";
else \$chiedi_num_app_tipologia = \"NO\";
\$max_num_app_tipologia = \$".mex("var_massimo_numero_appartamenti_per_tipologia",$pag).";
if (strtoupper(\$".mex("var_aggiungi_altre_tipologie",$pag).") == \"".mex("SI",$pag)."\") \$aggiungi_tipologie = \"SI\";
else \$aggiungi_tipologie = \"NO\";
\$max_num_tipologie = \$".mex("var_massimo_numero_altre_tipologie",$pag).";
if (strtoupper(\$".mex("var_chiedi_numero_persone",$pag).") == \"".mex("SI",$pag)."\") \$chiedi_num_persone = \"SI\";
else \$chiedi_num_persone = \"NO\";
\$max_num_persone = \$".mex("var_massimo_numero_persone",$pag).";
\$costo_aggiungi_letti = \$".mex("var_costo_aggiungi_letti",$pag).";
\$max_num_aggiungi_letti = \$".mex("var_massimo_numero_letti_aggiuntivi",$pag).";
if (strtoupper(\$".mex("var_chiedi_costi_aggiuntivi_di_pag_inserzione",$pag).") == \"".mex("SI",$pag)."\") \$mostra_costi_aggiuntivi = \"SI\";
else \$mostra_costi_aggiuntivi = \"NO\";
\$num_colonne_costi_agg = \$".mex("var_numero_colonne_costi_aggiuntivi",$pag).";
if (strtoupper(\$".mex("var_aggiungi_costi_fissi",$pag).") == \"".mex("SI",$pag)."\") \$aggiungi_costi_fissi = \"SI\";
else \$aggiungi_costi_fissi = \"NO\";
unset(\$costi_agg_mostra);
reset (\$".mex("var_costi_aggiuntivi_mostra",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_costi_aggiuntivi_mostra",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$costi_agg_mostra[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$costi_agg_mostra[\$key] = \"NO\";
} # fine while
\$n_costi_agg_imposti = \$".mex("var_nomi_costi_agg_imposti",$pag).";
\$cat_costi_agg_imposte = \$".mex("var_categorie_costi_agg_imposte",$pag).";
if (strtoupper(\$".mex("var_assegna_con_regola2",$pag).") == \"".mex("SI",$pag)."\") \$assegna_con_regola2 = \"SI\";
else \$assegna_con_regola2 = \"NO\";
unset(\$motivazioni_regola1);
reset (\$".mex("var_considera_motivazioni_regola1",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_considera_motivazioni_regola1",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$motivazioni_regola1[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$motivazioni_regola1[\$key] = \"NO\";
} # fine while
if (strtoupper(\$".mex("var_mostra_frase_alternativa_regola1",$pag).") == \"".mex("SI",$pag)."\") \$mostra_frase_alternativa_regola1 = \"SI\";
else \$mostra_frase_alternativa_regola1 = \"NO\";
if (strtoupper(\$".mex("var_mostra_caparra",$pag).") == \"".mex("SI",$pag)."\") \$mostra_caparra = \"SI\";
else \$mostra_caparra = \"NO\";
if (strtoupper(\$".mex("var_mostra_richiesta_via_mail",$pag).") == \"".mex("SI",$pag)."\") \$mostra_richiesta_via_mail = \"SI\";
else \$mostra_richiesta_via_mail = \"NO\";
\$indirizzo_email = \$".mex("var_indirizzo_email",$pag).";
if (strtoupper(\$".mex("var_manda_copia_richiesta_email",$pag).") == \"".mex("SI",$pag)."\") \$manda_copia_richiesta_email = \"SI\";
else \$manda_copia_richiesta_email = \"NO\";
if (strtoupper(\$".mex("var_maschera_email",$pag).") == \"".mex("SI",$pag)."\") \$maschera_envelope = \"SI\";
else \$maschera_envelope = \"NO\";
if (strtoupper(\$".mex("var_mostra_giorni_pieni",$pag).") == \"".mex("SI",$pag)."\") \$mostra_giorni_pieni = \"SI\";
else \$mostra_giorni_pieni = \"NO\";
if (strtoupper(\$".mex("var_mostra_bottone_paypal",$pag).") == \"".mex("SI",$pag)."\") \$mostra_bottone_paypal = \"SI\";
else \$mostra_bottone_paypal = \"NO\";
\$nome_modello_paypal = \$".mex("var_nome_modello_paypal",$pag).";
\$utente_messaggio = \$".mex("var_utente_messaggio",$pag).";
if (strtolower(\$utente_messaggio) == strtolower(\"".mex("tutti",$pag)."\")) \$utente_messaggio = \"tutti\";
\$origine_prenotazione = \$".mex("var_origine_prenotazione",$pag).";
\$chiedi_cognome = \$".mex("var_chiedi_cognome",$pag).";
if (strtoupper(\$chiedi_cognome) == \"".mex("SI",$pag)."\") \$chiedi_cognome = \"SI\";
if (strtoupper(\$chiedi_cognome) == \"".mex("NO",$pag)."\") \$chiedi_cognome = \"NO\";
\$chiedi_nome = \$".mex("var_chiedi_nome",$pag).";
if (strtoupper(\$chiedi_nome) == \"".mex("SI",$pag)."\") \$chiedi_nome = \"SI\";
if (strtoupper(\$chiedi_nome) == \"".mex("NO",$pag)."\") \$chiedi_nome = \"NO\";
\$chiedi_email = \$".mex("var_chiedi_email",$pag).";
if (strtoupper(\$chiedi_email) == \"".mex("SI",$pag)."\") \$chiedi_email = \"SI\";
if (strtoupper(\$chiedi_email) == \"".mex("NO",$pag)."\") \$chiedi_email = \"NO\";
\$chiedi_sesso = \$".mex("var_chiedi_sesso",$pag).";
if (strtoupper(\$chiedi_sesso) == \"".mex("SI",$pag)."\") \$chiedi_sesso = \"SI\";
if (strtoupper(\$chiedi_sesso) == \"".mex("NO",$pag)."\") \$chiedi_sesso = \"NO\";
\$chiedi_datanascita = \$".mex("var_chiedi_datanascita",$pag).";
if (strtoupper(\$chiedi_datanascita) == \"".mex("SI",$pag)."\") \$chiedi_datanascita = \"SI\";
if (strtoupper(\$chiedi_datanascita) == \"".mex("NO",$pag)."\") \$chiedi_datanascita = \"NO\";
\$chiedi_documento = \$".mex("var_chiedi_documento",$pag).";
if (strtoupper(\$chiedi_documento) == \"".mex("SI",$pag)."\") \$chiedi_documento = \"SI\";
if (strtoupper(\$chiedi_documento) == \"".mex("NO",$pag)."\") \$chiedi_documento = \"NO\";
\$chiedi_nazione = \$".mex("var_chiedi_nazione",$pag).";
if (strtoupper(\$chiedi_nazione) == \"".mex("SI",$pag)."\") \$chiedi_nazione = \"SI\";
if (strtoupper(\$chiedi_nazione) == \"".mex("NO",$pag)."\") \$chiedi_nazione = \"NO\";
\$chiedi_citta = \$".mex("var_chiedi_citta",$pag).";
if (strtoupper(\$chiedi_citta) == \"".mex("SI",$pag)."\") \$chiedi_citta = \"SI\";
if (strtoupper(\$chiedi_citta) == \"".mex("NO",$pag)."\") \$chiedi_citta = \"NO\";
\$chiedi_regione = \$".mex("var_chiedi_regione",$pag).";
if (strtoupper(\$chiedi_regione) == \"".mex("SI",$pag)."\") \$chiedi_regione = \"SI\";
if (strtoupper(\$chiedi_regione) == \"".mex("NO",$pag)."\") \$chiedi_regione = \"NO\";
\$chiedi_via = \$".mex("var_chiedi_via",$pag).";
if (strtoupper(\$chiedi_via) == \"".mex("SI",$pag)."\") \$chiedi_via = \"SI\";
if (strtoupper(\$chiedi_via) == \"".mex("NO",$pag)."\") \$chiedi_via = \"NO\";
\$chiedi_numcivico = \$".mex("var_chiedi_numcivico",$pag).";
if (strtoupper(\$chiedi_numcivico) == \"".mex("SI",$pag)."\") \$chiedi_numcivico = \"SI\";
if (strtoupper(\$chiedi_numcivico) == \"".mex("NO",$pag)."\") \$chiedi_numcivico = \"NO\";
\$chiedi_cap = \$".mex("var_chiedi_cap",$pag).";
if (strtoupper(\$chiedi_cap) == \"".mex("SI",$pag)."\") \$chiedi_cap = \"SI\";
if (strtoupper(\$chiedi_cap) == \"".mex("NO",$pag)."\") \$chiedi_cap = \"NO\";
\$chiedi_telefono = \$".mex("var_chiedi_telefono",$pag).";
if (strtoupper(\$chiedi_telefono) == \"".mex("SI",$pag)."\") \$chiedi_telefono = \"SI\";
if (strtoupper(\$chiedi_telefono) == \"".mex("NO",$pag)."\") \$chiedi_telefono = \"NO\";
\$chiedi_telefono2 = \$".mex("var_chiedi_telefono2",$pag).";
if (strtoupper(\$chiedi_telefono2) == \"".mex("SI",$pag)."\") \$chiedi_telefono2 = \"SI\";
if (strtoupper(\$chiedi_telefono2) == \"".mex("NO",$pag)."\") \$chiedi_telefono2 = \"NO\";
\$chiedi_telefono3 = \$".mex("var_chiedi_telefono3",$pag).";
if (strtoupper(\$chiedi_telefono3) == \"".mex("SI",$pag)."\") \$chiedi_telefono3 = \"SI\";
if (strtoupper(\$chiedi_telefono3) == \"".mex("NO",$pag)."\") \$chiedi_telefono3 = \"NO\";
\$chiedi_fax = \$".mex("var_chiedi_fax",$pag).";
if (strtoupper(\$chiedi_fax) == \"".mex("SI",$pag)."\") \$chiedi_fax = \"SI\";
if (strtoupper(\$chiedi_fax) == \"".mex("NO",$pag)."\") \$chiedi_fax = \"NO\";
\$chiedi_commento = \$".mex("var_chiedi_commento",$pag).";
if (strtoupper(\$chiedi_commento) == \"".mex("SI",$pag)."\") \$chiedi_commento = \"SI\";
if (strtoupper(\$chiedi_commento) == \"".mex("NO",$pag)."\") \$chiedi_commento = \"NO\";
\$chiedi_oracheckin = \$".mex("var_chiedi_oracheckin",$pag).";
if (strtoupper(\$chiedi_oracheckin) == \"".mex("SI",$pag)."\") \$chiedi_oracheckin = \"SI\";
if (strtoupper(\$chiedi_oracheckin) == \"".mex("NO",$pag)."\") \$chiedi_oracheckin = \"NO\";
\$chiedi_metodopagamento = \$".mex("var_chiedi_metodopagamento",$pag).";
if (strtoupper(\$chiedi_metodopagamento) == \"".mex("SI",$pag)."\") \$chiedi_metodopagamento = \"SI\";
if (strtoupper(\$chiedi_metodopagamento) == \"".mex("NO",$pag)."\") \$chiedi_metodopagamento = \"NO\";
unset(\$metodi_pagamento_da_chiedere);
reset (\$".mex("var_metodi_pagamento_da_chiedere",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_metodi_pagamento_da_chiedere",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$metodi_pagamento_da_chiedere[\$key] = \"SI\";
if (strtoupper(\$val) == \"".mex("NO",$pag)."\") \$metodi_pagamento_da_chiedere[\$key] = \"NO\";
} # fine while
\$nomi_metodi_pagamento_imposti = \$".mex("var_nomi_metodi_pagamento_imposti",$pag).";
\$campi_form_personalizzati = \$".mex("var_campi_form_personalizzati",$pag).";
unset(\$chiedi_campi_form_personalizzati);
reset (\$".mex("var_chiedi_campi_form_personalizzati",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_chiedi_campi_form_personalizzati",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$chiedi_campi_form_personalizzati[\$key] = \"SI\";
} # fine while
\$campi_form_doc_condizioni = \$".mex("var_campi_form_doc_condizioni",$pag).";
unset(\$chiedi_campi_form_doc_condizioni);
reset (\$".mex("var_chiedi_campi_form_doc_condizioni",$pag).");
while (list (\$key, \$val) = each (\$".mex("var_chiedi_campi_form_doc_condizioni",$pag).")) {
if (strtoupper(\$val) == \"".mex("SI",$pag)."\") \$chiedi_campi_form_doc_condizioni[\$key] = \"SI\";
} # fine while
\$mostra_quadro_disp = \"\";
if (strtoupper(\$".mex("var_mostra_quadro_disponibilita",$pag).") == \"".mex("SI",$pag)."\") {
\$mostra_quadro_disp = \"app\";
if (strtoupper(\$".mex("var_raggruppa_quadro_disponibilita_con_persone",$pag).") == \"".mex("SI",$pag)."\") \$mostra_quadro_disp = \"pers\";
if (strtoupper(\$".mex("var_raggruppa_quadro_disponibilita_con_regola_2",$pag).") == \"".mex("SI",$pag)."\") \$mostra_quadro_disp = \"reg2\";
} # fine if (strtoupper(\$".mex("var_mostra_quadro_disponibilita",$pag).") == \"".mex("SI",$pag)."\")
\$c_sfondo_tab_disp = \$".mex("var_colore_sfondo_quadro_disponibilita",$pag).";
\$c_inisett_tab_disp = \$".mex("var_colore_inizio_settimana_quadro_disponibilita",$pag).";
\$c_libero_tab_disp = \$".mex("var_colore_libero_quadro_disponibilita",$pag).";
\$c_occupato_tab_disp = \$".mex("var_colore_occupato_quadro_disponibilita",$pag) .";
\$aper_font_tab_disp = \$".mex("var_apertura_font_quadro_disponibilita",$pag).";
\$chiu_font_tab_disp = \$".mex("var_chiusura_font_quadro_disponibilita",$pag).";
if (strtoupper(\$".mex("var_mostra_numero_liberi_quadro_disponibilita",$pag).") == \"".mex("SI",$pag)."\") \$mostra_num_liberi = \"SI\";
else \$mostra_num_liberi = \"NO\";
if (strtoupper(\$".mex("var_allinea_disponibilita_con_arrivo",$pag).") == \"".mex("SI",$pag)."\") \$allinea_disponibilita_con_arrivo = \"SI\";
else \$allinea_disponibilita_con_arrivo = \"NO\";
if (strtoupper(\$".mex("var_mostra_calendario_scelta_date",$pag).") == \"".mex("SI",$pag)."\") \$mostra_calendario_scelta_date = \"SI\";
else \$mostra_calendario_scelta_date = \"NO\";
\$stile_riquadro_calendario = \$".mex("var_stile_riquadro_calendario",$pag).";
\$stile_tabella_calendario = \$".mex("var_stile_tabella_calendario",$pag).";
\$stile_bottoni_calendario = \$".mex("var_stile_bottoni_calendario",$pag).";
\$stile_bottone_apertura_calendario = \$".mex("var_stile_bottone_apertura_calendario",$pag).";
\$spostamento_orizzontale_calendario = \$".mex("var_spostamento_orizzontale_calendario",$pag).";
\$colore_data_attiva_calendario = \$".mex("var_colore_data_attiva_calendario",$pag).";
\$colore_data_selezionata_calendario = \$".mex("var_colore_data_selezionata_calendario",$pag).";
\$apertura_tag_font = \$".mex("var_apertura_tag_font",$pag).";
\$chiusura_tag_font = \$".mex("var_chiusura_tag_font",$pag).";
\$apertura_tag_font_rosse = \$".mex("var_apertura_tag_font_rosse",$pag).";
\$chiusura_tag_font_rosse = \$".mex("var_chiusura_tag_font_rosse",$pag).";
\$stile_tabella_prenotazione = \$".mex("var_stile_tabella_prenotazione",$pag).";
\$file_css_frame = \$".mex("var_file_css_frame",$pag).";
if (strtoupper(\$".mex("var_apri_nuova_finestra_da_frame",$pag).") == \"".mex("SI",$pag)."\") \$apri_nuova_finestra_da_frame = \"SI\";
else \$apri_nuova_finestra_da_frame = \"NO\";
\$larghezza_finestra_da_frame = \$".mex("var_larghezza_finestra_da_frame",$pag).";
\$altezza_finestra_da_frame = \$".mex("var_altezza_finestra_da_frame",$pag).";
\$extra_head_frame = \"$extra_head_frame\";
\$tipo_periodi = \"$m_tipo_periodi\";
# FRASI
\$fr_Euro = \$".mex("var_fr_Valuta_sing",$pag).";
\$fr_Euros = \$".mex("var_fr_Valuta_plur",$pag).";
\$fr_appartamenti = \$".mex("var_fr_appartamenti",$pag).";
\$fr_appartamento = \$".mex("var_fr_appartamento",$pag).";
\$fr_alternativa_regola1 = \$".mex("var_fr_alternativa_regola1",$pag).";
");
for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) fwrite($file,"\$".$fr_frase[$num_fr]." = \$".mex("var_".$fr_frase[$num_fr],$pag).";
");
fwrite($file,"\$fre_Email = \$".mex("var_fre_Email",$pag).";
\$fre_Nome = \$".mex("var_fre_Nome",$pag).";
\$fre_Commento = \$".mex("var_fre_Commento",$pag).";
\$fre_Periodo = \$".mex("var_fre_Periodo",$pag).";
\$fre_dal = \$".mex("var_fre_dal",$pag).";
\$fre_al = \$".mex("var_fre_al",$pag).";
\$fre_Tariffa = \$".mex("var_fre_Tariffa",$pag).";
\$fre_Costi_aggiuntivi = \$".mex("var_fre_Costi_aggiuntivi",$pag).";
\$fre_sett = \$".mex("var_fre_sett",$pag).";
\$fre_Numero_di_appartamenti = \$".mex("var_fre_Numero_di_appartamenti",$pag).";
\$fre_Prezzo_totale = \$".mex("var_fre_Prezzo_totale",$pag).";
\$fre_Riferimento = \$".mex("var_fre_Riferimento",$pag).";
\$fre_Richesta_prenotazione = \$".mex("var_fre_Richesta_prenotazione",$pag).";
\$fre_Caparra = \$".mex("var_fre_Caparra",$pag).";
\$fre_Persone = \$".mex("var_fre_Persone",$pag).";
\$fre_Cognome = \$".mex("var_fre_Cognome",$pag).";
\$fre_Genere = \$".mex("var_fre_Genere",$pag).";
\$fre_Data_di_nascita = \$".mex("var_fre_Data_di_nascita",$pag).";
\$fre_Documento = \$".mex("var_fre_Documento",$pag).";
\$fre_Nazione = \$".mex("var_fre_Nazione",$pag).";
\$fre_Citta = \$".mex("var_fre_Citta",$pag).";
\$fre_Regione = \$".mex("var_fre_Regione",$pag).";
\$fre_Via = \$".mex("var_fre_Via",$pag).";
\$fre_Numero_civico = \$".mex("var_fre_Numero_civico",$pag).";
\$fre_Codice_postale = \$".mex("var_fre_Codice_postale",$pag).";
\$fre_Telefono = \$".mex("var_fre_Telefono",$pag).";
\$fre_Secondo_telefono = \$".mex("var_fre_Secondo_telefono",$pag).";
\$fre_Terzo_telefono = \$".mex("var_fre_Terzo_telefono",$pag).";
\$fre_Fax = \$".mex("var_fre_Fax",$pag).";
\$fre_Orario_stimato_di_arrivo = \$".mex("var_fre_Orario_stimato_di_arrivo",$pag).";
\$fre_Metodo_di_pagamento_della_caparra = \$".mex("var_fre_Metodo_di_pagamento_della_caparra",$pag).";
# PERIODI NEI MENU
\$menu_periodi = \$".mex("var_periodi_menu",$pag).";
function mex_data(\$messaggio) {
");
if ($lingua_modello != "ita") {
if (@is_file("./includes/lang/$lingua_modello/giorni_mesi.php")) includi_file("./includes/lang/$lingua_modello/giorni_mesi.php",$file);
else if (@is_file("./includes/lang/en/giorni_mesi.php")) includi_file("./includes/lang/en/giorni_mesi.php",$file);
} # fine if ($lingua_modello != "ita")
fwrite($file,"
return \$messaggio;
} # fine function mex_data
");
includi_file("./includes/funzioni_".$M_PHPR_DB_TYPE.".php",$file);
fwrite($file,"
\$numconnessione = connetti_db(\$PHPR_DB_NAME,\$PHPR_DB_HOST,\$PHPR_DB_PORT,\$PHPR_DB_USER,\$PHPR_DB_PASS,\$PHPR_LOAD_EXT);
");
includi_file("./includes/funzioni.php",$file);
includi_file(C_DATA_PATH."/versione.php",$file);
includi_file("./includes/liberasettimane.php",$file);
includi_file("./includes/funzioni_tariffe.php",$file);
includi_file("./includes/funzioni_costi_agg.php",$file);
includi_file("./includes/funzioni_quadro_disp.php",$file);
includi_file("./includes/funzioni_clienti.php",$file);
includi_file("./includes/funzioni_dati_relutenti.php",$file);
if ($campi_form_doc_condizioni) {
includi_file("./includes/variabili_contratto.php",$file);
includi_file("./includes/funzioni_contratti.php",$file);
includi_file("./includes/funzioni_testo.php",$file);
fwrite($file,"
function crea_trad_var_vett (&\$trad_var_vett) {
\$trad_var_vett = \"\";
");
if (@is_dir("./includes/lang/es")) {
includi_file("./includes/lang/es/visualizza_contratto_var.php",$file);
fwrite($file,"
while (list(\$var_trad_ita,\$var_trad_ext) = each(\$trad_var)) \$trad_var_vett[\$var_trad_ext] = \$var_trad_ita;
unset(\$trad_var);
");
} # fine if (@is_dir("./includes/lang/es"))
if (@is_dir("./includes/lang/en")) {
includi_file("./includes/lang/en/visualizza_contratto_var.php",$file);
fwrite($file,"
while (list(\$var_trad_ita,\$var_trad_ext) = each(\$trad_var)) \$trad_var_vett[\$var_trad_ext] = \$var_trad_ita;
unset(\$trad_var);
");
} # fine if (@is_dir("./includes/lang/en"))
global $lingua_mex;
if ($lingua_mex != "ita" and $lingua_mex != "en" and $lingua_mex != "es") {
if (@is_dir("./includes/lang/$lingua_mex")) {
includi_file("./includes/lang/$lingua_mex/visualizza_contratto_var.php",$file);
fwrite($file,"
while (list(\$var_trad_ita,\$var_trad_ext) = each(\$trad_var)) \$trad_var_vett[\$var_trad_ext] = \$var_trad_ita;
unset(\$trad_var);
");
} # fine if (@is_dir("./includes/lang/$lingua_mex"))
} # fine if ($lingua_mex != "ita" and $lingua_mex != "en" and $lingua_mex != "es")
fwrite($file,"
if (!@is_array(\$trad_var_vett)) \$trad_var_vett['new_line'] = 'avanzamento_riga';
} # fine function crea_trad_var_vett
");
} # fine if ($campi_form_doc_condizioni)
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") {
$f_scad_acc = explode("/",$percorso_cartella_modello);
$num_f_scad_acc = count($f_scad_acc);
$file_scad_acc = "";
for ($num1 = 0 ; $num1 < $num_f_scad_acc ; $num1++) if ($f_scad_acc[$num1] != ".") $file_scad_acc .= "../";
$file_scad_acc .= C_FILE_SCADENZA_ACCOUNT;
fwrite($file,"
\$disattivato = \"\";
\$scadenza = trim(@implode(@file(\"$file_scad_acc\")));
\$adesso = date(\"YmdHis\");
if (!\$scadenza or \$scadenza < \$adesso) {
\$disattivato = \"SI\";
echo \"Expired account.<br>\";
} # fine (!\$scadenza or \$scadenza < \$adesso)
if (!\$disattivato) {
");
} # fine if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "")
includi_file("./includes/templates/modello_disponibilita.php",$file);
if (defined("C_FILE_SCADENZA_ACCOUNT") and C_FILE_SCADENZA_ACCOUNT != "") fwrite($file,"
} # fine if (!\$disattivato)
");
fwrite($file,"
if (!\$framed) {
?>
<!-- ".mex("INIZIO DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->
$ultima_parte_html
<!-- ".mex("FINE DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." --><?php } # fine if (!\$framed) ?>");
flock($file,3);
fclose($file);
$exec_crea_mod = substr(decoct(@fileperms('./crea_modelli.php')),-3,1);
if ((defined('C_CHMOD_EXEC_MODELLI') and C_CHMOD_EXEC_MODELLI == "SI") or $exec_crea_mod == "7" or $exec_crea_mod == "5") @chmod("$percorso_cartella_modello/$nome_file", 0750);
else @chmod("$percorso_cartella_modello/$nome_file", 0640);
$url_pagina = "";
if ($silenzio != "totale" or ($silenzio != "NO" and $tema_trovato and $framed_mode_example[$tema_sel])) {
$url_pagina = trova_url_pagina($nome_file,$percorso_cartella_modello,$pag);
if ($url_pagina) $url_pagina_link = $url_pagina;
else $url_pagina_link = "$percorso_cartella_modello/$nome_file";
} # fine if ($silenzio != "totale" or ($silenzio != "NO" and...
if ($silenzio == "NO") echo "<br>";
if ($silenzio != "totale") echo mex("Una pagina chiamata",$pag)." <b><a href=\"$url_pagina_link\" target=\"_blank\">$nome_file</a></b> ".mex("è stata creata nella directory",$pag)." \"$percorso_cartella_modello\".<br>";
if ($silenzio == "NO") {
if (defined('C_CARTELLA_CREA_MODELLI')) echo mex("Si può creare un link verso questa pagina dal proprio sito internet",$pag).".<br>";
else echo mex("Si può cambiare la directory dove vengono create le pagine da \"configura e personalizza\"",$pag).".<br>";
if ($tema_trovato and $framed_mode_example[$tema_sel] and $url_pagina) {
echo "<br><br>".mex("Esempio di codice html per includere il primo passo della form in modalità frame su altre pagine del sito",$pag).":<br>
<textarea rows=4 cols=108 wrap=\"off\" readonly=\"true\">
".htmlspecialchars(str_replace("[page_url]",$url_pagina,$framed_mode_example[$tema_sel]))."
</textarea><br><br>";
} # fine if ($tema_trovato and $framed_mode_example[$tema_sel] and...
} # fine if ($silenzio == "NO")
} # fine if ($file)
else if ($silenzio == "NO") echo mex("Non ho il permesso di scrittura nella cartella",$pag)." $percorso_cartella_modello.<br>";
} # fine if ($continua != "NO")
} # fine function crea_modello_disponibilita
$num_var_predef++;
} # fine for $num1
$array_pers = esegui_query("select * from $tablecontratti where tipo = 'vett' or tipo = 'vett$num_int_contr' order by tipo, numero");
$num_array_pers = numlin_query($array_pers);
for ($num1 = 0 ; $num1 < $num_array_pers ; $num1++) {
$arr_pers_vett = explode(";",risul_query($array_pers,$num1,'testo'));
$arr_pers = $arr_pers_vett[0];
$var_arr_pers = $arr_pers_vett[1];
$num_arr_pers = risul_query($array_pers,$num1,'numero');
$var_predef[$num_var_predef] = "$arr_pers(".mex2($var_arr_pers).")";
$num_var_predef++;
$option_array .= "<option value=\"a$arr_pers\">".mex("ripetizione array",$pag)." $arr_pers</option>";
} # fine for $num1
for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) {
$linea_mod .= "<option value=\"".mex2($var_predef[$num1])."\">".mex2($var_predef[$num1])."</option>";
} # fine for $num1
$linea_mod .= "</select>
<input class=\"sbutton\" type=\"submit\" name=\"aggiungi_var\" value=\"".mex("Aggiungi",$pag)."\">
</td><td style=\"width: 30px;\"></td><td>
<input class=\"sbutton\" type=\"submit\" name=\"salva_modifiche\" value=\"".mex("Salva le modifiche",$pag)."\">
</td><td style=\"width: 30px;\"></td><td>".mex("Limiti",$pag)." <select name=\"tipo_rip\">";
if (!$multilingua) $linea_mod .= "<option value=\"1\">".mex("ripetizione prenotazioni",$pag)."</option>";
$linea_mod .= "<option value=\"2\">".mex("ripetizione ospiti",$pag)."</option>
<option value=\"3\">".mex("ripetizione costi aggiuntivi",$pag)."</option>
$option_array
<option value=\"5\">".mex("ripetizione pagamenti",$pag)."</option>
<option value=\"6\">".mex("ripetizione unità",$pag)."</option>
<option value=\"7\">".mex("parte sotto condizione",$pag)."</option>
</select>
<input class=\"sbutton\" type=\"submit\" name=\"aggiungi_ripetizione\" value=\"".mex("Aggiungi",$pag)."\">
} # fine if ($contr_importa_vc and...
echo "<br><br>";
} # fine if ($opt_contr_imp)
} # fine if ($contr_cond)
if($option_var_pers and !$contr_importa_vc) {
$option_var_pers .= "<option value=\"-2\">".mex2('errore_ripetizione')."</option>
<option value=\"-1\">".mex2('messaggio_di_errore')."</option>";
$option_var_predef = "";
$option_var_predef_data = "";
for ($num1 = 0 ; $num1 < $num_var_predef ; $num1++) {
$option_var_predef .= "<option value=\"".$var_predef[$num1]."\">".mex2($var_predef[$num1])."</option>";
if ($var_predef_data[$var_predef[$num1]] or $num1 >= $num_var_predef_orig) $option_var_predef_data .= "<option value=\"".$var_predef[$num1]."\">".mex2($var_predef[$num1])."</option>";
} # fine for $num1
if (!$num_se) $num_se = 1;
if ($num_se > 2 and !$and_or) $num_se = 1;
$sel_rip = "";
$sel_inirip = "";
$sel_inidoc = "";
if (!$inizializza or $inizializza == "rpt") $sel_rip = " selected";
if ($inizializza == "inr") $sel_inirip = " selected";
if ($inizializza == "ind") $sel_inidoc = " selected";
echo "<div class=\"rbox\" style=\"padding-top: 8px;\">
<a name=\"modcond\"></a>
<form accept-charset=\"utf-8\" method=\"post\" action=\"$pag#modcond\"><div>
<input type=\"hidden\" name=\"anno\" value=\"$anno\">
}
}
# 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_lingua = file("./includes/lang/{$ini_lingua}/l_n");
$nome_lingua = togli_acapo($nome_lingua[0]);
if (!$lingua_usel and $ini_lingua == $lingua[$id_utente] or $ini_lingua == $lingua_usel) {
$selected = " selected";
} else {
$selected = "";
}
echo "<option value=\"{$ini_lingua}\"{$selected}>{$nome_lingua}</option>";
$nome_file = mex2("mdl_disponibilita", $pag, $ini_lingua) . ".php";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
if (@is_file($perc_cart_mod_vett[$num_cart] . "/{$nome_file}")) {
$mod_presenti_vett[$num_cart][$nome_file] = 1;
}
}
# fine for $num_cart
}
# fine if ($file != "." && $file != "..")
}
# fine while ($file = readdir($lang_dig))
closedir($lang_dir);
echo "</select><br><br>";
if ($num_perc_cart_mod_vett > 1) {
echo "" . mex("Cartella", $pag) . ":\n <select name=\"perc_cart_mod_sel\">";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html;charset=utf-8\">
<title> $nome_file </title>
<style type=\"text/css\">
.tab_disp {font-size:70%;}
.t_book { border-radius: 8px; }
.t_book td { border-radius: 8px; }
div.agreem { max-width: 600px; border: 1px solid black; padding: 3px; }
select { background-color: #ffffff; }
</style>
</head>
<body style=\"background-color: [theme_color_2]; color: [theme_color_1]; padding: 0; margin: 0;\">
[theme_value_1]
<div style=\"text-align: center; padding: 10px;\"><big><big>
".mex2("Controlla la disponibilità",$pag,$lingua_modello)."</big></big><br><br>
<table style=\"margin-left: auto; margin-right: auto; background-color: [theme_color_3]; border-radius: 14px;\" border=1 cellspacing=0 cellpadding=16>
<tr><td style=\" border-radius: 14px;\">
<table style=\"text-align: left; margin-left: 0;\" border=0 cellspacing=0 cellpadding=0><tr><td>
";
$template_theme_html_post[1] = "
<br></td></tr></table>
</td></tr></table>
";
if (C_NASCONDI_MARCA != "SI") $template_theme_html_post[1] .= "<small><small>Powered by
<a href=\"http://www.hoteldruid.com\" style=\"color: [theme_color_1];\">
HotelDruid booking software</a></small></small>";
$template_theme_html_post[1] .= "</div>
# fine if (!$anni_backup or ${'anno_sel'.$anno_reg})
}
# fine for $num1
fwrite($file, "</database>\n");
echo "<br>";
if ($includi_modelli == "SI") {
include "./includes/templates/funzioni_modelli.php";
for ($num_cart = 0; $num_cart < $num_perc_cart_mod_vett; $num_cart++) {
$percorso_cartella_modello = $perc_cart_mod_vett[$num_cart];
if (@is_file("{$percorso_cartella_modello}/mdl_disponibilita.php")) {
dump_modello("mdl_disponibilita.php", $percorso_cartella_modello, $file);
}
$lang_dir = opendir("./includes/lang/");
while ($ini_lingua = readdir($lang_dir)) {
if ($ini_lingua != "." && $ini_lingua != "..") {
$nome_file = mex2("mdl_disponibilita", "crea_modelli.php", $ini_lingua) . ".php";
if (@is_file("{$percorso_cartella_modello}/{$nome_file}")) {
dump_modello($nome_file, $percorso_cartella_modello, $file);
}
}
# fine if ($ini_lingua != "." && $ini_lingua != "..")
}
# fine while ($ini_lingua = readdir($lang_dir))
closedir($lang_dir);
$templates_dir = opendir("./includes/templates/");
while ($modello_ext = readdir($templates_dir)) {
if ($modello_ext != "." && $modello_ext != ".." and @is_dir("./includes/templates/{$modello_ext}")) {
include "./includes/templates/{$modello_ext}/name.php";
if ($template_file_name['ita']) {
$nome_file = $template_file_name['ita'];
} else {
