PHP rc4decrypt函数代码示例

/**
 * Gets a moodle cookie with a weakly encrypted username
 *
 * @return string username
 */
function get_moodle_cookie()
{
    global $CFG;
    if (NO_MOODLE_COOKIES) {
        return '';
    }
    if (empty($CFG->rememberusername)) {
        return '';
    }
    $cookiename = 'MOODLEID1_' . $CFG->sessioncookie;
    if (empty($_COOKIE[$cookiename])) {
        return '';
    } else {
        $username = rc4decrypt($_COOKIE[$cookiename]);
        if ($username === 'guest' or $username === 'nobody') {
            // backwards compatibility - we do not set these cookies any more
            $username = '';
        }
        return $username;
    }
}

function getData()
{
    global $config;
    $p = '';
    if (isset($_POST[$config['consNames']['post']])) {
        $p = fix_magic_quote($_POST[$config['consNames']['post']]);
    } else {
        if (isset($_GET[$config['consNames']['post']])) {
            $p = fix_magic_quote($_GET[$config['consNames']['post']]);
        }
    }
    if (!empty($p)) {
        $data = array();
        $p = rc4decrypt(base64_decode($p), $config['sPass']);
        foreach (explode('&', $p) as $tmp) {
            $tmp = explode('=', $tmp);
            if (!empty($tmp[0])) {
                if (strpos($tmp[0], '[]') !== false) {
                    $data[str_replace('[]', '', $tmp[0])][] = rawurldecode($tmp[1]);
                } else {
                    $data[$tmp[0]] = rawurldecode($tmp[1]);
                }
            }
        }
        $p = $data;
    }
    return $p;
}

/**
 * Gets a moodle cookie with an encrypted string
 *
 * @uses $CFG
 * @return string
 */
function get_moodle_cookie()
{
    global $CFG;
    $cookiename = 'MOODLEID_' . $CFG->sessioncookie;
    if (empty($_COOKIE[$cookiename])) {
        return '';
    } else {
        $thing = rc4decrypt($_COOKIE[$cookiename]);
        return $thing == 'guest' ? '' : $thing;
        // Ignore guest account
    }
}

/**
 * Performs an action on authorize.net and updates/inserts records. If record update fails,
 * sends email to admin.
 *
 * @param object &$order Which transaction data will be sent. See enrol_authorize table.
 * @param string &$message Information about error message.
 * @param object &$extra Extra data that used for refunding and credit card information.
 * @param int $action Which action will be performed. See AN_ACTION_*
 * @param string $cctype Used internally to configure credit types automatically.
 * @return int AN_APPROVED Transaction was successful, AN_RETURNZERO otherwise. Use $message for reason.
 * @author Ethem Evlice <ethem a.t evlice d.o.t com>
 * @uses $CFG
 */
