Be sure writing is allowed in this directory.";
$langPassChanged = "The password has been changed.";
$langPassError = "The new passwords don't match !";
$langPassword = "Change Big Sam Password";
$langRetype = "Retype new Password :";
$langSubmit = "Send the message";
$langSubmitModif = "Submit Modifications";
$langSystemError = "System Error";
$langSystemMessage = "System Message";
$langWrongPassword = "Wrong Admin Password";
/*
// CATALAN
// By Alfredo Prades (alfred at terrik dot net----http://www.terrik.net)
$langAdminError = "Error del administradoe";
$langBsGuestbook = "BIG SAM Guestbook";
$langChPassword = "Canvi del pass";
$langEmail = "E-mail: ";
$langEntry = "Element: ";
$langGbAdmin = "Administracis del llista de visites";
$langMessage = "Mensaje: ";
$langName = "Nom: ";
$langnewPassword = "Nou pass: ";
$langOpenError = "Error de escritura de ficher! Verifica que es posible escriure en este directori.";
$langPassChanged = "Se ha canviat el pass.";
$langPassError = "Els pass no corresponen!";
$langPassword = "Cavie el pass de Big Sam";
$langRetype = "Confirme el seu nou pass: ";
$langSubmit = "Envia ";
$langSubmitModif = "Envia les modificacions";
$langSystemError = "Error Sistema";
$langSystemMessage = "Mensaje del sistema";
$langWrongPassword = "Pass Incorrecte";
// CREOLE
// By Pascal Lombard (plombard_00 at yahoo dot fr)
$langAdminError = "Administratir'la twompi koy'";
$langBsGuestbook = "BIG SAM - Livre d'Or";
$langChPassword = "Changi passwod'la";
$langEmail = "Ba moin email ou :";
$langEntry = "Ladja pawol'";
$langGbAdmin = "Administri bagay'la";
$langMessage = "Sa ki pawol'ou :";
$langName = "Sa ki nomw' ti mal' ?";
$langnewPassword = "Ba moin a bel ti passwod :";
$langOpenError = "An pi pa wouvh fichier'a! hs ou ni ci dwouht'la ?";
$langPassChanged = "Passwod'la fini changi";
$langPassError = "Ci di passwod'la pa pareil.";
$langPassword = "Changi passwod Big Sam'la";
$langRetype = "Tapi'y enco :";
$langSubmit = "Vwiyi pawol'la";
$langSubmitModif = "Changi tout'ci bagay'la";
$langSystemError = "Systhm'la pa ka machi";
$langSystemMessage = "Tann'bien ! Systhm'la ka diw";
$langWrongPassword = "An-an, ti mal'! Sa pa passwod'la !";
// CROATIAN
// By Neven Antic (nantic at inet dot hr)
$langAdminError = "Upravljacka GreÜka";
$langBsGuestbook = "BIG SAM Knjiga Gostiju";
$langChPassword = "Promijeni zaporku";
$langEmail = "E-mail :";
$langEntry = "Ulaz";
$langGbAdmin = "Upravljanje Knjigom gostiju";
$langMessage = "Poruka :";
$langName = "Ime :";
$langnewPassword = "Nova Zaporka :";
$langOpenError = "GreÜka pri otvaranju dokumenta! Provjerite da li je upis dozvoljen u direktorij.";
$langPassChanged = "Zaporka je promijenjena.";
$langPassError = "Nova zaporka nije u redu!";
$langPassword = "Promijeni Big Sam Zaporku";
$langRetype = "Ponovi novu zaporku :";
$langSubmit = "PoÜalji poruku";
$langSubmitModif = "Unesi promjene";
$langSystemError = "Sustavna GreÜka";
$langSystemMessage = "Sustavna Poruka";
$langWrongPassword = "PogreÜna Upravljacka Zaporka";
// CZECH
// By Vladimír Jarý (vljary dot urk at centrum dot cz)
$langAdminError = "Chyba při administraci";
$langBsGuestbook = "BIG SAM Guestbook";
$langChPassword = "Změnit heslo";
$langEmail = "E-mail:";
$langEntry = "Záznam";
$langGbAdmin = "Administrace Guestbooku";
$langMessage = "Vzkaz:";
$langName = "Jméno ";
$langnewPassword = "Nové heslo:";
$langOpenError = "Chyba při otevírání souboru ! Ujistěte se, zda je zápis v tomto adresáři povolen.";
$langPassChanged = "Heslo bylo změněno.";
$langPassError = "Nové heslo neodpovídá !";
$langPassword = "Změna hesla správceBig Sama";
$langRetype = "Nové heslo znovu :";
$langSubmit = "Pošli vzkaz";
$langSubmitModif = "Odešli změny";
$langSystemError = "Systémová chyba";
$langSystemMessage = "Zpráva systému";
$langWrongPassword = "Špatné správcovské heslo";
// DANISH
// By Steven Rasmussen (sr at danmedia dot dk) & Thomas H. Jxrgensen (holmen at mail dot nu)
$langAdminError = "Administrationsfejl";
$langBsGuestbook = "BIG SAM Gfstebog";
$langChPassword = "Skift kodeord";
$langEmail = "E-mail :";
$langEntry = "Indlfg";
$langGbAdmin = "Administration af gfstebogen";
$langMessage = "Meddelelse :";
$langName = "Navn :";
$langnewPassword = "Nyt kodeord :";
$langOpenError = "Fejl ved ebning af fil! Kontrollir at du har skriveadgang til denne mappe.";
$langPassChanged = "Kodeordet er fndret.";
$langPassError = "De nye kodeord er ikke ens!";
$langPassword = "Skift Big Sam kodeord";
$langRetype = "Gentag nye kodeord:";
$langSubmit = "Send meddelelse";
$langSubmitModif = "Send fndringer";
$langSystemError = "Systemfejl";
$langSystemMessage = "Systembesked";
$langWrongPassword = "Forkert administratorkodeord";
// DUTCH
// By Dimitri van Hees (p.vanhees at chello dot nl)
$langAdminError = "Beheerfout";
$langBsGuestbook = "Gastenboek";
$langChPassword = "Verander wachtwoord";
$langEmail = "E-mail :";
$langEntry = "Entry";
$langGbAdmin = "Gastenboek beheer";
$langMessage = "Bericht :";
$langName = "Naam :";
$langNewPassword = "Nieuw wachtwoord :";
$langOpenError = "Fout bij openen bestand ! CHMOD moet 777 zijn in deze map.";
$langPassChanged = "Het wachtwoord is veranderd.";
$langPassError = "Het zijn verschillende wachtwoorden !";
$langPassword = "Verander Big Sam wachtwoord";
$langRetype = "Type het nieuwe wachtwoord nogmaals :";
$langSubmit = "Zet in gastenboek!";
$langSubmitModif = "Breng veranderingen aan";
$langSystemError = "Systeemfout";
$langSystemMessage = "Systeembericht";
$langWrongPassword = "Verkeerd wachtwoord!";
// FINNISH
// By Jussi Seppä (jseppa3 at welho dot com)
$langAdminError = "Adminvirhe";
$langBsGuestbook = "BIG SAM Vieraskirja";
$langChPassword = "Vaihda salasana";
$langEmail = "Sähköpostisi:";
$langEntry = "Viestisi";
$langGbAdmin = "Hallintatyökalu";
$langMessage = "Viesti:";
$langName = "Nimesi:";
$langnewPassword = "Uusi salasana :";
$langOpenError = "Virhe avattaessa tiedostoa! Tarkista hakemiston kirjoitusoikeudet.";
$langPassChanged = "Salasana on vaihdettu.";
$langPassError = "Uusi salasana ei täsmää!";
$langPassword = "Vaihda Big Sam salasana";
$langRetype = "Kirjoita uudelleen salasana:";
$langSubmit = "Lähetä";
$langSubmitModif = "Muuta";
$langSystemError = "Systeemivirhe";
$langSystemMessage = "Systeemiviesti";
$langWrongPassword = "Väärä Admin salasana";
// FRENCH (By The Big Sam Team itself ;)
$langAdminError = "Erreur Administrateur";
$langBsGuestbook = "BIG SAM - Livre d'Or";
$langChPassword = "Changement de mot de passe";
$langEmail = "E-mail :";
$langEntry = "Message";
$langGbAdmin = "Administration";
$langMessage = "Message :";
$langName = "Nom :";
$langnewPassword = "Nouveau mot de passe :";
$langOpenError = "Erreur d'ouverture de fichier ! Assurez-vous d'avoir les droits d'ecriture.";
$langPassChanged = "Le mot de passe a ete change.";
$langPassError = "Les mots de passe ne correspondent pas.";
$langPassword = "Changer le mot de passe de Big Sam";
$langRetype = "Confirmez le mot de passe :";
$langSubmit = "Envoyer le message";
$langSubmitModif = "Confirmer les modifications";
$langSystemError = "Erreur Systeme";
$langSystemMessage = "Message du Systeme";
$langWrongPassword = "Mauvais mot de passe";
// GERMAN
// By Klaus-Peter Walter & Gvtz Waschk (waschk at informatik dot uni-rostock dot de)
$langAdminError = "Administrator Fehler";
$langBsGuestbook = "BIG SAM Gästebuch";
$langChPassword = "Ändere Passwort";
$langEmail = "eMail :";
$langEntry = "Eintrag";
$langGbAdmin = "Gästebuch Administration";
$langMessage = "Ihre Nachricht :";
$langName = "Name :";
$langnewPassword = "Neues Passwort :";
$langOpenError = "Fehler beim öffnen der Datei ! Sind Sie sicher, dass Sie die richtigen Rechte für dieses Verzeichnis besitzen ?";
$langPassChanged = "Neues Passwort OK.";
$langPassError = "Das neue Password funktioniert nicht !";
$langPassword = "Ändere Big Sam Passwort";
$langRetype = "Wiederholen Sie das neue Passwort :";
$langSubmit = "Nachricht abschicken";
$langSubmitModif = "Änderungen abschicken";
$langSystemError = "System Fehler";
$langSystemMessage = "System Nachricht";
$langWrongPassword = "Falsches Administrator-Passwort";
// HUNGARIAN
// By Csaba Csanaki (Csaba at Csanaki dot hu), modified by Vt K.
$langAdminError = "Kezelési hiba";
$langBsGuestbook = "BIG SAM Vendégkönyv";
$langChPassword = "Jelszóváltoztatás";
$langEmail = "E-mail:";
$langEntry = "Bejegyzés";
$langGbAdmin = "Vendégkönyv-kezelés";
$langMessage = "Üzenet:";
$langName = "Név:";
$langnewPassword = "Új jelszó:";
$langOpenError = "Fájl-megnyitási hiba! Ellenőrizd a könyvtár írási jogát.";
$langPassChanged = "A jelszót sikeresen megváltoztattad.";
$langPassError = "A két jelszó nem egyezik!";
$langPassword = "Big Sam-jelszó megváltoztatása";
$langRetype = "Add meg újra a jelszót:";
$langSubmit = "Üzenet küldése";
$langSubmitModif = "Módosítások életbeléptetése";
$langSystemError = "Rendszerhiba";
$langSystemMessage = "Rendszerüzenet";
$langWrongPassword = "Rossz jelszó";
// INDONESIAN
// By Evi Saroinsong (m26499188 at john.petra dot ac dot id)
$langAdminError = "Administrator Error";
$langBsGuestbook = "Guestbook BIG SAM";
$langChPassword = "Ganti Password";
$langEmail = "E-mail :";
$langEntry = "Entry";
$langGbAdmin = "Administrasi Guestbook";
$langMessage = "Pesan :";
$langName = "Nama :";
$langnewPassword = "Password Baru :";
$langOpenError = "File tidak dapat dibuka ! Cek lagi permission write untuk direktori ini!";
$langPassChanged = "Password telah diganti.";
$langPassError = "Password baru dan verifikasinya tidak cocok";
$langPassword = "Ganti Password Big Sam ";
$langRetype = "Ketikkan password baru: ";
$langSubmit = "Kirim Pesan";
$langSubmitModif = "Kirim Hasil Modifikasi";
$langSystemError = "System Error";
$langSystemMessage = "Pesan dari System";
$langWrongPassword = "Password Adminnya Salah!";
// ITALIAN
// By Piero Mannelli (webmaster at subnet dot it)
$langAdminError = "Errore Amministratore";
$langBsGuestbook = "BIG SAM Guestbook";
$langChPassword = "Cambia Password";
$langEmail = "E-mail :";
$langEntry = "Messaggio";
$langGbAdmin = "Amministrazione Guestbook";
$langMessage = "Messaggio :";
$langName = "Nome :";
$langnewPassword = "Nuova password :";
$langOpenError = "Errore di apertura del file ! Assicurati che la directory abbia i permessi di scrittura.";
$langPassChanged = "La password h stata cambiata.";
$langPassError = "La nuova password non corrisponde !";
$langPassword = "Cambia la Password di Big Sam";
$langRetype = "Ripeti password :";
$langSubmit = "Invia il messaggio";
$langSubmitModif = "Invia modifiche";
$langSystemError = "Errore di sistema";
$langSystemMessage = "Messaggio di sistema";
$langWrongPassword = "Password Amministratore Errata";
// LITHUANIAN(ISO-8859-13)
// By Andrius Kurtinaitis (andrius dot kurtinaitis at maf dot vu dot lt )
$langAdminError = "Administravimo klaida";
$langBsGuestbook = "Svečiř knyga";
$langChPassword = "Keisti slaptaţodá";
$langEmail = "El. pađtas:";
$langEntry = "Laukas";
$langGbAdmin = "Svečiř knygos administravimas";
$langMessage = "Atsakymas:";
$langName = "Vardas:";
$langnewPassword = "Naujas slaptaţodis:";
$langOpenError = "Negaliu atidaryti failo! Ásitikink, kad tavo katalogas rađomas.";
$langPassChanged = "Pakeitëme slaptaţodá.";
$langPassError = "Naujieji slaptaţodţiai nesutampa!";
$langPassword = "Pakeisti svečiř knygos slaptaţodá";
$langRetype = "Pkartokite naujŕjá slaptaţodá:";
$langSubmit = "Patvirtinu";
$langSubmitModif = "Iđsaugoti pakeitimus";
$langSystemError = "Sistemos klaida";
$langSystemMessage = "Sistemos praneđimas";
$langWrongPassword = "Neteisingas administratoriaus slaptaţodis";
// NORWEGIAN
// By Lasse G. Dahl (news at lassedahl dot com)
$langAdminError = "Administrasjonsfeil";
$langBsGuestbook = "Big Sam Gjestebok";
$langChPassword = "Endre passord";
$langEmail = "E-post:";
$langEntry = "Oppføring";
$langGbAdmin = "Gjestebokadministrasjon";
$langMessage = "Melding:";
$langName = "Navn:";
$langnewPassword = "Nytt passord:";
$langOpenError = "Feil ved åpning av fil! Kontroller at webserveren har skrivetilgang i denne katalogen.";
$langPassChanged = "Passordet er endret.";
$langPassError = "Passordene stemmer ikke overens!";
$langPassword = "Endre BIG SAM-passord";
$langRetype = "Gjenta passord:";
$langSubmit = "Send din melding";
$langSubmitModif = "Send endring";
$langSystemError = "Systemfeil";
$langSystemMessage = "Systemmelding";
$langWrongPassword = "Feil administratorpassord";
// POLISH (ISO-8859-2)
// By Lukasz Razmuk (lukaszr at virgo dot com dot pl)
// Please add the follwing line in the header :
// echo ("");
$langAdminError = "Blad Administratora";
$langBsGuestbook = "BIG SAM ksiazka gosci";
$langChPassword = "zmien haslo";
$langEmail = "E-mail :";
$langEntry = "Wpis";
$langGbAdmin = "Administracja ksiega gosci";
$langMessage = "Wiadomosc :";
$langName = "Imie :";
$langnewPassword = "Nowe haslo :";
$langOpenError = "Blad podczas otwierania pliku! SprawdL czy masz prawa zapisu do katalogu";
$langPassChanged = "Haslo zostalo zmienione";
$langPassError = "Wpisz dwa razy dokladnie to samo haslo!";
$langPassword = "Zmiana Big Sam hasla";
$langRetype = "Wpisz ponownie haslo :";
$langSubmit = "Wyslij wiadomosc";
$langSubmitModif = "Zapisz zmiany";
$langSystemError = "Blad systemowy";
$langSystemMessage = "Wiadomosc Systemowa";
$langWrongPassword = "Bledne haslo administratora";
// PORTUGUESE
// By Guilherme Halls (halls at email dot com dot br)
$langAdminError = "Erro do Administrador";
$langBsGuestbook = "BIG SAM Guestbook";
$langChPassword = "Alterar a senha";
$langEmail = "E-mail :";
$langEntry = "Entrada";
$langGbAdmin = "Administragco do Guestbook";
$langMessage = "Mensagem :";
$langName = "Nome :";
$langnewPassword = "Nova Senha :";
$langOpenError = "Erro Abrindo o arquivo! Certifique que o diretsrio esta com permigco para gravagco.";
$langPassChanged = "A senha foi alterada.";
$langPassError = "As senhas sco diferentes !";
$langPassword = "Mudar a senha do Big Sam";
$langRetype = "Confirme a nova senha :";
$langSubmit = "Postar a mensagem";
$langSubmitModif = "Aplicar Modificagues";
$langSystemError = "Erro no Sistema";
$langSystemMessage = "Mensagem do Sistema";
$langWrongPassword = "Senha incorreta";
// RUSSIAN
// By Roman Svetlov (rtype at mail dot ru)
$langAdminError = "o[IBKA ADMINISTRATORA";
$langBsGuestbook = "gOSTEWAQ KNIGA BIG SAM";
$langChPassword = "iZMENITX PAROLX";
$langEmail = "E-mail :";
$langEntry = "zAPISX";
$langGbAdmin = "aDMINISTRIROWANIE GOSTEWOJ KNIGI";
$langMessage = "sOOB]ENIE :";
$langName = "iMQ :";
$langnewPassword = "HOWYJ PAROLX :";
$langOpenError = "o[IBKA OTKRYTIQ FAJLA ! wOZMOVNO ZAPRE]ENA ZAPISX W DIREKTORI@.";
$langPassChanged = "pAROLX IZMENEN.";
$langPassError = "pAROLI RAZLI^NY !";
$langPassword = "iZMENITE PAROLX Big Sam";
$langRetype = "pOWTORITE NOWYJ PAROLX :";
$langSubmit = "oSTAWITX ZAPISX";
$langSubmitModif = "pODTWERDITX IZMENENIQ";
$langSystemError = "sISTEMNAQ O[IBKA";
$langSystemMessage = "sISTEMNOE SOOB]ENIE";
$langWrongPassword = "HEPRAWILXNYJ PAROLX ADMINISTRATORA";
// SERBIAN (Latin, ISO-8859-2)
// By Alex (alex at palic dot net)
$langAdminError = "Administrativna gre1ka";
$langBsGuestbook = "BIG SAM Knjiga gostiju";
$langChPassword = "Promena lozinke";
$langEmail = "E-mail :";
$langEntry = "Ulaz";
$langGbAdmin = "Administracija knjige gostiju";
$langMessage = "Poruka :";
$langName = "Ime :";
$langnewPassword = "Nova lozinka :";
$langOpenError = "Gre1ka pri otvaranju dokumenta! Proverite da li je dozvoljeno pisati u direktorijum.";
$langPassChanged = "Lozinka je promenjena.";
$langPassError = "Nova lozinka nije ispravna!";
$langPassword = "Promeni Big Sam lozinku";
$langRetype = "Ponovi novu lozinku :";
$langSubmit = "Po1alji poruku";
$langSubmitModif = "Sa1uvaj promene";
$langSystemError = "Sistemska gre1ka";
$langSystemMessage = "Sistemska poruka";
$langWrongPassword = "Pogre1na administrativna lozinka";
// SLOVAK
// By Marek Grac (xgrac at informatics dot muni dot cz)
$langAdminError = "Chyba pri administracii";
$langBsGuestbook = "BIG SAM Guestbook";
$langChPassword = "Zmeni; heslo";
$langEmail = "E-mail :";
$langEntry = "Sprava";
$langGbAdmin = "Administracia knihy nav9tev";
$langMessage = "Sprava :";
$langName = "Meno :";
$langnewPassword = "Novi heslo :";
$langOpenError = "Chyba pri otvaranm szboru! Ubezpehte sa, >e je povolen} zapis do datoviho szboru.";
$langPassChanged = "Heslo bolo zmeneni";
$langPassError = "Zadani hesla nie sz rovnaki!";
$langPassword = "Zmeni; heslo administratora Big Sam";
$langRetype = "Zopakova; novi heslo :";
$langSubmit = "Posla; spravu";
$langSubmitModif = "Potvrdi; zmeny";
$langSystemError = "Systimova chyba";
$langSystemMessage = "Systimova sprava";
$langWrongPassword = "Nespravne heslo administratora";
// SPANISH
// By Valery Fremaux (vf at eisti dot fr)
$langAdminError = "Error Del Administrador";
$langBsGuestbook = "BIG SAM Guestbook ";
$langChPassword = "Cambio del pass";
$langEmail = "E-mail: ";
$langEntry = "Elemento: ";
$langGbAdmin = "Administracisn Del Guestbook";
$langMessage = "Mensaje: ";
$langName = "Nombre: ";
$langnewPassword = "Nuevo pass: ";
$langOpenError = "Error de escritura del fichero! Verifica que es possible escribir en este directorio.";
$langPassChanged = "Se ha cambiado el pass.";
$langPassError = "Los pass no corresponden!";
$langPassword = "Cambie el pass de Big Sam";
$langRetype = "Confirma su nuevo pass: ";
$langSubmit = "Manda";
$langSubmitModif = "Manda Las Modificaciones";
$langSystemError = "Error Sistema";
$langSystemMessage = "Mensaje del sistema";
$langWrongPassword = "Pass Incorrecto";
*/
/*******************************************
* Configuration Step 2 : Carbon Copy Email *
*******************************************/
// carbonCopy = 1 enables mail sending to mailRecipient.
// mailRecipient receives a mail each times an entry is entered (if carbonCopy = 1)
// mailSubject is the subject of the mail which is sent.
$carbonCopy = 0;
$mailRecipient = "your.mail@your.isp";
$mailSubject = "[BIG SAM] New Guestbook Entry";
/*****************************
* Configuration Step 3 : CSS *
******************************/
// Choosing CSS Classes
// Here are detailed each and every classes used in Big Sam.
// You can replace these class names with your own CSS class name
// If you just want to change the colors, go and modify the displayHeader() CSS entry.
// Data submission form classes
$formHead = "formHead";
$formTail = "formTail";
$formBody = "formBody";
$inputText = "txt";
$inputSubmit = "submit";
$textArea = "std";
// Guestbook entries classes
$entryHead = "entryHead";
$entryBody1 = "entryBody1";
$entryBody2 = "entryBody2";
// Admin classes
$adminHead = "adminHead";
$adminBody1 = "adminBody1";
$adminBody2 = "adminBody2";
/********************************
* Configuration Step 4 : Header *
********************************/
function displayHeader()
{
global $version;
header ("Expires: Sat, 01 Jan 2000 00:00:00 GMT");
?>
Big Sam GuestBook
", $str);
$str = str_replace("$", "$", $str);
return $str;
}
function standardizeDisplayedText($str)
{
return $str;
}
function standardizeAdminText($str)
{
return $str;
}
function seekHttp($rawText)
{
global $at_replace;
$pattern = array(
"/http:\/\/((\w|\.|\?|\%|=|\/|-|~|#)*)/",
"/mailto:((\w|\.|@|-)*)/");
$replacement = array(
"http://\\1",
"\\1");
$hyperLinkedText=preg_replace($pattern, $replacement, $rawText);
if (at_replace) $hyperLinkedText = str_replace("@", " at ", $hyperLinkedText);
return $hyperLinkedText;
}
//******************************************************************************
// function Xfopen : opens a file $fileName and locks it
function Xfopen($fileName, $openMode, $sharing)
{
global $langOpenError;
$fp=@fopen($fileName, $openMode);
if (!$fp)
{
displayMessage($langOpenError,2);
}
if ($sharing==true)
{
$op=1;
}
else
{
$op=2;
}
if (!@flock($fp,$op))
{
@flock($fp,3);
displayMessage("flock timeout",2);
}
return $fp;
}
//******************************************************************************
// function Xfclose : unlocks the file $fp and closes it
function Xfclose($fp)
{
@flock($fp,3);
@fclose($fp);
}
//******************************************************************************
// function fullDisplay
function fullDisplay()
{
global $displayStep,$displayBegin, $maxDisplay ;
global $entryHead, $entryBody1, $entryBody2;
global $relativeScriptPath;
global $index;
global $archive_mail, $archive_name, $archive_text, $archive_date;
global $allowAutoLink;
// Checks if $displayBegin is not too large (Thanks to Ahmet Sabri ALPER )
if ($displayBegin>$maxDisplay)
{
$displayBegin=$maxDisplay-$displayStep+1;
}
displayHeader();
// Displays the entry form to enable the client to type a message.
displayForm();
if ($index==0)
{
displayFooter();
return;
}
echo ("
\n");
// Message arrays are displayed here :
echo "
\n";
// Displaying all the entries.
if ($displayStep==0)
{
$displayBegin=1;
$displayStep=$index;
}
if ($displayBegin==1)
{
$startAt=$index % $displayStep;
if ($startAt==0) $startAt=$displayStep;
}
else
{
$startAt=$displayBegin+$displayStep-1;
}
for ($msgNumber=$startAt ; $msgNumber>=$displayBegin ; $msgNumber--)
{
?>
:
:
\n");
for($i=1;$i<=$index;$i=$nextEnd+1)
{
$nextBegin = $i;
if ($i==1)
{
$nextEnd=$index % $displayStep;
if ($nextEnd==0) $nextEnd=$displayStep;
}
else $nextEnd = $i+$displayStep-1;
if ($displayBegin==$nextBegin && $nextEnd!=$nextBegin) echo ("[$nextBegin-$nextEnd]\n");
else if ($displayBegin==$nextBegin && $nextEnd==$nextBegin) echo ("[$nextBegin]\n");
else if ($nextEnd==$nextBegin) echo ("[$nextBegin]\n");
else echo ("[$nextBegin-$nextEnd]\n");
}
echo "
\n";
displayFooter();
}
//******************************************************************************
function readData($resetBegin)
{
global $adminpassword;
global $index;
global $dataFile;
global $archive_mail, $archive_name, $archive_text, $archive_date;
global $displayBegin, $displayStep, $maxDisplay;
// Includes automatically filled data arrays :
$index = 0;
$fout=Xfopen($dataFile, "r", true);
include($dataFile);
Xfclose($fout);
// From now, $index will indicate the number of data entries.
// Beginning of the data to be displayed, default = 1
if (!isset($displayBegin)) $displayBegin="";
if ($displayBegin=="" || $resetBegin==1)
{
$displayBegin = $index-$displayStep+1;
if ($displayBegin<=0) $displayBegin=1;
}
// Sets the maximum that $displayBegin can reach
$maxDisplay = $index;
}
//******************************************************************************
// If the Datafile does not exist, creates it.
if (!file_exists(${dataFile}))
{
$fout = Xfopen($dataFile, "w+", false);
fputs($fout, "");
Xfclose ($fout);
}
// $admin could be set via Admin-Form by POST or via URL by GET
$admin=$HTTP_POST_VARS["admin"];
if (!isset($admin))
$admin=$HTTP_GET_VARS["admin"];
else // assign POST-variables from Admin-Form
{
$newPassword1=$HTTP_POST_VARS["newPassword1"];
$newPassword2=$HTTP_POST_VARS["newPassword2"];
$command=$HTTP_POST_VARS["command"];
$index=$HTTP_POST_VARS["index"];
}
if (!isset($admin))
{
// assing variables from Guestbook-From
$name=$HTTP_POST_VARS["name"];
$email=$HTTP_POST_VARS["email"];
$message=$HTTP_POST_VARS["message"];
if (!isset($name)) { $name=""; $message=""; }
if ($name=="" || $message=="")
{
/************************************************************************************
* Use Case no 1-A
*
* This case is encountered when a client simply wants to add a message to the
* guestbook. (Every variable is empty);
************************************************************************************/
readData(0);
fullDisplay();
exit;
}
else
{
/********************************************************************************
* Use Case no 1-B *
* *
* Case is encountered when a client has just filled in the appropriate fields *
* (name, mail, message). *
* $name = "Some Name" *
* $email = "Some@Email" (or not)
* $message = "Some Message" *
* Simply add message in the top of all previous messages. *
********************************************************************************/
// Eventually checks the referer (see configuration step 9)
if (($checkReferer)&&(substr($refererpage,0,strlen($scriptURL))!=$scriptURL)) {
displayMessage("Invalid submission.",2);
die;
}
$position = filesize($dataFile);
$fout = Xfopen($dataFile, "r+", false);
fseek($fout,$position-2);
$insert_msgdate = date( "dS F Y - h:i:s A" );
$name=standardizeStoredText($name);
$email=standardizeStoredText($email);
$message=standardizeStoredText($message);
// Truncates the message to the maximal defined length
if ($logicalLengthLimitation) { $message = substr($message,0,$messageMaxLength); }
fputs ($fout,"\$archive_name[++\$index] = \"$name\";\n");
fputs ($fout,"\$archive_mail[ \$index] = \"$email\";\n");
fputs ($fout,"\$archive_date[ \$index] = \"$insert_msgdate\";\n");
fputs ($fout,"\$archive_text[ \$index] = \"$message\";\n");
fputs ($fout,"\n?>");
Xfclose($fout);
// Sending a mail to $mailRecipient if $carbonCopy=1, with the subject $mailSubject.
if ($carbonCopy==1)
{
$message = str_replace(" ", "\n", $message);
$mailBody = "From: $name <$email>\n$insert_msgdate\n\n$message";
mail($mailRecipient,$mailSubject,$mailBody,"From: $email\nReply-to: $name <$email>");
}
if (strpos($refererpage, "?")==false) $page=$refererpage;
else $page=substr($refererpage, 0, strpos($refererpage, "?"));
header("Location: $page?");
exit;
}
}
else
{
readData(0);
if (md5($admin)==$adminpassword)
{
if ($command=="")
{
displayHeader();
/************************************************************************
* Use Case no 2-A *
* *
* Admin mode (The administrator can modify password, fields, or remove *
* messages). *
* $admin = $adminpassword *
* Shows a password modification form. *
* Shows all messages and enables to modify/delete them. *
************************************************************************/
?>
BIG SAM
");
Xfclose($fout);
displayMessage("$langPassChanged",3);
exit;
}
}
else if ($command=="modify")
{
/********************************************************************************
* Use Case no 2-C *
* *
* Admin mode (The administrator is updating entries). *
* $admin = $adminpassword *
* $nameXXX = "Modified name (no XXX)" *
* $emailXXX = "Modified email (no XXX)" *
* $messageXXX = "Modified message (no XXX)" *
* $keep = "on" or "" *
* Check if $admin matches $adminpassword. *
* Rewrites ALL the fields except when $keepXXX = "" *
* Rewrites the whole Datafile with the new password, and all the entries. *
********************************************************************************/
$fout = Xfopen($dataFile, "w", false);
fputs ($fout,"");
Xfclose($fout);
if (strpos($refererpage, "?")==false) $page=$refererpage;
else $page=substr($refererpage, 0, strpos($refererpage, "?"));
header("Location: $page?");
exit;
}
}
else
{
/************************************************
* Use Case no 2-Z *
* *
* If $admin does NOT match $adminpassword. *
* $admin != $adminpassword *
* Error message : "Wrong Admin Password" *
************************************************/
displayMessage("$langWrongPassword",1);
}
}
/* End of File */
?>