enable rrdstat L10n
[php-utility-classes.git] / testbed / ua_test.php
1 <?php
2 $inc_class_util = true;
3 $inc_class_ua = true;
4 include("inchandler.inc");
5
6 $wrapper->pgtop("KaiRo's Browser-Test");
7
8 $httpvars = $util->getHTTPvars();
9 if (strlen($httpvars["ua"])) {
10   $ua = new userAgent($httpvars["ua"]);
11 }
12 else {
13   $ua = new userAgent;
14 }
15
16 print("<h1>KaiRo's Browser-Test</h1>\n");
17
18 print("I read the following user agent string from ".(strlen($httpvars["ua"])?"your input":"your browser").":\n<br>");
19 print("<b>".$ua->uastring."</b>\n");
20
21 print("<br><br>This is <b>".($ua->isns()?"a":"no")."</b> Netscape browser.\n");
22 print("<br>This is <b>".($ua->isns4()?"a":"no")."</b> Netscape Communicator 4 browser.\n");
23 print("<br>This is <b>".($ua->isie()?"an":"no")."</b> Internet Explorer browser.\n");
24 print("<br>This is <b>".($ua->geckobased()?"a":"no")."</b> Gecko-based browser.\n");
25 print("<br>This is <b>".($ua->khtmlbased()?"a":"no")."</b> KHTML-based browser.\n");
26 print("<br>This is <b>".($ua->isbot()?"an":"no")."</b> automated robot.\n");
27 print("<br>The browser brand is reported as &quot;<b>".$ua->getBrand()."</b>&quot;\n");
28 print("<br>The browser version is reported as &quot;<b>".$ua->getVersion()."</b>&quot;\n");
29 if ($ua->geckobased()) { print("<br>The Gecko date is reported as &quot;<b>".$ua->geckodate()."</b>&quot;\n"); }
30 print("<br><br>I conclude this must be <b>".$ua->getBrand()." ".$ua->getVersion()."</b>\n");
31
32 print("<br><br>Test the following UA string (leave empty to read it from your browser):\n");
33 print("<form method=\"POST\" action=\"\"><p>\n");
34 print("<input type=\"text\" name=\"ua\" value=\"".$ua->uastring."\" size=\"80\" maxlength=\"150\">\n");
35 print("<br><input type=\"submit\" value=\"Test\"></p></form>\n");
36
37 $wrapper->pgbottom();
38 ?>