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->getUAString()."</b>\n");
  20
  21 print("<br><br>The browser brand is reported as &quot;<b>".$ua->getBrand()."</b>&quot;\n");
  22 print("<br>The browser version is reported as &quot;<b>".$ua->getVersion()."</b>&quot;\n");
  23 print("<br>The browser engine is reported as &quot;<b>".$ua->getEngine()."</b>&quot;\n");
  24 print("<br>The engine version is reported as &quot;<b>".$ua->getEngineVersion()."</b>&quot;\n");
  25 print("<br>The operating system is reported as &quot;<b>".$ua->getOS()."</b>&quot;\n");
  26 print("<br>The system platform is reported as &quot;<b>".$ua->getPlatform()."</b>&quot;\n");
  27 print("<br>The browser language is reported as &quot;<b>".$ua->getLanguage()."</b>&quot;\n");
  28 if ($ua->geckobased()) { print("<br>The Gecko date is reported as &quot;<b>".$ua->getGeckoDate()."</b>&quot;\n"); }
  29 print("<br><br>I conclude this must be <b>".$ua->getBrand()." ".$ua->getVersion()."</b>\n");
  30 print("<br>This is <b>".($ua->isBot()?"an":"no")."</b> automated robot.\n");
  31
  32 $acclang = $ua->getAcceptLanguages();
  33 print("<br><br>Accepted Languages: ");
  34 foreach ($acclang as $lang=>$q) { print($lang."(".$q.") "); }
  35 print("\n");
  36
  37 print("<br><br>Test the following UA string (leave empty to read it from your browser):\n");
  38 print("<form method=\"POST\" action=\"\"><p>\n");
  39 print("<input type=\"text\" name=\"ua\" value=\"".htmlentities($ua->uastring)."\" size=\"80\" maxlength=\"150\">\n");
  40 print("<br><input type=\"submit\" value=\"Test\"></p></form>\n");
  41 $wrapper->pgbottom();
  42 ?>