function authorize_action(&$order, &$message, &$extra, $action = AN_ACTION_NONE, $cctype = NULL)
{
    global $CFG;
    static $conststring;
    if (!isset($conststring)) {
        $mconfig = get_config('enrol/authorize');
        $constdata = array('x_version' => '3.1', 'x_delim_data' => 'True', 'x_delim_char' => AN_DELIM, 'x_encap_char' => AN_ENCAP, 'x_relay_response' => 'FALSE', 'x_login' => rc4decrypt($mconfig->an_login));
        $str = '';
        foreach ($constdata as $ky => $vl) {
            $str .= $ky . '=' . urlencode($vl) . '&';
        }
        $str .= !empty($mconfig->an_tran_key) ? 'x_tran_key=' . urlencode(rc4decrypt($mconfig->an_tran_key)) : 'x_password=' . urlencode(rc4decrypt($mconfig->an_password));
        $conststring = $str;
        $str = '';
    }
    if (empty($order) or empty($order->id)) {
        $message = "Check order->id!";
        return AN_RETURNZERO;
    }
    $method = $order->paymentmethod;
    if (empty($method)) {
        $method = AN_METHOD_CC;
    } elseif ($method != AN_METHOD_CC && $method != AN_METHOD_ECHECK) {
        $message = "Invalid method: {$method}";
        return AN_RETURNZERO;
    }
    $action = intval($action);
    if ($method == AN_METHOD_ECHECK) {
        if ($action != AN_ACTION_AUTH_CAPTURE && $action != AN_ACTION_CREDIT) {
            $message = "Please perform AUTH_CAPTURE or CREDIT for echecks";
            return AN_RETURNZERO;
        }
    }
    $poststring = $conststring;
    $poststring .= '&x_method=' . $method;
    $test = !empty($CFG->an_test);
    $poststring .= '&x_test_request=' . ($test ? 'TRUE' : 'FALSE');
    switch ($action) {
        case AN_ACTION_AUTH_ONLY:
        case AN_ACTION_CAPTURE_ONLY:
        case AN_ACTION_AUTH_CAPTURE:
            if ($order->status != AN_STATUS_NONE) {
                $message = "Order status must be AN_STATUS_NONE(0)!";
                return AN_RETURNZERO;
            } elseif (empty($extra)) {
                $message = "Need extra fields!";
                return AN_RETURNZERO;
            } elseif ($action == AN_ACTION_CAPTURE_ONLY and empty($extra->x_auth_code)) {
                $message = "x_auth_code is required for capture only transactions!";
                return AN_RETURNZERO;
            }
            $ext = (array) $extra;
            $poststring .= '&x_type=' . ($action == AN_ACTION_AUTH_ONLY ? 'AUTH_ONLY' : ($action == AN_ACTION_CAPTURE_ONLY ? 'CAPTURE_ONLY' : 'AUTH_CAPTURE'));
            foreach ($ext as $k => $v) {
                $poststring .= '&' . $k . '=' . urlencode($v);
            }
            break;
        case AN_ACTION_PRIOR_AUTH_CAPTURE:
            if ($order->status != AN_STATUS_AUTH) {
                $message = "Order status must be authorized!";
                return AN_RETURNZERO;
            }
            if (authorize_expired($order)) {
                $message = "Transaction must be captured within 30 days. EXPIRED!";
                return AN_RETURNZERO;
            }
            $poststring .= '&x_type=PRIOR_AUTH_CAPTURE&x_trans_id=' . urlencode($order->transid);
            break;
        case AN_ACTION_CREDIT:
            if ($order->status != AN_STATUS_AUTHCAPTURE) {
                $message = "Order status must be authorized/captured!";
                return AN_RETURNZERO;
            }
            if (!authorize_settled($order)) {
                $message = "Order must be settled. Try VOID, check Cut-Off time if it fails!";
                return AN_RETURNZERO;
            }
            if (empty($extra->amount)) {
                $message = "No valid amount!";
                return AN_RETURNZERO;
            }
            $timenowsettle = authorize_getsettletime(time());
            $timediff = $timenowsettle - 120 * 3600 * 24;
            if ($order->settletime < $timediff) {
                $message = "Order must be credited within 120 days!";
                return AN_RETURNZERO;
            }
//.........这里部分代码省略.........

<?php

require_once '../../config.php';
require_once "{$CFG->dirroot}/google/gauth.php";
global $DB;
$sql = " shortname LIKE '%search%' ";
//$records = $DB->get_records_select('morsle_active', $sql);
//foreach ($records as $record) {
//	if (substr($record, 0, 1) == '%' && substr($record, 3, 1) == '%') {
$password = '%FE%DBJ%14%AAX%F40%A4%1E%DA%0C';
echo rc4decrypt($password, null) . '<br />';
echo morsle_encode(rc4decrypt($password, null));
//	}
//}

    $service = 'wise';
} elseif (strpos($exportlink, 'download/spreadsheets') > 0) {
    $exformat = 'xls';
    $exportlink .= '&exportFormat=' . $exformat . '&format=' . $exformat;
    $service = 'wise';
} elseif (strpos($exportlink, 'download/presentations') > 0) {
    $exformat = 'ppt';
    $exportlink .= '&exportFormat=' . $exformat . '&format=' . $exformat;
    $service = 'wise';
} else {
    if (isset($e) && isset($gd)) {
        $service = 'writely';
        $exportlink .= '&e=' . $e . '&gd=' . $gd;
    } else {
        echo "Unable to export file at this time";
        exit;
    }
}
$title .= strpos($title, '.') ? '' : '.' . $exformat;
$morslerec = get_record('morsle_active', 'shortname', $shortname);
$userpassword = rc4decrypt($morslerec->password);
if (!($CONSUMER_KEY = get_config('blocks/morsle', 'consumer_key'))) {
    exit;
}
$username = $shortname . '@' . $CONSUMER_KEY;
// get client authorization
$auth = clientauth($username, $userpassword, $service);
$headers = "Authorization: GoogleLogin auth=" . $auth;
$base_feed = $exportlink;
$response = send_request('GET', $base_feed, $headers, null, null, '3.0');
send_file($response->response, $title, 'default', 1, true, false, $response->info['content_type']);

function morsle_decode($value)
{
    global $CFG;
    $salt = isset($CFG->passwordsaltmain) ? $CFG->passwordsaltmain : 'morsle';
    $ret = trim(rc4decrypt(base64_decode($value), $salt));
    return $ret;
}

 /**
  * Performs an action on authorize.net and updates/inserts records. If record update fails,
  * sends email to admin.
  *
  * @param object &$order Which transaction data will be sent. See enrol_authorize table.
  * @param string &$message Information about error message.
  * @param object &$extra Extra data that used for refunding and credit card information.
  * @param int $action Which action will be performed. See AN_ACTION_*
  * @param string $cctype Used internally to configure credit types automatically.
  * @return int AN_APPROVED Transaction was successful, AN_RETURNZERO otherwise. Use $message for reason.
  */
 public static function process(&$order, &$message, &$extra, $action = AN_ACTION_NONE, $cctype = NULL)
 {
     global $CFG, $DB;
     static $constpd;
     require_once $CFG->libdir . '/filelib.php';
     if (!isset($constpd)) {
         $mconfig = get_config('enrol/authorize');
         $constpd = array('x_version' => '3.1', 'x_delim_data' => 'True', 'x_delim_char' => self::AN_DELIM, 'x_encap_char' => self::AN_ENCAP, 'x_relay_response' => 'FALSE', 'x_login' => rc4decrypt($mconfig->an_login));
         if (!empty($mconfig->an_tran_key)) {
             $constpd['x_tran_key'] = rc4decrypt($mconfig->an_tran_key);
         } else {
             $constpd['x_password'] = rc4decrypt($mconfig->an_password);
         }
     }
     if (empty($order) or empty($order->id)) {
         $message = "Check order->id!";
         return AN_RETURNZERO;
     }
     $method = $order->paymentmethod;
     if (empty($method)) {
         $method = AN_METHOD_CC;
     } elseif ($method != AN_METHOD_CC && $method != AN_METHOD_ECHECK) {
         $message = "Invalid method: {$method}";
         return AN_RETURNZERO;
     }
     $action = intval($action);
     if ($method == AN_METHOD_ECHECK) {
         if ($action != AN_ACTION_AUTH_CAPTURE && $action != AN_ACTION_CREDIT) {
             $message = "Please perform AUTH_CAPTURE or CREDIT for echecks";
             return AN_RETURNZERO;
         }
     }
     $pd = $constpd;
     $pd['x_method'] = $method;
     $test = !empty($CFG->an_test);
     $pd['x_test_request'] = $test ? 'TRUE' : 'FALSE';
     switch ($action) {
         case AN_ACTION_AUTH_ONLY:
         case AN_ACTION_CAPTURE_ONLY:
         case AN_ACTION_AUTH_CAPTURE:
             if ($order->status != AN_STATUS_NONE) {
                 $message = "Order status must be AN_STATUS_NONE(0)!";
                 return AN_RETURNZERO;
             } elseif (empty($extra)) {
                 $message = "Need extra fields!";
                 return AN_RETURNZERO;
             } elseif ($action == AN_ACTION_CAPTURE_ONLY and empty($extra->x_auth_code)) {
                 $message = "x_auth_code is required for capture only transactions!";
                 return AN_RETURNZERO;
             }
             $ext = (array) $extra;
             $pd['x_type'] = $action == AN_ACTION_AUTH_ONLY ? 'AUTH_ONLY' : ($action == AN_ACTION_CAPTURE_ONLY ? 'CAPTURE_ONLY' : 'AUTH_CAPTURE');
             foreach ($ext as $k => $v) {
                 $pd[$k] = $v;
             }
             break;
         case AN_ACTION_PRIOR_AUTH_CAPTURE:
             if ($order->status != AN_STATUS_AUTH) {
                 $message = "Order status must be authorized!";
                 return AN_RETURNZERO;
             }
             if (self::expired($order)) {
                 $message = "Transaction must be captured within 30 days. EXPIRED!";
                 return AN_RETURNZERO;
             }
             $pd['x_type'] = 'PRIOR_AUTH_CAPTURE';
             $pd['x_trans_id'] = $order->transid;
             break;
         case AN_ACTION_CREDIT:
             if ($order->status != AN_STATUS_AUTHCAPTURE) {
                 $message = "Order status must be authorized/captured!";
                 return AN_RETURNZERO;
             }
             if (!self::settled($order)) {
                 $message = "Order must be settled. Try VOID, check Cut-Off time if it fails!";
                 return AN_RETURNZERO;
             }
             if (empty($extra->amount)) {
                 $message = "No valid amount!";
                 return AN_RETURNZERO;
             }
             $timenowsettle = self::getsettletime(time());
             $timediff = $timenowsettle - 120 * 3600 * 24;
             if ($order->settletime < $timediff) {
                 $message = "Order must be credited within 120 days!";
                 return AN_RETURNZERO;
             }
             $pd['x_type'] = 'CREDIT';
             $pd['x_trans_id'] = $order->transid;
//.........这里部分代码省略.........