!C99Shell v. 1.0 pre-release build #13!

Software: Apache. PHP/5.5.15 

uname -a: Windows NT SVR-DMZ 6.1 build 7600 (Windows Server 2008 R2 Enterprise Edition) i586 

SYSTEM 

Safe-mode: OFF (not secure)

E:\copia nuevo\php\pear\PHP\CodeSniffer\Standards\Squiz\Sniffs\Commenting\   drwxrwxrwx
Free 7.98 GB of 239.26 GB (3.34%)
Detected drives: [ a ] [ c ] [ d ] [ e ] [ f ]
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     FileCommentSniff.php (23.87 KB)      -rw-rw-rw-
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
<?php
/**
 * Parses and verifies the file doc comment.
 *
 * PHP version 5
 *
 * @category  PHP
 * @package   PHP_CodeSniffer
 * @author    Greg Sherwood <gsherwood@squiz.net>
 * @author    Marc McIntyre <mmcintyre@squiz.net>
 * @copyright 2006-2011 Squiz Pty Ltd (ABN 77 084 670 600)
 * @license   http://matrix.squiz.net/developer/tools/php_cs/licence BSD Licence
 * @link      http://pear.php.net/package/PHP_CodeSniffer
 */

if (class_exists('PHP_CodeSniffer_CommentParser_ClassCommentParser'true) === false) {
    throw new 
PHP_CodeSniffer_Exception('Class PHP_CodeSniffer_CommentParser_ClassCommentParser not found');
}

/**
 * Parses and verifies the file doc comment.
 *
 * Verifies that :
 * <ul>
 *  <li>A file doc comment exists.</li>
 *  <li>There is no blank line between the open tag and the file comment.</li>
 *  <li>Short description ends with a full stop.</li>
 *  <li>There is a blank line after the short description.</li>
 *  <li>Each paragraph of the long description ends with a full stop.</li>
 *  <li>There is a blank line between the description and the tags.</li>
 *  <li>Check the order, indentation and content of each tag.</li>
 *  <li>There is exactly one blank line after the file comment.</li>
 * </ul>
 *
 * @category  PHP
 * @package   PHP_CodeSniffer
 * @author    Greg Sherwood <gsherwood@squiz.net>
 * @author    Marc McIntyre <mmcintyre@squiz.net>
 * @copyright 2006-2011 Squiz Pty Ltd (ABN 77 084 670 600)
 * @license   http://matrix.squiz.net/developer/tools/php_cs/licence BSD Licence
 * @version   Release: 1.3.3
 * @link      http://pear.php.net/package/PHP_CodeSniffer
 */

class Squiz_Sniffs_Commenting_FileCommentSniff implements PHP_CodeSniffer_Sniff
{

    
/**
     * A list of tokenizers this sniff supports.
     *
     * @var array
     */
    
public $supportedTokenizers = array(
                                   
'PHP',
                                   
'JS',
                                  );

    
/**
     * The header comment parser for the current file.
     *
     * @var PHP_CodeSniffer_Comment_Parser_ClassCommentParser
     */
    
protected $commentParser null;

    
/**
     * The current PHP_CodeSniffer_File object we are processing.
     *
     * @var PHP_CodeSniffer_File
     */
    
protected $currentFile null;


    
/**
     * Returns an array of tokens this test wants to listen for.
     *
     * @return array
     */
    
public function register()
    {
        return array(
T_OPEN_TAG);

    }
//end register()


