You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
81 lines
3.3 KiB
81 lines
3.3 KiB
;;; flymake-phpcs.el --- Flymake handler for PHP to invoke PHP-CodeSniffer
|
|
;;
|
|
;; Copyright (C) 2011-2012 Free Software Foundation, Inc.
|
|
;;
|
|
;; Author: Sam Graham <libflymake-phpcs-emacs BLAHBLAH illusori.co.uk>
|
|
;; Maintainer: Sam Graham <libflymake-phpcs-emacs BLAHBLAH illusori.co.uk>
|
|
;; URL: https://github.com/illusori/emacs-flymake-phpcs
|
|
;; Version: 1.0.5
|
|
;; Package-Requires: ((flymake "0.3"))
|
|
;; This program is free software: you can redistribute it and/or modify
|
|
;; it under the terms of the GNU General Public License as published by
|
|
;; the Free Software Foundation, either version 3 of the License, or
|
|
;; (at your option) any later version.
|
|
;;
|
|
;; This program is distributed in the hope that it will be useful,
|
|
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
;; GNU General Public License for more details.
|
|
;;
|
|
;; You should have received a copy of the GNU General Public License
|
|
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
;;
|
|
;;; Commentary:
|
|
;;
|
|
;; flymake-phpcs.el adds support for running PHP_CodeSniffer
|
|
;; (http://pear.php.net/package/PHP_CodeSniffer/) to perform static
|
|
;; analysis of your PHP file in addition to syntax checking.
|
|
;;
|
|
;;; Usage:
|
|
;; (require 'flymake-phpcs)
|
|
|
|
(eval-when-compile (require 'flymake))
|
|
|
|
(defcustom flymake-phpcs-command (executable-find (concat
|
|
(file-name-directory
|
|
(or load-file-name buffer-file-name))
|
|
"bin/flymake_phpcs"))
|
|
"Location of flymake_phpcs wrapper."
|
|
:group 'flymake-phpcs
|
|
:type 'string)
|
|
|
|
(defcustom flymake-phpcs-standard "PEAR"
|
|
"The coding standard to pass to phpcs via --standard."
|
|
:group 'flymake-phpcs
|
|
:type 'string)
|
|
|
|
(defcustom flymake-phpcs-show-rule nil
|
|
"Whether to display the name of the phpcs rule generating any errors or warnings."
|
|
:group 'flymake-phpcs
|
|
:type 'boolean)
|
|
|
|
(defun flymake-phpcs-init ()
|
|
(let* ((temp-file (flymake-init-create-temp-buffer-copy
|
|
(if (fboundp 'flymake-create-temp-copy)
|
|
'flymake-create-temp-copy
|
|
'flymake-create-temp-inplace)))
|
|
(local-file (file-relative-name temp-file
|
|
(file-name-directory buffer-file-name))))
|
|
(list flymake-phpcs-command
|
|
(append
|
|
(list local-file)
|
|
(if flymake-phpcs-standard
|
|
(list (concat "--standard="
|
|
;; Looking for "/" is hardly portable
|
|
(if (string-match "/" flymake-phpcs-standard)
|
|
(expand-file-name flymake-phpcs-standard)
|
|
flymake-phpcs-standard))))
|
|
(if flymake-phpcs-show-rule (list "-s"))))))
|
|
|
|
(eval-after-load "flymake"
|
|
'(progn
|
|
;; Add a new error pattern to catch PHP-CodeSniffer output
|
|
(add-to-list 'flymake-err-line-patterns
|
|
'("\\(.*\\):\\([0-9]+\\):\\([0-9]+\\): \\(.*\\)" 1 2 3 4))
|
|
(let ((mode-and-masks (flymake-get-file-name-mode-and-masks "example.php")))
|
|
(setcar mode-and-masks 'flymake-phpcs-init))
|
|
(add-hook 'php+-mode-hook (lambda() (flymake-mode 1)) t)
|
|
(add-hook 'php-mode-hook (lambda() (flymake-mode 1)) t)))
|
|
|
|
(provide 'flymake-phpcs)
|
|
;;; flymake-phpcs.el ends here
|