scripts/setpassword.php

   1 #!/usr/bin/env php
   2 <?php
   3 /*
   4  * Laconica - a distributed open-source microblogging tool
   5  * Copyright (C) 2008, 2009, Control Yourself, Inc.
   6  *
   7  * This program is free software: you can redistribute it and/or modify
   8  * it under the terms of the GNU Affero General Public License as published by
   9  * the Free Software Foundation, either version 3 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU Affero General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Affero General Public License
  18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19  */
  20
  21 # Abort if called from a web server
  22 if (isset($_SERVER) && array_key_exists('REQUEST_METHOD', $_SERVER)) {
  23     print "This script must be run from the command line\n";
  24     exit(1);
  25 }
  26
  27 ini_set("max_execution_time", "0");
  28 ini_set("max_input_time", "0");
  29 set_time_limit(0);
  30 mb_internal_encoding('UTF-8');
  31
  32 define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
  33 define('LACONICA', true);
  34
  35 require_once(INSTALLDIR . '/lib/common.php');
  36
  37 if ($argc != 3) {
  38     print "USAGE: setpassword.php <username> <password>\n";
  39     print "Sets the password of user with name <username> to <password>\n";
  40     exit(1);
  41 }
  42
  43 $nickname = $argv[1];
  44 $password = $argv[2];
  45
  46 if (mb_strlen($password) < 6) {
  47     print "Password must be 6 characters or more.\n";
  48     exit(1);
  49 }
  50
  51 $user = User::staticGet('nickname', $nickname);
  52
  53 if (!$user) {
  54     print "No such user '$nickname'.\n";
  55     exit(1);
  56 }
  57
  58 $original = clone($user);
  59
  60 $user->password = common_munge_password($password, $user->id);
  61
  62 if (!$user->update($original)) {
  63     print "Error updating user '$nickname'.\n";
  64     exit(1);
  65 } else {
  66     print "Password for user '$nickname' updated.\n";
  67     exit(0);
  68 }