PHPIndex

<?php
/*******************************************************************************
 *   Plugin Speed
 *******************************************************************************
 *   GuppY PHP Script - version 6.0
 *   CeCILL Copyright (C) 2004-2013 by Laurent Duveau
 *   Initiated by Laurent Duveau and Nicolas Alves
 *   Web site = https://www.freeguppy.org/
 *   e-mail   = guppy@freeguppy.org
 *   V6 developed by Lud Bienaimé
 *      with the participation of the GuppY Team
 *******************************************************************************
 *   Latest Changes :
 * v6.00.00 (December 15, 2019) : initial release
 ******************************************************************************/

if (stristr($_SERVER["SCRIPT_NAME"], "boxspeed.inc")) {
    header("location:../index.php");
    die();
}

function fbox_speed($pos, $args) {
    global $lng, $lang, $drtuser, $serviz, $userprefs, $web, $page, $tconfig;

    if (is_file(CHEMIN.'plugins/speed/'.$lng.'-speed.inc')) {
        include CHEMIN.'plugins/speed/'.$lng.'-speed.inc';
    } else {
        include CHEMIN.'plugins/speed/en-speed.inc';
    }

    $speedtitle = "<img src=\"".CHEMIN."plugins/speed/speed.gif\" align=\"right\" alt=\"speed.gif\" />".$speed[7];

    $out = BeginJavascript().'
var tjs_img;
var tjs_src="'.CHEMIN.'img/robot.gif";
var tjs_size=19925;
var tjs_delai=100;
var tjs_nb=-1;
var tjs_delai_max=20000;
var timer1=0; var timer2=0;
var tjs_fin="";

function Checkkos() {
    tjs_img=new Image();
    timer1=new Date();
    timer1=timer1.getTime();
    tjs_img.src=tjs_src+"?dummy="+timer1;
    tjs_nb=0;
    document.countkos.info.value="'.$speed[9].'";
    setTimeout("Timerkos()",tjs_delai);
}

function Timerkos() {
    var anim="-"
    tjs_nb++;
    document.countkos.info.value="'.$speed[9].'";
    if (tjs_nb*tjs_delai>=tjs_delai_max) {
        tjs_fin=EvalConnexion(0);
        document.countkos.info.value=tjs_fin;
    }
    else {
        if (tjs_img.complete) {
            timer2=new Date(); timer2=timer2.getTime();
            tjs_fin=EvalConnexion(tjs_size/(timer2-timer1));
            document.countkos.info.value=tjs_fin;
        }
        else {
            setTimeout("Timerkos()",tjs_delai);
        }
    }
}

function EvalConnexion(kos) {
    tjs_nb=-1;
    res="";
    if (kos==0) { res="'.$speed[10].'"; }
    if ((kos>0)&&(kos<3)) { res="'.$speed[11].'"; }
    if ((kos>3)&&(kos<6)) { res="'.$speed[12].'"; }
    if ((kos>6)&&(kos<100)) { res="'.$speed[13].'"; }
    if (kos>100) { res="'.$speed[14].'"; }
    kos=Math.round(kos*10)/10;
    return res+" (" + kos +" '.$speed[15].')";
}'.EndJavascript();

    $out .= '
<div class="box">
<h2 class="text-center">'.$speed[16].'</h2>
<p>'.$speed[17].'</p>
<form name="countkos" action="'.CHEMIN.'plugins/speed/'.($site['URLR'] == 'on' ? $lng.'-speedcnt' : 'speed.php?lng='.$lng).'">
  <p class="text-center">'.SubmitButton($speed[18], 'Checkkos(); return false;').'</p>
  <p class="text-center">'.$speed[19].'
    <input type="text" class="form-control texte w-100 m-auto" name="info" style="max-width:340px;" />
  </p>
</form>
</div>';


    if (($serviz[32] == "on" && !empty($serviz[31]) && $serviz[31]==$userprefs[1]) || ($serviz[32] == "on" && $drtuser[17] == "on")) {
        $out .= '
<p class="text-center">
  <a href="'.CHEMIN.'admin/admin.php?lng='.$lng.'&amp;pg=plugin&amp;plug=speed/speed">
    <i class="fas fa-edit align-middle" title="'.$web[308].'"></i>
  </a>
</p>';
    }

    return boxwide($pos, $speedtitle, $out, ' SPEED'.$tconfig);
}
?>

