Notes on PHP Modules

<?php
  # sending and destination addresses must be verified – 
  # do not transfer from a web form without checking!
  # Typing errors can happen and malicious entries can be made.

  require_once('php/mail.inc');           # defines check_mailadr
  $error = check_mailadr($_POST['to']);   # Checking the form input "to"
  if ($error) {
      echo 'Error in the e-mail address: ' . htmlspecialchars($error);
      exit;
  }

  # The function cannot guarantee that the email address 
  # is 100% correct and a mail arrives there.
  # It is checked whether the address is syntactically correct 
  # and the domain behind the @ exists.
?>

<?php
 require_once('php/mail.inc');    # defines tuc_mail()

 # A recipient
  $to = 'John Doe <john.doe@hrz.tu-chemnitz.de>';
 # For multiple recipients: array() -> will be sent as Bcc
 # $to = array('jane.doe@hrz.tu-chemnitz.de', 'john.doe@hrz.tu-chemnitz.de');

 # Sender, must be from *.tu-chemnitz.de!
  $from = 'Frank Richter <frank.richter@hrz.tu-chemnitz.de>';

 # Subject, possible: Umlauts in UTF-8 or Latin1- (ISO-8859-1)
  $subject = 'PHP test';

 # Content, also here umlauts possible
  $text = 'This is a test message triggered by ' .
          $_SERVER['REMOTE_ADDR'];

# Reply to - not set here:
  $reply_to = '';

  $ok = tuc_mail($to, $from, $subject, $text, $reply_to);

  if ($ok === TRUE)
      echo "E-mail has been sent.";
  else     
      echo "Sending error: " . htmlspecialchars($ok);

?>

<?php
  # TUCAL
  require_once('../../config.inc.en');
  seite(__FILE__);
?>

<h1>Information about user otto</h1>
<p>
<?php
  require_once('php/ldap.inc');
  require_once('php/mail.inc');    # for prot_mailadr
  require_once('php/tel.inc');     # for telnu()

  $info = ldap_userinfo('otto');

  echo '<br />Surname: ' .  htmlspecialchars($info['nachname']);
  echo '<br />First name: '  .  htmlspecialchars($info['vorname']);

  # With spam protection for e-mail address
  echo '<br />E-mail: '   . prot_mailadr($info['mail']);

  # With "click2dial" for local users
  echo '<br />Telephone: '  . telnu($info['tel']);

  echo '<br />Address: ' . htmlspecialchars($info['adresse']);
  echo '<br />Room: ' .    htmlspecialchars($info['raum']);

  echo '</p><p>The complete array supplied by ldap_userinfo() is:</p>';
  echo '<pre>' . print_r($info, true) . '</pre>';
?>

<?php
  # TUCAL
  require_once('../../config.inc.en');
  seite(__FILE__);
?>
<h1>E-mail and telephone directory for 1342… </h1>

<?php
  require_once('php/ldap.inc');
  require_once('php/mail.inc');    #for prot_mailadr
  require_once('php/tel.inc');     # for telnu()

## Here: Search by structure number 1342…
  $infos = ldap_info('ouNumber=1342*');
  # two structure numbers, e.g.
  # $infos = ldap_info('(|(ouNumber=231533)(ouNumber=231531))');

  if (count($infos) <= 0) {
    echo "No result ...";
  } else {
    echo <<<KOPF
 <table class="horizontal"><tr><th>Surname</th><th>First name</th><th>E-mail</th><th>Telephone</th></tr>
KOPF;

    for ($i = 0; $i < count($infos); $i++) {
      echo '<tr>';
      echo '<td>' . htmlspecialchars($infos[$i]['nachname']) . '</td>';
      echo '<td>' . htmlspecialchars($infos[$i]['vorname'])  . '</td>';

      # With spam protection for e-mail address
      echo '<td>' . prot_mailadr($infos[$i]['mail']) . '</td>';

      # With "click2dial" for local users
      echo '<td>' . telnu($infos[$i]['tel']) . '</td>';
      echo "</tr>\n";
    }
    echo "</table>\n";
  }
?>