    /**
     * Processes this test, when one of its tokens is encountered.
     *
     * @param PHP_CodeSniffer_File $phpcsFile The file being scanned.
     * @param int                  $stackPtr  The position of the current token
     *                                        in the stack passed in $tokens.
     *
     * @return void
     */
    
public function process(PHP_CodeSniffer_File $phpcsFile$stackPtr)
    {
        
$this->currentFile $phpcsFile;

        
// We are only interested if this is the first open tag.
        
if ($stackPtr !== 0) {
            if (
$phpcsFile->findPrevious(T_OPEN_TAG, ($stackPtr 1)) !== false) {
                return;
            }
        }

        
$tokens $phpcsFile->getTokens();

        
$errorToken = ($stackPtr 1);
        if (isset(
$tokens[$errorToken]) === false) {
            
$errorToken--;
        }

        
// Find the next non whitespace token.
        
$commentStart $phpcsFile->findNext(T_WHITESPACE, ($stackPtr 1), nulltrue);

        if (
$tokens[$commentStart]['code'] === T_CLOSE_TAG) {
            
// We are only interested if this is the first open tag.
            
return;
        } else if (
$tokens[$commentStart]['code'] === T_COMMENT) {
            
$phpcsFile->addError('You must use "/**" style comments for a file comment'$errorToken'WrongStyle');
            return;
        } else if (
$commentStart === false || $tokens[$commentStart]['code'] !== T_DOC_COMMENT) {
            
$phpcsFile->addError('Missing file doc comment'$errorToken'Missing');
            return;
        }

        
// Extract the header comment docblock.
        
$commentEnd = ($phpcsFile->findNext(T_DOC_COMMENT, ($commentStart 1), nulltrue) - 1);

        
// Check if there is only 1 doc comment between the open tag and class token.
        
$nextToken   = array(
                        
T_ABSTRACT,
                        
T_CLASS,
                        
T_DOC_COMMENT,
                       );

        
$commentNext $phpcsFile->findNext($nextToken, ($commentEnd 1));
        if (
$commentNext !== false && $tokens[$commentNext]['code'] !== T_DOC_COMMENT) {
            
// Found a class token right after comment doc block.
            
$newlineToken $phpcsFile->findNext(T_WHITESPACE, ($commentEnd 1), $commentNextfalse$phpcsFile->eolChar);
            if (
$newlineToken !== false) {
                
$newlineToken $phpcsFile->findNext(T_WHITESPACE, ($newlineToken 1), $commentNextfalse$phpcsFile->eolChar);
                if (
$newlineToken === false) {
                    
// No blank line between the class token and the doc block.
                    // The doc block is most likely a class comment.
                    
$phpcsFile->addError('Missing file doc comment'$errorToken'Missing');
                    return;
                }
            }
        }

        
// No blank line between the open tag and the file comment.
        
$blankLineBefore $phpcsFile->findNext(T_WHITESPACE, ($stackPtr 1), nullfalse$phpcsFile->eolChar);
        if (
$blankLineBefore !== false && $blankLineBefore $commentStart) {
            
$error 'Extra newline found after the open tag';
            
$phpcsFile->addError($error$stackPtr'SpacingAfterOpen');
        }

        
// Exactly one blank line after the file comment.
        
$nextTokenStart $phpcsFile->findNext(T_WHITESPACE, ($commentEnd 1), nulltrue);
        if (
$nextTokenStart !== false) {
            
$blankLineAfter 0;
            for (
$i = ($commentEnd 1); $i $nextTokenStart$i++) {
                if (
$tokens[$i]['code'] === T_WHITESPACE && $tokens[$i]['content'] === $phpcsFile->eolChar) {
                    
$blankLineAfter++;
                }
            }

            if (
$blankLineAfter !== 2) {
                
$error 'There must be exactly one blank line after the file comment';
                
$phpcsFile->addError($error, ($commentEnd 1), 'SpacingAfterComment');
            }
        }

        
$commentString $phpcsFile->getTokensAsString($commentStart, ($commentEnd $commentStart 1));

        
// Parse the header comment docblock.
        
try {
            
$this->commentParser = new PHP_CodeSniffer_CommentParser_ClassCommentParser($commentString$phpcsFile);
            
$this->commentParser->parse();
        } catch (
PHP_CodeSniffer_CommentParser_ParserException $e) {
            
$line = ($e->getLineWithinComment() + $commentStart);
            
$phpcsFile->addError($e->getMessage(), $line'Exception');
            return;
        }

        
$comment $this->commentParser->getComment();
        if (
is_null($comment) === true) {
            
$error 'File doc comment is empty';
            
$phpcsFile->addError($error$commentStart'Empty');
            return;
        }

        
// The first line of the comment should just be the /** code.
        
$eolPos    strpos($commentString$phpcsFile->eolChar);
        
$firstLine substr($commentString0$eolPos);
        if (
$firstLine !== '/**') {
            
$error 'The open comment tag must be the only content on the line';
            
$phpcsFile->addError($error$commentStart'ContentAfterOpen');
        }

        
// No extra newline before short description.
        
$short        $comment->getShortComment();
        
$newlineCount 0;
        
$newlineSpan  strspn($short$phpcsFile->eolChar);
        if (
$short !== '' && $newlineSpan 0) {
            
$error 'Extra newline(s) found before file comment short description';
            
$phpcsFile->addError($error, ($commentStart 1), 'SpacingBeforeShort');
        }

        
$newlineCount = (substr_count($short$phpcsFile->eolChar) + 1);

        
// Exactly one blank line between short and long description.
        
$long $comment->getLongComment();
        if (empty(
$long) === false) {
            
$between        $comment->getWhiteSpaceBetween();
            
$newlineBetween substr_count($between$phpcsFile->eolChar);
            if (
$newlineBetween !== 2) {
                
$error 'There must be exactly one blank line between descriptions in file comment';
                
$phpcsFile->addError($error, ($commentStart $newlineCount 1), 'SpacingBetween');
            }

            
$newlineCount += $newlineBetween;

            
$testLong trim($long);
            if (
preg_match('|[A-Z]|'$testLong[0]) === 0) {
                
$error 'File comment long description must start with a capital letter';
                
$phpcsFile->addError($error, ($commentStart $newlineCount), 'LongNotCaptial');
            }
        }
//end if

        // Exactly one blank line before tags.
        
$tags $this->commentParser->getTagOrders();
        if (
count($tags) > 1) {
            
$newlineSpan $comment->getNewlineAfter();
            if (
$newlineSpan !== 2) {
                
$error 'There must be exactly one blank line before the tags in file comment';
                if (
$long !== '') {
                    
$newlineCount += (substr_count($long$phpcsFile->eolChar) - $newlineSpan 1);
                }

                
$phpcsFile->addError($error, ($commentStart $newlineCount), 'SpacingBeforeTags');
                
$short rtrim($short$phpcsFile->eolChar.' ');
            }
        }

        
// Short description must be single line and end with a full stop.
        
$testShort trim($short);
        
$lastChar  $testShort[(strlen($testShort) - 1)];
        if (
substr_count($testShort$phpcsFile->eolChar) !== 0) {
            
$error 'File comment short description must be on a single line';
            
$phpcsFile->addError($error, ($commentStart 1), 'ShortSingleLine');
        }

        if (
preg_match('|[A-Z]|'$testShort[0]) === 0) {
            
$error 'File comment short description must start with a capital letter';
            
$phpcsFile->addError($error, ($commentStart 1), 'ShortNotCapital');
        }

        if (
$lastChar !== '.') {
            
$error 'File comment short description must end with a full stop';
            
$phpcsFile->addError($error, ($commentStart 1), 'ShortFullStop');
        }

        
// Check for unknown/deprecated tags.
        
$unknownTags $this->commentParser->getUnknown();
        foreach (
$unknownTags as $errorTag) {
            
// Unknown tags are not parsed, do not process further.
            
$error '@%s tag is not allowed in file comment';
            
$data  = array($errorTag['tag']);
            
$phpcsFile->addWarning($error, ($commentStart $errorTag['line']), 'TagNotAllowed'$data);
        }

        
// Check each tag.
        
$this->processTags($commentStart$commentEnd);

        
// The last content should be a newline and the content before
        // that should not be blank. If there is more blank space
        // then they have additional blank lines at the end of the comment.
        
$words   $this->commentParser->getWords();
        
$lastPos = (count($words) - 1);
        if (
trim($words[($lastPos 1)]) !== ''
            
|| strpos($words[($lastPos 1)], $this->currentFile->eolChar) === false
            
|| trim($words[($lastPos 2)]) === ''
        
) {
            
$error 'Additional blank lines found at end of file comment';
            
$this->currentFile->addError($error$commentEnd'SpacingAfter');
        }

    }
//end process()


