Mercurial > hg > rc1
comparison vendor/pear/crypt_gpg/Crypt/GPG/Engine.php @ 0:1e000243b222
vanilla 1.3.3 distro, I hope
| author | Charlie Root |
|---|---|
| date | Thu, 04 Jan 2018 15:50:29 -0500 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:1e000243b222 |
|---|---|
| 1 <?php | |
| 2 | |
| 3 /* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */ | |
| 4 | |
| 5 /** | |
| 6 * Crypt_GPG is a package to use GPG from PHP | |
| 7 * | |
| 8 * This file contains an engine that handles GPG subprocess control and I/O. | |
| 9 * PHP's process manipulation functions are used to handle the GPG subprocess. | |
| 10 * | |
| 11 * PHP version 5 | |
| 12 * | |
| 13 * LICENSE: | |
| 14 * | |
| 15 * This library is free software; you can redistribute it and/or modify | |
| 16 * it under the terms of the GNU Lesser General Public License as | |
| 17 * published by the Free Software Foundation; either version 2.1 of the | |
| 18 * License, or (at your option) any later version. | |
| 19 * | |
| 20 * This library is distributed in the hope that it will be useful, | |
| 21 * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
| 23 * Lesser General Public License for more details. | |
| 24 * | |
| 25 * You should have received a copy of the GNU Lesser General Public | |
| 26 * License along with this library; if not, see | |
| 27 * <http://www.gnu.org/licenses/> | |
| 28 * | |
| 29 * @category Encryption | |
| 30 * @package Crypt_GPG | |
| 31 * @author Nathan Fredrickson <nathan@silverorange.com> | |
| 32 * @author Michael Gauthier <mike@silverorange.com> | |
| 33 * @copyright 2005-2013 silverorange | |
| 34 * @license http://www.gnu.org/copyleft/lesser.html LGPL License 2.1 | |
| 35 * @link http://pear.php.net/package/Crypt_GPG | |
| 36 * @link http://www.gnupg.org/ | |
| 37 */ | |
| 38 | |
| 39 /** | |
| 40 * Crypt_GPG base class. | |
| 41 */ | |
| 42 require_once 'Crypt/GPG.php'; | |
| 43 | |
| 44 /** | |
| 45 * GPG exception classes. | |
| 46 */ | |
| 47 require_once 'Crypt/GPG/Exceptions.php'; | |
| 48 | |
| 49 /** | |
| 50 * Status/Error handler class. | |
| 51 */ | |
| 52 require_once 'Crypt/GPG/ProcessHandler.php'; | |
| 53 | |
| 54 /** | |
| 55 * Process control methods. | |
| 56 */ | |
| 57 require_once 'Crypt/GPG/ProcessControl.php'; | |
| 58 | |
| 59 /** | |
| 60 * Information about a created signature | |
| 61 */ | |
| 62 require_once 'Crypt/GPG/SignatureCreationInfo.php'; | |
| 63 | |
| 64 /** | |
| 65 * Standard PEAR exception is used if GPG binary is not found. | |
| 66 */ | |
| 67 require_once 'PEAR/Exception.php'; | |
| 68 | |
| 69 // {{{ class Crypt_GPG_Engine | |
| 70 | |
| 71 /** | |
| 72 * Native PHP Crypt_GPG I/O engine | |
| 73 * | |
| 74 * This class is used internally by Crypt_GPG and does not need be used | |
| 75 * directly. See the {@link Crypt_GPG} class for end-user API. | |
| 76 * | |
| 77 * This engine uses PHP's native process control functions to directly control | |
| 78 * the GPG process. The GPG executable is required to be on the system. | |
| 79 * | |
| 80 * All data is passed to the GPG subprocess using file descriptors. This is the | |
| 81 * most secure method of passing data to the GPG subprocess. | |
| 82 * | |
| 83 * @category Encryption | |
| 84 * @package Crypt_GPG | |
| 85 * @author Nathan Fredrickson <nathan@silverorange.com> | |
| 86 * @author Michael Gauthier <mike@silverorange.com> | |
| 87 * @copyright 2005-2013 silverorange | |
| 88 * @license http://www.gnu.org/copyleft/lesser.html LGPL License 2.1 | |
| 89 * @link http://pear.php.net/package/Crypt_GPG | |
| 90 * @link http://www.gnupg.org/ | |
| 91 */ | |
| 92 class Crypt_GPG_Engine | |
| 93 { | |
| 94 // {{{ constants | |
| 95 | |
| 96 /** | |
| 97 * Size of data chunks that are sent to and retrieved from the IPC pipes. | |
| 98 * | |
| 99 * The value of 65536 has been chosen empirically | |
| 100 * as the one with best performance. | |
| 101 * | |
| 102 * @see https://pear.php.net/bugs/bug.php?id=21077 | |
| 103 */ | |
| 104 const CHUNK_SIZE = 65536; | |
| 105 | |
| 106 /** | |
| 107 * Standard input file descriptor. This is used to pass data to the GPG | |
| 108 * process. | |
| 109 */ | |
| 110 const FD_INPUT = 0; | |
| 111 | |
| 112 /** | |
| 113 * Standard output file descriptor. This is used to receive normal output | |
| 114 * from the GPG process. | |
| 115 */ | |
| 116 const FD_OUTPUT = 1; | |
| 117 | |
| 118 /** | |
| 119 * Standard output file descriptor. This is used to receive error output | |
| 120 * from the GPG process. | |
| 121 */ | |
| 122 const FD_ERROR = 2; | |
| 123 | |
| 124 /** | |
| 125 * GPG status output file descriptor. The status file descriptor outputs | |
| 126 * detailed information for many GPG commands. See the second section of | |
| 127 * the file <b>doc/DETAILS</b> in the | |
| 128 * {@link http://www.gnupg.org/download/ GPG package} for a detailed | |
| 129 * description of GPG's status output. | |
| 130 */ | |
| 131 const FD_STATUS = 3; | |
| 132 | |
| 133 /** | |
| 134 * Command input file descriptor. This is used for methods requiring | |
| 135 * passphrases. | |
| 136 */ | |
| 137 const FD_COMMAND = 4; | |
| 138 | |
| 139 /** | |
| 140 * Extra message input file descriptor. This is used for passing signed | |
| 141 * data when verifying a detached signature. | |
| 142 */ | |
| 143 const FD_MESSAGE = 5; | |
| 144 | |
| 145 /** | |
| 146 * Minimum version of GnuPG that is supported. | |
| 147 */ | |
| 148 const MIN_VERSION = '1.0.2'; | |
| 149 | |
| 150 // }}} | |
| 151 // {{{ private class properties | |
| 152 | |
| 153 /** | |
| 154 * Whether or not to use strict mode | |
| 155 * | |
| 156 * When set to true, any clock problems (e.g. keys generate in future) | |
| 157 * are errors, otherwise they are just warnings. | |
| 158 * | |
| 159 * Strict mode is disabled by default. | |
| 160 * | |
| 161 * @var boolean | |
| 162 * @see Crypt_GPG_Engine::__construct() | |
| 163 */ | |
| 164 private $_strict = false; | |
| 165 | |
| 166 /** | |
| 167 * Whether or not to use debugging mode | |
| 168 * | |
| 169 * When set to true, every GPG command is echoed before it is run. Sensitive | |
| 170 * data is always handled using pipes and is not specified as part of the | |
| 171 * command. As a result, sensitive data is never displayed when debug is | |
| 172 * enabled. Sensitive data includes private key data and passphrases. | |
| 173 * | |
| 174 * This can be set to a callable function where first argument is the | |
| 175 * debug line to process. | |
| 176 * | |
| 177 * Debugging is off by default. | |
| 178 * | |
| 179 * @var mixed | |
| 180 * @see Crypt_GPG_Engine::__construct() | |
| 181 */ | |
| 182 private $_debug = false; | |
| 183 | |
| 184 /** | |
| 185 * Location of GPG binary | |
| 186 * | |
| 187 * @var string | |
| 188 * @see Crypt_GPG_Engine::__construct() | |
| 189 * @see Crypt_GPG_Engine::_getBinary() | |
| 190 */ | |
| 191 private $_binary = ''; | |
| 192 | |
| 193 /** | |
| 194 * Location of GnuPG agent binary | |
| 195 * | |
| 196 * Only used for GnuPG 2.x | |
| 197 * | |
| 198 * @var string | |
| 199 * @see Crypt_GPG_Engine::__construct() | |
| 200 * @see Crypt_GPG_Engine::_getAgent() | |
| 201 */ | |
| 202 private $_agent = ''; | |
| 203 | |
| 204 /** | |
| 205 * Location of GnuPG conf binary | |
| 206 * | |
| 207 * Only used for GnuPG 2.1.x | |
| 208 * | |
| 209 * @var string | |
| 210 * @see Crypt_GPG_Engine::__construct() | |
| 211 * @see Crypt_GPG_Engine::_getGPGConf() | |
| 212 */ | |
| 213 private $_gpgconf = null; | |
| 214 | |
| 215 /** | |
| 216 * Directory containing the GPG key files | |
| 217 * | |
| 218 * This property only contains the path when the <i>homedir</i> option | |
| 219 * is specified in the constructor. | |
| 220 * | |
| 221 * @var string | |
| 222 * @see Crypt_GPG_Engine::__construct() | |
| 223 */ | |
| 224 private $_homedir = ''; | |
| 225 | |
| 226 /** | |
| 227 * File path of the public keyring | |
| 228 * | |
| 229 * This property only contains the file path when the <i>public_keyring</i> | |
| 230 * option is specified in the constructor. | |
| 231 * | |
| 232 * If the specified file path starts with <kbd>~/</kbd>, the path is | |
| 233 * relative to the <i>homedir</i> if specified, otherwise to | |
| 234 * <kbd>~/.gnupg</kbd>. | |
| 235 * | |
| 236 * @var string | |
| 237 * @see Crypt_GPG_Engine::__construct() | |
| 238 */ | |
| 239 private $_publicKeyring = ''; | |
| 240 | |
| 241 /** | |
| 242 * File path of the private (secret) keyring | |
| 243 * | |
| 244 * This property only contains the file path when the <i>private_keyring</i> | |
| 245 * option is specified in the constructor. | |
| 246 * | |
| 247 * If the specified file path starts with <kbd>~/</kbd>, the path is | |
| 248 * relative to the <i>homedir</i> if specified, otherwise to | |
| 249 * <kbd>~/.gnupg</kbd>. | |
| 250 * | |
| 251 * @var string | |
| 252 * @see Crypt_GPG_Engine::__construct() | |
| 253 */ | |
| 254 private $_privateKeyring = ''; | |
| 255 | |
| 256 /** | |
| 257 * File path of the trust database | |
| 258 * | |
| 259 * This property only contains the file path when the <i>trust_db</i> | |
| 260 * option is specified in the constructor. | |
| 261 * | |
| 262 * If the specified file path starts with <kbd>~/</kbd>, the path is | |
| 263 * relative to the <i>homedir</i> if specified, otherwise to | |
| 264 * <kbd>~/.gnupg</kbd>. | |
| 265 * | |
| 266 * @var string | |
| 267 * @see Crypt_GPG_Engine::__construct() | |
| 268 */ | |
| 269 private $_trustDb = ''; | |
| 270 | |
| 271 /** | |
| 272 * Array of pipes used for communication with the GPG binary | |
| 273 * | |
| 274 * This is an array of file descriptor resources. | |
| 275 * | |
| 276 * @var array | |
| 277 */ | |
| 278 private $_pipes = array(); | |
| 279 | |
| 280 /** | |
| 281 * Array of pipes used for communication with the gpg-agent binary | |
| 282 * | |
| 283 * This is an array of file descriptor resources. | |
| 284 * | |
| 285 * @var array | |
| 286 */ | |
| 287 private $_agentPipes = array(); | |
| 288 | |
| 289 /** | |
| 290 * Array of currently opened pipes | |
| 291 * | |
| 292 * This array is used to keep track of remaining opened pipes so they can | |
| 293 * be closed when the GPG subprocess is finished. This array is a subset of | |
| 294 * the {@link Crypt_GPG_Engine::$_pipes} array and contains opened file | |
| 295 * descriptor resources. | |
| 296 * | |
| 297 * @var array | |
| 298 * @see Crypt_GPG_Engine::_closePipe() | |
| 299 */ | |
| 300 private $_openPipes = array(); | |
| 301 | |
| 302 /** | |
| 303 * A handle for the GPG process | |
| 304 * | |
| 305 * @var resource | |
| 306 */ | |
| 307 private $_process = null; | |
| 308 | |
| 309 /** | |
| 310 * A handle for the gpg-agent process | |
| 311 * | |
| 312 * @var resource | |
| 313 */ | |
| 314 private $_agentProcess = null; | |
| 315 | |
| 316 /** | |
| 317 * GPG agent daemon socket and PID for running gpg-agent | |
| 318 * | |
| 319 * @var string | |
| 320 */ | |
| 321 private $_agentInfo = null; | |
| 322 | |
| 323 /** | |
| 324 * Whether or not the operating system is Darwin (OS X) | |
| 325 * | |
| 326 * @var boolean | |
| 327 */ | |
| 328 private $_isDarwin = false; | |
| 329 | |
| 330 /** | |
| 331 * Message digest algorithm. | |
| 332 * | |
| 333 * @var string | |
| 334 */ | |
| 335 private $_digest_algo = null; | |
| 336 | |
| 337 /** | |
| 338 * Symmetric cipher algorithm. | |
| 339 * | |
| 340 * @var string | |
| 341 */ | |
| 342 private $_cipher_algo = null; | |
| 343 | |
| 344 /** | |
| 345 * Commands to be sent to GPG's command input stream | |
| 346 * | |
| 347 * @var string | |
| 348 * @see Crypt_GPG_Engine::sendCommand() | |
| 349 */ | |
| 350 private $_commandBuffer = ''; | |
| 351 | |
| 352 /** | |
| 353 * A status/error handler | |
| 354 * | |
| 355 * @var Crypt_GPG_ProcessHanler | |
| 356 */ | |
| 357 private $_processHandler = null; | |
| 358 | |
| 359 /** | |
| 360 * Array of status line handlers | |
| 361 * | |
| 362 * @var array | |
| 363 * @see Crypt_GPG_Engine::addStatusHandler() | |
| 364 */ | |
| 365 private $_statusHandlers = array(); | |
| 366 | |
| 367 /** | |
| 368 * Array of error line handlers | |
| 369 * | |
| 370 * @var array | |
| 371 * @see Crypt_GPG_Engine::addErrorHandler() | |
| 372 */ | |
| 373 private $_errorHandlers = array(); | |
| 374 | |
| 375 /** | |
| 376 * The input source | |
| 377 * | |
| 378 * This is data to send to GPG. Either a string or a stream resource. | |
| 379 * | |
| 380 * @var string|resource | |
| 381 * @see Crypt_GPG_Engine::setInput() | |
| 382 */ | |
| 383 private $_input = null; | |
| 384 | |
| 385 /** | |
| 386 * The extra message input source | |
| 387 * | |
| 388 * Either a string or a stream resource. | |
| 389 * | |
| 390 * @var string|resource | |
| 391 * @see Crypt_GPG_Engine::setMessage() | |
| 392 */ | |
| 393 private $_message = null; | |
| 394 | |
| 395 /** | |
| 396 * The output location | |
| 397 * | |
| 398 * This is where the output from GPG is sent. Either a string or a stream | |
| 399 * resource. | |
| 400 * | |
| 401 * @var string|resource | |
| 402 * @see Crypt_GPG_Engine::setOutput() | |
| 403 */ | |
| 404 private $_output = ''; | |
| 405 | |
| 406 /** | |
| 407 * The GPG operation to execute | |
| 408 * | |
| 409 * @var string | |
| 410 * @see Crypt_GPG_Engine::setOperation() | |
| 411 */ | |
| 412 private $_operation; | |
| 413 | |
| 414 /** | |
| 415 * Arguments for the current operation | |
| 416 * | |
| 417 * @var array | |
| 418 * @see Crypt_GPG_Engine::setOperation() | |
| 419 */ | |
| 420 private $_arguments = array(); | |
| 421 | |
| 422 /** | |
| 423 * The version number of the GPG binary | |
| 424 * | |
| 425 * @var string | |
| 426 * @see Crypt_GPG_Engine::getVersion() | |
| 427 */ | |
| 428 private $_version = ''; | |
| 429 | |
| 430 // }}} | |
| 431 // {{{ __construct() | |
| 432 | |
| 433 /** | |
| 434 * Creates a new GPG engine | |
| 435 * | |
| 436 * Available options are: | |
| 437 * | |
| 438 * - <kbd>string homedir</kbd> - the directory where the GPG | |
| 439 * keyring files are stored. If not | |
| 440 * specified, Crypt_GPG uses the | |
| 441 * default of <kbd>~/.gnupg</kbd>. | |
| 442 * - <kbd>string publicKeyring</kbd> - the file path of the public | |
| 443 * keyring. Use this if the public | |
| 444 * keyring is not in the homedir, or | |
| 445 * if the keyring is in a directory | |
| 446 * not writable by the process | |
| 447 * invoking GPG (like Apache). Then | |
| 448 * you can specify the path to the | |
| 449 * keyring with this option | |
| 450 * (/foo/bar/pubring.gpg), and specify | |
| 451 * a writable directory (like /tmp) | |
| 452 * using the <i>homedir</i> option. | |
| 453 * - <kbd>string privateKeyring</kbd> - the file path of the private | |
| 454 * keyring. Use this if the private | |
| 455 * keyring is not in the homedir, or | |
| 456 * if the keyring is in a directory | |
| 457 * not writable by the process | |
| 458 * invoking GPG (like Apache). Then | |
| 459 * you can specify the path to the | |
| 460 * keyring with this option | |
| 461 * (/foo/bar/secring.gpg), and specify | |
| 462 * a writable directory (like /tmp) | |
| 463 * using the <i>homedir</i> option. | |
| 464 * - <kbd>string trustDb</kbd> - the file path of the web-of-trust | |
| 465 * database. Use this if the trust | |
| 466 * database is not in the homedir, or | |
| 467 * if the database is in a directory | |
| 468 * not writable by the process | |
| 469 * invoking GPG (like Apache). Then | |
| 470 * you can specify the path to the | |
| 471 * trust database with this option | |
| 472 * (/foo/bar/trustdb.gpg), and specify | |
| 473 * a writable directory (like /tmp) | |
| 474 * using the <i>homedir</i> option. | |
| 475 * - <kbd>string binary</kbd> - the location of the GPG binary. If | |
| 476 * not specified, the driver attempts | |
| 477 * to auto-detect the GPG binary | |
| 478 * location using a list of known | |
| 479 * default locations for the current | |
| 480 * operating system. The option | |
| 481 * <kbd>gpgBinary</kbd> is a | |
| 482 * deprecated alias for this option. | |
| 483 * - <kbd>string agent</kbd> - the location of the GnuPG agent | |
| 484 * binary. The gpg-agent is only | |
| 485 * used for GnuPG 2.x. If not | |
| 486 * specified, the engine attempts | |
| 487 * to auto-detect the gpg-agent | |
| 488 * binary location using a list of | |
| 489 * know default locations for the | |
| 490 * current operating system. | |
| 491 * - <kbd>string|false gpgconf</kbd> - the location of the GnuPG conf | |
| 492 * binary. The gpgconf is only | |
| 493 * used for GnuPG >= 2.1. If not | |
| 494 * specified, the engine attempts | |
| 495 * to auto-detect the location using | |
| 496 * a list of know default locations. | |
| 497 * When set to FALSE `gpgconf --kill` | |
| 498 * will not be executed via destructor. | |
| 499 * - <kbd>string digest-algo</kbd> - Sets the message digest algorithm. | |
| 500 * - <kbd>string cipher-algo</kbd> - Sets the symmetric cipher. | |
| 501 * - <kbd>boolean strict</kbd> - In strict mode clock problems on | |
| 502 * subkeys and signatures are not ignored | |
| 503 * (--ignore-time-conflict | |
| 504 * and --ignore-valid-from options) | |
| 505 * - <kbd>mixed debug</kbd> - whether or not to use debug mode. | |
| 506 * When debug mode is on, all | |
| 507 * communication to and from the GPG | |
| 508 * subprocess is logged. This can be | |
| 509 * useful to diagnose errors when | |
| 510 * using Crypt_GPG. | |
| 511 * | |
| 512 * @param array $options optional. An array of options used to create the | |
| 513 * GPG object. All options are optional and are | |
| 514 * represented as key-value pairs. | |
| 515 * | |
| 516 * @throws Crypt_GPG_FileException if the <kbd>homedir</kbd> does not exist | |
| 517 * and cannot be created. This can happen if <kbd>homedir</kbd> is | |
| 518 * not specified, Crypt_GPG is run as the web user, and the web | |
| 519 * user has no home directory. This exception is also thrown if any | |
| 520 * of the options <kbd>publicKeyring</kbd>, | |
| 521 * <kbd>privateKeyring</kbd> or <kbd>trustDb</kbd> options are | |
| 522 * specified but the files do not exist or are are not readable. | |
| 523 * This can happen if the user running the Crypt_GPG process (for | |
| 524 * example, the Apache user) does not have permission to read the | |
| 525 * files. | |
| 526 * | |
| 527 * @throws PEAR_Exception if the provided <kbd>binary</kbd> is invalid, or | |
| 528 * if no <kbd>binary</kbd> is provided and no suitable binary could | |
| 529 * be found. | |
| 530 * | |
| 531 * @throws PEAR_Exception if the provided <kbd>agent</kbd> is invalid, or | |
| 532 * if no <kbd>agent</kbd> is provided and no suitable gpg-agent | |
| 533 * cound be found. | |
| 534 */ | |
| 535 public function __construct(array $options = array()) | |
| 536 { | |
| 537 $this->_isDarwin = (strncmp(strtoupper(PHP_OS), 'DARWIN', 6) === 0); | |
| 538 | |
| 539 // get homedir | |
| 540 if (array_key_exists('homedir', $options)) { | |
| 541 $this->_homedir = (string)$options['homedir']; | |
| 542 } else { | |
| 543 if (extension_loaded('posix')) { | |
| 544 // note: this requires the package OS dep exclude 'windows' | |
| 545 $info = posix_getpwuid(posix_getuid()); | |
| 546 $this->_homedir = $info['dir'].'/.gnupg'; | |
| 547 } else { | |
| 548 if (isset($_SERVER['HOME'])) { | |
| 549 $this->_homedir = $_SERVER['HOME']; | |
| 550 } else { | |
| 551 $this->_homedir = getenv('HOME'); | |
| 552 } | |
| 553 } | |
| 554 | |
| 555 if ($this->_homedir === false) { | |
| 556 throw new Crypt_GPG_FileException( | |
| 557 'Could not locate homedir. Please specify the homedir ' . | |
| 558 'to use with the \'homedir\' option when instantiating ' . | |
| 559 'the Crypt_GPG object.' | |
| 560 ); | |
| 561 } | |
| 562 } | |
| 563 | |
| 564 // attempt to create homedir if it does not exist | |
| 565 if (!is_dir($this->_homedir)) { | |
| 566 if (@mkdir($this->_homedir, 0777, true)) { | |
| 567 // Set permissions on homedir. Parent directories are created | |
| 568 // with 0777, homedir is set to 0700. | |
| 569 chmod($this->_homedir, 0700); | |
| 570 } else { | |
| 571 throw new Crypt_GPG_FileException( | |
| 572 'The \'homedir\' "' . $this->_homedir . '" is not ' . | |
| 573 'readable or does not exist and cannot be created. This ' . | |
| 574 'can happen if \'homedir\' is not specified in the ' . | |
| 575 'Crypt_GPG options, Crypt_GPG is run as the web user, ' . | |
| 576 'and the web user has no home directory.', | |
| 577 0, | |
| 578 $this->_homedir | |
| 579 ); | |
| 580 } | |
| 581 } | |
| 582 | |
| 583 // check homedir permissions (See Bug #19833) | |
| 584 if (!is_executable($this->_homedir)) { | |
| 585 throw new Crypt_GPG_FileException( | |
| 586 'The \'homedir\' "' . $this->_homedir . '" is not enterable ' . | |
| 587 'by the current user. Please check the permissions on your ' . | |
| 588 'homedir and make sure the current user can both enter and ' . | |
| 589 'write to the directory.', | |
| 590 0, | |
| 591 $this->_homedir | |
| 592 ); | |
| 593 } | |
| 594 if (!is_writeable($this->_homedir)) { | |
| 595 throw new Crypt_GPG_FileException( | |
| 596 'The \'homedir\' "' . $this->_homedir . '" is not writable ' . | |
| 597 'by the current user. Please check the permissions on your ' . | |
| 598 'homedir and make sure the current user can both enter and ' . | |
| 599 'write to the directory.', | |
| 600 0, | |
| 601 $this->_homedir | |
| 602 ); | |
| 603 } | |
| 604 | |
| 605 // get binary | |
| 606 if (array_key_exists('binary', $options)) { | |
| 607 $this->_binary = (string)$options['binary']; | |
| 608 } elseif (array_key_exists('gpgBinary', $options)) { | |
| 609 // deprecated alias | |
| 610 $this->_binary = (string)$options['gpgBinary']; | |
| 611 } else { | |
| 612 $this->_binary = $this->_getBinary(); | |
| 613 } | |
| 614 | |
| 615 if ($this->_binary == '' || !is_executable($this->_binary)) { | |
| 616 throw new PEAR_Exception( | |
| 617 'GPG binary not found. If you are sure the GPG binary is ' . | |
| 618 'installed, please specify the location of the GPG binary ' . | |
| 619 'using the \'binary\' driver option.' | |
| 620 ); | |
| 621 } | |
| 622 | |
| 623 // get agent | |
| 624 if (array_key_exists('agent', $options)) { | |
| 625 $this->_agent = (string)$options['agent']; | |
| 626 | |
| 627 if ($this->_agent && !is_executable($this->_agent)) { | |
| 628 throw new PEAR_Exception( | |
| 629 'Specified gpg-agent binary is not executable.' | |
| 630 ); | |
| 631 } | |
| 632 } else { | |
| 633 $this->_agent = $this->_getAgent(); | |
| 634 } | |
| 635 | |
| 636 if (array_key_exists('gpgconf', $options)) { | |
| 637 $this->_gpgconf = $options['gpgconf']; | |
| 638 | |
| 639 if ($this->_gpgconf && !is_executable($this->_gpgconf)) { | |
| 640 throw new PEAR_Exception( | |
| 641 'Specified gpgconf binary is not executable.' | |
| 642 ); | |
| 643 } | |
| 644 } | |
| 645 | |
| 646 /* | |
| 647 * Note: | |
| 648 * | |
| 649 * Normally, GnuPG expects keyrings to be in the homedir and expects | |
| 650 * to be able to write temporary files in the homedir. Sometimes, | |
| 651 * keyrings are not in the homedir, or location of the keyrings does | |
| 652 * not allow writing temporary files. In this case, the <i>homedir</i> | |
| 653 * option by itself is not enough to specify the keyrings because GnuPG | |
| 654 * can not write required temporary files. Additional options are | |
| 655 * provided so you can specify the location of the keyrings separately | |
| 656 * from the homedir. | |
| 657 */ | |
| 658 | |
| 659 // get public keyring | |
| 660 if (array_key_exists('publicKeyring', $options)) { | |
| 661 $this->_publicKeyring = (string)$options['publicKeyring']; | |
| 662 if (!is_readable($this->_publicKeyring)) { | |
| 663 throw new Crypt_GPG_FileException( | |
| 664 'The \'publicKeyring\' "' . $this->_publicKeyring . | |
| 665 '" does not exist or is not readable. Check the location ' . | |
| 666 'and ensure the file permissions are correct.', | |
| 667 0, $this->_publicKeyring | |
| 668 ); | |
| 669 } | |
| 670 } | |
| 671 | |
| 672 // get private keyring | |
| 673 if (array_key_exists('privateKeyring', $options)) { | |
| 674 $this->_privateKeyring = (string)$options['privateKeyring']; | |
| 675 if (!is_readable($this->_privateKeyring)) { | |
| 676 throw new Crypt_GPG_FileException( | |
| 677 'The \'privateKeyring\' "' . $this->_privateKeyring . | |
| 678 '" does not exist or is not readable. Check the location ' . | |
| 679 'and ensure the file permissions are correct.', | |
| 680 0, $this->_privateKeyring | |
| 681 ); | |
| 682 } | |
| 683 } | |
| 684 | |
| 685 // get trust database | |
| 686 if (array_key_exists('trustDb', $options)) { | |
| 687 $this->_trustDb = (string)$options['trustDb']; | |
| 688 if (!is_readable($this->_trustDb)) { | |
| 689 throw new Crypt_GPG_FileException( | |
| 690 'The \'trustDb\' "' . $this->_trustDb . | |
| 691 '" does not exist or is not readable. Check the location ' . | |
| 692 'and ensure the file permissions are correct.', | |
| 693 0, $this->_trustDb | |
| 694 ); | |
| 695 } | |
| 696 } | |
| 697 | |
| 698 if (array_key_exists('debug', $options)) { | |
| 699 $this->_debug = $options['debug']; | |
| 700 } | |
| 701 | |
| 702 $this->_strict = !empty($options['strict']); | |
| 703 | |
| 704 if (!empty($options['digest-algo'])) { | |
| 705 $this->_digest_algo = $options['digest-algo']; | |
| 706 } | |
| 707 | |
| 708 if (!empty($options['cipher-algo'])) { | |
| 709 $this->_cipher_algo = $options['cipher-algo']; | |
| 710 } | |
| 711 } | |
| 712 | |
| 713 // }}} | |
| 714 // {{{ __destruct() | |
| 715 | |
| 716 /** | |
| 717 * Closes open GPG subprocesses when this object is destroyed | |
| 718 * | |
| 719 * Subprocesses should never be left open by this class unless there is | |
| 720 * an unknown error and unexpected script termination occurs. | |
| 721 */ | |
| 722 public function __destruct() | |
| 723 { | |
| 724 $this->_closeSubprocess(); | |
| 725 $this->_closeIdleAgents(); | |
| 726 } | |
| 727 | |
| 728 // }}} | |
| 729 // {{{ addErrorHandler() | |
| 730 | |
| 731 /** | |
| 732 * Adds an error handler method | |
| 733 * | |
| 734 * The method is run every time a new error line is received from the GPG | |
| 735 * subprocess. The handler method must accept the error line to be handled | |
| 736 * as its first parameter. | |
| 737 * | |
| 738 * @param callback $callback the callback method to use. | |
| 739 * @param array $args optional. Additional arguments to pass as | |
| 740 * parameters to the callback method. | |
| 741 * | |
| 742 * @return void | |
| 743 */ | |
| 744 public function addErrorHandler($callback, array $args = array()) | |
| 745 { | |
| 746 $this->_errorHandlers[] = array( | |
| 747 'callback' => $callback, | |
| 748 'args' => $args | |
| 749 ); | |
| 750 } | |
| 751 | |
| 752 // }}} | |
| 753 // {{{ addStatusHandler() | |
| 754 | |
| 755 /** | |
| 756 * Adds a status handler method | |
| 757 * | |
| 758 * The method is run every time a new status line is received from the | |
| 759 * GPG subprocess. The handler method must accept the status line to be | |
| 760 * handled as its first parameter. | |
| 761 * | |
| 762 * @param callback $callback the callback method to use. | |
| 763 * @param array $args optional. Additional arguments to pass as | |
| 764 * parameters to the callback method. | |
| 765 * | |
| 766 * @return void | |
| 767 */ | |
| 768 public function addStatusHandler($callback, array $args = array()) | |
| 769 { | |
| 770 $this->_statusHandlers[] = array( | |
| 771 'callback' => $callback, | |
| 772 'args' => $args | |
| 773 ); | |
| 774 } | |
| 775 | |
| 776 // }}} | |
| 777 // {{{ sendCommand() | |
| 778 | |
| 779 /** | |
| 780 * Sends a command to the GPG subprocess over the command file-descriptor | |
| 781 * pipe | |
| 782 * | |
| 783 * @param string $command the command to send. | |
| 784 * | |
| 785 * @return void | |
| 786 * | |
| 787 * @sensitive $command | |
| 788 */ | |
| 789 public function sendCommand($command) | |
| 790 { | |
| 791 if (array_key_exists(self::FD_COMMAND, $this->_openPipes)) { | |
| 792 $this->_commandBuffer .= $command . PHP_EOL; | |
| 793 } | |
| 794 } | |
| 795 | |
| 796 // }}} | |
| 797 // {{{ reset() | |
| 798 | |
| 799 /** | |
| 800 * Resets the GPG engine, preparing it for a new operation | |
| 801 * | |
| 802 * @return void | |
| 803 * | |
| 804 * @see Crypt_GPG_Engine::run() | |
| 805 * @see Crypt_GPG_Engine::setOperation() | |
| 806 */ | |
| 807 public function reset() | |
| 808 { | |
| 809 $this->_operation = ''; | |
| 810 $this->_arguments = array(); | |
| 811 $this->_input = null; | |
| 812 $this->_message = null; | |
| 813 $this->_output = ''; | |
| 814 $this->_commandBuffer = ''; | |
| 815 | |
| 816 $this->_statusHandlers = array(); | |
| 817 $this->_errorHandlers = array(); | |
| 818 | |
| 819 if ($this->_debug) { | |
| 820 $this->addStatusHandler(array($this, '_handleDebugStatus')); | |
| 821 $this->addErrorHandler(array($this, '_handleDebugError')); | |
| 822 } | |
| 823 | |
| 824 $this->_processHandler = new Crypt_GPG_ProcessHandler($this); | |
| 825 | |
| 826 $this->addStatusHandler(array($this->_processHandler, 'handleStatus')); | |
| 827 $this->addErrorHandler(array($this->_processHandler, 'handleError')); | |
| 828 } | |
| 829 | |
| 830 // }}} | |
| 831 // {{{ run() | |
| 832 | |
| 833 /** | |
| 834 * Runs the current GPG operation. | |
| 835 * | |
| 836 * This creates and manages the GPG subprocess. | |
| 837 * This will close input/output file handles. | |
| 838 * | |
| 839 * The operation must be set with {@link Crypt_GPG_Engine::setOperation()} | |
| 840 * before this method is called. | |
| 841 * | |
| 842 * @return void | |
| 843 * | |
| 844 * @throws Crypt_GPG_InvalidOperationException if no operation is specified. | |
| 845 * @throws Crypt_GPG_Exception if an unknown or unexpected error occurs. | |
| 846 * | |
| 847 * @see Crypt_GPG_Engine::reset() | |
| 848 * @see Crypt_GPG_Engine::setOperation() | |
| 849 */ | |
| 850 public function run() | |
| 851 { | |
| 852 if ($this->_operation === '') { | |
| 853 throw new Crypt_GPG_InvalidOperationException( | |
| 854 'No GPG operation specified. Use Crypt_GPG_Engine::setOperation() ' . | |
| 855 'before calling Crypt_GPG_Engine::run().' | |
| 856 ); | |
| 857 } | |
| 858 | |
| 859 $this->_openSubprocess(); | |
| 860 $this->_process(); | |
| 861 $this->_closeSubprocess(); | |
| 862 } | |
| 863 | |
| 864 // }}} | |
| 865 // {{{ setInput() | |
| 866 | |
| 867 /** | |
| 868 * Sets the input source for the current GPG operation | |
| 869 * | |
| 870 * @param string|resource &$input either a reference to the string | |
| 871 * containing the input data or an open | |
| 872 * stream resource containing the input | |
| 873 * data. | |
| 874 * | |
| 875 * @return void | |
| 876 */ | |
| 877 public function setInput(&$input) | |
| 878 { | |
| 879 $this->_input =& $input; | |
| 880 } | |
| 881 | |
| 882 // }}} | |
| 883 // {{{ setMessage() | |
| 884 | |
| 885 /** | |
| 886 * Sets the message source for the current GPG operation | |
| 887 * | |
| 888 * Detached signature data should be specified here. | |
| 889 * | |
| 890 * @param string|resource &$message either a reference to the string | |
| 891 * containing the message data or an open | |
| 892 * stream resource containing the message | |
| 893 * data. | |
| 894 * | |
| 895 * @return void | |
| 896 */ | |
| 897 public function setMessage(&$message) | |
| 898 { | |
| 899 $this->_message =& $message; | |
| 900 } | |
| 901 | |
| 902 // }}} | |
| 903 // {{{ setOutput() | |
| 904 | |
| 905 /** | |
| 906 * Sets the output destination for the current GPG operation | |
| 907 * | |
| 908 * @param string|resource &$output either a reference to the string in | |
| 909 * which to store GPG output or an open | |
| 910 * stream resource to which the output data | |
| 911 * should be written. | |
| 912 * | |
| 913 * @return void | |
| 914 */ | |
| 915 public function setOutput(&$output) | |
| 916 { | |
| 917 $this->_output =& $output; | |
| 918 } | |
| 919 | |
| 920 // }}} | |
| 921 // {{{ setOperation() | |
| 922 | |
| 923 /** | |
| 924 * Sets the operation to perform | |
| 925 * | |
| 926 * @param string $operation the operation to perform. This should be one | |
| 927 * of GPG's operations. For example, | |
| 928 * <kbd>--encrypt</kbd>, <kbd>--decrypt</kbd>, | |
| 929 * <kbd>--sign</kbd>, etc. | |
| 930 * @param array $arguments optional. Additional arguments for the GPG | |
| 931 * subprocess. See the GPG manual for specific | |
| 932 * values. | |
| 933 * | |
| 934 * @return void | |
| 935 * | |
| 936 * @see Crypt_GPG_Engine::reset() | |
| 937 * @see Crypt_GPG_Engine::run() | |
| 938 */ | |
| 939 public function setOperation($operation, array $arguments = array()) | |
| 940 { | |
| 941 $this->_operation = $operation; | |
| 942 $this->_arguments = $arguments; | |
| 943 | |
| 944 $this->_processHandler->setOperation($operation); | |
| 945 } | |
| 946 | |
| 947 // }}} | |
| 948 // {{{ setPins() | |
| 949 | |
| 950 /** | |
| 951 * Sets the PINENTRY_USER_DATA environment variable with the currently | |
| 952 * added keys and passphrases | |
| 953 * | |
| 954 * Keys and passphrases are stored as an indexed array of passphrases | |
| 955 * in JSON encoded to a flat string. | |
| 956 * | |
| 957 * For GnuPG 2.x this is how passphrases are passed. For GnuPG 1.x the | |
| 958 * environment variable is set but not used. | |
| 959 * | |
| 960 * @param array $keys the internal key array to use. | |
| 961 * | |
| 962 * @return void | |
| 963 */ | |
| 964 public function setPins(array $keys) | |
| 965 { | |
| 966 $envKeys = array(); | |
| 967 | |
| 968 foreach ($keys as $keyId => $key) { | |
| 969 $envKeys[$keyId] = is_array($key) ? $key['passphrase'] : $key; | |
| 970 } | |
| 971 | |
| 972 $_ENV['PINENTRY_USER_DATA'] = json_encode($envKeys); | |
| 973 } | |
| 974 | |
| 975 // }}} | |
| 976 // {{{ getVersion() | |
| 977 | |
| 978 /** | |
| 979 * Gets the version of the GnuPG binary | |
| 980 * | |
| 981 * @return string a version number string containing the version of GnuPG | |
| 982 * being used. This value is suitable to use with PHP's | |
| 983 * version_compare() function. | |
| 984 * | |
| 985 * @throws Crypt_GPG_Exception if an unknown or unexpected error occurs. | |
| 986 * Use the <kbd>debug</kbd> option and file a bug report if these | |
| 987 * exceptions occur. | |
| 988 * | |
| 989 * @throws Crypt_GPG_UnsupportedException if the provided binary is not | |
| 990 * GnuPG or if the GnuPG version is less than 1.0.2. | |
| 991 */ | |
| 992 public function getVersion() | |
| 993 { | |
| 994 if ($this->_version == '') { | |
| 995 $options = array( | |
| 996 'homedir' => $this->_homedir, | |
| 997 'binary' => $this->_binary, | |
| 998 'debug' => $this->_debug, | |
| 999 'agent' => $this->_agent, | |
| 1000 ); | |
| 1001 | |
| 1002 $engine = new self($options); | |
| 1003 $info = ''; | |
| 1004 | |
| 1005 // Set a garbage version so we do not end up looking up the version | |
| 1006 // recursively. | |
| 1007 $engine->_version = '1.0.0'; | |
| 1008 | |
| 1009 $engine->reset(); | |
| 1010 $engine->setOutput($info); | |
| 1011 $engine->setOperation('--version'); | |
| 1012 $engine->run(); | |
| 1013 | |
| 1014 $matches = array(); | |
| 1015 $expression = '#gpg \(GnuPG[A-Za-z0-9/]*?\) (\S+)#'; | |
| 1016 | |
| 1017 if (preg_match($expression, $info, $matches) === 1) { | |
| 1018 $this->_version = $matches[1]; | |
| 1019 } else { | |
| 1020 throw new Crypt_GPG_Exception( | |
| 1021 'No GnuPG version information provided by the binary "' . | |
| 1022 $this->_binary . '". Are you sure it is GnuPG?' | |
| 1023 ); | |
| 1024 } | |
| 1025 | |
| 1026 if (version_compare($this->_version, self::MIN_VERSION, 'lt')) { | |
| 1027 throw new Crypt_GPG_Exception( | |
| 1028 'The version of GnuPG being used (' . $this->_version . | |
| 1029 ') is not supported by Crypt_GPG. The minimum version ' . | |
| 1030 'required by Crypt_GPG is ' . self::MIN_VERSION | |
| 1031 ); | |
| 1032 } | |
| 1033 } | |
| 1034 | |
| 1035 | |
| 1036 return $this->_version; | |
| 1037 } | |
| 1038 | |
| 1039 // }}} | |
| 1040 // {{{ getProcessData() | |
| 1041 | |
| 1042 /** | |
| 1043 * Get data from the last process execution. | |
| 1044 * | |
| 1045 * @param string $name Data element name (e.g. 'SignatureInfo') | |
| 1046 * | |
| 1047 * @return mixed | |
| 1048 * @see Crypt_GPG_ProcessHandler::getData() | |
| 1049 */ | |
| 1050 public function getProcessData($name) | |
| 1051 { | |
| 1052 if ($this->_processHandler) { | |
| 1053 switch ($name) { | |
| 1054 case 'SignatureInfo': | |
| 1055 if ($data = $this->_processHandler->getData('SigCreated')) { | |
| 1056 return new Crypt_GPG_SignatureCreationInfo($data); | |
| 1057 } | |
| 1058 break; | |
| 1059 | |
| 1060 case 'Signatures': | |
| 1061 return (array) $this->_processHandler->getData('Signatures'); | |
| 1062 | |
| 1063 default: | |
| 1064 return $this->_processHandler->getData($name); | |
| 1065 } | |
| 1066 } | |
| 1067 } | |
| 1068 | |
| 1069 // }}} | |
| 1070 // {{{ setProcessData() | |
| 1071 | |
| 1072 /** | |
| 1073 * Set some data for the process execution. | |
| 1074 * | |
| 1075 * @param string $name Data element name (e.g. 'Handle') | |
| 1076 * @param mixed $value Data value | |
| 1077 * | |
| 1078 * @return void | |
| 1079 */ | |
| 1080 public function setProcessData($name, $value) | |
| 1081 { | |
| 1082 if ($this->_processHandler) { | |
| 1083 $this->_processHandler->setData($name, $value); | |
| 1084 } | |
| 1085 } | |
| 1086 | |
| 1087 // }}} | |
| 1088 // {{{ _handleDebugStatus() | |
| 1089 | |
| 1090 /** | |
| 1091 * Displays debug output for status lines | |
| 1092 * | |
| 1093 * @param string $line the status line to handle. | |
| 1094 * | |
| 1095 * @return void | |
| 1096 */ | |
| 1097 private function _handleDebugStatus($line) | |
| 1098 { | |
| 1099 $this->_debug('STATUS: ' . $line); | |
| 1100 } | |
| 1101 | |
| 1102 // }}} | |
| 1103 // {{{ _handleDebugError() | |
| 1104 | |
| 1105 /** | |
| 1106 * Displays debug output for error lines | |
| 1107 * | |
| 1108 * @param string $line the error line to handle. | |
| 1109 * | |
| 1110 * @return void | |
| 1111 */ | |
| 1112 private function _handleDebugError($line) | |
| 1113 { | |
| 1114 $this->_debug('ERROR: ' . $line); | |
| 1115 } | |
| 1116 | |
| 1117 // }}} | |
| 1118 // {{{ _process() | |
| 1119 | |
| 1120 /** | |
| 1121 * Performs internal streaming operations for the subprocess using either | |
| 1122 * strings or streams as input / output points | |
| 1123 * | |
| 1124 * This is the main I/O loop for streaming to and from the GPG subprocess. | |
| 1125 * | |
| 1126 * The implementation of this method is verbose mainly for performance | |
| 1127 * reasons. Adding streams to a lookup array and looping the array inside | |
| 1128 * the main I/O loop would be siginficantly slower for large streams. | |
| 1129 * | |
| 1130 * @return void | |
| 1131 * | |
| 1132 * @throws Crypt_GPG_Exception if there is an error selecting streams for | |
| 1133 * reading or writing. If this occurs, please file a bug report at | |
| 1134 * http://pear.php.net/bugs/report.php?package=Crypt_GPG. | |
| 1135 */ | |
| 1136 private function _process() | |
| 1137 { | |
| 1138 $this->_debug('BEGIN PROCESSING'); | |
| 1139 | |
| 1140 $this->_commandBuffer = ''; // buffers input to GPG | |
| 1141 $messageBuffer = ''; // buffers input to GPG | |
| 1142 $inputBuffer = ''; // buffers input to GPG | |
| 1143 $outputBuffer = ''; // buffers output from GPG | |
| 1144 $statusBuffer = ''; // buffers output from GPG | |
| 1145 $errorBuffer = ''; // buffers output from GPG | |
| 1146 $inputComplete = false; // input stream is completely buffered | |
| 1147 $messageComplete = false; // message stream is completely buffered | |
| 1148 | |
| 1149 if (is_string($this->_input)) { | |
| 1150 $inputBuffer = $this->_input; | |
| 1151 $inputComplete = true; | |
| 1152 } | |
| 1153 | |
| 1154 if (is_string($this->_message)) { | |
| 1155 $messageBuffer = $this->_message; | |
| 1156 $messageComplete = true; | |
| 1157 } | |
| 1158 | |
| 1159 if (is_string($this->_output)) { | |
| 1160 $outputBuffer =& $this->_output; | |
| 1161 } | |
| 1162 | |
| 1163 // convenience variables | |
| 1164 $fdInput = $this->_pipes[self::FD_INPUT]; | |
| 1165 $fdOutput = $this->_pipes[self::FD_OUTPUT]; | |
| 1166 $fdError = $this->_pipes[self::FD_ERROR]; | |
| 1167 $fdStatus = $this->_pipes[self::FD_STATUS]; | |
| 1168 $fdCommand = $this->_pipes[self::FD_COMMAND]; | |
| 1169 $fdMessage = $this->_pipes[self::FD_MESSAGE]; | |
| 1170 | |
| 1171 // select loop delay in milliseconds | |
| 1172 $delay = 0; | |
| 1173 $inputPosition = 0; | |
| 1174 $eolLength = mb_strlen(PHP_EOL, '8bit'); | |
| 1175 | |
| 1176 while (true) { | |
| 1177 $inputStreams = array(); | |
| 1178 $outputStreams = array(); | |
| 1179 $exceptionStreams = array(); | |
| 1180 | |
| 1181 // set up input streams | |
| 1182 if (is_resource($this->_input) && !$inputComplete) { | |
| 1183 if (feof($this->_input)) { | |
| 1184 $inputComplete = true; | |
| 1185 } else { | |
| 1186 $inputStreams[] = $this->_input; | |
| 1187 } | |
| 1188 } | |
| 1189 | |
| 1190 // close GPG input pipe if there is no more data | |
| 1191 if ($inputBuffer == '' && $inputComplete) { | |
| 1192 $this->_debug('=> closing GPG input pipe'); | |
| 1193 $this->_closePipe(self::FD_INPUT); | |
| 1194 } | |
| 1195 | |
| 1196 if (is_resource($this->_message) && !$messageComplete) { | |
| 1197 if (feof($this->_message)) { | |
| 1198 $messageComplete = true; | |
| 1199 } else { | |
| 1200 $inputStreams[] = $this->_message; | |
| 1201 } | |
| 1202 } | |
| 1203 | |
| 1204 // close GPG message pipe if there is no more data | |
| 1205 if ($messageBuffer == '' && $messageComplete) { | |
| 1206 $this->_debug('=> closing GPG message pipe'); | |
| 1207 $this->_closePipe(self::FD_MESSAGE); | |
| 1208 } | |
| 1209 | |
| 1210 if (!feof($fdOutput)) { | |
| 1211 $inputStreams[] = $fdOutput; | |
| 1212 } | |
| 1213 | |
| 1214 if (!feof($fdStatus)) { | |
| 1215 $inputStreams[] = $fdStatus; | |
| 1216 } | |
| 1217 | |
| 1218 if (!feof($fdError)) { | |
| 1219 $inputStreams[] = $fdError; | |
| 1220 } | |
| 1221 | |
| 1222 // set up output streams | |
| 1223 if ($outputBuffer != '' && is_resource($this->_output)) { | |
| 1224 $outputStreams[] = $this->_output; | |
| 1225 } | |
| 1226 | |
| 1227 if ($this->_commandBuffer != '' && is_resource($fdCommand)) { | |
| 1228 $outputStreams[] = $fdCommand; | |
| 1229 } | |
| 1230 | |
| 1231 if ($messageBuffer != '' && is_resource($fdMessage)) { | |
| 1232 $outputStreams[] = $fdMessage; | |
| 1233 } | |
| 1234 | |
| 1235 if ($inputBuffer != '' && is_resource($fdInput)) { | |
| 1236 $outputStreams[] = $fdInput; | |
| 1237 } | |
| 1238 | |
| 1239 // no streams left to read or write, we're all done | |
| 1240 if (count($inputStreams) === 0 && count($outputStreams) === 0) { | |
| 1241 break; | |
| 1242 } | |
| 1243 | |
| 1244 $this->_debug('selecting streams'); | |
| 1245 | |
| 1246 $ready = stream_select( | |
| 1247 $inputStreams, | |
| 1248 $outputStreams, | |
| 1249 $exceptionStreams, | |
| 1250 null | |
| 1251 ); | |
| 1252 | |
| 1253 $this->_debug('=> got ' . $ready); | |
| 1254 | |
| 1255 if ($ready === false) { | |
| 1256 throw new Crypt_GPG_Exception( | |
| 1257 'Error selecting stream for communication with GPG ' . | |
| 1258 'subprocess. Please file a bug report at: ' . | |
| 1259 'http://pear.php.net/bugs/report.php?package=Crypt_GPG' | |
| 1260 ); | |
| 1261 } | |
| 1262 | |
| 1263 if ($ready === 0) { | |
| 1264 throw new Crypt_GPG_Exception( | |
| 1265 'stream_select() returned 0. This can not happen! Please ' . | |
| 1266 'file a bug report at: ' . | |
| 1267 'http://pear.php.net/bugs/report.php?package=Crypt_GPG' | |
| 1268 ); | |
| 1269 } | |
| 1270 | |
| 1271 // write input (to GPG) | |
| 1272 if (in_array($fdInput, $outputStreams, true)) { | |
| 1273 $this->_debug('GPG is ready for input'); | |
| 1274 | |
| 1275 $chunk = mb_substr($inputBuffer, $inputPosition, self::CHUNK_SIZE, '8bit'); | |
| 1276 $length = mb_strlen($chunk, '8bit'); | |
| 1277 | |
| 1278 $this->_debug( | |
| 1279 '=> about to write ' . $length . ' bytes to GPG input' | |
| 1280 ); | |
| 1281 | |
| 1282 $length = fwrite($fdInput, $chunk, $length); | |
| 1283 if ($length === 0) { | |
| 1284 // If we wrote 0 bytes it was either EAGAIN or EPIPE. Since | |
| 1285 // the pipe was seleted for writing, we assume it was EPIPE. | |
| 1286 // There's no way to get the actual error code in PHP. See | |
| 1287 // PHP Bug #39598. https://bugs.php.net/bug.php?id=39598 | |
| 1288 $this->_debug('=> broken pipe on GPG input'); | |
| 1289 $this->_debug('=> closing pipe GPG input'); | |
| 1290 $this->_closePipe(self::FD_INPUT); | |
| 1291 } else { | |
| 1292 $this->_debug('=> wrote ' . $length . ' bytes'); | |
| 1293 // Move the position pointer, don't modify $inputBuffer (#21081) | |
| 1294 if (is_string($this->_input)) { | |
| 1295 $inputPosition += $length; | |
| 1296 } else { | |
| 1297 $inputPosition = 0; | |
| 1298 $inputBuffer = mb_substr($inputBuffer, $length, null, '8bit'); | |
| 1299 } | |
| 1300 } | |
| 1301 } | |
| 1302 | |
| 1303 // read input (from PHP stream) | |
| 1304 // If the buffer is too big wait until it's smaller, we don't want | |
| 1305 // to use too much memory | |
| 1306 if (in_array($this->_input, $inputStreams, true) | |
| 1307 && mb_strlen($inputBuffer, '8bit') < self::CHUNK_SIZE | |
| 1308 ) { | |
| 1309 $this->_debug('input stream is ready for reading'); | |
| 1310 $this->_debug( | |
| 1311 '=> about to read ' . self::CHUNK_SIZE . | |
| 1312 ' bytes from input stream' | |
| 1313 ); | |
| 1314 | |
| 1315 $chunk = fread($this->_input, self::CHUNK_SIZE); | |
| 1316 $length = mb_strlen($chunk, '8bit'); | |
| 1317 $inputBuffer .= $chunk; | |
| 1318 | |
| 1319 $this->_debug('=> read ' . $length . ' bytes'); | |
| 1320 } | |
| 1321 | |
| 1322 // write message (to GPG) | |
| 1323 if (in_array($fdMessage, $outputStreams, true)) { | |
| 1324 $this->_debug('GPG is ready for message data'); | |
| 1325 | |
| 1326 $chunk = mb_substr($messageBuffer, 0, self::CHUNK_SIZE, '8bit'); | |
| 1327 $length = mb_strlen($chunk, '8bit'); | |
| 1328 | |
| 1329 $this->_debug( | |
| 1330 '=> about to write ' . $length . ' bytes to GPG message' | |
| 1331 ); | |
| 1332 | |
| 1333 $length = fwrite($fdMessage, $chunk, $length); | |
| 1334 if ($length === 0) { | |
| 1335 // If we wrote 0 bytes it was either EAGAIN or EPIPE. Since | |
| 1336 // the pipe was seleted for writing, we assume it was EPIPE. | |
| 1337 // There's no way to get the actual error code in PHP. See | |
| 1338 // PHP Bug #39598. https://bugs.php.net/bug.php?id=39598 | |
| 1339 $this->_debug('=> broken pipe on GPG message'); | |
| 1340 $this->_debug('=> closing pipe GPG message'); | |
| 1341 $this->_closePipe(self::FD_MESSAGE); | |
| 1342 } else { | |
| 1343 $this->_debug('=> wrote ' . $length . ' bytes'); | |
| 1344 $messageBuffer = mb_substr($messageBuffer, $length, null, '8bit'); | |
| 1345 } | |
| 1346 } | |
| 1347 | |
| 1348 // read message (from PHP stream) | |
| 1349 if (in_array($this->_message, $inputStreams, true)) { | |
| 1350 $this->_debug('message stream is ready for reading'); | |
| 1351 $this->_debug( | |
| 1352 '=> about to read ' . self::CHUNK_SIZE . | |
| 1353 ' bytes from message stream' | |
| 1354 ); | |
| 1355 | |
| 1356 $chunk = fread($this->_message, self::CHUNK_SIZE); | |
| 1357 $length = mb_strlen($chunk, '8bit'); | |
| 1358 $messageBuffer .= $chunk; | |
| 1359 | |
| 1360 $this->_debug('=> read ' . $length . ' bytes'); | |
| 1361 } | |
| 1362 | |
| 1363 // read output (from GPG) | |
| 1364 if (in_array($fdOutput, $inputStreams, true)) { | |
| 1365 $this->_debug('GPG output stream ready for reading'); | |
| 1366 $this->_debug( | |
| 1367 '=> about to read ' . self::CHUNK_SIZE . | |
| 1368 ' bytes from GPG output' | |
| 1369 ); | |
| 1370 | |
| 1371 $chunk = fread($fdOutput, self::CHUNK_SIZE); | |
| 1372 $length = mb_strlen($chunk, '8bit'); | |
| 1373 $outputBuffer .= $chunk; | |
| 1374 | |
| 1375 $this->_debug('=> read ' . $length . ' bytes'); | |
| 1376 } | |
| 1377 | |
| 1378 // write output (to PHP stream) | |
| 1379 if (in_array($this->_output, $outputStreams, true)) { | |
| 1380 $this->_debug('output stream is ready for data'); | |
| 1381 | |
| 1382 $chunk = mb_substr($outputBuffer, 0, self::CHUNK_SIZE, '8bit'); | |
| 1383 $length = mb_strlen($chunk, '8bit'); | |
| 1384 | |
| 1385 $this->_debug( | |
| 1386 '=> about to write ' . $length . ' bytes to output stream' | |
| 1387 ); | |
| 1388 | |
| 1389 $length = fwrite($this->_output, $chunk, $length); | |
| 1390 $outputBuffer = mb_substr($outputBuffer, $length, null, '8bit'); | |
| 1391 | |
| 1392 $this->_debug('=> wrote ' . $length . ' bytes'); | |
| 1393 } | |
| 1394 | |
| 1395 // read error (from GPG) | |
| 1396 if (in_array($fdError, $inputStreams, true)) { | |
| 1397 $this->_debug('GPG error stream ready for reading'); | |
| 1398 $this->_debug( | |
| 1399 '=> about to read ' . self::CHUNK_SIZE . | |
| 1400 ' bytes from GPG error' | |
| 1401 ); | |
| 1402 | |
| 1403 $chunk = fread($fdError, self::CHUNK_SIZE); | |
| 1404 $length = mb_strlen($chunk, '8bit'); | |
| 1405 $errorBuffer .= $chunk; | |
| 1406 | |
| 1407 $this->_debug('=> read ' . $length . ' bytes'); | |
| 1408 | |
| 1409 // pass lines to error handlers | |
| 1410 while (($pos = strpos($errorBuffer, PHP_EOL)) !== false) { | |
| 1411 $line = mb_substr($errorBuffer, 0, $pos, '8bit'); | |
| 1412 foreach ($this->_errorHandlers as $handler) { | |
| 1413 array_unshift($handler['args'], $line); | |
| 1414 call_user_func_array( | |
| 1415 $handler['callback'], | |
| 1416 $handler['args'] | |
| 1417 ); | |
| 1418 | |
| 1419 array_shift($handler['args']); | |
| 1420 } | |
| 1421 | |
| 1422 $errorBuffer = mb_substr($errorBuffer, $pos + $eolLength, null, '8bit'); | |
| 1423 } | |
| 1424 } | |
| 1425 | |
| 1426 // read status (from GPG) | |
| 1427 if (in_array($fdStatus, $inputStreams, true)) { | |
| 1428 $this->_debug('GPG status stream ready for reading'); | |
| 1429 $this->_debug( | |
| 1430 '=> about to read ' . self::CHUNK_SIZE . | |
| 1431 ' bytes from GPG status' | |
| 1432 ); | |
| 1433 | |
| 1434 $chunk = fread($fdStatus, self::CHUNK_SIZE); | |
| 1435 $length = mb_strlen($chunk, '8bit'); | |
| 1436 $statusBuffer .= $chunk; | |
| 1437 | |
| 1438 $this->_debug('=> read ' . $length . ' bytes'); | |
| 1439 | |
| 1440 // pass lines to status handlers | |
| 1441 while (($pos = strpos($statusBuffer, PHP_EOL)) !== false) { | |
| 1442 $line = mb_substr($statusBuffer, 0, $pos, '8bit'); | |
| 1443 // only pass lines beginning with magic prefix | |
| 1444 if (mb_substr($line, 0, 9, '8bit') == '[GNUPG:] ') { | |
| 1445 $line = mb_substr($line, 9, null, '8bit'); | |
| 1446 foreach ($this->_statusHandlers as $handler) { | |
| 1447 array_unshift($handler['args'], $line); | |
| 1448 call_user_func_array( | |
| 1449 $handler['callback'], | |
| 1450 $handler['args'] | |
| 1451 ); | |
| 1452 | |
| 1453 array_shift($handler['args']); | |
| 1454 } | |
| 1455 } | |
| 1456 | |
| 1457 $statusBuffer = mb_substr($statusBuffer, $pos + $eolLength, null, '8bit'); | |
| 1458 } | |
| 1459 } | |
| 1460 | |
| 1461 // write command (to GPG) | |
| 1462 if (in_array($fdCommand, $outputStreams, true)) { | |
| 1463 $this->_debug('GPG is ready for command data'); | |
| 1464 | |
| 1465 // send commands | |
| 1466 $chunk = mb_substr($this->_commandBuffer, 0, self::CHUNK_SIZE, '8bit'); | |
| 1467 $length = mb_strlen($chunk, '8bit'); | |
| 1468 | |
| 1469 $this->_debug( | |
| 1470 '=> about to write ' . $length . ' bytes to GPG command' | |
| 1471 ); | |
| 1472 | |
| 1473 $length = fwrite($fdCommand, $chunk, $length); | |
| 1474 if ($length === 0) { | |
| 1475 // If we wrote 0 bytes it was either EAGAIN or EPIPE. Since | |
| 1476 // the pipe was seleted for writing, we assume it was EPIPE. | |
| 1477 // There's no way to get the actual error code in PHP. See | |
| 1478 // PHP Bug #39598. https://bugs.php.net/bug.php?id=39598 | |
| 1479 $this->_debug('=> broken pipe on GPG command'); | |
| 1480 $this->_debug('=> closing pipe GPG command'); | |
| 1481 $this->_closePipe(self::FD_COMMAND); | |
| 1482 } else { | |
| 1483 $this->_debug('=> wrote ' . $length); | |
| 1484 $this->_commandBuffer = mb_substr($this->_commandBuffer, $length, null, '8bit'); | |
| 1485 } | |
| 1486 } | |
| 1487 | |
| 1488 if (count($outputStreams) === 0 || count($inputStreams) === 0) { | |
| 1489 // we have an I/O imbalance, increase the select loop delay | |
| 1490 // to smooth things out | |
| 1491 $delay += 10; | |
| 1492 } else { | |
| 1493 // things are running smoothly, decrease the delay | |
| 1494 $delay -= 8; | |
| 1495 $delay = max(0, $delay); | |
| 1496 } | |
| 1497 | |
| 1498 if ($delay > 0) { | |
| 1499 usleep($delay); | |
| 1500 } | |
| 1501 | |
| 1502 } // end loop while streams are open | |
| 1503 | |
| 1504 $this->_debug('END PROCESSING'); | |
| 1505 } | |
| 1506 | |
| 1507 // }}} | |
| 1508 // {{{ _openSubprocess() | |
| 1509 | |
| 1510 /** | |
| 1511 * Opens an internal GPG subprocess for the current operation | |
| 1512 * | |
| 1513 * Opens a GPG subprocess, then connects the subprocess to some pipes. Sets | |
| 1514 * the private class property {@link Crypt_GPG_Engine::$_process} to | |
| 1515 * the new subprocess. | |
| 1516 * | |
| 1517 * @return void | |
| 1518 * | |
| 1519 * @throws Crypt_GPG_OpenSubprocessException if the subprocess could not be | |
| 1520 * opened. | |
| 1521 * | |
| 1522 * @see Crypt_GPG_Engine::setOperation() | |
| 1523 * @see Crypt_GPG_Engine::_closeSubprocess() | |
| 1524 * @see Crypt_GPG_Engine::$_process | |
| 1525 */ | |
| 1526 private function _openSubprocess() | |
| 1527 { | |
| 1528 $version = $this->getVersion(); | |
| 1529 | |
| 1530 // log versions, but not when looking for the version number | |
| 1531 if ($version !== '1.0.0') { | |
| 1532 $this->_debug('USING GPG ' . $version . ' with PHP ' . PHP_VERSION); | |
| 1533 } | |
| 1534 | |
| 1535 // Binary operations will not work on Windows with PHP < 5.2.6. This is | |
| 1536 // in case stream_select() ever works on Windows. | |
| 1537 $rb = (version_compare(PHP_VERSION, '5.2.6') < 0) ? 'r' : 'rb'; | |
| 1538 $wb = (version_compare(PHP_VERSION, '5.2.6') < 0) ? 'w' : 'wb'; | |
| 1539 | |
| 1540 $env = $_ENV; | |
| 1541 | |
| 1542 // Newer versions of GnuPG return localized results. Crypt_GPG only | |
| 1543 // works with English, so set the locale to 'C' for the subprocess. | |
| 1544 $env['LC_ALL'] = 'C'; | |
| 1545 | |
| 1546 // If using GnuPG 2.x < 2.1.13 start the gpg-agent | |
| 1547 if (version_compare($version, '2.0.0', 'ge') | |
| 1548 && version_compare($version, '2.1.13', 'lt') | |
| 1549 ) { | |
| 1550 if (!$this->_agent) { | |
| 1551 throw new Crypt_GPG_OpenSubprocessException( | |
| 1552 'Unable to open gpg-agent subprocess (gpg-agent not found). ' . | |
| 1553 'Please specify location of the gpg-agent binary ' . | |
| 1554 'using the \'agent\' driver option.' | |
| 1555 ); | |
| 1556 } | |
| 1557 | |
| 1558 $agentArguments = array( | |
| 1559 '--daemon', | |
| 1560 '--options /dev/null', // ignore any saved options | |
| 1561 '--csh', // output is easier to parse | |
| 1562 '--keep-display', // prevent passing --display to pinentry | |
| 1563 '--no-grab', | |
| 1564 '--ignore-cache-for-signing', | |
| 1565 '--pinentry-touch-file /dev/null', | |
| 1566 '--disable-scdaemon', | |
| 1567 '--no-use-standard-socket', | |
| 1568 '--pinentry-program ' . escapeshellarg($this->_getPinEntry()) | |
| 1569 ); | |
| 1570 | |
| 1571 if ($this->_homedir) { | |
| 1572 $agentArguments[] = '--homedir ' . | |
| 1573 escapeshellarg($this->_homedir); | |
| 1574 } | |
| 1575 | |
| 1576 if ($version21 = version_compare($version, '2.1.0', 'ge')) { | |
| 1577 // This is needed to get socket file location in stderr output | |
| 1578 // Note: This does not help when the agent already is running | |
| 1579 $agentArguments[] = '--verbose'; | |
| 1580 } | |
| 1581 | |
| 1582 $agentCommandLine = $this->_agent . ' ' . implode(' ', $agentArguments); | |
| 1583 | |
| 1584 $agentDescriptorSpec = array( | |
| 1585 self::FD_INPUT => array('pipe', $rb), // stdin | |
| 1586 self::FD_OUTPUT => array('pipe', $wb), // stdout | |
| 1587 self::FD_ERROR => array('pipe', $wb) // stderr | |
| 1588 ); | |
| 1589 | |
| 1590 $this->_debug('OPENING GPG-AGENT SUBPROCESS WITH THE FOLLOWING COMMAND:'); | |
| 1591 $this->_debug($agentCommandLine); | |
| 1592 | |
| 1593 $this->_agentProcess = proc_open( | |
| 1594 $agentCommandLine, | |
| 1595 $agentDescriptorSpec, | |
| 1596 $this->_agentPipes, | |
| 1597 null, | |
| 1598 $env, | |
| 1599 array('binary_pipes' => true) | |
| 1600 ); | |
| 1601 | |
| 1602 if (!is_resource($this->_agentProcess)) { | |
| 1603 throw new Crypt_GPG_OpenSubprocessException( | |
| 1604 'Unable to open gpg-agent subprocess.', | |
| 1605 0, | |
| 1606 $agentCommandLine | |
| 1607 ); | |
| 1608 } | |
| 1609 | |
| 1610 // Get GPG_AGENT_INFO and set environment variable for gpg process. | |
| 1611 // This is a blocking read, but is only 1 line. | |
| 1612 $agentInfo = fread($this->_agentPipes[self::FD_OUTPUT], self::CHUNK_SIZE); | |
| 1613 | |
| 1614 // For GnuPG 2.1 we need to read both stderr and stdout | |
| 1615 if ($version21) { | |
| 1616 $agentInfo .= "\n" . fread($this->_agentPipes[self::FD_ERROR], self::CHUNK_SIZE); | |
| 1617 } | |
| 1618 | |
| 1619 if ($agentInfo) { | |
| 1620 foreach (explode("\n", $agentInfo) as $line) { | |
| 1621 if ($version21) { | |
| 1622 if (preg_match('/listening on socket \'([^\']+)/', $line, $m)) { | |
| 1623 $this->_agentInfo = $m[1]; | |
| 1624 } else if (preg_match('/gpg-agent\[([0-9]+)\].* started/', $line, $m)) { | |
| 1625 $this->_agentInfo .= ':' . $m[1] . ':1'; | |
| 1626 } | |
| 1627 } else if (preg_match('/GPG_AGENT_INFO[=\s]([^;]+)/', $line, $m)) { | |
| 1628 $this->_agentInfo = $m[1]; | |
| 1629 break; | |
| 1630 } | |
| 1631 } | |
| 1632 } | |
| 1633 | |
| 1634 $this->_debug('GPG-AGENT-INFO: ' . $this->_agentInfo); | |
| 1635 | |
| 1636 $env['GPG_AGENT_INFO'] = $this->_agentInfo; | |
| 1637 | |
| 1638 // gpg-agent daemon is started, we can close the launching process | |
| 1639 $this->_closeAgentLaunchProcess(); | |
| 1640 | |
| 1641 // Terminate processes if something went wrong | |
| 1642 register_shutdown_function(array($this, '__destruct')); | |
| 1643 } | |
| 1644 | |
| 1645 // "Register" GPGConf existence for _closeIdleAgents() | |
| 1646 if (version_compare($version, '2.1.0', 'ge')) { | |
| 1647 if ($this->_gpgconf === null) { | |
| 1648 $this->_gpgconf = $this->_getGPGConf(); | |
| 1649 } | |
| 1650 } else { | |
| 1651 $this->_gpgconf = false; | |
| 1652 } | |
| 1653 | |
| 1654 $commandLine = $this->_binary; | |
| 1655 | |
| 1656 $defaultArguments = array( | |
| 1657 '--status-fd ' . escapeshellarg(self::FD_STATUS), | |
| 1658 '--command-fd ' . escapeshellarg(self::FD_COMMAND), | |
| 1659 '--no-secmem-warning', | |
| 1660 '--no-tty', | |
| 1661 '--no-default-keyring', // ignored if keying files are not specified | |
| 1662 '--no-options' // prevent creation of ~/.gnupg directory | |
| 1663 ); | |
| 1664 | |
| 1665 if (version_compare($version, '1.0.7', 'ge')) { | |
| 1666 if (version_compare($version, '2.0.0', 'lt')) { | |
| 1667 $defaultArguments[] = '--no-use-agent'; | |
| 1668 } | |
| 1669 $defaultArguments[] = '--no-permission-warning'; | |
| 1670 } | |
| 1671 | |
| 1672 if (version_compare($version, '1.4.2', 'ge')) { | |
| 1673 $defaultArguments[] = '--exit-on-status-write-error'; | |
| 1674 } | |
| 1675 | |
| 1676 if (version_compare($version, '1.3.2', 'ge')) { | |
| 1677 $defaultArguments[] = '--trust-model always'; | |
| 1678 } else { | |
| 1679 $defaultArguments[] = '--always-trust'; | |
| 1680 } | |
| 1681 | |
| 1682 // Since 2.1.13 we can use "loopback mode" instead of gpg-agent | |
| 1683 if (version_compare($version, '2.1.13', 'ge')) { | |
| 1684 $defaultArguments[] = '--pinentry-mode loopback'; | |
| 1685 } | |
| 1686 | |
| 1687 if (!$this->_strict) { | |
| 1688 $defaultArguments[] = '--ignore-time-conflict'; | |
| 1689 $defaultArguments[] = '--ignore-valid-from'; | |
| 1690 } | |
| 1691 | |
| 1692 if (!empty($this->_digest_algo)) { | |
| 1693 $defaultArguments[] = '--digest-algo ' . escapeshellarg($this->_digest_algo); | |
| 1694 $defaultArguments[] = '--s2k-digest-algo ' . escapeshellarg($this->_digest_algo); | |
| 1695 } | |
| 1696 | |
| 1697 if (!empty($this->_cipher_algo)) { | |
| 1698 $defaultArguments[] = '--cipher-algo ' . escapeshellarg($this->_cipher_algo); | |
| 1699 $defaultArguments[] = '--s2k-cipher-algo ' . escapeshellarg($this->_cipher_algo); | |
| 1700 } | |
| 1701 | |
| 1702 $arguments = array_merge($defaultArguments, $this->_arguments); | |
| 1703 | |
| 1704 if ($this->_homedir) { | |
| 1705 $arguments[] = '--homedir ' . escapeshellarg($this->_homedir); | |
| 1706 | |
| 1707 // the random seed file makes subsequent actions faster so only | |
| 1708 // disable it if we have to. | |
| 1709 if (!is_writeable($this->_homedir)) { | |
| 1710 $arguments[] = '--no-random-seed-file'; | |
| 1711 } | |
| 1712 } | |
| 1713 | |
| 1714 if ($this->_publicKeyring) { | |
| 1715 $arguments[] = '--keyring ' . escapeshellarg($this->_publicKeyring); | |
| 1716 } | |
| 1717 | |
| 1718 if ($this->_privateKeyring) { | |
| 1719 $arguments[] = '--secret-keyring ' . | |
| 1720 escapeshellarg($this->_privateKeyring); | |
| 1721 } | |
| 1722 | |
| 1723 if ($this->_trustDb) { | |
| 1724 $arguments[] = '--trustdb-name ' . escapeshellarg($this->_trustDb); | |
| 1725 } | |
| 1726 | |
| 1727 $commandLine .= ' ' . implode(' ', $arguments) . ' ' . | |
| 1728 $this->_operation; | |
| 1729 | |
| 1730 $descriptorSpec = array( | |
| 1731 self::FD_INPUT => array('pipe', $rb), // stdin | |
| 1732 self::FD_OUTPUT => array('pipe', $wb), // stdout | |
| 1733 self::FD_ERROR => array('pipe', $wb), // stderr | |
| 1734 self::FD_STATUS => array('pipe', $wb), // status | |
| 1735 self::FD_COMMAND => array('pipe', $rb), // command | |
| 1736 self::FD_MESSAGE => array('pipe', $rb) // message | |
| 1737 ); | |
| 1738 | |
| 1739 $this->_debug('OPENING GPG SUBPROCESS WITH THE FOLLOWING COMMAND:'); | |
| 1740 $this->_debug($commandLine); | |
| 1741 | |
| 1742 $this->_process = proc_open( | |
| 1743 $commandLine, | |
| 1744 $descriptorSpec, | |
| 1745 $this->_pipes, | |
| 1746 null, | |
| 1747 $env, | |
| 1748 array('binary_pipes' => true) | |
| 1749 ); | |
| 1750 | |
| 1751 if (!is_resource($this->_process)) { | |
| 1752 throw new Crypt_GPG_OpenSubprocessException( | |
| 1753 'Unable to open GPG subprocess.', 0, $commandLine | |
| 1754 ); | |
| 1755 } | |
| 1756 | |
| 1757 // Set streams as non-blocking. See Bug #18618. | |
| 1758 foreach ($this->_pipes as $pipe) { | |
| 1759 stream_set_blocking($pipe, 0); | |
| 1760 stream_set_write_buffer($pipe, self::CHUNK_SIZE); | |
| 1761 stream_set_chunk_size($pipe, self::CHUNK_SIZE); | |
| 1762 stream_set_read_buffer($pipe, self::CHUNK_SIZE); | |
| 1763 } | |
| 1764 | |
| 1765 $this->_openPipes = $this->_pipes; | |
| 1766 } | |
| 1767 | |
| 1768 // }}} | |
| 1769 // {{{ _closeSubprocess() | |
| 1770 | |
| 1771 /** | |
| 1772 * Closes the internal GPG subprocess | |
| 1773 * | |
| 1774 * Closes the internal GPG subprocess. Sets the private class property | |
| 1775 * {@link Crypt_GPG_Engine::$_process} to null. | |
| 1776 * | |
| 1777 * @return void | |
| 1778 * | |
| 1779 * @see Crypt_GPG_Engine::_openSubprocess() | |
| 1780 * @see Crypt_GPG_Engine::$_process | |
| 1781 */ | |
| 1782 private function _closeSubprocess() | |
| 1783 { | |
| 1784 // clear PINs from environment if they were set | |
| 1785 $_ENV['PINENTRY_USER_DATA'] = null; | |
| 1786 | |
| 1787 if (is_resource($this->_process)) { | |
| 1788 $this->_debug('CLOSING GPG SUBPROCESS'); | |
| 1789 | |
| 1790 // close remaining open pipes | |
| 1791 foreach (array_keys($this->_openPipes) as $pipeNumber) { | |
| 1792 $this->_closePipe($pipeNumber); | |
| 1793 } | |
| 1794 | |
| 1795 $status = proc_get_status($this->_process); | |
| 1796 $exitCode = proc_close($this->_process); | |
| 1797 | |
| 1798 // proc_close() can return -1 in some cases, | |
| 1799 // get the real exit code from the process status | |
| 1800 if ($exitCode < 0 && $status && !$status['running']) { | |
| 1801 $exitCode = $status['exitcode']; | |
| 1802 } | |
| 1803 | |
| 1804 if ($exitCode > 0) { | |
| 1805 $this->_debug( | |
| 1806 '=> subprocess returned an unexpected exit code: ' . | |
| 1807 $exitCode | |
| 1808 ); | |
| 1809 } | |
| 1810 | |
| 1811 $this->_process = null; | |
| 1812 $this->_pipes = array(); | |
| 1813 | |
| 1814 // close file handles before throwing an exception | |
| 1815 if (is_resource($this->_input)) { | |
| 1816 fclose($this->_input); | |
| 1817 } | |
| 1818 | |
| 1819 if (is_resource($this->_output)) { | |
| 1820 fclose($this->_output); | |
| 1821 } | |
| 1822 | |
| 1823 $this->_processHandler->throwException($exitCode); | |
| 1824 } | |
| 1825 | |
| 1826 $this->_closeAgentLaunchProcess(); | |
| 1827 | |
| 1828 if ($this->_agentInfo !== null) { | |
| 1829 $parts = explode(':', $this->_agentInfo, 3); | |
| 1830 | |
| 1831 if (!empty($parts[1])) { | |
| 1832 $this->_debug('STOPPING GPG-AGENT DAEMON'); | |
| 1833 | |
| 1834 $process = new Crypt_GPG_ProcessControl($parts[1]); | |
| 1835 | |
| 1836 // terminate agent daemon | |
| 1837 $process->terminate(); | |
| 1838 | |
| 1839 while ($process->isRunning()) { | |
| 1840 usleep(10000); // 10 ms | |
| 1841 $process->terminate(); | |
| 1842 } | |
| 1843 | |
| 1844 $this->_debug('GPG-AGENT DAEMON STOPPED'); | |
| 1845 } | |
| 1846 | |
| 1847 $this->_agentInfo = null; | |
| 1848 } | |
| 1849 } | |
| 1850 | |
| 1851 // }}} | |
| 1852 // {{{ _closeAgentLaunchProcess() | |
| 1853 | |
| 1854 /** | |
| 1855 * Closes a the internal GPG-AGENT subprocess | |
| 1856 * | |
| 1857 * Closes the internal GPG-AGENT subprocess. Sets the private class property | |
| 1858 * {@link Crypt_GPG_Engine::$_agentProcess} to null. | |
| 1859 * | |
| 1860 * @return void | |
| 1861 * | |
| 1862 * @see Crypt_GPG_Engine::_openSubprocess() | |
| 1863 * @see Crypt_GPG_Engine::$_agentProcess | |
| 1864 */ | |
| 1865 private function _closeAgentLaunchProcess() | |
| 1866 { | |
| 1867 if (is_resource($this->_agentProcess)) { | |
| 1868 $this->_debug('CLOSING GPG-AGENT LAUNCH PROCESS'); | |
| 1869 | |
| 1870 // close agent pipes | |
| 1871 foreach ($this->_agentPipes as $pipe) { | |
| 1872 fflush($pipe); | |
| 1873 fclose($pipe); | |
| 1874 } | |
| 1875 | |
| 1876 // close agent launching process | |
| 1877 proc_close($this->_agentProcess); | |
| 1878 | |
| 1879 $this->_agentProcess = null; | |
| 1880 $this->_agentPipes = array(); | |
| 1881 | |
| 1882 $this->_debug('GPG-AGENT LAUNCH PROCESS CLOSED'); | |
| 1883 } | |
| 1884 } | |
| 1885 | |
| 1886 // }}} | |
| 1887 // {{{ _closePipe() | |
| 1888 | |
| 1889 /** | |
| 1890 * Closes an opened pipe used to communicate with the GPG subprocess | |
| 1891 * | |
| 1892 * If the pipe is already closed, it is ignored. If the pipe is open, it | |
| 1893 * is flushed and then closed. | |
| 1894 * | |
| 1895 * @param integer $pipeNumber the file descriptor number of the pipe to | |
| 1896 * close. | |
| 1897 * | |
| 1898 * @return void | |
| 1899 */ | |
| 1900 private function _closePipe($pipeNumber) | |
| 1901 { | |
| 1902 $pipeNumber = intval($pipeNumber); | |
| 1903 if (array_key_exists($pipeNumber, $this->_openPipes)) { | |
| 1904 fflush($this->_openPipes[$pipeNumber]); | |
| 1905 fclose($this->_openPipes[$pipeNumber]); | |
| 1906 unset($this->_openPipes[$pipeNumber]); | |
| 1907 } | |
| 1908 } | |
| 1909 | |
| 1910 // }}} | |
| 1911 // {{{ _closeIdleAgents() | |
| 1912 | |
| 1913 /** | |
| 1914 * Forces automatically started gpg-agent process to cleanup and exit | |
| 1915 * within a minute. | |
| 1916 * | |
| 1917 * This is needed in GnuPG 2.1 where agents are started | |
| 1918 * automatically by gpg process, not our code. | |
| 1919 * | |
| 1920 * @return void | |
| 1921 */ | |
| 1922 private function _closeIdleAgents() | |
| 1923 { | |
| 1924 if ($this->_gpgconf) { | |
| 1925 // before 2.1.13 --homedir wasn't supported, use env variable | |
| 1926 $env = array('GNUPGHOME' => $this->_homedir); | |
| 1927 $cmd = $this->_gpgconf . ' --kill gpg-agent'; | |
| 1928 | |
| 1929 if ($process = proc_open($cmd, array(), $pipes, null, $env)) { | |
| 1930 proc_close($process); | |
| 1931 } | |
| 1932 } | |
| 1933 } | |
| 1934 | |
| 1935 // }}} | |
| 1936 // {{{ _getBinary() | |
| 1937 | |
| 1938 /** | |
| 1939 * Gets the name of the GPG binary for the current operating system | |
| 1940 * | |
| 1941 * This method is called if the '<kbd>binary</kbd>' option is <i>not</i> | |
| 1942 * specified when creating this driver. | |
| 1943 * | |
| 1944 * @return string the name of the GPG binary for the current operating | |
| 1945 * system. If no suitable binary could be found, an empty | |
| 1946 * string is returned. | |
| 1947 */ | |
| 1948 private function _getBinary() | |
| 1949 { | |
| 1950 if ($binary = $this->_findBinary('gpg')) { | |
| 1951 return $binary; | |
| 1952 } | |
| 1953 | |
| 1954 return $this->_findBinary('gpg2'); | |
| 1955 } | |
| 1956 | |
| 1957 // }}} | |
| 1958 // {{{ _getAgent() | |
| 1959 | |
| 1960 /** | |
| 1961 * Gets the name of the GPG-AGENT binary for the current operating system | |
| 1962 * | |
| 1963 * @return string the name of the GPG-AGENT binary for the current operating | |
| 1964 * system. If no suitable binary could be found, an empty | |
| 1965 * string is returned. | |
| 1966 */ | |
| 1967 private function _getAgent() | |
| 1968 { | |
| 1969 return $this->_findBinary('gpg-agent'); | |
| 1970 } | |
| 1971 | |
| 1972 // }}} | |
| 1973 // {{{ _getGPGConf() | |
| 1974 | |
| 1975 /** | |
| 1976 * Gets the name of the GPGCONF binary for the current operating system | |
| 1977 * | |
| 1978 * @return string the name of the GPGCONF binary for the current operating | |
| 1979 * system. If no suitable binary could be found, an empty | |
| 1980 * string is returned. | |
| 1981 */ | |
| 1982 private function _getGPGConf() | |
| 1983 { | |
| 1984 return $this->_findBinary('gpgconf'); | |
| 1985 } | |
| 1986 | |
| 1987 // }}} | |
| 1988 // {{{ _findBinary() | |
| 1989 | |
| 1990 /** | |
| 1991 * Gets the location of a binary for the current operating system | |
| 1992 * | |
| 1993 * @param string $name Name of a binary program | |
| 1994 * | |
| 1995 * @return string The location of the binary for the current operating | |
| 1996 * system. If no suitable binary could be found, an empty | |
| 1997 * string is returned. | |
| 1998 */ | |
| 1999 private function _findBinary($name) | |
| 2000 { | |
| 2001 $binary = ''; | |
| 2002 | |
| 2003 if ($this->_isDarwin) { | |
| 2004 $locations = array( | |
| 2005 '/opt/local/bin/', // MacPorts | |
| 2006 '/usr/local/bin/', // Mac GPG | |
| 2007 '/sw/bin/', // Fink | |
| 2008 '/usr/bin/' | |
| 2009 ); | |
| 2010 } else { | |
| 2011 $locations = array( | |
| 2012 '/usr/bin/', | |
| 2013 '/usr/local/bin/' | |
| 2014 ); | |
| 2015 } | |
| 2016 | |
| 2017 foreach ($locations as $location) { | |
| 2018 if (is_executable($location . $name)) { | |
| 2019 $binary = $location . $name; | |
| 2020 break; | |
| 2021 } | |
| 2022 } | |
| 2023 | |
| 2024 return $binary; | |
| 2025 } | |
| 2026 | |
| 2027 // }}} | |
| 2028 // {{{ _getPinEntry() | |
| 2029 | |
| 2030 /** | |
| 2031 * Gets the location of the PinEntry script | |
| 2032 * | |
| 2033 * @return string the location of the PinEntry script. | |
| 2034 */ | |
| 2035 private function _getPinEntry() | |
| 2036 { | |
| 2037 // Find PinEntry program depending on the way how the package is installed | |
| 2038 $ds = DIRECTORY_SEPARATOR; | |
| 2039 $root = __DIR__ . $ds . '..' . $ds . '..' . $ds; | |
| 2040 $paths = array( | |
| 2041 '@bin-dir@', // PEAR | |
| 2042 $root . 'scripts', // Git | |
| 2043 $root . 'bin', // Composer | |
| 2044 ); | |
| 2045 | |
| 2046 foreach ($paths as $path) { | |
| 2047 if (file_exists($path . $ds . 'crypt-gpg-pinentry')) { | |
| 2048 return $path . $ds . 'crypt-gpg-pinentry'; | |
| 2049 } | |
| 2050 } | |
| 2051 } | |
| 2052 | |
| 2053 // }}} | |
| 2054 // {{{ _debug() | |
| 2055 | |
| 2056 /** | |
| 2057 * Displays debug text if debugging is turned on | |
| 2058 * | |
| 2059 * Debugging text is prepended with a debug identifier and echoed to stdout. | |
| 2060 * | |
| 2061 * @param string $text the debugging text to display. | |
| 2062 * | |
| 2063 * @return void | |
| 2064 */ | |
| 2065 private function _debug($text) | |
| 2066 { | |
| 2067 if ($this->_debug) { | |
| 2068 if (php_sapi_name() === 'cli') { | |
| 2069 foreach (explode(PHP_EOL, $text) as $line) { | |
| 2070 echo "Crypt_GPG DEBUG: ", $line, PHP_EOL; | |
| 2071 } | |
| 2072 } else if (is_callable($this->_debug)) { | |
| 2073 call_user_func($this->_debug, $text); | |
| 2074 } else { | |
| 2075 // running on a web server, format debug output nicely | |
| 2076 foreach (explode(PHP_EOL, $text) as $line) { | |
| 2077 echo "Crypt_GPG DEBUG: <strong>", htmlspecialchars($line), | |
| 2078 '</strong><br />', PHP_EOL; | |
| 2079 } | |
| 2080 } | |
| 2081 } | |
| 2082 } | |
| 2083 | |
| 2084 // }}} | |
| 2085 } | |
| 2086 | |
| 2087 // }}} | |
| 2088 | |
| 2089 ?> |
