$value) { $semantics[$name] = encryptString($td, $key, $value); } mcrypt_module_close($td); } $verID = rand(1,2147483647); $client = new xmlrpc_client($idusSubscriptionSeriesURL[$id]); $msg = new xmlrpcmsg("InstaDisc.sendFromUpdate", array( new xmlrpcval($idusSeriesUsername[$id], 'string'), new xmlrpcval(md5($idusSeriesUsername[$id] . ':' . md5($idusSeriesPassword[$id]) . ':' . $verID), 'string'), new xmlrpcval($verID, 'int'), new xmlrpcval($idusSubscriptionSeriesURL[$id], 'string'), new xmlrpcval($idusSubscriptionID[$id], 'string'), new xmlrpcval($idusSubscriptionURL[$id], 'string'), new xmlrpcval($idusSubscriptionTitle[$id], 'string'), new xmlrpcval($idusSubscriptionCategory[$id], 'string'), new xmlrpcval($idusSubscriptionPersonal[$id], 'string'), new xmlrpcval($title, 'string'), new xmlrpcval($author, 'string'), new xmlrpcval($url, 'string'), new xmlrpcval(serialize($semantics), 'string'), new xmlrpcval($encID, 'int'))); $resp = $client->send($msg); $val = $resp->value()->scalarVal(); if ($val == 2) { return instaDisc_sendItem($id, $title, $author, $url, $semantics, $encryptionID); } else if ($val == 0) { return TRUE; } else { return FALSE; } } function instaDisc_addSubscription($url, $id, $un, $pw, $sUrl, $title, $cat, $personal = '', $enc = '') { global $instaDisc_subCount, $idusSubscriptionSeriesURL, $idusSubscriptionID, $idusSeriesUsername, $idusSeriesPassword, $idusSubscriptionURL, $idusSubscriptionTitle, $idusSubscriptionCategory, $idusSubscriptionPersonal, $idusEncryptionKey; $idusSubscriptionSeriesURL[$instaDisc_subCount] = $url; $idusSubscriptionID[$instaDisc_subCount] = $id; $idusSeriesUsername[$instaDisc_subCount] = $un; $idusSeriesPassword[$instaDisc_subCount] = $pw; $idusSubscriptionURL[$instaDisc_subCount] = $sUrl; $idusSubscriptionTitle[$instaDisc_subCount] = $title; $idusSubscriptionCategory[$instaDisc_subCount] = $cat; $idusSubscriptionPersonal[$instaDisc_subCount] = ($personal != '' ? 'true' : 'false'); $idusEncryptionKey[$instaDisc_subCount] = $enc; $instaDisc_subCount++; } function encryptString($td, $key, $string) { mcrypt_generic_init($td, $key, strrev($key)); $string = bin2hex(mcrypt_generic($td, $string)); mcrypt_generic_deinit($td); return $string; } ?>