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
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
|
<?php
/* InstaDisc Update - A Four Island Project */
include('xmlrpc/xmlrpc.inc');
$idusUsername = array();
$idusPassword = array();
$idusCentralServer = array();
$idusSubscriptionURI = array();
$idusSubscriptionTitle = array();
$idusSubscriptionCategory = array();
$idusActivationKey = array();
$idusEncryptionKey = array();
$instaDisc_subCount = 0;
function instaDisc_sendItem($id, $title, $author, $url, $semantics)
{
global $idusUsername, $idusPassword, $idusCentralServer, $idusSubscriptionURI;
$verID = rand(1,65536);
$client = new xmlrpc_client($idusCentralServer[$id]);
$msg = new xmlrpcmsg("InstaDisc.sendFromUpdate", array( new xmlrpcval($idusUsername[$id], 'string'),
new xmlrpcval(md5($idusUsername[$id] . ":" . md5($idusPassword[$id]) . ":" . $verID), 'string'),
new xmlrpcval($verID, 'int'),
new xmlrpcval($idusSubscriptionURI[$id], 'string'),
new xmlrpcval($title, 'string'),
new xmlrpcval($author, 'string'),
new xmlrpcval($url, 'string'),
new xmlrpcval(serialize($semantics), 'string'),
new xmlrpcval('0', 'int')));
$client->send($msg);
}
function instaDisc_sendEncrypted($id, $title, $author, $url, $semantics)
{
global $idusUsername, $idusPassword, $idusCentralServer, $idusSubscriptionURI, $idusEncryptionKey;
$encID = 0;
while ($encID == 0)
{
$encID = rand(1,65536);
}
$cipher = "rijndael-128";
$mode = "cbc";
$key = substr(md5(substr(str_pad($idusEncryptionKey[$id],16,$encID),0,16)),0,16);
$td = mcrypt_module_open($cipher, "", $mode, "");
mcrypt_generic_init($td, $key, strrev($key));
$title = bin2hex(mcrypt_generic($td, $title));
mcrypt_generic_deinit($td);
mcrypt_generic_init($td, $key, strrev($key));
$author = bin2hex(mcrypt_generic($td, $author));
mcrypt_generic_deinit($td);
mcrypt_generic_init($td, $key, strrev($key));
$url = bin2hex(mcrypt_generic($td, $url));
mcrypt_generic_deinit($td);
foreach ($semantics as $name => $value)
{
mcrypt_generic_init($td, $key, strrev($key));
$semantics[$name] = bin2hex(mcrypt_generic($td, $value));
mcrypt_generic_deinit($td);
}
mcrypt_module_close($td);
$verID = rand(1,65536);
$client = new xmlrpc_client($idusCentralServer[$id]);
$msg = new xmlrpcmsg("InstaDisc.sendFromUpdate", array( new xmlrpcval($idusUsername[$id], 'string'),
new xmlrpcval(md5($idusUsername[$id] . ":" . md5($idusPassword[$id]) . ":" . $verID), 'string'),
new xmlrpcval($verID, 'int'),
new xmlrpcval($idusSubscriptionURI[$id], 'string'),
new xmlrpcval($title, 'string'),
new xmlrpcval($author, 'string'),
new xmlrpcval($url, 'string'),
new xmlrpcval(serialize($semantics), 'string'),
new xmlrpcval($encID, 'int')));
$client->send($msg);
}
function instaDisc_addSubscription($username, $password, $central, $uri, $title, $category, $key = '', $enc = '')
{
global $instaDisc_subCount, $idusUsername, $idusPassword, $idusCentralServer, $idusSubscriptionURI, $idusSubscriptionTitle, $idusSubscriptionCategory, $idusActivationKey, $idusEncryptionKey;
$idusUsername[$instaDisc_subCount] = $username;
$idusPassword[$instaDisc_subCount] = $password;
$idusCentralServer[$instaDisc_subCount] = $central;
$idusSubscriptionURI[$instaDisc_subCount] = $uri;
$idusSubscriptionTitle[$instaDisc_subCount] = $title;
$idusSubscriptionCategory[$instaDisc_subCount] = $category;
$idusActivationKey[$instaDisc_subCount] = $key;
$idusEncryptionKey[$instaDisc_subCount] = $enc;
$instaDisc_subCount++;
}
?>
|
