X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=src%2FWorker%2FOnePoll.php;h=a68ad1336d3aca7bdc5463b5c45d77a7bdc7a25e;hb=514ec1be6df161df5cb48c033917ac2e94484f0f;hp=c1c6fdd1a8da8b2f216044bc2b2eabdcefd60e93;hpb=c845415a99ebc348103815a7b2c55b15c75cdd24;p=friendica.git diff --git a/src/Worker/OnePoll.php b/src/Worker/OnePoll.php index c1c6fdd1a8..a68ad1336d 100644 --- a/src/Worker/OnePoll.php +++ b/src/Worker/OnePoll.php @@ -4,10 +4,12 @@ */ namespace Friendica\Worker; +use Friendica\BaseObject; use Friendica\Content\Text\BBCode; use Friendica\Core\Config; use Friendica\Core\PConfig; -use Friendica\Database\DBM; +use Friendica\Core\Protocol; +use Friendica\Database\DBA; use Friendica\Model\Contact; use Friendica\Model\Item; use Friendica\Protocol\Email; @@ -15,14 +17,14 @@ use Friendica\Protocol\PortableContact; use Friendica\Util\DateTimeFormat; use Friendica\Util\Network; use Friendica\Util\XML; -use dba; require_once 'include/dba.php'; class OnePoll { - public static function execute($contact_id = 0, $command = '') { - global $a; + public static function execute($contact_id = 0, $command = '') + { + $a = BaseObject::getApp(); require_once 'include/items.php'; @@ -45,8 +47,8 @@ class OnePoll $d = DateTimeFormat::utcNow(); - $contact = dba::selectFirst('contact', [], ['id' => $contact_id]); - if (!DBM::is_result($contact)) { + $contact = DBA::selectFirst('contact', [], ['id' => $contact_id]); + if (!DBA::isResult($contact)) { logger('Contact not found or cannot be used.'); return; } @@ -59,7 +61,7 @@ class OnePoll WHERE `cid` = %d AND updated > UTC_TIMESTAMP() - INTERVAL 1 DAY", intval($contact['id']) ); - if (DBM::is_result($r)) { + if (DBA::isResult($r)) { if (!$r[0]['total']) { PortableContact::loadWorker($contact['id'], $importer_uid, 0, $contact['poco']); } @@ -67,9 +69,10 @@ class OnePoll } // Diaspora users, archived users and followers are only checked if they still exist. - if ($contact['archive'] || ($contact["network"] == NETWORK_DIASPORA) || ($contact["rel"] == CONTACT_IS_FOLLOWER)) { + if ($contact['archive'] || ($contact["network"] == Protocol::DIASPORA) || ($contact["rel"] == Contact::FOLLOWER)) { $last_updated = PortableContact::lastUpdated($contact["url"], true); $updated = DateTimeFormat::utcNow(); + if ($last_updated) { logger('Contact '.$contact['id'].' had last update on '.$last_updated, LOGGER_DEBUG); @@ -78,7 +81,7 @@ class OnePoll $last_updated = $contact['last-item']; } - $fields = ['last-item' => $last_updated, 'last-update' => $updated, 'success_update' => $updated]; + $fields = ['last-item' => DateTimeFormat::utc($last_updated), 'last-update' => $updated, 'success_update' => $updated]; self::updateContact($contact, $fields); Contact::unmarkForArchival($contact); } else { @@ -86,6 +89,7 @@ class OnePoll Contact::markForArchival($contact); logger('Contact '.$contact['id'].' is marked for archival', LOGGER_DEBUG); } + return; } @@ -111,12 +115,12 @@ class OnePoll ); // Update the contact entry - if (($contact['network'] === NETWORK_OSTATUS) || ($contact['network'] === NETWORK_DIASPORA) || ($contact['network'] === NETWORK_DFRN)) { + if (($contact['network'] === Protocol::OSTATUS) || ($contact['network'] === Protocol::DIASPORA) || ($contact['network'] === Protocol::DFRN)) { if (!PortableContact::reachable($contact['url'])) { logger("Skipping probably dead contact ".$contact['url']); // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); return; } @@ -125,7 +129,7 @@ class OnePoll logger('Contact is marked dead'); // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); return; } else { Contact::unmarkForArchival($contact); @@ -136,7 +140,7 @@ class OnePoll logger('Ignore public contacts'); // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); return; } @@ -144,11 +148,11 @@ class OnePoll intval($importer_uid) ); - if (!DBM::is_result($r)) { + if (!DBA::isResult($r)) { logger('No self contact for user '.$importer_uid); // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); return; } @@ -157,7 +161,7 @@ class OnePoll logger("poll: ({$contact['network']}-{$contact['id']}) IMPORTER: {$importer['name']}, CONTACT: {$contact['name']}"); - if ($contact['network'] === NETWORK_DFRN) { + if ($contact['network'] === Protocol::DFRN) { $idtosend = $orig_id = (($contact['dfrn-id']) ? $contact['dfrn-id'] : $contact['issued-id']); if (intval($contact['duplex']) && $contact['dfrn-id']) { $idtosend = '0:' . $orig_id; @@ -173,7 +177,7 @@ class OnePoll if (!intval($contact['writable'])) { $fields = ['writable' => true]; - dba::update('contact', $fields, ['id' => $contact['id']]); + DBA::update('contact', $fields, ['id' => $contact['id']]); } $url = $contact['poll'] . '?dfrn_id=' . $idtosend @@ -181,22 +185,20 @@ class OnePoll . '&type=data&last_update=' . $last_update . '&perm=' . $perm ; - $ret = Network::curl($url); + $curlResult = Network::curl($url); - if ($ret['errno'] == CURLE_OPERATION_TIMEDOUT) { + if (!$curlResult->isSuccess() && ($curlResult->getErrorNumber() == CURLE_OPERATION_TIMEDOUT)) { // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); Contact::markForArchival($contact); return; } - $handshake_xml = $ret['body']; - - $html_code = $a->get_curl_code(); + $handshake_xml = $curlResult->getBody(); + $html_code = $curlResult->getReturnCode(); logger('handshake with url ' . $url . ' returns xml: ' . $handshake_xml, LOGGER_DATA); - if (!strlen($handshake_xml) || ($html_code >= 400) || !$html_code) { logger("$url appears to be dead - marking for death "); @@ -241,13 +243,13 @@ class OnePoll if ((intval($res->status) != 0) || !strlen($res->challenge) || !strlen($res->dfrn_id)) { // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); return; } if (((float)$res->dfrn_version > 2.21) && ($contact['poco'] == '')) { $fields = ['poco' => str_replace('/profile/', '/poco/', $contact['url'])]; - dba::update('contact', $fields, ['id' => $contact['id']]); + DBA::update('contact', $fields, ['id' => $contact['id']]); } $postvars = []; @@ -276,7 +278,7 @@ class OnePoll logger('ID did not decode: ' . $contact['id'] . ' orig: ' . $orig_id . ' final: ' . $final_dfrn_id); // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); Contact::markForArchival($contact); return; } @@ -285,57 +287,56 @@ class OnePoll $postvars['dfrn_version'] = DFRN_PROTOCOL_VERSION; $postvars['perm'] = 'rw'; - $xml = Network::post($contact['poll'], $postvars); + $xml = Network::post($contact['poll'], $postvars)->getBody(); - } elseif (($contact['network'] === NETWORK_OSTATUS) - || ($contact['network'] === NETWORK_DIASPORA) - || ($contact['network'] === NETWORK_FEED)) { + } elseif (($contact['network'] === Protocol::OSTATUS) + || ($contact['network'] === Protocol::DIASPORA) + || ($contact['network'] === Protocol::FEED)) { // Upgrading DB fields from an older Friendica version // Will only do this once per notify-enabled OStatus contact // or if relationship changes - $stat_writeable = ((($contact['notify']) && ($contact['rel'] == CONTACT_IS_FOLLOWER || $contact['rel'] == CONTACT_IS_FRIEND)) ? 1 : 0); + $stat_writeable = ((($contact['notify']) && ($contact['rel'] == Contact::FOLLOWER || $contact['rel'] == Contact::FRIEND)) ? 1 : 0); // Contacts from OStatus are always writable - if ($contact['network'] === NETWORK_OSTATUS) { + if ($contact['network'] === Protocol::OSTATUS) { $stat_writeable = 1; } if ($stat_writeable != $contact['writable']) { $fields = ['writable' => $stat_writeable]; - dba::update('contact', $fields, ['id' => $contact['id']]); + DBA::update('contact', $fields, ['id' => $contact['id']]); } // Are we allowed to import from this person? - if ($contact['rel'] == CONTACT_IS_FOLLOWER || $contact['blocked'] || $contact['readonly']) { + if ($contact['rel'] == Contact::FOLLOWER || $contact['blocked']) { // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); return; } $cookiejar = tempnam(get_temppath(), 'cookiejar-onepoll-'); - $ret = Network::curl($contact['poll'], false, $redirects, ['cookiejar' => $cookiejar]); + $curlResult = Network::curl($contact['poll'], false, $redirects, ['cookiejar' => $cookiejar]); unlink($cookiejar); - if ($ret['errno'] == CURLE_OPERATION_TIMEDOUT) { + if (!$curlResult->isTimeout()) { // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); Contact::markForArchival($contact); return; } - $xml = $ret['body']; - - } elseif ($contact['network'] === NETWORK_MAIL) { + $xml = $curlResult->getBody(); + } elseif ($contact['network'] === Protocol::MAIL) { logger("Mail: Fetching for ".$contact['addr'], LOGGER_DEBUG); $mail_disabled = ((function_exists('imap_open') && (! Config::get('system', 'imap_disabled'))) ? 0 : 1); if ($mail_disabled) { // set the last-update so we don't keep polling - dba::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => DateTimeFormat::utcNow()], ['id' => $contact['id']]); Contact::markForArchival($contact); return; } @@ -343,11 +344,11 @@ class OnePoll logger("Mail: Enabled", LOGGER_DEBUG); $mbox = null; - $user = dba::selectFirst('user', ['prvkey'], ['uid' => $importer_uid]); + $user = DBA::selectFirst('user', ['prvkey'], ['uid' => $importer_uid]); $condition = ["`server` != '' AND `uid` = ?", $importer_uid]; - $mailconf = dba::selectFirst('mailacct', [], $condition); - if (DBM::is_result($user) && DBM::is_result($mailconf)) { + $mailconf = DBA::selectFirst('mailacct', [], $condition); + if (DBA::isResult($user) && DBA::isResult($mailconf)) { $mailbox = Email::constructMailboxName($mailconf); $password = ''; openssl_private_decrypt(hex2bin($mailconf['pass']), $password, $user['prvkey']); @@ -356,7 +357,7 @@ class OnePoll logger("Mail: Connect to " . $mailconf['user']); if ($mbox) { $fields = ['last_check' => DateTimeFormat::utcNow()]; - dba::update('mailacct', $fields, ['id' => $mailconf['id']]); + DBA::update('mailacct', $fields, ['id' => $mailconf['id']]); logger("Mail: Connected to " . $mailconf['user']); } else { logger("Mail: Connection error ".$mailconf['user']." ".print_r(imap_errors(), true)); @@ -370,6 +371,7 @@ class OnePoll logger("Mail: Parsing ".count($msgs)." mails from ".$contact['addr']." for ".$mailconf['user'], LOGGER_DEBUG); $metas = Email::messageMeta($mbox, implode(',', $msgs)); + if (count($metas) != count($msgs)) { logger("for " . $mailconf['user'] . " there are ". count($msgs) . " messages but received " . count($metas) . " metas", LOGGER_DEBUG); } else { @@ -381,7 +383,7 @@ class OnePoll $datarray = []; $datarray['verb'] = ACTIVITY_POST; $datarray['object-type'] = ACTIVITY_OBJ_NOTE; - $datarray['network'] = NETWORK_MAIL; + $datarray['network'] = Protocol::MAIL; // $meta = Email::messageMeta($mbox, $msg_uid); $datarray['uri'] = Email::msgid2iri(trim($meta->message_id, '<>')); @@ -389,8 +391,8 @@ class OnePoll // Have we seen it before? $fields = ['deleted', 'id']; $condition = ['uid' => $importer_uid, 'uri' => $datarray['uri']]; - $item = dba::selectFirst('item', $fields, $condition); - if (DBM::is_result($item)) { + $item = Item::selectFirst($fields, $condition); + if (DBA::isResult($item)) { logger("Mail: Seen before ".$msg_uid." for ".$mailconf['user']." UID: ".$importer_uid." URI: ".$datarray['uri'],LOGGER_DEBUG); // Only delete when mails aren't automatically moved or deleted @@ -435,15 +437,13 @@ class OnePoll $refs_arr = explode(' ', $raw_refs); if (count($refs_arr)) { for ($x = 0; $x < count($refs_arr); $x ++) { - $refs_arr[$x] = "'" . Email::msgid2iri(str_replace(['<', '>', ' '],['', '', ''],dbesc($refs_arr[$x]))) . "'"; + $refs_arr[$x] = Email::msgid2iri(str_replace(['<', '>', ' '],['', '', ''], $refs_arr[$x])); } } - $qstr = implode(',', $refs_arr); - $r = q("SELECT `parent-uri` FROM `item` USE INDEX (`uid_uri`) WHERE `uri` IN ($qstr) AND `uid` = %d LIMIT 1", - intval($importer_uid) - ); - if (DBM::is_result($r)) { - $datarray['parent-uri'] = $r[0]['parent-uri']; // Set the parent as the top-level item + $condition = ['uri' => $refs_arr, 'uid' => $importer_uid]; + $parent = Item::selectFirst(['parent-uri'], $condition); + if (DBA::isResult($parent)) { + $datarray['parent-uri'] = $parent['parent-uri']; // Set the parent as the top-level item } } @@ -472,12 +472,11 @@ class OnePoll // If it seems to be a reply but a header couldn't be found take the last message with matching subject if (empty($datarray['parent-uri']) && $reply) { - $r = q("SELECT `parent-uri` FROM `item` WHERE `title` = \"%s\" AND `uid` = %d AND `network` = '%s' ORDER BY `created` DESC LIMIT 1", - dbesc(protect_sprintf($datarray['title'])), - intval($importer_uid), - dbesc(NETWORK_MAIL)); - if (DBM::is_result($r)) { - $datarray['parent-uri'] = $r[0]['parent-uri']; + $condition = ['title' => $datarray['title'], 'uid' => importer_uid, 'network' => Protocol::MAIL]; + $params = ['order' => ['created' => true]]; + $parent = Item::selectFirst(['parent-uri'], $condition, $params); + if (DBA::isResult($parent)) { + $datarray['parent-uri'] = $parent['parent-uri']; } } @@ -507,7 +506,7 @@ class OnePoll } } - $fromarr = imap_rfc822_parse_adrlist($fromdecoded, $a->get_hostname()); + $fromarr = imap_rfc822_parse_adrlist($fromdecoded, $a->getHostName()); $frommail = $fromarr[0]->mailbox."@".$fromarr[0]->host; @@ -530,7 +529,7 @@ class OnePoll if ($datarray['parent-uri'] === $datarray['uri']) { $datarray['private'] = 1; } - if (($contact['network'] === NETWORK_MAIL) && (!PConfig::get($importer_uid, 'system', 'allow_public_email_replies'))) { + if (($contact['network'] === Protocol::MAIL) && (!PConfig::get($importer_uid, 'system', 'allow_public_email_replies'))) { $datarray['private'] = 1; $datarray['allow_cid'] = '<' . $contact['id'] . '>'; } @@ -585,16 +584,16 @@ class OnePoll consume_feed($xml, $importer, $contact, $hub); // do it a second time for DFRN so that any children find their parents. - if ($contact['network'] === NETWORK_DFRN) { + if ($contact['network'] === Protocol::DFRN) { consume_feed($xml, $importer, $contact, $hub); } $hubmode = 'subscribe'; - if ($contact['network'] === NETWORK_DFRN || $contact['blocked'] || $contact['readonly']) { + if ($contact['network'] === Protocol::DFRN || $contact['blocked']) { $hubmode = 'unsubscribe'; } - if (($contact['network'] === NETWORK_OSTATUS || $contact['network'] == NETWORK_FEED) && (! $contact['hub-verify'])) { + if (($contact['network'] === Protocol::OSTATUS || $contact['network'] == Protocol::FEED) && (! $contact['hub-verify'])) { $hub_update = true; } @@ -604,15 +603,18 @@ class OnePoll logger("Contact ".$contact['id']." returned hub: ".$hub." Network: ".$contact['network']." Relation: ".$contact['rel']." Update: ".$hub_update); - if (strlen($hub) && $hub_update && (($contact['rel'] != CONTACT_IS_FOLLOWER) || $contact['network'] == NETWORK_FEED)) { + if (strlen($hub) && $hub_update && (($contact['rel'] != Contact::FOLLOWER) || $contact['network'] == Protocol::FEED)) { logger('hub ' . $hubmode . ' : ' . $hub . ' contact name : ' . $contact['name'] . ' local user : ' . $importer['name']); $hubs = explode(',', $hub); + if (count($hubs)) { foreach ($hubs as $h) { $h = trim($h); + if (!strlen($h)) { continue; } + subscribe_to_hub($h, $importer, $contact, $hubmode); } } @@ -621,23 +623,24 @@ class OnePoll $updated = DateTimeFormat::utcNow(); self::updateContact($contact, ['last-update' => $updated, 'success_update' => $updated]); - dba::update('gcontact', ['last_contact' => $updated], ['nurl' => $contact['nurl']]); + DBA::update('gcontact', ['last_contact' => $updated], ['nurl' => $contact['nurl']]); Contact::unmarkForArchival($contact); - } elseif (in_array($contact["network"], [NETWORK_DFRN, NETWORK_DIASPORA, NETWORK_OSTATUS, NETWORK_FEED])) { + } elseif (in_array($contact["network"], [Protocol::DFRN, Protocol::DIASPORA, Protocol::OSTATUS, Protocol::FEED])) { $updated = DateTimeFormat::utcNow(); self::updateContact($contact, ['last-update' => $updated, 'failure_update' => $updated]); - dba::update('gcontact', ['last_failure' => $updated], ['nurl' => $contact['nurl']]); + DBA::update('gcontact', ['last_failure' => $updated], ['nurl' => $contact['nurl']]); Contact::markForArchival($contact); } else { $updated = DateTimeFormat::utcNow(); - dba::update('contact', ['last-update' => $updated], ['id' => $contact['id']]); + DBA::update('contact', ['last-update' => $updated], ['id' => $contact['id']]); } return; } - private static function RemoveReply($subject) { + private static function RemoveReply($subject) + { while (in_array(strtolower(substr($subject, 0, 3)), ["re:", "aw:"])) { $subject = trim(substr($subject, 4)); } @@ -651,8 +654,9 @@ class OnePoll * @param array $contact The personal contact entry * @param array $fields The fields that are updated */ - private static function updateContact($contact, $fields) { - dba::update('contact', $fields, ['id' => $contact['id']]); - dba::update('contact', $fields, ['uid' => 0, 'nurl' => $contact['nurl']]); + private static function updateContact(array $contact, array $fields) + { + DBA::update('contact', $fields, ['id' => $contact['id']]); + DBA::update('contact', $fields, ['uid' => 0, 'nurl' => $contact['nurl']]); } }