<?php
/*******************************************************************************
 *   Plugin Speed
 *******************************************************************************
 *   GuppY PHP Script - version 6.0
 *   CeCILL Copyright (C) 2004-2013 by Laurent Duveau
 *   Initiated by Laurent Duveau and Nicolas Alves
 *   Web site = https://www.freeguppy.org/
 *   e-mail   = guppy@freeguppy.org
 *   V6 developed by Lud Bienaimé
 *      with the participation of the GuppY Team
 *******************************************************************************
 *   Latest Changes :
 * v6.00.00 (December 15, 2019) : initial release
 ******************************************************************************/

if (stristr($_SERVER['SCRIPT_NAME'], 'en-speed.inc')) {
  header('location:index.php');
  die();
}

$speed[1] = 'Admin - Connection Speed sample Plugin';
$speed[2] = 'GuppY comes with a few very simple plugins, as examples (for developers) and as embellishment of your GuppY website (for webmasters).';
$speed[3] = 'This test calculates the average time needed to download one image from your website to your PC.';
$speed[4] = 'Accessed by :';
$speed[5] = 'This plugin registers to the upper modules bar.';
$speed[6] = 'Try it :';
$speed[7] = 'Connection Speed';
$speed[8] = 'Register Connection Speed Plugin in the modules bar : ';
$speed[9] = 'Estimation being processed...';
$speed[10] = 'Connection not possible';
$speed[11] = '28k Modem Connection';
$speed[12] = '56k Modem Connection';
$speed[13] = 'High Speed Connection';
$speed[14] = 'Local Connection';
$speed[15] = 'Kb/sec';
$speed[16] = 'Estimate the connection speed between your PC and this site';
$speed[17] = '<p>Click on the button to evaluate the speed of your connection between your PC and this website.</p><p>This test only evaluates by calculating the average rate to load an image from the site to your PC.</p><p>The result therefore measures the speed of loading an image at a given time. Obviously, if other loading are in progress, the measurement is distorted.</p>';
$speed[18] = 'Launch the evaluation of the connection speed';
$speed[19] = 'Result :';
$speed[20] = 'Uninstall';
$speed[21] = '<strong>WARNING ! The uninstall is final.</strong><br/>';
?>

<?php
/*******************************************************************************
 *   Plugin Speed
 *******************************************************************************
 *   GuppY PHP Script - version 6.0
 *   CeCILL Copyright (C) 2004-2013 by Laurent Duveau
 *   Initiated by Laurent Duveau and Nicolas Alves
 *   Web site = https://www.freeguppy.org/
 *   e-mail   = guppy@freeguppy.org
 *   V6 developed by Lud Bienaimé
 *      with the participation of the GuppY Team
 *******************************************************************************
 *   Latest Changes :
 * v6.00.00 (December 15, 2019) : initial release
 ******************************************************************************/

if (stristr($_SERVER['SCRIPT_NAME'], 'fr-speed.inc')) {
    header('location:index.php');
    die();
}

$speed[1] = "Admin - Plugin exemple Vitesse de Connexion";
$speed[2] = "GuppY est fourni avec quelques plugins très simples, à titre d'exemple (pour les développeurs) et d'embellissement de votre site GuppY (pour les webmasters).";
$speed[3] = "Ce test fait une évaluation en calculant le débit moyen pour charger une image depuis votre site web vers votre PC.";
$speed[4] = "Accès par :";
$speed[5] = "Ce plugin s'inscrit dans la barre de modules haute.";
$speed[6] = "Le voir fonctionner :";
$speed[7] = "Vitesse de Connexion";
$speed[8] = "Inscrire le Plugin Vitesse de Connexion dans la barre de modules : ";
$speed[9] = "Evaluation en cours...";
$speed[10] = "Connexion impossible";
$speed[11] = "Connexion Modem 28k";
$speed[12] = "Connexion Modem 56k";
$speed[13] = "Connexion Haut débit";
$speed[14] = "Connexion locale";
$speed[15] = "Ko/sec";
$speed[16] = "Evaluation de la vitesse de connexion de votre PC à ce site";
$speed[17] = "<p>Cliquez sur le bouton pour évaluer la vitesse de votre connexion entre votre PC et ce site web.</p><p>Ce test ne fait qu'une évaluation en calculant le débit moyen pour charger une image depuis le site vers votre PC.</p><p>Le résultat mesure donc la vitesse de chargement d'une image à un moment donné. Evidemment, si d'autres chargements sont en cours, la mesure est faussée.</p>";
$speed[18] = "Lancer l'évaluation de la vitesse de connexion";
$speed[19] = "Résultat :";
$speed[20] = 'Désinstaller';
$speed[21] = '<strong>ATTENTION ! La désinstallation est définitive.</strong><br/>';
?>

