upload_corelog.php

<?php

date_default_timezone_set('America/Los_Angeles');
$month =  date('Ym');
$uploadPlace_ = '/home/MM/corelogUploads/' . $month;
if (!file_exists($uploadPlace_)) 
{
   mkdir($uploadPlace_, 0750);
}

if ($_FILES['file']['error'] > 0)
{
  echo 'Return Code: ' . $_FILES['file']['error'] . '<br />';
}
else
{
   // echo 'Upload: ' . $_FILES['file']['name'] . '<br />';
   // echo 'Type: ' . $_FILES['file']['type'] . '<br />';
   // echo 'Size: ' . ($_FILES['file']['size'] / 1024) . ' Kb<br />';
   // echo 'Temp file: ' . $_FILES['file']['tmp_name'] . '<br />';
   $ipaddress = getenv(REMOTE_ADDR);

   if (strlen($_FILES['file']['name']) < 1) {
      return;
   }

   $opath = $uploadPlace_ . '/'. $_FILES['file']['name'] . '_' . $ipaddress;

   if (file_exists($opath . '.uu' ))
   {
      echo $_FILES['file']['name'] . ' already exists. ';
   }
   else
   {
      move_uploaded_file($_FILES['file']['tmp_name'],
      $opath . '.uu');
      echo 'Stored in: ' . $opath . '.uu  <br />';
      $dcommand = 'uudecode -o ' . $opath . '.gz ' . $opath . '.uu';
      echo 'decode command: ' . $dcommand . '<br />';
      exec( $dcommand);
      $gcommand = 'gzip -d ' . $opath . '.gz';
      echo 'gzip command:  ' . $gcommand . '<br />';
      exec( $gcommand);
      $rcommand = 'rm ' . $opath . '.uu';
      exec( $rcommand);

      $mess = $opath . "\n" ;
      // extract beginning of report
      $rhandle = fopen( $opath, 'r');
      $lineCount = 0;
      if ($rhandle){
      while(! feof($rhandle) ){
           $line = fgets($rhandle);
           $username_tag = "#User Name:";
           if (strcmp(substr($line, 0, strlen($username_tag)), $username_tag) == 0)
              $username = trim(substr($line, strlen($username_tag), 36));
           $user_email_tag = "#User e-mail:";
           if (strcmp(substr($line, 0, strlen($user_email_tag)), $user_email_tag) == 0)
              $user_email = trim(substr($line, strlen($user_email_tag), 256));
           $mess = $mess . rtrim($line) . "\n";
           $lineCount = $lineCount + 1;
           if( 10000 < $lineCount)
               break 1;
           }
       } 
       fclose($rhandle);
       
       $subject = "New Problem Report: " . date("Y-m-d") . " " . $username;
       $header = "Reply-To: ".$user_email."\r\n";
       mail('info@micro-manager.org', $subject, $mess, $header);

   }// uploaded .uu was found
} // FILES was parsed
?>