mod/redir.php

   1 <?php
   2
   3 function redir_init(&$a) {
   4
   5         if((! local_user()) || (! ($a->argc == 2)) || (! intval($a->argv[1])))
   6                 goaway($a->get_baseurl());
   7         $cid = $a->argv[1];
   8
   9         $r = q("SELECT `network`, `issued-id`, `dfrn-id`, `duplex`, `poll` FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
  10                 intval($cid),
  11                 intval(local_user())
  12         );
  13
  14         if((! count($r)) || ($r[0]['network'] !== 'dfrn'))
  15                 goaway($a->get_baseurl());
  16
  17         $dfrn_id = $orig_id = (($r[0]['issued-id']) ? $r[0]['issued-id'] : $r[0]['dfrn-id']);
  18
  19         if($r[0]['duplex'] && $r[0]['issued-id']) {
  20                 $orig_id = $r[0]['issued-id'];
  21                 $dfrn_id = '1:' . $orig_id;
  22         }
  23         if($r[0]['duplex'] && $r[0]['dfrn-id']) {
  24                 $orig_id = $r[0]['dfrn-id'];
  25                 $dfrn_id = '0:' . $orig_id;
  26         }
  27
  28         $sec = random_string();
  29
  30         q("INSERT INTO `profile_check` ( `uid`, `cid`, `dfrn_id`, `sec`, `expire`)
  31                 VALUES( %d, %s, '%s', '%s', %d )",
  32                 intval(local_user()),
  33                 intval($cid),
  34                 dbesc($dfrn_id),
  35                 dbesc($sec),
  36                 intval(time() + 45)
  37         );
  38
  39         goaway ($r[0]['poll'] . '?dfrn_id=' . $dfrn_id
  40 //              . '&dfrn_version=' . DFRN_PROTOCOL_VERSION . '&type=profile');
  41                 . '&dfrn_version=' . DFRN_PROTOCOL_VERSION . '&type=profile&sec=' . $sec);
  42
  43 }