<?php
/*******************************************************************************
 *   Plugin Speed
 *******************************************************************************
 *   GuppY PHP Script - version 6.0
 *   CeCILL Copyright (C) 2004-2013 by Laurent Duveau
 *   Initiated by Laurent Duveau and Nicolas Alves
 *   Web site = https://www.freeguppy.org/
 *   e-mail   = guppy@freeguppy.org
 *   V6 developed by Lud Bienaimé
 *      with the participation of the GuppY Team
 *******************************************************************************
 *   Latest Changes :
 * v6.00.00 (December 15, 2019) : initial release
 ******************************************************************************/

if (stristr($_SERVER['SCRIPT_NAME'], 'hu-speed.inc')) {
    header('location:index.php');
    die();
}

$speed[1] = "Admin - Kapcsolati sebesség minta plugin";
$speed[2] = "A GuppY alapcsomag néhány nagyon egyszerû plugint tartalmaz példaként (a fejlesztõknek), és mint díszítõelemet a GuppY webhelyhez (a webmestereknek).";
$speed[3] = "Ez a teszt kiszámolja egy kép átlagos letöltési idejét a webhelyedrõl a számítógépedre.";
$speed[4] = "Elérhetõsége :";
$speed[5] = "Ez a plugin az ikonsávba van regisztrálva.";
$speed[6] = "Próbáld ki :";
$speed[7] = "Sebességmérés";
$speed[8] = "Sebességmérés plugin regisztrálása az ikonsávba : ";
$speed[9] = "A becslés számítása elkezdõdött...";
$speed[10] = "Nem lehetséges a kapcsolat";
$speed[11] = "28k Modem kapcsolat";
$speed[12] = "56k Modem kapcsolat";
$speed[13] = "Nagy sebességû kapcsolat";
$speed[14] = "Helyi kapcsolat";
$speed[15] = "Kb/sec";
$speed[16] = "A kapcsolat sebességének meghatározása a számítógéped és ezen webhely között";
$speed[17] = "<p>Kattintson a gombra, hogy felmérje a számítógép és a webhely közötti kapcsolat sebességét.</p><p>Ez a teszt csak akkor végez ki értékelést, ha kiszámítja a képnek a webhelyről történő betöltésének átlagos sebességét.</p><p>Az eredmény tehát méri a kép betöltési sebességét egy adott időben. Nyilvánvaló, hogy ha más feltöltések vannak folyamatban, akkor a mérés torzul.</p>";
$speed[18] = "Sebességmérés elindítása";
$speed[19] = "Eredmény :";
$speed[20] = 'Eltávolítás';
$speed[21] = '<strong>FIGYELEM ! Az eltávolítás végleges.</strong><br/>';
?>

<?php
/*******************************************************************************
 *   Plugin Speed
 *******************************************************************************
 *   GuppY PHP Script - version 6.0
 *   CeCILL Copyright (C) 2004-2013 by Laurent Duveau
 *   Initiated by Laurent Duveau and Nicolas Alves
 *   Web site = https://www.freeguppy.org/
 *   e-mail   = guppy@freeguppy.org
 *   V6 developed by Lud Bienaimé
 *      with the participation of the GuppY Team
 *******************************************************************************
 *   Latest Changes :
 * v6.00.00 (December 15, 2019) : initial release
 ******************************************************************************/

if (stristr($_SERVER['SCRIPT_NAME'], 'plugin.inc')) {
    header('location:index.php');
    die();
}