    /**
     * Processes each required or optional tag.
     *
     * @param int $commentStart The position in the stack where the comment started.
     * @param int $commentEnd   The position in the stack where the comment ended.
     *
     * @return void
     */
    
protected function processTags($commentStart$commentEnd)
    {
        
// Required tags in correct order.
        
$tags = array(
                 
'package'    => 'precedes @subpackage',
                 
'subpackage' => 'follows @package',
                 
'author'     => 'follows @subpackage',
                 
'copyright'  => 'follows @author',
                 
'license'    => 'follows @copyright',
                );

        
$foundTags   $this->commentParser->getTagOrders();
        
$errorPos    0;
        
$orderIndex  0;
        
$longestTag  0;
        
$indentation = array();
        foreach (
$tags as $tag => $orderText) {

            
// Required tag missing.
            
if (in_array($tag$foundTags) === false) {
                
$error 'Missing @%s tag in file comment';
                
$data  = array($tag);
                
$this->currentFile->addError($error$commentEnd'MissingTag'$data);
                continue;
            }

            
// Get the line number for current tag.
            
$tagName ucfirst($tag);
            if (
$tagName === 'Author' || $tagName === 'Copyright') {
                
// These tags are different because they return an array.
                
$tagName .= 's';
            }

            
// Work out the line number for this tag.
            
$getMethod  'get'.$tagName;
            
$tagElement $this->commentParser->$getMethod();
            if (
is_null($tagElement) === true || empty($tagElement) === true) {
                continue;
            } else if (
is_array($tagElement) === true && empty($tagElement) === false) {
                
$tagElement $tagElement[0];
            }

            
$errorPos = ($commentStart $tagElement->getLine());

            
// Make sure there is no duplicate tag.
            
$foundIndexes array_keys($foundTags$tag);
            if (
count($foundIndexes) > 1) {
                
$error 'Only 1 @%s tag is allowed in file comment';
                
$data  = array($tag);
                
$this->currentFile->addError($error$errorPos'DuplicateTag'$data);
            }

            
// Check tag order.
            
if ($foundIndexes[0] > $orderIndex) {
                
$orderIndex $foundIndexes[0];
            } else {
                
$error 'The @%s tag is in the wrong order; the tag %s';
                
$data  = array(
                          
$tag,
                          
$orderText,
                         );
                
$this->currentFile->addError($error$errorPos'TagOrder'$data);
            }

            
// Store the indentation of each tag.
            
$len strlen($tag);
            if (
$len $longestTag) {
                
$longestTag $len;
            }

            
$indentation[] = array(
                              
'tag'      => $tag,
                              
'errorPos' => $errorPos,
                              
'space'    => $this->getIndentation($tag$tagElement),
                             );

            
$method 'process'.$tagName;
            if (
method_exists($this$method) === true) {
                
// Process each tag if a method is defined.
                
call_user_func(array($this$method), $errorPos);
            } else {
                
$tagElement->process($this->currentFile$commentStart'file');
            }
        }
//end foreach

        // Check tag indentation.
        
foreach ($indentation as $indentInfo) {
            
$tagName ucfirst($indentInfo['tag']);
            if (
$tagName === 'Author') {
                
$tagName .= 's';
            }

            if (
$indentInfo['space'] !== && $indentInfo['space'] !== ($longestTag 1)) {
                
$expected = ($longestTag strlen($indentInfo['tag']) + 1);
                
$space    = ($indentInfo['space'] - strlen($indentInfo['tag']));
                
$error    '@%s tag comment indented incorrectly; expected %s spaces but found %s';
                
$data     = array(
                             
$indentInfo['tag'],
                             
$expected,
                             
$space,
                            );
                
$this->currentFile->addError($error$indentInfo['errorPos'], 'TagIndent'$data);
            }
        }

    }
//end processTags()


