public static function process($msg)
{
$res = "";
$status = 1;
$sender = "";
$umsg = GsonCrypt::unseal($msg);
if (!$umsg) {
$ex = Gmsg::extract($msg);
if ($ex && is_array($ex)) {
$umsg = $msg;
} else {
$status = 0;
$res = "Unable to decode the message";
}
}
if ($umsg) {
$parts = self::extract($umsg);
$action = $parts["op"];
$mess = $parts["msg"];
$recipient = $parts["recipient"];
$sender = $parts["sender"];
if (isset($parts["bank"])) {
$sender = $parts["bank"] . "_{$sender}";
}
if (strtolower($recipient) != strtolower(config::$accountId)) {
$status = 0;
$res = config::$accountId . " is not the intended recipient [{$recipient}]";
$rply = Gmsg::create(array("status" => $status, "response" => $res));
} else {
switch ($action) {
case "notification":
$r = transaction::notification($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "revokecert":
if (!$sender) {
$status = 0;
$res = "The sender is unknown";
} else {
$res = "";
$ret = array("status" => $status, "response" => $res, "account" => $sender);
$rply = self::create($ret);
$rply = GsonCrypt::seal("{$rply}", "{$sender}");
@unlink(GsonCrypt::getkey($sender));
/* Buggy: Verify the sender first*/
}
break;
case "signcert":
$k = GsonCrypt::getkey("{$sender}");
if (file_exists($k)) {
$status = 2;
$res = "This account already exist!";
} else {
$res = GsonCrypt::signcert($sender, $mess);
if (!$res) {
$status = 0;
$res = "An error occured while signing the certificate.";
}
}
break;
case "reverb":
$res = $mess;
break;
default:
$status = 0;
$res = "Invalid Operation!";
}
}
}
if (!isset($rply)) {
$ret = array("status" => $status, "response" => $res, "account" => $sender);
$rply = self::create($ret);
$rply = $sender ? GsonCrypt::seal("{$rply}", "{$sender}") : "{$rply}";
}
return $rply;
}
public static function prequest($params = array())
{
if (empty($params)) {
$params['description'] = gio::input('Transaction Description');
$params['amount'] = gio::input("Amount", "integer");
$params['merchant'] = account::address();
$params['client'] = gio::input("Enter the client's account address");
$params['order id'] = md5(uniqid(rand(), true));
$params['time'] = time();
}
if (!self::certexchange($params['client'])) {
return array(0, "Can not communicate with the destination bank");
}
$dest = Tools::address($params['client']);
if (!$dest) {
$status = 0;
$res = "The client address is invalid";
} else {
$m = GsonCrypt::sign(Gmsg::create($params));
if (!$m) {
$status = 0;
$res = "Unable to sign message to " . $params['client'];
} else {
$m = Gmsg::create(Gmsg::Prepare($m, "paymentrequest", $dest['bank']));
$net = new Gnet();
$r = $net->connect($dest['address'], intval($dest['port']));
if (!$r) {
$cerr = 1;
}
if ($r) {
$r = $net->send($m);
}
unset($net);
if (!$r) {
$status = 0;
$res = isset($cerr) ? "Unable to connect to the merchank's bank" : "Unable to send the message";
} else {
$v = GsonCrypt::verify($r, $dest['bank']);
if (!$v) {
$status = 0;
$res = "Unable to verify response from bank";
} else {
$v = Gmsg::extract($v);
if (!$v) {
$status = 0;
$res = "Unable to understand the response";
} else {
$status = $v['status'];
$res = $v['response'];
}
}
}
}
}
return array($status, $res);
}
public static function notification($msg, $account)
{
$m = GsonCrypt::verify($msg, $account);
if (!$m) {
return array(0, "SRA did not verify bank's message as authentic");
}
$m = Gmsg::extract($m);
if (!$m || !is_array($m)) {
return array(0, "SRA did not extract bank's message correctly");
}
list($id, $req) = each($m);
$rtime = time();
$client = Tools::address($req['client']);
$merchant = Tools::address($req['merchant']);
$coins = storage::load($client['srakey']);
$pcoins = $req['coins'];
$errorcode = 0;
$amount = 0;
$least = 0;
$most = 0;
$leastcoin = array();
$mostcoin = array();
$ecashrejected = array();
if (mine::checkcoins($pcoins)) {
foreach ($pcoins as $id => $coin) {
$pcval = $coin['value'];
if (!array_key_exists($id, $coins[$pcval])) {
$errorcode = $errorcode ? $errorcode : 2;
$tmsg = "Already spent eCash detected";
$ecids[] = $id;
if ($errorcode == 2) {
$rejectedecash[] = $id;
}
} else {
$secret = GsonCrypt::unseal($coin['secret']);
if ($coins[$pcval][$id]['secret'] != $secret) {
$errorcode = $errorcode ? $errorcode : 3;
$tmsg = "Invalid secret detected";
$ecids[] = $id;
if ($errorcode == 3) {
$rejectedecash[] = $id;
}
} else {
$secrets[$id] = Tools::makesecrets();
$pcoins[$id]['secret'] = GsonCrypt::seal($secrets[$id], $merchant['srakey']);
$pcoins[$id]['transactioncount'] = intval($pcoins[$id]['transactioncount']) + 1;
$amount += $pcoins[$id]['value'];
if ($pcoins[$id]['value'] > $most) {
$most = $pcoins[$id]['value'];
$mostcoin['id'] = $id;
$mostcoin['coin'] = $pcoins[$id];
}
if ($pcoins[$id]['value'] < $least || $least == 0) {
$least = $pcoins[$id]['value'];
$leastcoin['id'] = $id;
$leastcoin['coin'] = $pcoins[$id];
}
$ecids[] = $id;
unset($coins[$pcval][$id]);
}
}
}
$ecids = join(", ", array_values($ecids));
} else {
$ecids = join(", ", array_keys($pcoins));
$errorcode = 1;
$tmsg = "Invalid/Counterfeit eCash detected";
}
if (!$errorcode && $amount < $req['amount']) {
$errorcode = 4;
$tmsg = sprintf("Additional %d value is required to complete the transaction", $req['amount'] - $amount);
}
if (!$errorcode && $amount > $req['amount']) {
$diff = $amount - $req['amount'];
$rem = $leastcoin['coin']['value'] - $diff;
$chg = self::splitvalue($diff, false);
$dval = self::splitvalue($rem, false);
if (!$chg || !$dval) {
$errorcode = 5;
$tmsg = "SRA Internal Error while splitting tokens.";
} else {
$mycoin = storage::load();
$chgcoins = self::getcoins($chg, $client['srakey'], $secrets, $mycoin);
$dvalcoins = self::getcoins($dval, $merchant['srakey'], $secrets, $mycoin);
if (!$chgcoins || !$dvalcoins) {
$errorcode = 6;
$tmsg = "SRA Internal Error while splitting tokens";
} else {
$leastcoin['coin']['secret'] = "";
$mycoin[$leastcoin['coin']['value']][$leastcoin['id']] = $leastcoin['coin'];
foreach ($chgcoins as $id => $coin) {
$cval = $coin['value'];
$coin['secret'] = $secrets[$id];
$coins[$cval][$id] = $coin;
}
unset($pcoins[$leastcoin['id']]);
}
}
}
foreach ($pcoins as $id => $coin) {
$val = $coin['value'];
if (isset($coins[$val][$id])) {
unset($coins[$val][$id]);
}
}
if (isset($dvalcoins)) {
$pcoins += $dvalcoins;
}
$req['coins'] = $pcoins;
$tmsg = $errorcode ? $tmsg : "pending";
$tid = md5(uniqid(rand(), true));
$dtime = time();
$req['acknowledgement'] = array("id" => "{$tid}", "completed" => $dtime, "status" => "{$errorcode}", "message" => "{$tmsg}", "amount" => $amount, "ecashids" => "{$ecids}");
//if(isset($rejectedecash)&&!empty($ecashrejected)) $req['acknowledgement']['rejectedecash'] = join(", ",$rejectedecash);
if (strtolower($client['bank']) != strtolower($merchant['bank'])) {
$m = GsonCrypt::sign(Gmsg::create($req));
$merchant['response'] = Gmsg::create(Gmsg::Prepare($m, "acknowledgement", $merchant['bank']));
$net = new Gnet();
$c = $net->connect($merchant['address'], intval($merchant['port']));
if (!$c) {
return array(0, "Merchant's bank is unreachable");
}
$r = $net->send($merchant['response']);
if (!$r) {
$req['acknowledgement']['status'] = 10;
$req['acknowledgement']['message'] = "Invalid response from merchant's bank";
}
$r = Gmsg::extract(GsonCrypt::verify($r, $merchant['bank']));
if (!$r) {
$req['acknowledgement']['status'] = 11;
$req['acknowledgement']['message'] = "Invalid response from merchant's bank";
} else {
if ($r['status']) {
$old = storage::load($merchant['srakey']);
if (!$old) {
$old = array();
}
foreach ($pcoins as $id => $coin) {
$val = $coin['value'];
$old[$val][$id] = $coin;
}
storage::save($old, $merchant['srakey']);
storage::save($coins, $client['srakey']);
if (isset($mycoin)) {
storage::save($mycoin);
}
$req['acknowledgement']['message'] =& $r['response'];
} else {
$req['acknowledgement']['status'] = 12;
$req['acknowledgement']['message'] = $r['response'];
}
}
} else {
if (!$errorcode) {
$old = storage::load($merchant['srakey']);
if (!$old) {
$old = array();
}
foreach ($pcoins as $id => $coin) {
$coin['secret'] = $secrets[$id];
$val = $coin['value'];
$old[$val][$id] = $coin;
}
storage::save($old, $merchant['srakey']);
storage::save($coins, $client['srakey']);
if (isset($mycoin)) {
storage::save($mycoin);
}
}
$status = $req['acknowledgement']['status'] ? 0 : 1;
if ($status) {
$req['acknowledgement']['message'] = "Payment was successful";
}
}
$status = $req['acknowledgement']['status'] ? 0 : 1;
if (!$status) {
unset($req['coins']);
unset($req['change']);
if ($errorcode <= 3) {
$req['acknowledgement']['amount'] = 0;
}
}
if ($status && isset($chgcoins)) {
$req['change'] = $chgcoins;
}
$resp = $req;
self::log($resp);
return array($status, $req);
}
public static function merckey($file = "")
{
$s = GsonCrypt::sign(md5(gio::readfile(GsonCrypt::getcert())));
if ($file) {
$file .= ".txt";
$ofile = Tools::makepath(array(getenv('USERPROFILE'), "Desktop", "{$file}"));
if (gio::saverawfile("MERCHANT/ACCOUNT KEY: '{$s}'", $ofile)) {
gio::output("The file {$file} was sucessfully written to your desktop");
} else {
gio::output("Error while writing {$file} to your desktop");
}
} else {
return $s;
}
}
public static function status($oid)
{
$m = GsonCrypt::sign(Gmsg::create(array("oid" => $oid)));
if (!$m) {
$status = 0;
$res = "Unable to sign status report for '{$oid}'";
} else {
$m = Gmsg::create(Gmsg::Prepare($m, "statusrequest", config::$bankId));
$net = new Gnet();
$r = $net->send($m);
unset($net);
if (!$r) {
$status = 0;
$res = "Unable to send status report for '{$oid}'";
} else {
$v = GsonCrypt::verify($r, config::$bankId);
if (!$v) {
$status = 0;
$res = "Unable to verify response from bank for '{$oid}'";
} else {
$v = Gmsg::extract($v);
if (!$v) {
$status = 0;
$res = "Unable to understand the response in relation to '{$oid}'";
} else {
$status = $v['status'];
$res = $v['response'];
}
}
}
}
return array($status, $res);
}
public static function process($msg)
{
$status = 1;
$sender = "";
$res = "";
$umsg = GsonCrypt::unseal($msg);
if (!$umsg) {
$ex = Gmsg::extract($msg);
if ($ex && is_array($ex)) {
$umsg = $msg;
} else {
$status = 0;
$res = "Unable to decode the message";
}
}
if ($umsg) {
$parts = self::extract($umsg);
$action = $parts["op"];
$mess = $parts["msg"];
$sender = $parts["sender"];
$recipient = $parts["recipient"];
if ($recipient && !account::exists($recipient)) {
$status = 0;
$res = "The recipient account {$recipient} does not reside here";
$rply = Gmsg::create(array("status" => $status, "response" => $res));
} else {
switch ($action) {
case "mrequest":
$r = transaction::request($mess['m'], $sender, $mess['k']);
$rply = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
break;
case "mstatus":
$r = transaction::mercorder($mess['m'], $sender, $mess['k']);
$rply = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
break;
case "statusrequest":
$r = transaction::status($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "paymentrequest":
$r = transaction::request($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "pullrequests":
$r = transaction::pullrequests($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "pullcoins":
$r = account::pullcoins($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "clearrequests":
$r = transaction::clearrequests($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "notification":
$r = transaction::notification($mess, $sender);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "acknowledgement":
$r = transaction::acknowledgement($mess, config::$SRA);
$m = Gmsg::create(array("status" => $r[0], "response" => $r[1]));
$rply = GsonCrypt::sign($m);
break;
case "deposit":
$r = account::deposit($mess, $recipient);
if (!$r) {
$status = 0;
$res = "Deposit failed";
} else {
$res = "Deposit was successful";
}
break;
case "revokecert":
$net = new Gnet();
$rply = $net->send("{$mess}", true);
$net = null;
break;
case "signcert":
$net = new Gnet();
$rply = $net->send("{$mess}", true);
$net = null;
break;
case "register":
$k = GsonCrypt::getcert();
if (is_readable($k)) {
$res = gio::readfile($k);
if (!$res) {
$status = 0;
}
}
$rply = Gmsg::create(array("status" => $status, "cert" => $res, "name" => config::$accountId, "account" => account::makenew()));
break;
case "create":
$status = gio::savetofile($mess, GsonCrypt::getkey("{$sender}"));
$res = $status ? "successful" : "failed";
$rply = Gmsg::create(array("status" => $status, "response" => $res));
break;
case "remove":
$res = "";
$ret = array("status" => $status, "response" => $res);
$rply = self::create($ret);
$rply = GsonCrypt::seal("{$rply}", "{$sender}");
unlink(GsonCrypt::getkey($sender));
break;
case "exchangecert":
$status = 0;
if (!file_exists(GsonCrypt::getcert("{$sender}"))) {
$status = gio::saverawfile($mess, GsonCrypt::getcert("{$sender}"));
}
$k = GsonCrypt::getcert();
if ($status && is_readable($k)) {
$res = gio::readfile($k);
if (!$res) {
$status = 0;
}
}
$rply = Gmsg::create(array("status" => $status, "cert" => $res));
break;
case "reverb":
$res = $mess;
break;
default:
$status = 0;
$res = "Invalid Operation!";
}
}
}
if (!isset($rply)) {
$ret = array("status" => $status, "response" => $res);
$rply = self::create($ret);
$rply = $sender ? GsonCrypt::seal("{$rply}", "{$sender}") : "{$rply}";
}
return $rply;
}
