forked from GNUsocial/gnu-social
		
	
		
			
				
	
	
		
			104 lines
		
	
	
		
			3.0 KiB
		
	
	
	
		
			PHP
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			104 lines
		
	
	
		
			3.0 KiB
		
	
	
	
		
			PHP
		
	
	
		
			Executable File
		
	
	
	
	
#!/usr/bin/env php
 | 
						|
<?php
 | 
						|
/**
 | 
						|
 * GNU social - a federating social network
 | 
						|
 *
 | 
						|
 * LICENCE: This program is free software: you can redistribute it and/or modify
 | 
						|
 * it under the terms of the GNU Affero 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 Affero General Public License for more details.
 | 
						|
 *
 | 
						|
 * You should have received a copy of the GNU Affero General Public License
 | 
						|
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 | 
						|
 *
 | 
						|
 * @category  Plugin
 | 
						|
 * @package   GNUsocial
 | 
						|
 * @copyright 2008 Free Software Foundation http://fsf.org
 | 
						|
 * @license   http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
 | 
						|
 * @link      https://www.gnu.org/software/social/
 | 
						|
 */
 | 
						|
 | 
						|
define('INSTALLDIR', realpath(dirname(__DIR__)));
 | 
						|
 | 
						|
$shortoptions = 'i:n:a:';
 | 
						|
$longoptions = ['id=', 'nickname=', 'subject=', 'all='];
 | 
						|
 | 
						|
$helptext = <<<END_OF_USEREMAIL_HELP
 | 
						|
sendemail.php [options] < <message body>
 | 
						|
Sends given email text to user.
 | 
						|
 | 
						|
  -i --id       id of the user to query
 | 
						|
  -a --all      send to all users
 | 
						|
  -n --nickname nickname of the user to query
 | 
						|
     --subject  mail subject line (required)
 | 
						|
 | 
						|
END_OF_USEREMAIL_HELP;
 | 
						|
 | 
						|
require_once INSTALLDIR.'/scripts/commandline.inc';
 | 
						|
 | 
						|
$all = have_option('a', 'all');
 | 
						|
 | 
						|
if ($all) {
 | 
						|
    $user = new User();
 | 
						|
    $user->find();
 | 
						|
} else if (have_option('i', 'id')) {
 | 
						|
    $id = get_option_value('i', 'id');
 | 
						|
    $user = User::getKV('id', $id);
 | 
						|
    if (empty($user)) {
 | 
						|
        print "Can't find user with ID $id\n";
 | 
						|
        exit(1);
 | 
						|
    }
 | 
						|
    unset ($id);
 | 
						|
} else if (have_option('n', 'nickname')) {
 | 
						|
    $nickname = get_option_value('n', 'nickname');
 | 
						|
    $user = User::getKV('nickname', $nickname);
 | 
						|
    if (empty($user)) {
 | 
						|
        print "Can't find user with nickname '$nickname'.\n";
 | 
						|
        exit(1);
 | 
						|
    }
 | 
						|
    unset($nickname);
 | 
						|
} else {
 | 
						|
    print "You must provide a user by --id, --nickname or just send something to --all\n";
 | 
						|
    exit(1);
 | 
						|
}
 | 
						|
 | 
						|
if (!have_option('subject')) {
 | 
						|
    echo "You must provide a subject line for the mail in --subject='...' param.\n";
 | 
						|
    exit(1);
 | 
						|
}
 | 
						|
$subject = get_option_value('subject');
 | 
						|
 | 
						|
if (posix_isatty(STDIN)) {
 | 
						|
    print "You must provide message input on stdin!\n";
 | 
						|
    exit(1);
 | 
						|
}
 | 
						|
$body = file_get_contents('php://stdin');
 | 
						|
 | 
						|
if ($all) {
 | 
						|
    while ($user->fetch()) {
 | 
						|
        _send($user, $subject, $body);
 | 
						|
    }
 | 
						|
} else {
 | 
						|
    _send($user, $subject, $body);
 | 
						|
}
 | 
						|
 | 
						|
function _send($user, $subject, $body) {
 | 
						|
    if (empty($user->email)) {
 | 
						|
        // @fixme unconfirmed address?
 | 
						|
        print "No email registered for user '$user->nickname'.\n";
 | 
						|
        return;
 | 
						|
    }
 | 
						|
    print "Sending to $user->email... ";
 | 
						|
    if (mail_to_user($user, $subject, $body)) {
 | 
						|
        print "done.\n";
 | 
						|
    } else {
 | 
						|
        print "failed.\n";
 | 
						|
        return;
 | 
						|
    }
 | 
						|
}
 |