    /**
     * Get the indentation information of each tag.
     *
     * @param string                                   $tagName    The name of the doc comment element.
     * @param PHP_CodeSniffer_CommentParser_DocElement $tagElement The doc comment element.
     *
     * @return void
     */
    
protected function getIndentation($tagName$tagElement)
    {
        if (
$tagElement instanceof PHP_CodeSniffer_CommentParser_SingleElement) {
            if (
$tagElement->getContent() !== '') {
                return (
strlen($tagName) + substr_count($tagElement->getWhitespaceBeforeContent(), ' '));
            }
        } else if (
$tagElement instanceof PHP_CodeSniffer_CommentParser_PairElement) {
            if (
$tagElement->getValue() !== '') {
                return (
strlen($tagName) + substr_count($tagElement->getWhitespaceBeforeValue(), ' '));
            }
        }

        return 
0;

    }
//end getIndentation()


    /**
     * The package name must be camel-cased.
     *
     * @param int $errorPos The line number where the error occurs.
     *
     * @return void
     */
    
protected function processPackage($errorPos)
    {
        
$package $this->commentParser->getPackage();
        if (
$package !== null) {
            
$content $package->getContent();
            if (empty(
$content) === true) {
                
$error 'Content missing for @package tag in file comment';
                
$this->currentFile->addError($error$errorPos'MissingPackage');
            } else if (
PHP_CodeSniffer::isUnderscoreName($content) !== true) {
                
// Package name must be properly camel-cased.
                
$nameBits explode('_'str_replace(' '''$content));
                
$firstBit array_shift($nameBits);
                
$newName  strtoupper($firstBit{0}).substr($firstBit1).'_';
                foreach (
$nameBits as $bit) {
                    
$newName .= strtoupper($bit{0}).substr($bit1).'_';
                }

                
$error 'Package name "%s" is not valid; consider "%s" instead';
                
$data  = array(
                          
$content,
                          
trim($newName'_'),
                         );
                
$this->currentFile->addError($error$errorPos'IncorrectPackage'$data);
            } else if (
strpos($content'Squiz') === 0) {
                
// Package name must not start with Squiz.
                
$newName substr($content5);
                
$error   'Package name "%s" is not valid; consider "%s" instead';
                
$data    = array(
                            
$content,
                            
$newName,
                           );
                
$this->currentFile->addError($error$errorPos'SquizPackage'$data);
            }
        }

    }
//end processPackage()


