[php] Zaehler in PHP ohne MySQL by Wolfgang Siebecl

[RMI Nachrichtentechnik GmbH]

/*
 *  Zaehler fuer Seitenzugriffe
 *  Author: Wolfgang Siebeck ws_(at)_siam.de
 *          R.M.I. Nachrichtentechnik (Thailand) GMBH.
 *  (Die Punkte in der Firma sind thail. Vorschrift :-)
 *  Disclaimer: RMI Nachrichtentechnik GmbH Aachen und
 *  R.M.I. Nachrichtentechnik (Thailand) GMBH. sind nicht identisch.
 *  Auswertungsscript f=FCr die ganze Website.
 *  Aufruf:  counter(__FILE__)
 *  Parameter sichtbar erzeugt wahlweise das Ergebnis (Fusszeile)
 *  in der R=FCckgabevariablen, falls Webseite aus "Bits" zusammen-
 *  gesetzt werden soll.
 *  Ansehen unter: http://www.siam.de u.a. Seiten der http://www3.rmi.de
 */


/*
 *  Zaehler fuer Seitenzugriffe
 */
function counter($fname, $sichtbar=3D1)
{
    global $gucker;

    $fname=3D$fname . ".cnt";
    $file =3D _(at)_fopen($fname, "r");
    if (!$file) {
        $zahl =3D 0;
    }
    else {
        $zahl =3D fgets($file, 20);
        fclose($file);
    }
    $zahl =3D (int)$zahl + 1;
    $file =3D _(at)_fopen($fname, "w");
    if ($file) {
        fputs($file, $zahl . "\n");
=09fputs($file, strftime("%d.%m.%y %H:%M\n"));
=09fputs($file, $gucker . "\n");
        fclose($file);
    }
    else {
        mail("webmaster_(at)_rmi.de", "Fehler im PHP-Counter", "Kann Datei \"$f=
name\" nicht oeffnen.");
        return;
        /*=20
            Da wir den Wert nicht zurueckschreiben koennen,
            lassen wir den Counter ganz einfach weg! Dennoch
            wird der webmaster benachrichtigt, dass da etwas nicht stimmt.
        */
    }
    if ($sichtbar)
        printf("<span class=3D\"counter\">Aufrufe dieser Seite: %d</span><=
br>\n", $zahl);
}