<?php
  // Author: Jens Pönisch https://www-user.tu-chemnitz.de/~poenisch/
  require_once('FunctionGraph.class.php');

  $graph = new FunctionGraph(600, 400, 10, 5);

  // Function name set and valid? If no, then set empty
  if (isset($_REQUEST['function']) && $graph->valid_func($_REQUEST['function'])) {
    $function = $_REQUEST['function'];
  } else {
    $function = '';
  }

  // cmd switches between image and form
  if (isset($_REQUEST['cmd']) && $_REQUEST['cmd'] == 'img') {
    // Call with parameter img: Calculate image
    header('Content-type: image/png');
    $graph->drawAxes();

    if ($function) {
        $graph->drawFunction($function, 0.01);
    }

    // write image
    $graph->writePNG();
    $graph->destroy();
  } else {
    require_once('../../config.inc.en');
    seite(__FILE__);

    $select = $graph->select_func($function);
    $function_r = rawurlencode($function);
?>

<h1>Example: Graphics with the GD extension</h1>
<p>
  <img alt="" src="gd.php?cmd=img&function=<?php echo $function_r ?>">
</p>
<form action="#" method="post" target="_self">
  <label>new function f(x) = <?php echo $select ?> (x)</label>
  <button type="submit" name="cmd" value="form" style="margin-left:4em"><strong>Send</strong></button>
</form>

<?php
  }
?>

<?php
class FunctionGraph {
  var $x0;
  var $y0;
  var $x1;
  var $y1;
  var $posX0;
  var $posY0;
  var $scale;
  var $img;
  var $bg;
  var $col0;
  var $col1;
  var $funcs = array('sin', 'cos', 'tan');

  function __construct($width, $height, $x1 = 2, $y1 = 2)
  {
    $this->x0 = -$x1;
    $this->y0 = -$y1;
    $this->x1 = $x1;
    $this->y1 = $y1;
    $this->posX0 = $width/2;
    $this->posY0 = $height/2;
    $this->scale = (double)($width-20)/($this->x1-$this->x0);
    $this->img = imagecreate($width, $height);
    $this->bg = imagecolorallocate($this->img, 255, 255, 255);
    $this->col0 = imagecolorallocate($this->img, 0, 0, 0);
    $this->col1 = imagecolorallocate($this->img, 0, 127, 0);
  }

  function valid_func($f = '') {
      return in_array($f, $this->funcs);
  }

  function select_func($f = '') {
    $opts = '';
    foreach ($this->funcs as $func) {
        $opts .= '<option value="' . htmlspecialchars($func) . '"' . ($func == $f ? ' selected' : '') . '>' . $func . '</option>';
    }
    return '<select name="function">' . $opts . '</select>';
  }

  function drawAxes() {
    imageline($this->img, $this->posX0 + (int)($this->x0*$this->scale)-2,
                          $this->posY0,
                          $this->posX0 + (int)($this->x1*$this->scale)+2,
              $this->posY0, $this->col0);
    imageline($this->img, $this->posX0,
                          $this->posY0 - (int)($this->y0*$this->scale)+2,
                          $this->posX0,
              $this->posY0 - (int)($this->y1*$this->scale)-2, $this->col0);
    for ($x = 1; $x <= $this->x1; $x += 1) {
      imageline($this->img, $this->posX0+(int)($x*$this->scale),
                            $this->posY0-3,
                        $this->posX0+(int)($x*$this->scale),
                $this->posY0+3, $this->col0);
      imageline($this->img, $this->posX0-(int)($x*$this->scale),
                            $this->posY0-3,
                        $this->posX0-(int)($x*$this->scale),
                $this->posY0+3, $this->col0);
    }
    for ($y = 1; $y <= $this->y1; $y += 1) {
      imageline($this->img, $this->posX0-3,
                            $this->posY0-(int)($y*$this->scale),
                            $this->posX0+3,
                $this->posY0-(int)($y*$this->scale), $this->col0);
      imageline($this->img, $this->posX0-3,
                            $this->posY0+(int)($y*$this->scale),
                            $this->posX0+3,
                $this->posY0+(int)($y*$this->scale), $this->col0);
    }
  }

  function drawFunction($function, $dx = 0.1) {
    $xold = $x = $this->x0;
    # eval("\$yold=".$function.";");
    $yold = $function($x);
    # echo "$function.$yold.";
    for ($x += $dx; $x <= $this->x1; $x += $dx) {
      # eval("\$y = ".$function.";");
      $y = $function($x);
      imageline($this->img, $this->posX0+(int)($xold*$this->scale),
                            $this->posY0-(int)($yold*$this->scale),
                            $this->posX0+(int)($x*$this->scale),
                $this->posY0-(int)($y*$this->scale), $this->col1);
      $xold = $x;
      $yold = $y;
    }
  }

  function writePNG() {
    imagepng($this->img);
  }

  function destroy() {
    imagedestroy($this->img);
  }
}