aboutsummaryrefslogtreecommitdiffstats
path: root/mod
diff options
context:
space:
mode:
authorfriendica <info@friendica.com>2013-02-08 18:14:54 -0800
committerfriendica <info@friendica.com>2013-02-08 18:14:54 -0800
commitf6af431612d758276287b464ec3454df167823c8 (patch)
treefd608a8214161636e100a3522eb64acec42a345a /mod
parent2f36f6307df736cdbca4ce16d86266db89480b65 (diff)
downloadvolse-hubzilla-f6af431612d758276287b464ec3454df167823c8.tar.gz
volse-hubzilla-f6af431612d758276287b464ec3454df167823c8.tar.bz2
volse-hubzilla-f6af431612d758276287b464ec3454df167823c8.zip
rmagic module to be called from nav bar on remote site - still needs a template.
Diffstat (limited to 'mod')
-rw-r--r--mod/rmagic.php58
1 files changed, 58 insertions, 0 deletions
diff --git a/mod/rmagic.php b/mod/rmagic.php
new file mode 100644
index 000000000..445c8c917
--- /dev/null
+++ b/mod/rmagic.php
@@ -0,0 +1,58 @@
+<?php
+
+
+function rmagic_init(&$a) {
+
+ $me = get_my_address();
+ if($me) {
+ $r = q("select hubloc_url from hubloc where hubloc_addr = '%s' limit 1",
+ dbesc($me)
+ );
+ if($r) {
+ $dest = z_root() . str_replace('zid=','zid_=',$get_app()->query_string);
+ goaway($r[0]['hubloc_url'] . '/magic' . '?f=&dest=' . z_root() . $dest);
+ }
+ }
+
+}
+
+function rmagic_post(&$a) {
+
+ $address = $_REQUEST['address'];
+ if(strpos($address,'@') === false) {
+ notice('Invalid address.');
+ return;
+ }
+
+ $r = null;
+ if($address) {
+ $r = q("select hubloc_url from hubloc where hubloc_addr = '%s' limit 1",
+ dbesc($address)
+ );
+ }
+ if($r) {
+ $url = $r[0]['hubloc_url'];
+ }
+ else {
+ $url = 'https://' . substr($address,strpos($address,'@')+1);
+ }
+
+ if($url) {
+ $dest = z_root() . str_replace('zid=','zid_=',$a->query_string);
+ goaway($url . '/magic' . '?f=&dest=' . z_root() . $dest);
+ }
+
+
+}
+
+
+function rmagic_content(&$a) {
+
+ $o = replace_macros(get_markup_template('rmagic.tpl'),array(
+ '$title' => t('Remote Authentication'),
+ '$desc' => t('Enter your channel address (e.g. channel@example.com)'),
+ '$submit' => t('Authenticate')
+ ));
+ return $o;
+
+} \ No newline at end of file