if (is_file(CHEMIN.'plugins/speed/'.$lng.'-speed.inc')) {
    include CHEMIN.'plugins/speed/'.$lng.'-speed.inc';
} else {
    include CHEMIN.'plugins/speed/en-speed.inc';
}

$plugin_bar_name   = $speed[7];
$plugin_bar_url    = $site['URLR'] == 'on' ? 'plugins/speed/'.$lng.'-speedcnt' : 'speed.php?lng='.$lng;
$plugin_bar_icon   = 'speed.gif';
$plugin_bar_anchor = true;
?>

<?php
/*******************************************************************************
 *   Plugin Speed
 *******************************************************************************
 *   GuppY PHP Script - version 6.0
 *   CeCILL Copyright (C) 2004-2013 by Laurent Duveau
 *   Initiated by Laurent Duveau and Nicolas Alves
 *   Web site = https://www.freeguppy.org/
 *   e-mail   = guppy@freeguppy.org
 *   V6 developed by Lud Bienaimé
 *      with the participation of the GuppY Team
 *******************************************************************************
 *   Latest Changes :
 * v6.00.00 (December 15, 2019) : initial release
 ******************************************************************************/

header('Pragma: no-cache');
define("CHEMIN", "../../");
include CHEMIN.'inc/includes.inc';

if (is_file(CHEMIN.'plugins/speed/'.$lng.'-speed.inc')) {
    include CHEMIN.'plugins/speed/'.$lng.'-speed.inc';
} else {
    include CHEMIN.'plugins/speed/en-speed.inc';
}

$headinc .= BeginJavascript().'
var tjs_img;
var tjs_src="'.CHEMIN.'img/robot.gif";
var tjs_size=19925;
var tjs_delai=100;
var tjs_nb=-1;
var tjs_delai_max=20000;
var timer1=0; var timer2=0;
var tjs_fin="";

function Checkkos() {
    tjs_img=new Image();
    timer1=new Date();
    timer1=timer1.getTime();
    tjs_img.src=tjs_src+"?dummy="+timer1;
    tjs_nb=0;
    document.countkos.info.value="'.$speed[9].'";
    setTimeout("Timerkos()",tjs_delai);
}

function Timerkos() {
    var anim="-"
    tjs_nb++;
    document.countkos.info.value="'.$speed[9].'";
    if (tjs_nb*tjs_delai>=tjs_delai_max) {
        tjs_fin=EvalConnexion(0);
        document.countkos.info.value=tjs_fin;
    }
    else {
        if (tjs_img.complete) {
            timer2=new Date(); timer2=timer2.getTime();
            tjs_fin=EvalConnexion(tjs_size/(timer2-timer1));
            document.countkos.info.value=tjs_fin;
        }
        else {
            setTimeout("Timerkos()",tjs_delai);
        }
    }
}

function EvalConnexion(kos) {
    tjs_nb=-1;
    res="";
    if (kos==0) { res="'.$speed[10].'"; }
    if ((kos>0)&&(kos<3)) { res="'.$speed[11].'"; }
    if ((kos>3)&&(kos<6)) { res="'.$speed[12].'"; }
    if ((kos>6)&&(kos<100)) { res="'.$speed[13].'"; }
    if (kos>100) { res="'.$speed[14].'"; }
    kos=Math.round(kos*10)/10;
    return res+" (" + kos +" '.$speed[15].')";
}'.EndJavascript();

$topmess = '<img src="speed.gif" class="img32x32 f-right" alt="" />'.$speed[7];
include CHEMIN.'inc/hpage.inc';
htable($topmess, "100%");

echo '
<h3 class="text-center">'.$speed[16].'</h3>
<p>'.$speed[17].'</p>
<form name="countkos" action="'.CHEMIN.'plugins/speed/'.($site['URLR'] == 'on' ? $lng.'-speedcnt'.$z2 : 'speed.php?lng='.$lng.$z2).'">
  <p class="text-center">'.SubmitButton($speed[18], 'Checkkos(); return false;').'</p>
  <p class="text-center">'.$speed[19].'
  <input type="text" class="form-control texte w-100 m-auto" name="info" style="max-width:340px" /></p>
</form>';

btable();
include CHEMIN.'inc/bpage.inc';
?>