testbed/ua_list.php

   1 <?php
   2 $inc_class_util = true;
   3 $inc_class_ua = true;
   4 include('inchandler.inc');
   5
   6 // read string from this file
   7 $uafile = 'ua_list_raw.txt';
   8
   9 $mycss = "th { font-size: 0.75em; }\n";
  10 $mycss .= "td.comment { font-size: 0.75em; text-align: center; font-weight: bold; }\n";
  11 $mycss .= "td.ua { font-size: 0.75em; }\n";
  12
  13 $wrapper->pgtop('User Agents', $mycss);
  14
  15 print('<h1>User Agents</h1>'."\n");
  16
  17 $ualist = is_readable($uafile)?file($uafile):array();
  18
  19 if (count($ualist)) {
  20   print('<table class="border">'."\n");
  21   print(' <tr>'."\n");
  22   print('  <th>User Agent string</th>'."\n");
  23   print('  <th>Brand</th>'."\n");
  24   print('  <th>Version</th>'."\n");
  25   print('  <th>Bot</th>'."\n");
  26   print('  <th>Engine</th>'."\n");
  27   print('  <th>eVer</th>'."\n");
  28   print('  <th>OS</th>'."\n");
  29   print('  <th>Platform</th>'."\n");
  30   print('  <th>Lang</th>'."\n");
  31   print(' </tr>'."\n");
  32
  33   foreach ($ualist as $uastring) {
  34     $uastring = trim($uastring);
  35     if (substr($uastring, 0, 1) == '#') {
  36       // comment
  37       print(' <tr>'."\n");
  38       print('  <td colspan="9" class="comment">'.substr($uastring, 1).'</td>'."\n");
  39       print(' </tr>'."\n");
  40     }
  41     else {
  42       $ua = new userAgent($uastring);
  43       print(' <tr>'."\n");
  44       print('  <td class="ua">'.$ua->getUAString().'</td>'."\n");
  45       print('  <td>'.$ua->getBrand().'</td>'."\n");
  46       print('  <td>'.$ua->getVersion().'</td>'."\n");
  47       print('  <td>'.($ua->isBot()?'x':'-').'</td>'."\n");
  48       print('  <td>'.$ua->getEngine().'</td>'."\n");
  49       print('  <td>'.$ua->getEngineVersion().'</td>'."\n");
  50       print('  <td>'.$ua->getOS().'</td>'."\n");
  51       print('  <td>'.$ua->getPlatform().'</td>'."\n");
  52       print('  <td>'.$ua->getLanguage().'</td>'."\n");
  53       print(' </tr>'."\n");
  54     }
  55   }
  56   print('</table>'."\n");
  57 }
  58 else {
  59   print('No User Agent strings found in file "'.$uafile.'".'."\n");
  60 }
  61
  62 $wrapper->pgbottom();
  63 ?>