/usr/bin/horde-pref-remove is in php-horde 5.2.9+debian0-1build1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 | #!/usr/bin/php
<?php
/**
* This script removes a preference from users' preferences. Helps when a
* preference is to be moved from locked = false, to locked = true and there
* have already been preferences set by the users.
*
* Copyright 2007-2016 Horde LLC (http://www.horde.org/)
*
* See the enclosed file COPYING for license information (LGPL-2). If you
* did not receive this file, see http://www.horde.org/licenses/lgpl.
*
* @category Horde
* @copyright 2007-2016 Horde LLC
* @license http://www.horde.org/licenses/lgpl LGPL-2
* @package Horde
*/
$baseFile = __DIR__ . '/../lib/Application.php';
if (file_exists($baseFile)) {
require_once $baseFile;
} else {
require_once 'PEAR/Config.php';
require_once PEAR_Config::singleton()
->get('horde_dir', null, 'pear.horde.org') . '/lib/Application.php';
}
Horde_Registry::appInit('horde', array(
'authentication' => 'none',
'cli' => true
));
$scope = $cli->prompt('Enter preference scope:');
$name = $cli->prompt('Enter preference name:');
$user = $cli->prompt('Enter preference user:');
$prefs_ob = $injector->getInstance('Horde_Core_Factory_Prefs')->create($scope, array(
'user' => $user
));
$value = $prefs_ob->getValue($name);
if (is_null($value)) {
$cli->message(sprintf('No preference "%s" found in scope "%s".', $name, $scope), 'cli.error');
} else {
$cli->writeln();
$cli->writeln(sprintf('Name: %s', $name));
$cli->writeln(sprintf('Value: %s', $value));
$cli->writeln();
if ($cli->prompt($cli->red('Do you want to delete this preference?'), array('y' => 'Yes', 'n' => 'No'), 'n') == 'y') {
$prefs_ob->remove($name);
$cli->message($cli->green('Preference deleted.'), 'cli.success');
}
}
|