original_string: protected function _packAndWriteCurrentFile()
      {
          $archiveWriter = $this->_getWriter();
          $archiveWriter->write($this->_composeHeader());
  
          $currentFile = $this->_getCurrentFile();
  
          $fileSize = 0;
  
          if (is_file($currentFile) && !is_link($currentFile)) {
              $fileReader = new Mage_Archive_Helper_File($currentFile);
              $fileReader->open('r');
  
              while (!$fileReader->eof()) {
                  $archiveWriter->write($fileReader->read());
              }
  
              $fileReader->close();
  
              $fileSize = filesize($currentFile);
          }
  
          $appendZerosCount = (self::TAR_BLOCK_SIZE - $fileSize % self::TAR_BLOCK_SIZE) % self::TAR_BLOCK_SIZE;
          $archiveWriter->write(str_repeat("\0", $appendZerosCount));
      }
code: protected function _packAndWriteCurrentFile()
      {
          $archiveWriter = $this->_getWriter();
          $archiveWriter->write($this->_composeHeader());
  
          $currentFile = $this->_getCurrentFile();
  
          $fileSize = 0;
  
          if (is_file($currentFile) && !is_link($currentFile)) {
              $fileReader = new Mage_Archive_Helper_File($currentFile);
              $fileReader->open('r');
  
              while (!$fileReader->eof()) {
                  $archiveWriter->write($fileReader->read());
              }
  
              $fileReader->close();
  
              $fileSize = filesize($currentFile);
          }
  
          $appendZerosCount = (self::TAR_BLOCK_SIZE - $fileSize % self::TAR_BLOCK_SIZE) % self::TAR_BLOCK_SIZE;
          $archiveWriter->write(str_repeat("\0", $appendZerosCount));
      }
code_tokens: protected function _packAndWriteCurrentFile ( ) { $ archiveWriter = $ this -> _getWriter ( ) ; $ archiveWriter -> write ( $ this -> _composeHeader ( ) ) ; $ currentFile = $ this -> _getCurrentFile ( ) ; $ fileSize = 0 ; if ( is_file ( $ currentFile ) && ! is_link ( $ currentFile ) ) { $ fileReader = new Mage_Archive_Helper_File ( $ currentFile ) ; $ fileReader -> open ( 'r' ) ; while ( ! $ fileReader -> eof ( ) ) { $ archiveWriter -> write ( $ fileReader -> read ( ) ) ; } $ fileReader -> close ( ) ; $ fileSize = filesize ( $ currentFile ) ; } $ appendZerosCount = ( self :: TAR_BLOCK_SIZE - $ fileSize % self :: TAR_BLOCK_SIZE ) % self :: TAR_BLOCK_SIZE ; $ archiveWriter -> write ( str_repeat ( "\0" , $ appendZerosCount ) ) ; }
docstring: Write current file to tarball
docstring_tokens: Write current file to tarball