<input type=\"hidden\" name=\"anno\" value=\"$anno\"> <input type=\"hidden\" name=\"id_sessione\" value=\"$id_sessione\"> <input type=\"hidden\" name=\"idappartamenti\" value=\"".$idappartamenti."\"> <input type=\"hidden\" name=\"modificadescr\" value=\"SI\"> ".ucfirst(mex($fr1."descrizione dell'appartamento",'unit.php'))." <em>$idappartamenti</em>:<br> <table><tr><td>Italiano:<br> <textarea name=\"n_descrizione_ita\" rows=4 cols=60 style=\"white-space: pre; overflow: auto;\">$d_descrizione</textarea></td>"; $col = 0; $max_col = 2; unset($lingue_vett); $lang_dir = opendir("./includes/lang/"); include(C_DATA_PATH."/lingua.php"); while ($ini_lingua = readdir($lang_dir)) { if ($ini_lingua != "." && $ini_lingua != ".." and strlen($ini_lingua) <= 3 and preg_replace("/[a-z]/","",$ini_lingua) == "") { $nome_lingua = file("./includes/lang/$ini_lingua/l_n"); $nome_lingua = togli_acapo($nome_lingua[0]); $lingue_vett[$ini_lingua] = $nome_lingua; $d_descrizione = esegui_query("select testo from $tabledescrizioni where nome = '$idappartamenti' and tipo = 'appdescr' and lingua = '$ini_lingua' and numero = '1' "); if (numlin_query($d_descrizione)) $d_descrizione = risul_query($d_descrizione,0,'testo'); else $d_descrizione = ""; $col++; if ($col == $max_col) { $col = 0; echo "</tr><tr>"; } # fine if ($col == $max_col) else echo "<td style=\"width: 30px;\"></td>"; echo "<td>".ucfirst($nome_lingua).":<br>"; echo "<textarea name=\"n_descrizione_$ini_lingua\" rows=4 cols=60 style=\"white-space: pre; overflow: auto;\">$d_descrizione</textarea></td>"; } # fine if ($file != "." && $file != ".." and... } # fine while ($file = readdir($lang_dig)) closedir($lang_dir);
function ripristina_backup_contr($linee_backup, $silenzio, $pag, $PHPR_TAB_PRE, $modalita, $contr_agg = "") { global $LIKE, $MEDIUMTEXT; include "./includes/variabili_contratto.php"; unset($var_predef); $versione_corrente = esegui_query("select * from " . $PHPR_TAB_PRE . "versioni where idversioni = 1"); $versione_corrente = risul_query($versione_corrente, 0, 'num_versione'); for ($num1 = 0; $num1 < count($linee_backup); $num1++) { $linea = togli_acapo($linee_backup[$num1]); if (substr($linea, 0, 10) == "<versione>") { $versione_file = substr($linea, 10); $versione_file = substr($versione_file, 0, -11); break; } # fine if (substr($linea,0,10) == "<versione>") } # fine for $num1 if ($versione_file and ($versione_file <= $versione_corrente and $versione_file >= "2.00")) { if ($modalita != "aggiungi") { $contr_agg = ""; } $contr_agg_var = $contr_agg; $contr_agg_all = ""; $contr_agg_trovato = 0; # Prima lettura di controllo del file contratti $file_coerente = "SI"; $num_err = ""; $leggendo_righe = "NO"; unset($tab_presente); $info_contr['max_contr'] = 0; $num_linee_backup = count($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 ($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>") { $leggendo_colonne == "NO"; if ($nome_tabella == "contratti") { $tab_presente["contratti"] = "SI"; } if ($nome_tabella != "contratti") { $file_coerente = "NO"; $num_err .= "#1"; } } # fine if ($linea == "</colonnetabella>") 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; } # 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; } # 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 .= "#2"; } } # 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 .= "#3"; } if ($var_riserv[$nome[1]]) { $file_coerente = "NO"; $num_err .= "#4"; } } # fine if (substr($tipo_contr,0,4) == "vett") if ($modalita == "info") { if ($riga[$num_colonna['tipo']] == "nomi_con" and $riga[$num_colonna['numero']] == "1") { $info_contr['nomi_con'] = $riga[$num_colonna['testo']]; } if (substr($riga[$num_colonna['tipo']], 0, 5) == "contr" and $riga[$num_colonna['numero']] > $info_contr['max_contr']) { $info_contr['max_contr'] = $riga[$num_colonna['numero']]; } } # fine if ($modalita == "info") if ($contr_agg and $riga[$num_colonna['numero']] == $contr_agg) { if (substr($riga[$num_colonna['tipo']], 0, 5) == "contr") { $contr_agg_trovato = 1; } if ($riga[$num_colonna['tipo']] == "impor_vc") { $contr_agg_var = $riga[$num_colonna['testo']]; } if ($riga[$num_colonna['tipo']] == "allegato") { $contr_agg_all .= "," . $riga[$num_colonna['testo']] . ","; } } # fine if ($contr_agg and $riga[$num_colonna['numero']] == $contr_agg) } # fine if ($nome_tabella == "contratti") $lista_valori = ""; $lista_colonne = ""; 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 (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 .= "#5"; } $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"; } } # fine if ($leggendo_database == "SI") if ($linea == "<database>") { $leggendo_database = "SI"; } } # fine if ($leggendo_backup == "SI") if ($linea == "<backup>") { $leggendo_backup = "SI"; } } # fine for $num1 if ($tab_presente["contratti"] != "SI") { $file_coerente = "NO"; $num_err .= "#6"; } if ($contr_agg and !$contr_agg_trovato) { $file_coerente = "NO"; $num_err .= "#7"; } if ($file_coerente == "NO") { if ($silenzio != "SI") { echo mex("Il formato del file è errato", $pag) . ".<br>"; } # debug backup DOCUMENTI #if ($num_err) echo $num_err.".<br>"; } else { unset($var_riserv); if ($modalita == "info") { return $info_contr; } if ($modalita == "rimpiazza") { esegui_query("delete from " . $PHPR_TAB_PRE . "contratti"); } $max_contr = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo {$LIKE} 'contr%'"); if (numlin_query($max_contr) != 0) { $max_contr = risul_query($max_contr, 0, 0); } else { $max_contr = 0; } if (!$max_contr) { $max_contr = 0; } $max_var = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo {$LIKE} 'var%'"); if (numlin_query($max_var) != 0) { $max_var = risul_query($max_var, 0, 0); } else { $max_var = 0; } if (!$max_var) { $max_var = 0; } $max_arr = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo {$LIKE} 'vett%'"); if (numlin_query($max_arr) != 0) { $max_arr = risul_query($max_arr, 0, 0); } else { $max_arr = 0; } if (!$max_arr) { $max_arr = 0; } $max_cond = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo = 'cond'"); if (numlin_query($max_cond) != 0) { $max_cond = risul_query($max_cond, 0, 0); } else { $max_cond = 0; } if (!$max_cond) { $max_cond = 0; } $max_all = esegui_query("select max(numero) from " . $PHPR_TAB_PRE . "contratti where tipo = 'file_all'"); if (numlin_query($max_all) != 0) { $max_all = risul_query($max_all, 0, 0); } else { $max_all = 0; } if (!$max_all) { $max_all = 0; } unset($nuovo_num_contr); unset($nuovo_num_var); $nuovo_num_var['-1'] = '-1'; $nuovo_num_var['-2'] = '-2'; unset($nuovo_nome_var); unset($nuovo_num_all); $leggendo_backup = "NO"; $leggendo_database = "NO"; $leggendo_tabella = "NO"; $leggendo_colonne = "NO"; $leggendo_righe = "NO"; $leggendo_file = "NO"; $leggendo_contenuto = "NO"; $nome_file = ""; unset($linee_inserite_in_tabella); 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_CREA_MODELLI . "/" . C_CARTELLA_DOC; } else { $dir_salva_home = C_CARTELLA_CREA_MODELLI; } } else { $dir_salva_home = C_DATA_PATH; } 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 ($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 == "contratti") esegui_query2("create table ".$N_PHPR_TAB_PRE."contratti (numero integer, tipo varchar(8), testo $MEDIUMTEXT )",$N_PHPR_DB_TYPE); } # fine if ($linea == "</colonnetabella>") 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; } # 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 = ""; $lista_colonne = ""; unset($valore_colonna); $inserire_riga = "SI"; $tipo_contr = $riga[$num_colonna['tipo']]; $vecchio_num = $riga[$num_colonna['numero']]; if (substr($tipo_contr, 0, 5) == "contr" or $tipo_contr == "opzeml" or $tipo_contr == "oggetto" or $tipo_contr == "allegato" or $tipo_contr == "headhtm" or $tipo_contr == "foothtm" or $tipo_contr == "est_txt" or $tipo_contr == "dir" or substr($tipo_contr, 0, 4) == "mln_" or $tipo_contr == "impor_vc" or $tipo_contr == "num_prog" or $tipo_contr == "nomefile" or $tipo_contr == "autosalv" or $tipo_contr == "compress" or $tipo_contr == "incr_np") { if (!$contr_agg or $vecchio_num == $contr_agg) { if (!$nuovo_num_contr[$vecchio_num]) { if ($contr_agg) { $nuovo_num_contr[$vecchio_num] = $max_contr + 1; } else { $nuovo_num_contr[$vecchio_num] = $max_contr + $vecchio_num; } } # fine if (!$nuovo_num_contr[$vecchio_num]) $riga[$num_colonna['numero']] = $nuovo_num_contr[$vecchio_num]; if (substr($tipo_contr, 0, 5) == "contr" or substr($tipo_contr, 0, 4) == "mln_") { if (@is_array($nuovo_nome_var)) { reset($nuovo_nome_var); while (list($v_nome, $n_nome) = each($nuovo_nome_var)) { $riga[$num_colonna['testo']] = str_replace("[{$v_nome}]", "[{$n_nome}]", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[c {$v_nome}=", "[c {$n_nome}=", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[c {$v_nome}!=", "[c {$n_nome}!=", $riga[$num_colonna['testo']]); if (substr($v_nome, -1) == ")") { $v_nome_arr = explode("(", $v_nome); $v_nome_arr = $v_nome_arr[0]; $n_nome_arr = explode("(", $n_nome); $n_nome_arr = $n_nome_arr[0]; $riga[$num_colonna['testo']] = str_replace("[r4 array=\"{$v_nome_arr}\"]", "[r4 array=\"{$n_nome_arr}\"]", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[{$v_nome_arr}('", "[{$n_nome_arr}('", $riga[$num_colonna['testo']]); $riga[$num_colonna['testo']] = str_replace("[c {$v_nome_arr}('", "[c {$n_nome_arr}('", $riga[$num_colonna['testo']]); } # fine if (substr($v_nome,-1) == ")") } # fine while (list($v_nome,$n_nome) = each($nuovo_nome_var)) } # fine if (@is_array($nuovo_nome_var)) } # fine if (substr($tipo_contr,0,5) == "contr" or substr($tipo_contr,0,4) == "mln_") if ($tipo_contr == "dir") { if (!function_exists('formatta_dir_salva_doc')) { include './includes/funzioni_contratti.php'; } $dir_salva = formatta_dir_salva_doc($riga[$num_colonna['testo']]); if ($dir_salva == "~") { $dir_salva = $dir_salva_home; } if (!@is_dir($dir_salva)) { $inserire_riga = "NO"; } else { $fileaperto = @fopen("{$dir_salva}/prova.tmp", "a+"); if (!$fileaperto) { $inserire_riga = "NO"; } else { fclose($fileaperto); unlink("{$dir_salva}/prova.tmp"); } # fine else if (!$fileaperto) } # fine else if (!@is_dir($dir_salva)) } # fine if ($tipo_contr == "dir") if ($tipo_contr == "allegato") { $vecchio_all = $riga[$num_colonna['testo']]; if (!$nuovo_num_all[$vecchio_all]) { $nuovo_num_all[$vecchio_all] = $max_all + $vecchio_all; } $riga[$num_colonna['testo']] = $nuovo_num_all[$vecchio_all]; } # fine if ($tipo_contr == "allegato") if ($tipo_contr == "impor_vc") { if (!$contr_agg) { $vecchio_num_impor_vc = $riga[$num_colonna['testo']]; if (!$nuovo_num_contr[$vecchio_num_impor_vc]) { $nuovo_num_contr[$vecchio_num_impor_vc] = $max_contr + $vecchio_num_impor_vc; } $riga[$num_colonna['testo']] = $nuovo_num_contr[$vecchio_num_impor_vc]; } else { $inserire_riga = "NO"; } } # fine if ($tipo_contr == "impor_vc") if ($tipo_contr == "num_prog") { if (!$contr_agg) { $vecchio_num_np = $riga[$num_colonna['testo']]; if (!$nuovo_num_contr[$vecchio_num_np]) { $nuovo_num_contr[$vecchio_num_np] = $max_contr + $vecchio_num_np; } $riga[$num_colonna['testo']] = $nuovo_num_contr[$vecchio_num_np]; } else { $inserire_riga = "NO"; } } # fine if ($tipo_contr == "num_prog") } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,5) == "contr" or $tipo_contr == "opzeml" or... if (substr($tipo_contr, 0, 3) == "var") { $contr_cond = substr($tipo_contr, 3); if (!$contr_agg or $contr_agg_var == $contr_cond) { if (strcmp($contr_cond, "")) { if (!$nuovo_num_contr[$contr_cond]) { if ($contr_agg) { $nuovo_num_contr[$contr_cond] = $max_contr + 1; } else { $nuovo_num_contr[$contr_cond] = $max_contr + $contr_cond; } } # fine if (!$nuovo_num_contr[$contr_cond]) $contr_cond = $nuovo_num_contr[$contr_cond]; $tipo_contr = "var{$contr_cond}"; $riga[$num_colonna['tipo']] = $tipo_contr; } # fine if (strcmp($contr_cond,"")) if (!$nuovo_num_var[$vecchio_num]) { $num_var_esistente = ""; $testo = $riga[$num_colonna['testo']]; $var_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($testo) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($testo) . ";%') "); for ($num2 = 0; $num2 < numlin_query($var_esistente); $num2++) { if ($testo == risul_query($var_esistente, $num2, 'testo') and $tipo_contr == risul_query($var_esistente, $num2, 'tipo')) { $num_var_esistente = $num2 + 1; } } if ($num_var_esistente) { $nuovo_num_var[$vecchio_num] = risul_query($var_esistente, $num_var_esistente - 1, 'numero'); $inserire_riga = "NO"; } else { $nuovo_num_var[$vecchio_num] = $max_var + $vecchio_num; if (numlin_query($var_esistente)) { $nuovo_nome_trovato = "NO"; $nuovo_nome = $testo; while ($nuovo_nome_trovato == "NO") { $nuovo_nome .= "_"; $var_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($nuovo_nome) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($nuovo_nome) . ";%') "); if (!numlin_query($var_esistente)) { $nuovo_nome_trovato = "SI"; } } # fine while ($nuovo_nome_trovato == "NO") $nuovo_nome_var[$testo] = $nuovo_nome; # cambio il nome della variabile anche negli array già inseriti reset($nuovo_nome_var); while (list($key, $val) = each($nuovo_nome_var)) { $nuovo_nome_var[$key] = str_replace("({$testo})", "({$nuovo_nome})", $val); if ($val != $nuovo_nome_var[$key]) { $nome_arr = substr($nuovo_nome_var[$key], 0, -1 * (strlen($nuovo_nome) + 2)); $arr_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where tipo = 'vett{$contr_cond}' and testo = '" . aggslashdb($nome_arr) . ";" . aggslashdb($testo) . "' "); if (numlin_query($arr_esistente)) { $testo_arr = explode(";", risul_query($arr_esistente, 0, 'testo')); $testo_arr[1] = $nuovo_nome; $testo_arr = implode(";", $testo_arr); esegui_query("update " . $PHPR_TAB_PRE . "contratti set testo = '" . aggslashdb($testo_arr) . "' where tipo = 'vett{$contr_cond}' and testo = '" . aggslashdb($nome_arr) . ";" . aggslashdb($testo) . "' "); } # fine if (numlin_query($arr_esistente)) } # fine if ($val != $nuovo_nome_var[$key]) } # fine while (list($key,$val) = each($nuovo_nome_var)) $riga[$num_colonna['testo']] = $nuovo_nome; } # fine if (numlin_query($var_esistente)) } # fine else if ($num_var_esistente) } # fine if (!$nuovo_num_contr[$vecchio_num]) $riga[$num_colonna['numero']] = $nuovo_num_var[$vecchio_num]; } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,3) == "var") if (substr($tipo_contr, 0, 4) == "vett") { $contr_cond = substr($tipo_contr, 4); if (!$contr_agg or $contr_agg_var == $contr_cond) { if (strcmp($contr_cond, "")) { if (!$nuovo_num_contr[$contr_cond]) { if ($contr_agg) { $nuovo_num_contr[$contr_cond] = $max_contr + 1; } else { $nuovo_num_contr[$contr_cond] = $max_contr + $contr_cond; } } # fine if (!$nuovo_num_contr[$contr_cond]) $contr_cond = $nuovo_num_contr[$contr_cond]; $tipo_contr = "vett{$contr_cond}"; $riga[$num_colonna['tipo']] = $tipo_contr; } # fine if (strcmp($contr_cond,"")) if (!$nuovo_num_var["a{$vecchio_num}"]) { $num_arr_esistente = ""; $testo = $riga[$num_colonna['testo']]; $nome_arr = explode(";", $testo); $var_arr = $nome_arr[1]; $nome_arr = $nome_arr[0]; $arr_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($nome_arr) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($nome_arr) . ";%') "); for ($num2 = 0; $num2 < numlin_query($arr_esistente); $num2++) { if ($testo == risul_query($arr_esistente, $num2, 'testo') and $tipo_contr == risul_query($arr_esistente, $num2, 'tipo')) { $num_arr_esistente = $num2 + 1; } } if ($num_arr_esistente) { $nuovo_num_var["a{$vecchio_num}"] = "a" . risul_query($arr_esistente, $num_arr_esistente - 1, 'numero'); $inserire_riga = "NO"; } else { $nuovo_num_var["a{$vecchio_num}"] = "a" . ($max_arr + $vecchio_num); if (numlin_query($arr_esistente)) { $nuovo_nome_trovato = "NO"; $nuovo_nome = $nome_arr; while ($nuovo_nome_trovato == "NO") { $nuovo_nome .= "_"; $arr_esistente = esegui_query("select * from " . $PHPR_TAB_PRE . "contratti where (tipo {$LIKE} 'var%' and testo = '" . aggslashdb($nuovo_nome) . "') or (tipo {$LIKE} 'vett%' and testo {$LIKE} '" . aggslashdb($nuovo_nome) . ";%') "); if (!numlin_query($arr_esistente)) { $nuovo_nome_trovato = "SI"; } } # fine while ($nuovo_nome_trovato == "NO") $nuovo_nome_var["{$nome_arr}({$var_arr})"] = "{$nuovo_nome}({$var_arr})"; $riga[$num_colonna["testo"]] = $nuovo_nome . substr($testo, strlen($nome_arr)); } else { $nuovo_nome_var["{$nome_arr}({$var_arr})"] = "{$nome_arr}({$var_arr})"; } } # fine else if ($num_arr_esistente) } # fine if (!$nuovo_num_contr["a$vecchio_num"]) $riga[$num_colonna['numero']] = substr($nuovo_num_var["a{$vecchio_num}"], 1); } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,4) == "vett") if (substr($tipo_contr, 0, 4) == "cond") { $contr_cond = substr($tipo_contr, 4); if (!$contr_agg or $contr_agg_var == $contr_cond) { if (!strcmp($contr_cond, "")) { $riga[$num_colonna['numero']] = $max_cond + $vecchio_num; } else { $vecchio_num = $contr_cond; if (!$nuovo_num_contr[$vecchio_num]) { if ($contr_agg) { $nuovo_num_contr[$vecchio_num] = $max_contr + 1; } else { $nuovo_num_contr[$vecchio_num] = $max_contr + $vecchio_num; } } # fine if (!$nuovo_num_contr[$vecchio_num]) $riga[$num_colonna['tipo']] = "cond" . $nuovo_num_contr[$vecchio_num]; $contr_cond = $nuovo_num_contr[$vecchio_num]; } # fine else if (!strcmp($contr_cond,"")) $cond_vecchia = $riga[$num_colonna['testo']]; $cond_vecchia = explode("#@?", $cond_vecchia); $azione_vecchia = explode("#%?", $cond_vecchia[2]); $cond_nuova = $cond_vecchia[0] . "#@?"; if ($cond_vecchia[1]) { $cond_vecchia = explode("#\$?", $cond_vecchia[1]); $cond_nuova .= $cond_vecchia[0]; $num_cond = count($cond_vecchia); for ($num2 = 1; $num2 < $num_cond; $num2++) { $cond_nuova .= "#\$?"; $cond_vett = explode("#%?", $cond_vecchia[$num2]); if ($cond_vett[2] == "var") { ripristina_nome_var_cond(array(0, 3), $cond_vett, $nuovo_nome_var); } else { ripristina_nome_var_cond(array('0'), $cond_vett, $nuovo_nome_var); } for ($num3 = 0; $num3 < count($cond_vett); $num3++) { $cond_nuova .= $cond_vett[$num3] . "#%?"; } $cond_nuova = substr($cond_nuova, 0, -3); } # fine for $num2 } # fine ($cond_vecchia[1]) $cond_nuova .= "#@?" . $azione_vecchia[0]; if ($azione_vecchia[0] == "set") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; if ($azione_vecchia[3] == "var") { ripristina_nome_var_cond(array(4), $azione_vecchia, $nuovo_nome_var); } if ($azione_vecchia[5] == "var") { ripristina_nome_var_cond(array(6), $azione_vecchia, $nuovo_nome_var); } if ($azione_vecchia[7] == "var") { ripristina_nome_var_cond(array(8), $azione_vecchia, $nuovo_nome_var); } } # fine if ($azione_vecchia[0] == "set") if ($azione_vecchia[0] == "trunc") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; } if ($azione_vecchia[0] == "oper") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; if ($azione_vecchia[4] == "var") { ripristina_nome_var_cond(array(2, 5), $azione_vecchia, $nuovo_nome_var); } else { ripristina_nome_var_cond(array(2), $azione_vecchia, $nuovo_nome_var); } } # fine if ($azione_vecchia[0] == "oper") if ($azione_vecchia[0] == "date") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; ripristina_nome_var_cond(array(2), $azione_vecchia, $nuovo_nome_var); } # fine if ($azione_vecchia[0] == "date") if ($azione_vecchia[0] == "unset") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; } if ($azione_vecchia[0] == "array") { $azione_vecchia[1] = $nuovo_num_var[$azione_vecchia[1]]; if ($azione_vecchia[2] == "cop") { $azione_vecchia[3] = $nuovo_num_var[$azione_vecchia[3]]; } } # fine if ($azione_vecchia[0] == "array") for ($num2 = 1; $num2 < count($azione_vecchia); $num2++) { $cond_nuova .= "#%?" . $azione_vecchia[$num2]; } $riga[$num_colonna['testo']] = $cond_nuova; $testo = aggslashdb($riga[$num_colonna['testo']]); #$cond_esistente = esegui_query("select * from ".$PHPR_TAB_PRE."contratti where tipo = 'cond$contr_cond' and testo = '$testo' "); #for ($num2 = 0 ; $num2 < numlin_query($cond_esistente) ; $num2++) if ($cond_nuova == risul_query($cond_esistente,$num2,'testo')) $inserire_riga = "NO"; } else { $inserire_riga = "NO"; } } # fine if (substr($tipo_contr,0,4) == "cond") if ($tipo_contr == "file_all") { $vecchio_all = $riga[$num_colonna['numero']]; if (!$contr_agg or str_replace(",{$vecchio_all},", "", $contr_agg_all) != $contr_agg_all) { if (!$nuovo_num_all[$vecchio_all]) { $nuovo_num_all[$vecchio_all] = $max_all + $vecchio_all; } $riga[$num_colonna['numero']] = $nuovo_num_all[$vecchio_all]; } else { $inserire_riga = "NO"; } } # fine if ($tipo_contr == "file_all") 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); $lista_valori .= ",'" . $valore . "'"; $lista_colonne .= "," . $nome_colonna[$num2 + 1]; } # fine if ($valore != "") } # fine for $num2 $lista_valori = substr($lista_valori, 1); $lista_colonne = substr($lista_colonne, 1); #echo "insert into $nome_tabella ($lista_colonne) values ($lista_valori)<br>"; if ($inserire_riga != "NO") { esegui_query("insert into " . $PHPR_TAB_PRE . "{$nome_tabella} ({$lista_colonne}) values ({$lista_valori}) "); } } # 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"; } } # fine if ($leggendo_database == "SI") if ($linea == "<database>") { $leggendo_database = "SI"; } } # fine if ($leggendo_backup == "SI") if ($linea == "<backup>") { $leggendo_backup = "SI"; } } # fine for $num1 $tabelle_lock = array($PHPR_TAB_PRE . "contratti", $PHPR_TAB_PRE . "personalizza"); $altre_tab_lock = array($PHPR_TAB_PRE . "versioni"); $tabelle_lock = lock_tabelle($tabelle_lock, $altre_tab_lock); $nomi_contratti = esegui_query("select testo from {$PHPR_TAB_PRE}" . "contratti where numero = '1' and tipo = 'nomi_con' "); $nomi_contratti = risul_query($nomi_contratti, 0, 'testo'); if ($modalita == "rimpiazza") { esegui_query("update {$PHPR_TAB_PRE}" . "personalizza set valpersonalizza = '" . aggslashdb($nomi_contratti) . "' where idpersonalizza = 'nomi_contratti'"); } else { $nomi_contratti = explode("#@&", $nomi_contratti); $n_nomi_contratti = ""; for ($num1 = 0; $num1 < count($nomi_contratti); $num1++) { $nome_contr = explode("#?&", $nomi_contratti[$num1]); if (!$contr_agg or $nome_contr[0] == $contr_agg) { $n_nomi_contratti .= "#@&" . $nuovo_num_contr[$nome_contr[0]] . "#?&" . $nome_contr[1]; } } # fine for $num1 $d_nomi_contr = esegui_query("select * from {$PHPR_TAB_PRE}" . "personalizza where idpersonalizza = 'nomi_contratti' "); for ($num1 = 0; $num1 < numlin_query($d_nomi_contr); $num1++) { $idutente_contr = risul_query($d_nomi_contr, $num1, 'idutente'); $nomi_contr_utente = risul_query($d_nomi_contr, $num1, 'valpersonalizza') . $n_nomi_contratti; esegui_query("update {$PHPR_TAB_PRE}" . "personalizza set valpersonalizza = '" . aggslashdb($nomi_contr_utente) . "' where idpersonalizza = 'nomi_contratti' and idutente = '{$idutente_contr}' "); } # fine for $num1 } # fine else if ($modalita == "rimpiazza") esegui_query("delete from {$PHPR_TAB_PRE}" . "contratti where numero = '1' and tipo = 'nomi_con' "); unlock_tabelle($tabelle_lock); if ($silenzio != "SI") { echo mex("Documenti ripristinati", $pag) . ".<br>"; } } # fine else if ($file_coerente == "NO") } else { if ($silenzio != "SI") { echo mex("La versione attuale di hoteldruid e quella del file non coincidono", $pag) . ".<br>"; } } }
function recupera_var_modello_rat ($nome_file,$percorso_cartella_modello,$pag,$fr_frase,$num_frasi,$var_mod,$num_var_mod,$tipo_periodi,$var_per_crea_mod,$anno_modello,$PHPR_TAB_PRE) { $linee_file = file("$percorso_cartella_modello/$nome_file"); $num_linee_file = count($linee_file); if (substr($linee_file[0],0,70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") $linee_file[0] = substr($linee_file[0],70); if (substr($linee_file[($num_linee_file - 1)],-31) == "<?php } # fine if (!\$framed) ?>") $linee_file[($num_linee_file - 1)] = substr($linee_file[($num_linee_file - 1)],0,-31); $var_anno = "\$".mex("var_anno",$pag); for ($num_va = 0 ; $num_va < $num_var_mod ; $num_va++) ${"var_".$var_mod[$num_va]} = "\$".mex("var_".$var_mod[$num_va],$pag); $var_colore_tema = "\$".mex("var_colore_tema",$pag); $var_valore_tema = "\$".mex("var_valore_tema",$pag); $var_stile_tabella_tariffe = "\$".mext_rat("var_stile_tabella_tariffe",$pag); if ($var_per_crea_mod == "SI") { $var_tipo_db = "\$".mex("var_tipo_db",$pag); $var_nome_db = "\$".mex("var_nome_db",$pag); $var_computer_db = "\$".mex("var_computer_db",$pag); $var_porta_db = "\$".mex("var_porta_db",$pag); $var_utente_db = "\$".mex("var_utente_db",$pag); $var_password_db = "\$".mex("var_password_db",$pag); $var_carica_estensione_db = "\$".mex("var_carica_estensione_db",$pag); $var_prefisso_tabelle_db = "\$".mex("var_prefisso_tabelle_db",$pag); } # fine if ($var_per_crea_mod == "SI") # FRASI for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) ${"var_".$fr_frase[$num_fr]} = "\$".mext_rat("var_".$fr_frase[$num_fr],$pag); $fine_variabili = "# ".mex("FINE VARIABILI MODIFICABILI",$pag); global $num_periodi_date; for ($num1 = 0 ; $num1 < $num_linee_file ; $num1++) { $linea = togli_acapo($linee_file[$num1]); unset($variabile); if (substr($linea,0,strlen($var_anno)) == $var_anno) $variabile = "anno_modello_presente"; for ($num_va = 0 ; $num_va < $num_var_mod ; $num_va++) { if (substr($linea,0,strlen(${"var_".$var_mod[$num_va]})) == ${"var_".$var_mod[$num_va]}) $variabile = $var_mod[$num_va]; } # fine for $num_va $vlen = strlen($var_colore_tema."_"); if (substr($linea,0,$vlen) == $var_colore_tema."_") { $variabile = "colore_tema_"; while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") { $variabile .= substr($linea,$vlen,1); $vlen++; } # fine while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") } # fine if (substr($linea,0,$vlen) == $var_colore_tema."_") $vlen = strlen($var_valore_tema."_"); if (substr($linea,0,$vlen) == $var_valore_tema."_") { $variabile = "valore_tema_"; while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") { $variabile .= substr($linea,$vlen,1); $vlen++; } # fine while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") } # fine if (substr($linea,0,$vlen) == $var_valore_tema."_") if (substr($linea,0,strlen($var_stile_tabella_tariffe)) == $var_stile_tabella_tariffe) $variabile = "stile_tabella_tariffe"; if ($var_per_crea_mod == "SI") { if (substr($linea,0,strlen($var_tipo_db)) == $var_tipo_db) $variabile = "tipo_db"; if (substr($linea,0,strlen($var_nome_db)) == $var_nome_db) $variabile = "nome_db"; if (substr($linea,0,strlen($var_computer_db)) == $var_computer_db) $variabile = "computer_db"; if (substr($linea,0,strlen($var_porta_db)) == $var_porta_db) $variabile = "porta_db"; if (substr($linea,0,strlen($var_utente_db)) == $var_utente_db) $variabile = "utente_db"; if (substr($linea,0,strlen($var_password_db)) == $var_password_db) $variabile = "password_db"; if (substr($linea,0,strlen($var_carica_estensione_db)) == $var_carica_estensione_db) $variabile = "carica_estensione_db"; if (substr($linea,0,strlen($var_prefisso_tabelle_db)) == $var_prefisso_tabelle_db) $variabile = "prefisso_tabelle_db"; } # fine if ($var_per_crea_mod == "SI") # FRASI for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) { $len = strlen(${"var_".$fr_frase[$num_fr]}); if (substr($linea,0,$len) == ${"var_".$fr_frase[$num_fr]} and (substr($linea,$len,1) == " " or substr($linea,$len,1) == "=")) $variabile = $fr_frase[$num_fr]; } # fine for $num_fr if (!$num_periodi_date) { if (substr($linea,0,strlen($var_periodi_menu)) == $var_periodi_menu) { if (substr($linee_file[($num1 + 1)],0,16) == "<option value=\\\"") { global $inizioperiodo0,$fineperiodo0,$intervalloperiodo0; $inizioperiodo0 = explode("<option value=\\\"",$linea); $inizioperiodo0 = explode("\\\">",$inizioperiodo0[1]); $inizioperiodo0 = $inizioperiodo0[0]; if ($tipo_periodi == "s") $intervallo_base = 604800; else $intervallo_base = 86400; $data_prec = explode("-",$inizioperiodo0); $data_corr = explode("-",substr($linee_file[($num1 + 1)],16,10)); $intervallo_prec = round(((mktime(0,0,0,$data_corr[1],$data_corr[2],$data_corr[0]) - mktime(0,0,0,$data_prec[1],$data_prec[2],$data_prec[0])) / $intervallo_base),0); $intervalloperiodo0 = $intervallo_prec; $num_periodi_date = 0; while (substr($linee_file[($num1 + 1)],0,16) == "<option value=\\\"") { $num1++; $data_corr = explode("-",substr($linee_file[$num1],16,10)); $intervallo_corr = round(((mktime(0,0,0,$data_corr[1],$data_corr[2],$data_corr[0]) - mktime(0,0,0,$data_prec[1],$data_prec[2],$data_prec[0])) / $intervallo_base),0); if ($intervallo_corr != $intervallo_prec) { $data_succ= explode("-",substr($linee_file[($num1 + 1)],16,10)); $intervallo_succ = round(((mktime(0,0,0,$data_succ[1],$data_succ[2],$data_succ[0]) - mktime(0,0,0,$data_corr[1],$data_corr[2],$data_corr[0])) / $intervallo_base),0); ${"fineperiodo".$num_periodi_date} = $data_prec[0]."-".$data_prec[1]."-".$data_prec[2]; $num_periodi_date++; global ${"inizioperiodo".$num_periodi_date},${"fineperiodo".$num_periodi_date},${"intervalloperiodo".$num_periodi_date}; ${"inizioperiodo".$num_periodi_date} = $data_corr[0]."-".$data_corr[1]."-".$data_corr[2]; ${"intervalloperiodo".$num_periodi_date} = $intervallo_succ; $intervallo_prec = $intervallo_succ; } # fine if ($intervallo_corr != $intervallo_prec) $data_prec = $data_corr; } # fine while (substr($linee_file[($num1 + 1)],0,strlen("<option value=\\\"")) == "<option value=\\\"") ${"fineperiodo".$num_periodi_date} = substr($linee_file[$num1],16,10); $num_periodi_date++; } # fine if (substr($linee_file[($num1 + 1)],0,16) == "<option value=\\\"") } # fine if (substr($linea,0,strlen($var_periodi_menu)) == $var_periodi_menu) } # fine if (!$num_periodi_date) if (substr($linea,0,strlen($fine_variabili)) == $fine_variabili) break; if ($variabile) { global $$variabile; $$variabile = explode("=",$linea); $$variabile = trim(str_replace(${$variabile}[0]."=","",$linea)); if (substr($$variabile,-1) == ";") $$variabile = substr($$variabile,0,-1); $$variabile = trim($$variabile); if (substr($$variabile,0,1) == "\"" and substr($$variabile,-1) == "\"") $$variabile = substr($$variabile,1,-1); if (substr(str_replace(" ","",$$variabile),0,6) == "array(") { $vett = $$variabile; $$variabile = ""; ${$variabile}["array_esistente"] = "SI"; $vett = preg_replace("/^array[ ]*\(/","",$vett); if (substr($vett,-1) == ")") $vett = substr($vett,0,-1); if (strcmp(trim($vett),"")) { $vett = str_replace("\\\"","#@%&",str_replace("\\\\","#@%^",$vett)).","; $in_apici = "NO"; unset($val_in_apici); unset($val_non_apici); for ($num2 = 0 ; $num2 < strlen($vett) ; $num2++) { if (substr($vett,$num2,1) == "\"") { if ($in_apici == "NO") $in_apici = "SI"; else $in_apici = "NO"; } # fine if (substr($vett,$num2,1) == "\"") else { if ($in_apici == "SI") $val_in_apici .= substr($vett,$num2,1); else { if (substr($vett,$num2,1) == ",") { if ($val_in_apici) $val = $val_in_apici; else $val = trim($val_non_apici); ${$variabile}[$key] = str_replace("#@%^","\\",str_replace("#@%&","\"",$val)); unset($val_in_apici); unset($val_non_apici); } # fine if (substr($vett,$num2,1) == ",") else { if (substr($vett,$num2,2) == "=>") { if ($val_in_apici) $key = $val_in_apici; else $key = trim($val_non_apici); $key = str_replace("#@%^","\\",str_replace("#@%&","\"",$key)); $num2++; unset($val_in_apici); unset($val_non_apici); } # fine if (substr($vett,$num2,2) == "=>") else $val_non_apici .= substr($vett,$num2,1); } # fine else if (substr($vett,$num2,1) == ",") } # fine else if ($in_apici == "SI") } # fine else if (substr($vett,$num2,1) == "\"") } # fine for $num2 } # fine if (strcmp(trim($vett),"")) } # fine if (substr($$variabile,0,5) == "array") else $$variabile = str_replace("\\\"","\"",$$variabile); } # fine if ($variabile) } # fine for $num1 $linee_file = implode("",$linee_file); global $prima_parte_html,$ultima_parte_html; $prima_parte_html = explode("<!-- ".mex("FINE DELLA PRIMA PARTE DELL'HTML PERSONALE",$pag)." -->",$linee_file); $prima_parte_html = $prima_parte_html[0]; if (togli_acapo($prima_parte_html) != "") { while (togli_acapo(substr($prima_parte_html,0,1)) == "") $prima_parte_html = substr($prima_parte_html,1); while (togli_acapo(substr($prima_parte_html,-1)) == "") $prima_parte_html = substr($prima_parte_html,0,-1); } # fine if (togli_acapo($prima_parte_html) != "") $ultima_parte_html = explode("<!-- ".mex("INIZIO DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->",$linee_file); $ultima_parte_html = explode("<!-- ".mex("FINE DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->",$ultima_parte_html[1]); $ultima_parte_html = $ultima_parte_html[0]; if (togli_acapo($ultima_parte_html) != "") { while (togli_acapo(substr($ultima_parte_html,0,1)) == "") $ultima_parte_html = substr($ultima_parte_html,1); while (togli_acapo(substr($ultima_parte_html,-1)) == "") $ultima_parte_html = substr($ultima_parte_html,0,-1); } # fine if (togli_acapo($ultima_parte_html) != "") if ($var_per_crea_mod == "SI") { if (!$anno_modello) $anno_modello = $anno_modello_presente; $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") { $SI = mex("SI",$pag); $NO = mex("NO",$pag); 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_stile_soldi,$m_stile_data,$m_valuta_sing,$m_valuta_plur; $M_PHPR_DB_TYPE = $tipo_db; $M_PHPR_DB_NAME = $nome_db; $M_PHPR_DB_HOST = $computer_db; $M_PHPR_DB_PORT = $porta_db; $M_PHPR_DB_USER = $utente_db; $M_PHPR_DB_PASS = $password_db; $M_PHPR_LOAD_EXT = $carica_estensione_db; $M_PHPR_TAB_PRE = $prefisso_tabelle_db; $m_stile_soldi = $stile_soldi; $m_stile_data = $stile_data; $m_valuta_sing = $fr_Valuta_sing; $m_valuta_plur = $fr_Valuta_plur; if (strtoupper($estendi_ultima_data) == $SI) $estendi_ultima_data = "SI"; else $estendi_ultima_data = "NO"; $tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello; $rigatariffe = esegui_query("select * from $tablenometariffe_modello where idntariffe = 1 "); $numero_tariffe = risul_query($rigatariffe,0,nomecostoagg); for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa++) { $tariffa = "tariffa".$numtariffa; $nome_tariffa_imposto = "nome_tariffa_imposto".$numtariffa; global $$tariffa,$$nome_tariffa_imposto; $$tariffa = ""; $$nome_tariffa_imposto = ""; if (strtoupper($tariffe_mostra[$numtariffa]) == $SI) $$tariffa = "SI"; $$nome_tariffa_imposto = $nomi_tariffe_imposte[$numtariffa]; } # fine for $numtariffa $dati_ca = dati_costi_agg_ntariffe($tablenometariffe_modello,"NO"); for ($numca = 0 ; $numca < $dati_ca[num] ; $numca++) { $attiva_costo = "attiva_costo".$dati_ca[$numca][id]; $nome_costo_imposto = "nome_costo_imposto".$dati_ca[$numca][id]; global $$attiva_costo,$$nome_costo_imposto; $$attiva_costo = ""; if (strtoupper($costi_aggiuntivi_mostra[$dati_ca[$numca][id]]) == $SI) $$attiva_costo = "SI"; $$nome_costo_imposto = $nomi_costi_agg_imposti[$dati_ca[$numca][id]]; } # fine for $numca if (strtoupper($mostra_caparra) == $SI) $mostra_caparra = "SI"; else $mostra_caparra = "NO"; if (get_magic_quotes_gpc()) { $prima_parte_html = addslashes($prima_parte_html); $ultima_parte_html = addslashes($ultima_parte_html); } # fine if (get_magic_quotes_gpc()) } # fine if ($continua != "NO") } # fine if ($var_per_crea_mod == "SI") } # fine function recupera_var_modello_rat
function recupera_var_modello_disponibilita ($nome_file,$percorso_cartella_modello,$pag,$fr_frase,$num_frasi,$var_mod,$num_var_mod,$tipo_periodi,$var_per_crea_mod,$anno_modello,$PHPR_TAB_PRE) { $linee_file = file("$percorso_cartella_modello/$nome_file"); $num_linee_file = count($linee_file); if (substr($linee_file[0],0,70) == "<?php if (!@\$framed and !@\$_GET['framed'] and !@\$_POST['framed']) { ?>") $linee_file[0] = substr($linee_file[0],70); if (substr($linee_file[($num_linee_file - 1)],-31) == "<?php } # fine if (!\$framed) ?>") $linee_file[($num_linee_file - 1)] = substr($linee_file[($num_linee_file - 1)],0,-31); $var_anno = "\$".mex("var_anno",$pag); for ($num_va = 0 ; $num_va < $num_var_mod ; $num_va++) ${"var_".$var_mod[$num_va]} = "\$".mex("var_".$var_mod[$num_va],$pag); $var_colore_tema = "\$".mex("var_colore_tema",$pag); $var_valore_tema = "\$".mex("var_valore_tema",$pag); if ($var_per_crea_mod == "SI") { $var_tipo_db = "\$".mex("var_tipo_db",$pag); $var_nome_db = "\$".mex("var_nome_db",$pag); $var_computer_db = "\$".mex("var_computer_db",$pag); $var_porta_db = "\$".mex("var_porta_db",$pag); $var_utente_db = "\$".mex("var_utente_db",$pag); $var_password_db = "\$".mex("var_password_db",$pag); $var_carica_estensione_db = "\$".mex("var_carica_estensione_db",$pag); $var_prefisso_tabelle_db = "\$".mex("var_prefisso_tabelle_db",$pag); } # fine if ($var_per_crea_mod == "SI") # FRASI for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) ${"var_".$fr_frase[$num_fr]} = "\$".mex("var_".$fr_frase[$num_fr],$pag); $fine_variabili = "# ".mex("FINE VARIABILI MODIFICABILI",$pag); global $num_periodi_date; for ($num1 = 0 ; $num1 < $num_linee_file ; $num1++) { $linea = togli_acapo($linee_file[$num1]); unset($variabile); if (substr($linea,0,strlen($var_anno)) == $var_anno) $variabile = "anno_modello_presente"; for ($num_va = 0 ; $num_va < $num_var_mod ; $num_va++) { if (substr($linea,0,strlen(${"var_".$var_mod[$num_va]})) == ${"var_".$var_mod[$num_va]}) $variabile = $var_mod[$num_va]; } # fine for $num_va $vlen = strlen($var_colore_tema."_"); if (substr($linea,0,$vlen) == $var_colore_tema."_") { $variabile = "colore_tema_"; while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") { $variabile .= substr($linea,$vlen,1); $vlen++; } # fine while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") } # fine if (substr($linea,0,$vlen) == $var_colore_tema."_") $vlen = strlen($var_valore_tema."_"); if (substr($linea,0,$vlen) == $var_valore_tema."_") { $variabile = "valore_tema_"; while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") { $variabile .= substr($linea,$vlen,1); $vlen++; } # fine while (controlla_num_pos(substr($linea,$vlen,1)) == "SI") } # fine if (substr($linea,0,$vlen) == $var_valore_tema."_") if ($var_per_crea_mod == "SI") { if (substr($linea,0,strlen($var_tipo_db)) == $var_tipo_db) $variabile = "tipo_db"; if (substr($linea,0,strlen($var_nome_db)) == $var_nome_db) $variabile = "nome_db"; if (substr($linea,0,strlen($var_computer_db)) == $var_computer_db) $variabile = "computer_db"; if (substr($linea,0,strlen($var_porta_db)) == $var_porta_db) $variabile = "porta_db"; if (substr($linea,0,strlen($var_utente_db)) == $var_utente_db) $variabile = "utente_db"; if (substr($linea,0,strlen($var_password_db)) == $var_password_db) $variabile = "password_db"; if (substr($linea,0,strlen($var_carica_estensione_db)) == $var_carica_estensione_db) $variabile = "carica_estensione_db"; if (substr($linea,0,strlen($var_prefisso_tabelle_db)) == $var_prefisso_tabelle_db) $variabile = "prefisso_tabelle_db"; } # fine if ($var_per_crea_mod == "SI") # FRASI for ($num_fr = 0 ; $num_fr < $num_frasi ; $num_fr++) { $len = strlen(${"var_".$fr_frase[$num_fr]}); if (substr($linea,0,$len) == ${"var_".$fr_frase[$num_fr]} and (substr($linea,$len,1) == " " or substr($linea,$len,1) == "=")) $variabile = $fr_frase[$num_fr]; } # fine for $num_fr if (!$num_periodi_date) { if (substr($linea,0,strlen($var_periodi_menu)) == $var_periodi_menu) { if (substr($linee_file[($num1 + 1)],0,16) == "<option value=\\\"") { global $inizioperiodo0,$fineperiodo0,$intervalloperiodo0; $inizioperiodo0 = explode("<option value=\\\"",$linea); $inizioperiodo0 = explode("\\\">",$inizioperiodo0[1]); $inizioperiodo0 = $inizioperiodo0[0]; if ($tipo_periodi == "s") $intervallo_base = 604800; else $intervallo_base = 86400; $data_prec = explode("-",$inizioperiodo0); $data_corr = explode("-",substr($linee_file[($num1 + 1)],16,10)); $intervallo_prec = round(((mktime(0,0,0,$data_corr[1],$data_corr[2],$data_corr[0]) - mktime(0,0,0,$data_prec[1],$data_prec[2],$data_prec[0])) / $intervallo_base),0); $intervalloperiodo0 = $intervallo_prec; $num_periodi_date = 0; while (substr($linee_file[($num1 + 1)],0,16) == "<option value=\\\"") { $num1++; $data_corr = explode("-",substr($linee_file[$num1],16,10)); $intervallo_corr = round(((mktime(0,0,0,$data_corr[1],$data_corr[2],$data_corr[0]) - mktime(0,0,0,$data_prec[1],$data_prec[2],$data_prec[0])) / $intervallo_base),0); if ($intervallo_corr != $intervallo_prec) { $data_succ= explode("-",substr($linee_file[($num1 + 1)],16,10)); $intervallo_succ = round(((mktime(0,0,0,$data_succ[1],$data_succ[2],$data_succ[0]) - mktime(0,0,0,$data_corr[1],$data_corr[2],$data_corr[0])) / $intervallo_base),0); ${"fineperiodo".$num_periodi_date} = $data_prec[0]."-".$data_prec[1]."-".$data_prec[2]; $num_periodi_date++; global ${"inizioperiodo".$num_periodi_date},${"fineperiodo".$num_periodi_date},${"intervalloperiodo".$num_periodi_date}; ${"inizioperiodo".$num_periodi_date} = $data_corr[0]."-".$data_corr[1]."-".$data_corr[2]; ${"intervalloperiodo".$num_periodi_date} = $intervallo_succ; $intervallo_prec = $intervallo_succ; } # fine if ($intervallo_corr != $intervallo_prec) $data_prec = $data_corr; } # fine while (substr($linee_file[($num1 + 1)],0,strlen("<option value=\\\"")) == "<option value=\\\"") ${"fineperiodo".$num_periodi_date} = substr($linee_file[$num1],16,10); $num_periodi_date++; } # fine if (substr($linee_file[($num1 + 1)],0,16) == "<option value=\\\"") } # fine if (substr($linea,0,strlen($var_periodi_menu)) == $var_periodi_menu) } # fine if (!$num_periodi_date) if (substr($linea,0,strlen($fine_variabili)) == $fine_variabili) break; if ($variabile) { global $$variabile; $$variabile = explode("=",$linea); $$variabile = trim(str_replace(${$variabile}[0]."=","",$linea)); if (substr($$variabile,-1) == ";") $$variabile = substr($$variabile,0,-1); $$variabile = trim($$variabile); if (substr($$variabile,0,1) == "\"" and substr($$variabile,-1) == "\"") $$variabile = substr($$variabile,1,-1); if (substr(str_replace(" ","",$$variabile),0,6) == "array(") { $vett = $$variabile; $$variabile = ""; ${$variabile}['array_esistente'] = "SI"; $vett = preg_replace("/^array[ ]*\(/","",$vett); if (substr($vett,-1) == ")") $vett = substr($vett,0,-1); if (strcmp(trim($vett),"")) { $vett = str_replace("\\\"","#@%&",str_replace("\\\\","#@%^",$vett)).","; $in_apici = "NO"; unset($val_in_apici); unset($val_non_apici); for ($num2 = 0 ; $num2 < strlen($vett) ; $num2++) { if (substr($vett,$num2,1) == "\"") { if ($in_apici == "NO") $in_apici = "SI"; else $in_apici = "NO"; } # fine if (substr($vett,$num2,1) == "\"") else { if ($in_apici == "SI") $val_in_apici .= substr($vett,$num2,1); else { if (substr($vett,$num2,1) == ",") { if ($val_in_apici) $val = $val_in_apici; else $val = trim($val_non_apici); ${$variabile}[$key] = str_replace("#@%^","\\",str_replace("#@%&","\"",$val)); unset($val_in_apici); unset($val_non_apici); } # fine if (substr($vett,$num2,1) == ",") else { if (substr($vett,$num2,2) == "=>") { if ($val_in_apici) $key = $val_in_apici; else $key = trim($val_non_apici); $key = str_replace("#@%^","\\",str_replace("#@%&","\"",$key)); $num2++; unset($val_in_apici); unset($val_non_apici); } # fine if (substr($vett,$num2,2) == "=>") else $val_non_apici .= substr($vett,$num2,1); } # fine else if (substr($vett,$num2,1) == ",") } # fine else if ($in_apici == "SI") } # fine else if (substr($vett,$num2,1) == "\"") } # fine for $num2 } # fine if (strcmp(trim($vett),"")) } # fine if (substr($$variabile,0,5) == "array") else $$variabile = str_replace("\\\"","\"",$$variabile); } # fine if ($variabile) } # fine for $num1 $linee_file = implode("",$linee_file); global $prima_parte_html,$ultima_parte_html; $prima_parte_html = explode("<!-- ".mex("FINE DELLA PRIMA PARTE DELL'HTML PERSONALE",$pag)." -->",$linee_file); $prima_parte_html = $prima_parte_html[0]; if (strcmp(togli_acapo($prima_parte_html),"")) { while (!strcmp(togli_acapo(substr($prima_parte_html,0,1)),"")) $prima_parte_html = substr($prima_parte_html,1); while (!strcmp(togli_acapo(substr($prima_parte_html,-1)),"")) $prima_parte_html = substr($prima_parte_html,0,-1); } # fine if (togli_acapo($prima_parte_html) != "") $ultima_parte_html = explode("<!-- ".mex("INIZIO DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->",$linee_file); $ultima_parte_html = explode("<!-- ".mex("FINE DELLA SECONDA PARTE DELL'HTML PERSONALE",$pag)." -->",$ultima_parte_html[1]); $ultima_parte_html = $ultima_parte_html[0]; if (togli_acapo($ultima_parte_html) != "") { while (togli_acapo(substr($ultima_parte_html,0,1)) == "") $ultima_parte_html = substr($ultima_parte_html,1); while (togli_acapo(substr($ultima_parte_html,-1)) == "") $ultima_parte_html = substr($ultima_parte_html,0,-1); } # fine if (togli_acapo($ultima_parte_html) != "") if ($var_per_crea_mod == "SI") { if (!$anno_modello) $anno_modello = $anno_modello_presente; $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") { $SI = mex("SI",$pag); $NO = mex("NO",$pag); 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_stile_soldi,$m_stile_data,$m_valuta_sing,$m_valuta_plur,$utente_lis; $M_PHPR_DB_TYPE = $tipo_db; $M_PHPR_DB_NAME = $nome_db; $M_PHPR_DB_HOST = $computer_db; $M_PHPR_DB_PORT = $porta_db; $M_PHPR_DB_USER = $utente_db; $M_PHPR_DB_PASS = $password_db; if (strtoupper($carica_estensione_db) == $SI) $carica_estensione_db = "SI"; else $carica_estensione_db = "NO"; $M_PHPR_LOAD_EXT = $carica_estensione_db; $M_PHPR_TAB_PRE = $prefisso_tabelle_db; $m_stile_soldi = $stile_soldi; $m_stile_data = $stile_data; $m_valuta_sing = $fr_Valuta_sing; $m_valuta_plur = $fr_Valuta_plur; if (strtoupper($anteponi_nome_valuta) == $SI) $anteponi_nome_valuta = "SI"; else $anteponi_nome_valuta = "NO"; $utente_lis = $utente_liste; if (strtoupper($estendi_ultima_data) == $SI) $estendi_ultima_data = "SI"; else $estendi_ultima_data = "NO"; global $sett_no_prenota; $sett_no_prenota = $periodi_no_richieste; if ((string) $sett_no_prenota == "") $sett_no_prenota = 0; $tablenometariffe_modello = $PHPR_TAB_PRE."ntariffe".$anno_modello; $rigatariffe = esegui_query("select * from $tablenometariffe_modello where idntariffe = 1 "); $numero_tariffe = risul_query($rigatariffe,0,'nomecostoagg'); for ($numtariffa = 1 ; $numtariffa <= $numero_tariffe ; $numtariffa++) { $tariffa = "tariffa".$numtariffa; $nome_tariffa_imposto = "nome_tariffa_imposto".$numtariffa; global $$tariffa,$$nome_tariffa_imposto; $$tariffa = ""; $$nome_tariffa_imposto = ""; if (strtoupper($tariffe_mostra[$numtariffa]) == $SI) $$tariffa = "SI"; $$nome_tariffa_imposto = $nomi_tariffe_imposte[$numtariffa]; } # fine for $numtariffa global $chiedi_num_app_tipologia,$max_num_app_tipologia,$parola_appartamento,$parola_appartamenti; if (strtoupper($chiedi_numero_appartamenti_per_tipologia) == $SI) $chiedi_num_app_tipologia = "SI"; else $chiedi_num_app_tipologia = "NO"; $max_num_app_tipologia = $massimo_numero_appartamenti_per_tipologia; $parola_appartamenti = $fr_appartamenti; $parola_appartamento = $fr_appartamento; global $aggiungi_tipologie,$max_num_tipologie; if (strtoupper($aggiungi_altre_tipologie) == $SI) $aggiungi_tipologie = "SI"; else $aggiungi_tipologie = "NO"; $max_num_tipologie = $massimo_numero_altre_tipologie; global $chiedi_num_persone,$max_num_persone,$max_num_aggiungi_letti; if (strtoupper($chiedi_numero_persone) == $SI) $chiedi_num_persone = "SI"; else $chiedi_num_persone = "NO"; $max_num_persone = $massimo_numero_persone; $max_num_aggiungi_letti = $massimo_numero_letti_aggiuntivi; global $mostra_costi_aggiuntivi,$num_colonne_costi_agg; if (strtoupper($chiedi_costi_aggiuntivi_di_pag_inserzione) == $SI) $mostra_costi_aggiuntivi = "SI"; else $mostra_costi_aggiuntivi = "NO"; $num_colonne_costi_agg = $numero_colonne_costi_aggiuntivi; if (strtoupper($aggiungi_costi_fissi) == $SI) $aggiungi_costi_fissi = "SI"; else $aggiungi_costi_fissi = "NO"; $dati_ca = dati_costi_agg_ntariffe($tablenometariffe_modello,"NO"); for ($numca = 0 ; $numca < $dati_ca['num'] ; $numca++) { $attiva_costo = "attiva_costo".$dati_ca[$numca]['id']; $nome_costo_imposto = "nome_costo_imposto".$dati_ca[$numca]['id']; $nome_cat_imp = "nome_cat_imp".$dati_ca[$numca]['id']; global $$attiva_costo,$$nome_costo_imposto,$$nome_cat_imp; $$attiva_costo = ""; if (strtoupper($costi_aggiuntivi_mostra[$dati_ca[$numca]['id']]) == $SI) $$attiva_costo = "SI"; $$nome_costo_imposto = $nomi_costi_agg_imposti[$dati_ca[$numca]['id']]; if ($dati_ca[$numca]['combina'] == "s") $$nome_cat_imp = $categorie_costi_agg_imposte[$dati_ca[$numca]['categoria']]; } # fine for $numca global $frase_alternativa_regola1,$num_motivazioni; $tableregole_modello = $PHPR_TAB_PRE."regole".$anno_modello; $regole = esegui_query("select * from $tableregole_modello where app_agenzia != '' and (motivazione2 != 'x' or motivazione2 is NULL) order by app_agenzia"); $num_regole = numlin_query($regole); $motivazioni_presenti = array(); $num_motivazioni = 0; for ($num1 = 0 ; $num1 < $num_regole ; $num1 = $num1 + 1) { $idregole = risul_query($regole,$num1,'idregole'); $motivazione = risul_query($regole,$num1,'motivazione'); if (!$motivazione) $motivazione = " "; if ($motivazioni_presenti[$motivazione] != "SI") { $motivazioni_presenti[$motivazione] = "SI"; $var_motivazione = "var_mot_".$num_motivazioni; $num_motivazioni++; global $$var_motivazione; $$var_motivazione = ""; if (strtoupper($considera_motivazioni_regola1[$motivazione]) == $SI) $$var_motivazione = $motivazione; } # fine if ($motivazioni_presenti[$motivazione] != "SI") } # fine for $num1 if (strtoupper($mostra_frase_alternativa_regola1) == $SI) $mostra_frase_alternativa_regola1 = "SI"; else $mostra_frase_alternativa_regola1 = "NO"; $frase_alternativa_regola1 = $fr_alternativa_regola1; if (strtoupper($mostra_caparra) == $SI) $mostra_caparra = "SI"; else $mostra_caparra = "NO"; if (strtoupper($mostra_giorni_pieni) == $SI) $mostra_giorni_pieni = "SI"; else $mostra_giorni_pieni = "NO"; if (strtoupper($mostra_bottone_paypal) == $SI) $mostra_bottone_paypal = "SI"; else $mostra_bottone_paypal = "NO"; global $ind_email,$utente_mess,$orig_prenota; if ($utente_messaggio == mex("tutti",$pag)) $utente_messaggio = "tutti"; $ind_email = $indirizzo_email; $utente_mess = $utente_messaggio; $orig_prenota = $origine_prenotazione; global $maschera_envelope; if (strtoupper($mostra_richiesta_via_mail) == $SI) $mostra_richiesta_via_mail = "SI"; else $mostra_richiesta_via_mail = "NO"; if (strtoupper($manda_copia_richiesta_email) == $SI) $manda_copia_richiesta_email = "SI"; else $manda_copia_richiesta_email = "NO"; if (strtoupper($maschera_email) == $SI) $maschera_envelope = "SI"; else $maschera_envelope = "NO"; $chiedi_cognome = strtoupper($chiedi_cognome); if ($chiedi_cognome != $SI and $chiedi_cognome != $NO) $chiedi_cognome = "opzionale"; if ($chiedi_cognome == $SI) $chiedi_cognome = "SI"; if ($chiedi_cognome == $NO) $chiedi_cognome = "NO"; $chiedi_nome = strtoupper($chiedi_nome); if ($chiedi_nome != $SI and $chiedi_nome != $NO) $chiedi_nome = "opzionale"; if ($chiedi_nome == $SI) $chiedi_nome = "SI"; if ($chiedi_nome == $NO) $chiedi_nome = "NO"; $chiedi_email = strtoupper($chiedi_email); if ($chiedi_email != $SI and $chiedi_email != $NO) $chiedi_email = "opzionale"; if ($chiedi_email == $SI) $chiedi_email = "SI"; if ($chiedi_email == $NO) $chiedi_email = "NO"; $chiedi_sesso = strtoupper($chiedi_sesso); if ($chiedi_sesso != $SI and $chiedi_sesso != $NO) $chiedi_sesso = "opzionale"; if ($chiedi_sesso == $SI) $chiedi_sesso = "SI"; if ($chiedi_sesso == $NO) $chiedi_sesso = "NO"; $chiedi_datanascita = strtoupper($chiedi_datanascita); if ($chiedi_datanascita != $SI and $chiedi_datanascita != $NO) $chiedi_datanascita = "opzionale"; if ($chiedi_datanascita == $SI) $chiedi_datanascita = "SI"; if ($chiedi_datanascita == $NO) $chiedi_datanascita = "NO"; $chiedi_documento = strtoupper($chiedi_documento); if ($chiedi_documento != $SI and $chiedi_documento != $NO) $chiedi_documento = "opzionale"; if ($chiedi_documento == $SI) $chiedi_documento = "SI"; if ($chiedi_documento == $NO) $chiedi_documento = "NO"; $chiedi_nazione = strtoupper($chiedi_nazione); if ($chiedi_nazione != $SI and $chiedi_nazione != $NO) $chiedi_nazione = "opzionale"; if ($chiedi_nazione == $SI) $chiedi_nazione = "SI"; if ($chiedi_nazione == $NO) $chiedi_nazione = "NO"; $chiedi_citta = strtoupper($chiedi_citta); if ($chiedi_citta != $SI and $chiedi_citta != $NO) $chiedi_citta = "opzionale"; if ($chiedi_citta == $SI) $chiedi_citta = "SI"; if ($chiedi_citta == $NO) $chiedi_citta = "NO"; $chiedi_regione = strtoupper($chiedi_regione); if ($chiedi_regione != $SI and $chiedi_regione != $NO) $chiedi_regione = "opzionale"; if ($chiedi_regione == $SI) $chiedi_regione = "SI"; if ($chiedi_regione == $NO) $chiedi_regione = "NO"; $chiedi_via = strtoupper($chiedi_via); if ($chiedi_via != $SI and $chiedi_via != $NO) $chiedi_via = "opzionale"; if ($chiedi_via == $SI) $chiedi_via = "SI"; if ($chiedi_via == $NO) $chiedi_via = "NO"; $chiedi_numcivico = strtoupper($chiedi_numcivico); if ($chiedi_numcivico != $SI and $chiedi_numcivico != $NO) $chiedi_numcivico = "opzionale"; if ($chiedi_numcivico == $SI) $chiedi_numcivico = "SI"; if ($chiedi_numcivico == $NO) $chiedi_numcivico = "NO"; $chiedi_cap = strtoupper($chiedi_cap); if ($chiedi_cap != $SI and $chiedi_cap != $NO) $chiedi_cap = "opzionale"; if ($chiedi_cap == $SI) $chiedi_cap = "SI"; if ($chiedi_cap == $NO) $chiedi_cap = "NO"; $chiedi_telefono = strtoupper($chiedi_telefono); if ($chiedi_telefono != $SI and $chiedi_telefono != $NO) $chiedi_telefono = "opzionale"; if ($chiedi_telefono == $SI) $chiedi_telefono = "SI"; if ($chiedi_telefono == $NO) $chiedi_telefono = "NO"; $chiedi_telefono2 = strtoupper($chiedi_telefono2); if ($chiedi_telefono2 != $SI and $chiedi_telefono2 != $NO) $chiedi_telefono2 = "opzionale"; if ($chiedi_telefono2 == $SI) $chiedi_telefono2 = "SI"; if ($chiedi_telefono2 == $NO) $chiedi_telefono2 = "NO"; $chiedi_telefono3 = strtoupper($chiedi_telefono3); if ($chiedi_telefono3 != $SI and $chiedi_telefono3 != $NO) $chiedi_telefono3 = "opzionale"; if ($chiedi_telefono3 == $SI) $chiedi_telefono3 = "SI"; if ($chiedi_telefono3 == $NO) $chiedi_telefono3 = "NO"; $chiedi_fax = strtoupper($chiedi_fax); if ($chiedi_fax != $SI and $chiedi_fax != $NO) $chiedi_fax = "opzionale"; if ($chiedi_fax == $SI) $chiedi_fax = "SI"; if ($chiedi_fax == $NO) $chiedi_fax = "NO"; $chiedi_commento = strtoupper($chiedi_commento); if ($chiedi_commento != $SI and $chiedi_commento != $NO) $chiedi_commento = "opzionale"; if ($chiedi_commento == $SI) $chiedi_commento = "SI"; if ($chiedi_commento == $NO) $chiedi_commento = "NO"; $chiedi_oracheckin = strtoupper($chiedi_oracheckin); if ($chiedi_oracheckin != $SI and $chiedi_oracheckin != $NO) $chiedi_oracheckin = "opzionale"; if ($chiedi_oracheckin == $SI) $chiedi_oracheckin = "SI"; if ($chiedi_oracheckin == $NO) $chiedi_oracheckin = "NO"; $chiedi_metodopagamento = strtoupper($chiedi_metodopagamento); if ($chiedi_metodopagamento != $SI and $chiedi_metodopagamento != $NO) $chiedi_metodopagamento = "opzionale"; if ($chiedi_metodopagamento == $SI) $chiedi_metodopagamento = "SI"; if ($chiedi_metodopagamento == $NO) $chiedi_metodopagamento = "NO"; $tablepersonalizza = $PHPR_TAB_PRE."personalizza"; $metodi_pagamento = esegui_query("select valpersonalizza from $tablepersonalizza where idpersonalizza = 'metodi_pagamento' and idutente = '1'"); $metodi_pagamento = risul_query($metodi_pagamento,0,'valpersonalizza'); global $num_metodi_pagamento; $num_metodi_pagamento = 0; if ($metodi_pagamento) { $metodi_pagamento = explode(",",$metodi_pagamento); $num_metodi_pagamento = count($metodi_pagamento); for ($num1 = 0 ; $num1 < $num_metodi_pagamento ; $num1++) { $metodo = $metodi_pagamento[$num1]; global ${"var_met_paga_".$num1},${"nome_met_paga_imposto_".$num1}; if (strtoupper($metodi_pagamento_da_chiedere[$metodo]) == $SI) ${"var_met_paga_".$num1} = $metodo; else ${"var_met_paga_".$num1} = ""; if (@get_magic_quotes_gpc()) ${"var_met_paga_".$num1} = addslashes(${"var_met_paga_".$num1}); if ($nomi_metodi_pagamento_imposti[$metodo]) ${"nome_met_paga_imposto_".$num1} = $nomi_metodi_pagamento_imposti[$metodo]; else ${"nome_met_paga_imposto_".$num1} = ""; if (@get_magic_quotes_gpc()) ${"nome_met_paga_imposto_".$num1} = addslashes(${"nome_met_paga_imposto_".$num1}); } # fine for $num1 } # fine if ($metodi_pagamento) global $num_campi_pers; if ($campi_form_personalizzati['array_esistente']) $num_campi_pers = (count($campi_form_personalizzati) - 1); else $num_campi_pers = 0; for ($num1 = 1 ; $num1 <= $num_campi_pers ; $num1++) { global ${"campo_pers".$num1},${"chiedi_campo_pers".$num1}; ${"campo_pers".$num1} = $campi_form_personalizzati[$num1]; ${"chiedi_campo_pers".$num1} = $chiedi_campi_form_personalizzati[$num1]; if (${"chiedi_campo_pers".$num1} == $SI) ${"chiedi_campo_pers".$num1} = "SI"; else ${"chiedi_campo_pers".$num1} = "opzionale"; if (@get_magic_quotes_gpc()) ${"campo_pers".$num1} = addslashes(${"campo_pers".$num1}); } # fine for $num1 global $num_campi_doc_cond; if ($campi_form_doc_condizioni['array_esistente']) $num_campi_doc_cond = (count($campi_form_doc_condizioni) - 1); else $num_campi_doc_cond = 0; for ($num1 = 1 ; $num1 <= $num_campi_doc_cond ; $num1++) { global ${"num_doc_cond".$num1},${"chiedi_num_doc_cond".$num1}; ${"num_doc_cond".$num1} = $campi_form_doc_condizioni[$num1]; ${"chiedi_num_doc_cond".$num1} = $chiedi_campi_form_doc_condizioni[$num1]; if (${"chiedi_num_doc_cond".$num1} == $SI) ${"chiedi_num_doc_cond".$num1} = "SI"; else ${"chiedi_num_doc_cond".$num1} = "opzionale"; } # fine for $num1 global $mostra_quadro_disp; $mostra_quadro_disp = ""; if (strtoupper($mostra_quadro_disponibilita) == $SI) $mostra_quadro_disp = "SI"; if (strtoupper($raggruppa_quadro_disponibilita_con_persone) == $SI) $mostra_quadro_disp = "pers"; if (strtoupper($raggruppa_quadro_disponibilita_con_regola_2) == $SI) $mostra_quadro_disp = "reg2"; if (strtoupper($mostra_numero_liberi_quadro_disponibilita) == $SI) $mostra_numero_liberi_quadro_disponibilita = "SI"; else $mostra_numero_liberi_quadro_disponibilita = "NO"; if (strtoupper($mostra_calendario_scelta_date) == $SI) $mostra_calendario_scelta_date = "SI"; else $mostra_calendario_scelta_date = "NO"; if (strtoupper($allinea_disponibilita_con_arrivo) == $SI) $allinea_disponibilita_con_arrivo = "SI"; else $allinea_disponibilita_con_arrivo = "NO"; if (strtoupper($apri_nuova_finestra_da_frame) == $SI) $apri_nuova_finestra_da_frame = "SI"; else $apri_nuova_finestra_da_frame = "NO"; if (get_magic_quotes_gpc()) { $prima_parte_html = addslashes($prima_parte_html); $ultima_parte_html = addslashes($ultima_parte_html); } # fine if (get_magic_quotes_gpc()) } # fine if ($continua != "NO") } # fine if ($var_per_crea_mod == "SI") } # fine function recupera_var_modello_disponibilita
} # fine if ($priv_mod_prenota_comp != "n" or $d_prenota_comp) echo "<tr style=\"background-color: ".rowbgcolor().";\"><td>".mex("Commento",$pag).":<br><b>$d_commento</b> </td> <td>"; if ($priv_mod_commento == "s") { if (strcmp($d_commento,"") and $d_commento != "~~~~" and !strcmp($n_commento,"")) { $onclick = " id=\"n_comm\" onclick=\"cp_comm()\""; echo "<script type=\"text/javascript\"> <!-- function cp_comm () { var tbox = document.getElementById('n_comm'); if (tbox.value == '') { "; if ($attiva_checkin == "SI") echo "var tcomm = document.getElementById('tcomm'); if (tcomm.value == '') "; echo "tbox.innerHTML = '".togli_acapo(str_replace("'","\\'",$d_commento))."'; } } // fine function cp_comm --> </script>"; } # fine if (strcmp($d_commento,"") and $d_commento != "~~~~" and ... else $onclick = ""; if ($n_cancella_commento == "SI") $checked = " checked"; else $checked = ""; if ($attiva_checkin == "SI" and $priv_mod_checkin == "s" and !$d_checkout_min) { $sel_null = ""; $sel_checkin = ""; $sel_checkout = ""; if ($tipo_commento == "checkin") $sel_checkin = " selected"; if ($tipo_commento == "checkout") $sel_checkout = " selected"; if (!$sel_checkin and !$sel_checkout) $sel_null = " selected";
function inserisci_log($query, $idlog = "") { global $id_utente, $PHPR_TAB_PRE, $PHPR_LOG; if (!$idlog) { $idutente_log = $id_utente; } else { $idutente_log = $idlog; } if ($idutente_log and $idutente_log != 1) { if ($PHPR_LOG == "SI" or str_replace(",{$idutente_log},", "", "{$PHPR_LOG},") != "{$PHPR_LOG},") { $query = trim(str_replace(" " . $PHPR_TAB_PRE, " ", togli_acapo($query))); if (substr($query, 0, 7) != "select ") { $query2 = $query; if (substr($query, 0, 12) == "insert into ") { $query2 = trim(substr($query, 12)); $insert = 1; } elseif (substr($query, 0, 7) == "update ") { $query2 = trim(substr($query, 7)); } elseif (substr($query, 0, 12) == "delete from ") { $query2 = trim(substr($query, 12)); } if ($query != $query2) { if (substr($query2, 0, 11) != "transazioni" and (substr($query2, 0, 8) != "sessioni" or $insert) and substr($query2, 0, 8) != "versioni" and substr($query2, 0, 5) != "cache") { if ($insert and substr($query2, 0, 8) == "sessioni") { $query = "LOGIN"; } $query = nl2br(htmlspecialchars(substr($query, 0, 1400))); $file_log = C_DATA_PATH . "/log_utenti.php"; $filelock = crea_lock_file($file_log); if (@is_file($file_log)) { $dati_file = file($file_log); } $dati_file[0] = "<?php exit(); ?>\n"; $num_lin = count($dati_file); $limite = date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600 - 2592000); for ($n = 1; $n < $num_lin; $n++) { $data = explode(">", $dati_file[$n]); $data = $data[1]; if (strcmp($limite, $data) > 0) { $dati_file[$n] = ""; } else { break; } } # fine for $n if ($num_lin >= 12000) { $dati_file[1] = ""; } $dati_file[$num_lin] = $idutente_log . ">" . date("Y-m-d H:i:s", time() + C_DIFF_ORE * 3600) . ">" . $query . "\n"; $fp_log = @fopen($file_log, "w"); if ($fp_log) { flock($fp_log, 2); fwrite($fp_log, implode("", $dati_file)); flock($fp_log, 3); fclose($fp_log); } # fine if ($fp_log) distruggi_lock_file($filelock, $file_log); } # fine if (substr($query2,0,11) != "transazioni" and... } # fine if ($query != $query2) } # fine if (substr($query,0,7) != "select ") } # fine if ($PHPR_LOG == "SI" or str_replace(",$idutente_log,","","$PHPR_LOG,") != "$PHPR_LOG,") } # fine if ($idutente_log and $idutente_log != 1) }
function mostra_dati_cliente(&$dati_cliente, &$dcognome, &$dnome, &$dsoprannome, &$dtitolo_cli, &$dsesso, &$ddatanascita, &$ddatanascita_f, &$dnazionenascita, &$dcittanascita, &$dregionenascita, &$ddocumento, &$dscadenzadoc, &$dscadenzadoc_f, &$dtipodoc, &$dnazionedoc, &$dregionedoc, &$dcittadoc, &$dnazionalita, &$dlingua_cli, &$dnazione, &$dregione, &$dcitta, &$dvia, &$dnumcivico, &$dtelefono, &$dtelefono2, &$dtelefono3, &$dfax, &$dcap, &$demail, &$dcod_fiscale, &$dpartita_iva, $mostra_num = "", $priv_ins_clienti = "", $silenzio = "") { global $pag, $id_utente, $PHPR_TAB_PRE; if ($id_utente == 1 or !$id_utente) { $priv_vedi_telefoni = "s"; $priv_vedi_indirizzo = "s"; } else { if (!$priv_ins_clienti) { $privilegi_globali_utente = esegui_query("select * from {$PHPR_TAB_PRE}" . "privilegi where idutente = '{$id_utente}' and anno = '1'"); $priv_ins_clienti = risul_query($privilegi_globali_utente, 0, 'priv_ins_clienti'); } # fine if (!$priv_ins_clienti) $priv_vedi_telefoni = substr($priv_ins_clienti, 3, 1); $priv_vedi_indirizzo = substr($priv_ins_clienti, 4, 1); } # fine else if ($id_utente == 1 or !$id_utente) $didclienti = risul_query($dati_cliente, 0, 'idclienti'); $dcognome = risul_query($dati_cliente, 0, 'cognome'); $dnome = risul_query($dati_cliente, 0, 'nome'); $dsoprannome = risul_query($dati_cliente, 0, 'soprannome'); $dtitolo_cli = risul_query($dati_cliente, 0, 'titolo'); $dsesso = risul_query($dati_cliente, 0, 'sesso'); $ddatanascita = risul_query($dati_cliente, 0, 'datanascita'); $ddatanascita_f = formatta_data($ddatanascita, $stile_data); $ddocumento = risul_query($dati_cliente, 0, 'documento'); $dtipodoc = risul_query($dati_cliente, 0, 'tipodoc'); $dscadenzadoc = risul_query($dati_cliente, 0, 'scadenzadoc'); $dscadenzadoc_f = formatta_data($dscadenzadoc, $stile_data); $dcittadoc = risul_query($dati_cliente, 0, 'cittadoc'); $dregionedoc = risul_query($dati_cliente, 0, 'regionedoc'); $dnazionedoc = risul_query($dati_cliente, 0, 'nazionedoc'); $dcittanascita = risul_query($dati_cliente, 0, 'cittanascita'); $dregionenascita = risul_query($dati_cliente, 0, 'regionenascita'); $dnazionenascita = risul_query($dati_cliente, 0, 'nazionenascita'); $dnazionalita = risul_query($dati_cliente, 0, 'nazionalita'); $dlingua_cli = risul_query($dati_cliente, 0, 'lingua'); $dnazione = risul_query($dati_cliente, 0, 'nazione'); $dregione = risul_query($dati_cliente, 0, 'regione'); $dcitta = risul_query($dati_cliente, 0, 'citta'); if ($priv_vedi_indirizzo == "s") { $dvia = risul_query($dati_cliente, 0, 'via'); $dnumcivico = risul_query($dati_cliente, 0, 'numcivico'); $dcap = risul_query($dati_cliente, 0, 'cap'); } # fine if ($priv_vedi_indirizzo == "s") if ($priv_vedi_telefoni == "s") { $dtelefono = risul_query($dati_cliente, 0, 'telefono'); $dtelefono2 = risul_query($dati_cliente, 0, 'telefono2'); $dtelefono3 = risul_query($dati_cliente, 0, 'telefono3'); $dfax = risul_query($dati_cliente, 0, 'fax'); $demail = risul_query($dati_cliente, 0, 'email'); } # fine if ($priv_vedi_telefoni == "s") $dcod_fiscale = risul_query($dati_cliente, 0, 'cod_fiscale'); $dpartita_iva = risul_query($dati_cliente, 0, 'partita_iva'); if ($dlingua_cli) { if ($dlingua_cli == "ita") { $d_nome_lingua = "Italiano"; } elseif (preg_replace("/[a-z]{2,3}/", "", $dlingua_cli) == "") { if (@is_file("./includes/lang/{$dlingua_cli}/l_n")) { $d_nome_lingua = file("./includes/lang/{$dlingua_cli}/l_n"); $d_nome_lingua = ucfirst(togli_acapo($d_nome_lingua[0])); } # fine if (@is_file("./includes/lang/$dlingua_cli/l_n")) } # fine elseif (preg_replace("/[a-z]{2,3}/","",$dlingua_cli) == "") if (!$d_nome_lingua) { $dlingua_cli = ""; } } # fine if ($dlingua_cli) $output = ""; $O = "o"; $O2 = "o"; if ($dsesso == "f") { $O = "a"; } if ($dsesso2 == "f") { $O2 = "a"; } if ($mostra_num == "SI") { $output .= "{$didclienti}. <em>{$dcognome}</em> "; if ($dnome) { $output .= "<em>{$dnome}</em> "; } } else { if ($dtitolo_cli) { $output .= "{$dtitolo_cli} "; } $output .= "<b>{$dcognome}</b>"; if ($dnome) { $output .= " {$dnome}"; } if ($dsoprannome) { $output .= " ({$dsoprannome})"; } } # fine else if ($mostra_num == "SI") if ($ddatanascita or $dcittanascita) { $output .= " " . mex("nat{$O}", $pag); } if ($ddatanascita) { $output .= " " . mex("il", $pag) . " {$ddatanascita_f}"; } if ($dcittanascita) { $output .= mex(" a", $pag) . " {$dcittanascita}"; } if ($dregionenascita or $dnazionenascita) { $output .= " ({$dregionenascita}"; if ($dregionenascita and $dnazionenascita) { $output .= ", "; } $output .= "{$dnazionenascita})"; } # fine if ($dregionenascita or $dnazionenascita) $lin = ""; if ($dnazionalita) { $lin .= "{$dnazionalita}"; } if ($dnazionalita and $d_nome_lingua) { $lin .= " "; } if ($d_nome_lingua) { $lin .= "(" . mex("ln.", $pag) . " <em>{$d_nome_lingua}</em>)"; } if ($lin and $ddocumento) { if (!$dnazionedoc or $dnazionedoc == $dnazionalita) { $lin .= " - "; } else { $output .= "<br>{$lin}"; $lin = ""; } # fine else if (!$dnazionedoc or... } # fine if ($lin and $ddocumento) if ($ddocumento) { if ($dtipodoc) { $lin .= "{$dtipodoc} "; } $lin .= "{$ddocumento}"; if ($dscadenzadoc) { if ($dcittadoc or $dnazionedoc and $dnazionedoc != $dnazionalita) { $lin .= " ({$dcittadoc}"; if ($dcittadoc and $dnazionedoc and $dnazionedoc != $dnazionalita) { $lin .= ", "; } if ($dnazionedoc and $dnazionedoc != $dnazionalita) { $lin .= "{$dnazionedoc}"; } $lin .= ")"; } # fine if ($dcittadoc or... if (date("Ymd", time() + C_DIFF_ORE * 3600) <= str_replace("-", "", $dscadenzadoc)) { $lin .= " " . mex("scade", $pag) . " {$dscadenzadoc_f}"; } else { $lin .= " " . mex("scade", $pag) . " <font color=\"red\">{$dscadenzadoc_f}</font>"; } } # fine if ($dscadenzadoc) } # fine if ($ddocumento) if ($lin) { $output .= "<br>{$lin}"; } $lin = ""; if ($dcitta) { $lin .= "{$dcitta}"; if ($dvia or $dnumcivico or $dcap) { $lin .= ","; } $lin .= " "; } # fine if ($dcitta) if ($dvia) { $lin .= "{$dvia} "; } if ($dnumcivico) { $lin .= "nº {$dnumcivico} "; } if ($dcap) { $lin .= mex("CAP", $pag) . " {$dcap} "; } if ($dnazione or $dregione) { $lin .= "("; } if ($dregione) { $lin .= $dregione; } if ($dnazione and $dregione) { $lin .= ", "; } if ($dnazione) { $lin .= $dnazione; } if ($dnazione or $dregione) { $lin .= ") "; } if ($lin) { $output .= "<br>{$lin}"; } $lin = ""; if ($dtelefono) { $lin .= mex("Telefono", $pag) . ": {$dtelefono} "; } if ($dtelefono2) { $lin .= mex("2º telefono", $pag) . ": {$dtelefono2} "; } if ($dtelefono3) { $lin .= mex("3º telefono", $pag) . ": {$dtelefono3}, "; } if ($dfax) { $lin .= "fax: {$dfax}, "; } if ($demail) { $lin .= "email: <a href=\"mailto:{$demail}\">{$demail}</a> "; } if ($lin) { $output .= "<br>{$lin}"; } $lin = ""; if ($dcod_fiscale) { $lin .= mex("Codice fiscale", $pag) . ": {$dcod_fiscale} "; } if ($dcod_fiscale and $dpartita_iva) { $lin .= ", "; } if ($dpartita_iva) { $lin .= mex("Partita iva", $pag) . ": {$dpartita_iva} "; } if ($lin) { $output .= "<br>{$lin}"; } if (!$silenzio) { echo $output; } else { return $output; } }
function scrivi_file($linee, $nome_file) { $scrittura_corretta = "SI"; if ($fileaperto = fopen("{$nome_file}.tmp", "w+")) { flock($fileaperto, 2); if (!@is_array($linee)) { $linee2 = $linee; unset($linee); $linee[0] = $linee2; unset($linee2); } # fine if (!@is_array($linee)) for ($num1 = 0; $num1 < count($linee); $num1++) { fwrite($fileaperto, $linee[$num1]); } flock($fileaperto, 3); fclose($fileaperto); $linee2 = @file("{$nome_file}.tmp"); $num_linee2 = 0; $ultima_linea = ""; for ($num1 = 0; $num1 < count($linee); $num1++) { $linee[$num1] = str_replace("\r\n", "\n", $linee[$num1]); $linee[$num1] = str_replace("\n", "\n", $linee[$num1]); $sub_linee = explode("\n", $linee[$num1]); for ($num2 = 0; $num2 < count($sub_linee); $num2++) { if ($num2 == 0) { $sub_linee[$num2] = $ultima_linea . $sub_linee[$num2]; } if ($num2 != count($sub_linee) - 1) { if (togli_acapo($linee2[$num_linee2]) != $sub_linee[$num2]) { $scrittura_corretta = "NO"; } $num_linee2++; } else { $ultima_linea = $sub_linee[$num2]; } } # fine for $num2 } # fine for $num1 if (togli_acapo($linee2[$num_linee2]) != $ultima_linea) { $scrittura_corretta = "NO"; } if ($scrittura_corretta != "NO") { @unlink("{$nome_file}"); if (!rename("{$nome_file}.tmp", "{$nome_file}")) { $scrittura_corretta = "NO"; } } # fine if ($scrittura_corretta != "NO") } else { $scrittura_corretta = "NO"; } if ($scrittura_corretta == "NO") { @unlink("{$nome_file}.tmp"); echo mex("<div style=\"display: inline; color: red;\">ERRORE</div> di scrittura del file", "funzioni.php") . " {$nome_file}.<br>"; } # fine if ($scrittura_corretta == "NO") return $scrittura_corretta; }