    /**
     * The subpackage name must be camel-cased.
     *
     * @param int $errorPos The line number where the error occurs.
     *
     * @return void
     */
    
protected function processSubpackage($errorPos)
    {
        
$subpackage $this->commentParser->getSubpackage();
        if (
$subpackage !== null) {
            
$content $subpackage->getContent();
            if (empty(
$content) === true) {
                
$error 'Content missing for @subpackage tag in file comment';
                
$this->currentFile->addError($error$errorPos'MissingSubpackage');
            } else if (
PHP_CodeSniffer::isUnderscoreName($content) !== true) {
                
// Subpackage name must be properly camel-cased.
                
$nameBits explode('_'$content);
                
$firstBit array_shift($nameBits);
                
$newName  strtoupper($firstBit{0}).substr($firstBit1).'_';
                foreach (
$nameBits as $bit) {
                    
$newName .= strtoupper($bit{0}).substr($bit1).'_';
                }

                
$error 'Subpackage name "%s" is not valid; consider "%s" instead';
                
$data  = array(
                          
$content,
                          
trim($newName'_'),
                         );
                
$this->currentFile->addError($error$errorPos'IncorrectSubpackage'$data);
            }
        }

    }
//end processSubpackage()


    /**
     * Author tag must be 'Squiz Pty Ltd <mysource4@squiz.net>'.
     *
     * @param int $errorPos The line number where the error occurs.
     *
     * @return void
     */
    
protected function processAuthors($errorPos)
    {
        
$authors $this->commentParser->getAuthors();
        if (empty(
$authors) === false) {
            
$author  $authors[0];
            
$content $author->getContent();
            if (empty(
$content) === true) {
                
$error 'Content missing for @author tag in file comment';
                
$this->currentFile->addError($error$errorPos'MissingAuthor');
            } else if (
$content !== 'Squiz Pty Ltd <products@squiz.net>') {
                
$error 'Expected "Squiz Pty Ltd <products@squiz.net>" for author tag';
                
$this->currentFile->addError($error$errorPos'IncorrectAuthor');
            }
        }

    }
//end processAuthors()


