root/original/common/class.parser.php

<?
  require_once( "class.alliance.php" );
  require_once( "class.corp.php" );
  require_once( "class.pilot.php" );
  require_once( "class.kill.php" );
  require_once( "class.item.php" );

  class Parser
  {

    function Parser( $killmail )
    {
      $this->killmail_ = trim( str_replace( "\r", "", $killmail ) );

      if ( strpos( $this->killmail_, "**** Truncated - mail is too large ****" ) > 0 ) {
        $this->killmail_ = str_replace( "**** Truncated - mail is too large ****", "", $this->killmail_ );
      }

//      if ( strpos( $this->killmail_, "Empty." ) > 0 ) {
//        $this->killmail_ = str_replace( "Empty.\n", "", $this->killmail_ );
//      }

    }

    function parse( $checkauth = true )
    {
      // header
      $involvedpos = strpos( $this->killmail_, "Involved parties:" );

      $header = substr( $this->killmail_, 0, $involvedpos );
      $timestamp = substr( $header, 0, 16 );
      preg_match( "/Victim: (.*)/", $header, $matches );
      $victimname = trim( $matches[1] );
      preg_match( "/Alliance: (.*)/", $header, $matches );
      $alliancename = trim( $matches[1] );
      preg_match( "/Corp: (.*)/", $header, $matches );
      $corpname = trim( $matches[1] );
      preg_match( "/Destroyed: (.*)/", $header, $matches );
      $shipname = trim( $matches[1] );
      preg_match( "/System: (.*)/", $header, $matches );
      $systemname = trim( $matches[1] );
      preg_match( "/Security: (.*)/", $header, $matches );
      $systemsec = trim( $matches[1] );

      if ( strlen( $timestamp ) < 1 || 
           strlen( $alliancename ) < 1 || 
           strlen( $corpname ) < 1 || 
           strlen( $victimname ) < 1 || 
           strlen( $shipname ) < 1 || 
           strlen( $systemname ) < 1 || 
           strlen( $systemsec ) < 1 )
        return 0;

      if ( $checkauth )
        $authorized = false;
      else
        $authorized = true;

      // populate/update database
      $alliance = new Alliance();
      $alliance->add( $alliancename );
      $corp = new Corporation();
      $corp->add( $corpname, $alliance, $timestamp );
      $victim = new Pilot();
      $victim->add( $victimname, $corp, $timestamp );
      $system = new SolarSystem();
      $system->lookup( $systemname );
      $ship = new Ship();
      $ship->lookup( $shipname );
      $kill = new Kill();
      $kill->setTimeStamp( $timestamp );
      $kill->setVictimID( $victim->getID() );
      $kill->setVictimCorpID( $corp->getID() );
      $kill->setVictimAllianceID( $alliance->getID() );
      $kill->setVictimShip( $ship );
      $kill->setSolarSystem( $system );

      if ( ALLIANCE_ID != 0 && $alliance->getID() == ALLIANCE_ID )
        $authorized = true;
      elseif ( CORP_ID != 0 ) {
        $corps = explode( ",", CORP_ID );
        foreach( $corps as $checkcorp ) {
          if ( $corp->getID() == $checkcorp )
            $authorized = true;
        }
      }

      // involved
      $end = strpos( $this->killmail_, "Destroyed items:" );
      if ( $end == 0 ) $end = strlen( $this->killmail_ );
      $involved = explode( "\n", trim( substr( $this->killmail_, strpos( $this->killmail_, "Involved parties:" ) + 17, $end  - ( strpos( $this->killmail_, "Involved parties:" ) + 17 ) )  ) );

      $i = 0;

      $order = 0;
      while ( $i < count( $involved ) ) {
        if ( $involved[$i] == "" )
          $i++;

        preg_match( "/Name: (.*)/", $involved[$i], $matches );
        $ipname = $matches[1];
        preg_match( "/(.*) \(laid the final blow\)/", $ipname, $matches );
        if ( $matches[1] ) {
          $ipname = $matches[1];
          $finalblow = 1;
        } else $finalblow = 0;

        preg_match( "/Security: (.*)/", $involved[$i+1], $matches );
        $secstatus = $matches[1];

        if ( $secstatus == "" ) { // NPC or POS
          $secstatus = "0.0";
          preg_match( "/(.*) \/ (.*)/", $ipname, $pmatches );
          $ipname = $pmatches[1];
          $icname = $pmatches[2];
          $isname = "Unknown";
          $iwname = $pmatches[1];
          $tmpcorp = new Corporation();
          $tmpcorp->lookup( $icname );
          $tmpall = $tmpcorp->getAlliance();
          if ( $tmpcorp->getID() )
            $ianame = $tmpall->getName();
          else
            $ianame = "None";

          $i++;
        }
        else {
          preg_match( "/Alliance: (.*)/", $involved[$i+2], $matches );
          $ianame = $matches[1];

          preg_match( "/Corp: (.*)/", $involved[$i+3], $matches );
          $icname = $matches[1];

          preg_match( "/Ship: (.*)/", $involved[$i+4], $matches );
          $isname = $matches[1];

          preg_match( "/Weapon: (.*)/", $involved[$i+5], $matches );
          $iwname = $matches[1];
          $i += 6;
        }

        $ialliance = new Alliance();
        $ialliance->add( $ianame );
        $icorp = new Corporation();
        $icorp->add( $icname, $ialliance, $kill->getTimeStamp() );

        if ( ALLIANCE_ID != 0 && $ialliance->getID() == ALLIANCE_ID )
          $authorized = true;
        elseif ( CORP_ID != 0 ) {
          $corps = explode( ",", CORP_ID );
          foreach( $corps as $corp ) {
            if ( $icorp->getID() == $corp )
              $authorized = true;
          }
        }

        $ipilot = new Pilot();
        $ipilot->add( $ipname, $icorp, $timestamp );
        $iship = new Ship();
        $iship->lookup( $isname );
        $iweapon = new Item();
        $iweapon->lookup( $iwname );

        $iparty = new InvolvedParty( $ipilot->getID(), $icorp->getID(),
                                     $ialliance->getID(), $secstatus,
                                     $iship, $iweapon );
        $kill->addInvolvedParty( $iparty );
        
        if ( $finalblow == 1 ) {
          $kill->setFBPilotID( $ipilot->getID() );
          $kill->setFBCorpID( $icorp->getID() );
          $kill->setFBAllianceID( $ialliance->getID() );
        }
      }

      // destroyed items
      $destroyedpos = strpos( $this->killmail_, "Destroyed items:" );

      if ( $destroyedpos > 0 ) {
        $destroyed = explode( "\n", trim( substr( $this->killmail_, 
                              strpos( $this->killmail_, "Destroyed items:" ) + 16,
                            strlen( $this->killmail_ )  - ( strpos( $this->killmail_, "Destroyed items:" ) + 16 ) )  ) );

        $i=0;
        while ( $i < count( $destroyed ) ) {
          if ( $destroyed[$i] == "" )
            $i++;

          if ( $destroyed[$i] == "Empty." ) {
            $container = false;
            $i++;
          }

          $qtypos = 0;
          $locpos = 0;
          $itemname = "";
          $quantity = "";
          $location = "";

          if ( strpos( $destroyed[$i], "Container" ) > 0 &&
               strpos( $destroyed[$i+1], "(" ) <= 0 &&
               strpos( $destroyed[$i+1], "Empty." ) <= 0 )
            $container = true;

          $qtypos = strpos( $destroyed[$i], ", Qty: " );
          $locpos = strpos( $destroyed[$i], "(" );

          if ( $qtypos <= 0 && !$locpos ) {
            $itemlen = strlen( $destroyed[$i] );
            if ( $container ) $location = "Cargo";
          }

          if ( $qtypos > 0 && !$locpos ) {
            $itemlen = $qtypos;
            $qtylen = strlen( $destroyed[$i] ) - $qtypos;
            if ( $container ) $location = "Cargo";
          }
          if ( $locpos > 0 && $qtypos <= 0 ) {
            $itemlen = $locpos - 1;
            $qtylen = 0;
            $loclen = strlen( $destroyed[$i] ) - $locpos - 2;
            if ( !$locpos ) $container = false;
          }
          if ( $locpos > 0 && $qtypos > 0 ) {
            $itemlen = $qtypos;
            $qtylen = $locpos - $qtypos - 7;
            $loclen = strlen( $destroyed[$i] ) - $locpos - 2;
            if ( !$locpos ) $container = false;
          }

          $itemname = substr( $destroyed[$i], 0, $itemlen );
          if ( $qtypos ) $quantity = substr( $destroyed[$i], $qtypos + 6, $qtylen );
          if ( $locpos ) $location = substr( $destroyed[$i], $locpos + 1, $loclen );
          
          if ( $quantity == "" )
            $quantity = 1;

          //echo $container." - ".$item." - ".$quantity." - ".$location."<br>";

          $item = new Item();
          $item->lookup( trim( $itemname ) );
          $ditem = new DestroyedItem( $item, $quantity, $location );
          $kill->addDestroyedItem( $ditem );

          $i++;
        }
      } 

      if ( !$authorized )
        return -2;

      $id = $kill->add();
      if ( $id == -1 )
        $this->dupeid_ = $kill->dupeid_;

      return $id;
    }
  }
?>