+ /**
+ * @brief Transmits atom content to the contacts via the Diaspora transport layer
+ *
+ * @param array $owner Owner record
+ * @param array $contact Contact record of the receiver
+ * @param string $atom Content that will be transmitted
+ *
+ * @return int Deliver status. Negative values mean an error.
+ */
+ public static function transmit($owner, $contact, $atom, $public_batch = false)
+ {
+ $a = get_app();
+
+ if (empty($contact['addr'])) {
+ logger('Empty contact handle for ' . $contact['id'] . ' - ' . $contact['url'] . ' - trying to update it.');
+ if (Contact::updateFromProbe($contact['id'])) {
+ $new_contact = dba::selectFirst('contact', ['addr'], ['id' => $contact['id']]);
+ $contact['addr'] = $new_contact['addr'];
+ }
+
+ if (empty($contact['addr'])) {
+ logger('Unable to find contact handle for ' . $contact['id'] . ' - ' . $contact['url']);
+ return -21;
+ }
+ }
+
+ $fcontact = Diaspora::personByHandle($contact['addr']);
+ if (empty($fcontact)) {
+ logger('Unable to find contact details for ' . $contact['id'] . ' - ' . $contact['addr']);
+ return -22;
+ }
+
+ $envelope = Diaspora::buildMessage($atom, $owner, $contact, $owner['uprvkey'], $fcontact['pubkey'], $public_batch);
+
+ $dest_url = ($public_batch ? $fcontact["batch"] : $contact["notify"]);
+
+ $content_type = ($public_batch ? "application/magic-envelope+xml" : "application/json");
+
+ $xml = Network::post($dest_url, $envelope, ["Content-Type: ".$content_type]);
+
+ $curl_stat = $a->get_curl_code();
+ if (empty($curl_stat) || empty($xml)) {
+ logger('Empty answer from ' . $contact['id'] . ' - ' . $dest_url);
+ return -9; // timed out
+ }
+
+ if (($curl_stat == 503) && (stristr($a->get_curl_headers(), 'retry-after'))) {
+ return -10;
+ }
+
+ if (strpos($xml, '<?xml') === false) {
+ logger('No valid XML returned from ' . $contact['id'] . ' - ' . $dest_url);
+ logger('Returned XML: ' . $xml, LOGGER_DATA);
+ return 3;
+ }
+
+ $res = XML::parseString($xml);
+
+ if (empty($res->status)) {
+ return -23;
+ }
+
+ if (!empty($res->message)) {
+ logger('Transmit to ' . $dest_url . ' returned status '.$res->status.' - '.$res->message, LOGGER_DEBUG);
+ }
+
+ if ($res->status == 200) {
+ Contact::unmarkForArchival($contact);
+ }
+
+ return intval($res->status);
+ }
+