    /**
     * Copyright tag must be in the form '2006-YYYY Squiz Pty Ltd (ABN 77 084 670 600)'.
     *
     * @param int $errorPos The line number where the error occurs.
     *
     * @return void
     */
    
protected function processCopyrights($errorPos)
    {
        
$copyrights $this->commentParser->getCopyrights();
        
$copyright  $copyrights[0];

        if (
$copyright !== null) {
            
$content $copyright->getContent();
            if (empty(
$content) === true) {
                
$error 'Content missing for @copyright tag in file comment';
                
$this->currentFile->addError($error$errorPos'MissingCopyright');

            } else if (
preg_match('/^([0-9]{4})(-[0-9]{4})? (Squiz Pty Ltd \(ACN 084 670 600\))$/'$content) === 0) {
                
$error 'Expected "xxxx-xxxx Squiz Pty Ltd (ACN 084 670 600)" for copyright declaration';
                
$this->currentFile->addError($error$errorPos'IncorrectCopyright');
            }
        }

    }
//end processCopyrights()


    /**
     * License tag must be 'http://matrix.squiz.net/licence Squiz.Net Open Source Licence'.
     *
     * @param int $errorPos The line number where the error occurs.
     *
     * @return void
     */
    
protected function processLicense($errorPos)
    {
        
$license $this->commentParser->getLicense();
        if (
$license !== null) {
            
$url     $license->getValue();
            
$content $license->getComment();
            if (empty(
$url) === true && empty($content) === true) {
                
$error 'Content missing for @license tag in file comment';
                
$this->currentFile->addError($error$errorPos'MissingLicense');
            } else {
                
// Check for license URL.
                
if (empty($url) === true) {
                    
$error 'License URL missing for @license tag in file comment';
                    
$this->currentFile->addError($error$errorPos'MissingLinceseURL');
                } else if (
$url !== 'http://www.gnu.org/licenses/old-licenses/gpl-2.0.txt') {
                    
$error 'Expected "http://www.gnu.org/licenses/old-licenses/gpl-2.0.txt" for license URL';
                    
$this->currentFile->addError($error$errorPos'IncorrectLicenseURL');
                }

                
// Check for license name.
                
if (empty($content) === true) {
                    
$error 'License name missing for @license tag in file comment';
                    
$this->currentFile->addError($error$errorPos'MissingLinceseName');
                } else if (
$content !== 'GPLv2') {
                    
$error 'Expected "GPLv2" for license name';
                    
$this->currentFile->addError($error$errorPos'IncorrectLicenseName');
                }
            }
//end if
        
}//end if

    
}//end processLicense()


}//end class


?>

:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ ok ]

:: Make Dir ::
 
[ ok ]
:: Make File ::
 
[ ok ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 1.0 pre-release build #13 powered by Captain Crunch Security Team | http://ccteam.ru | Generation time: 0.0312 ]--