infiniteimprobabilitydrive/infiniteimprobabilitydrive.php

   1 <?php
   2 /**
   3 * Name: Infinite Improbability Drive
   4 * Description: Infinitely Improbably Find A Random User
   5 * Version: 1.0
   6 * Author: Thomas Willingham <https://kakste.com/profile/beardyunixer>
   7 */
   8 use Friendica\Core\Hook;
   9 use Friendica\Core\L10n;
  10 use Friendica\DI;
  11
  12 function infiniteimprobabilitydrive_install()
  13 {
  14         Hook::register('app_menu', 'addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php', 'infiniteimprobabilitydrive_app_menu');
  15 }
  16
  17 function infiniteimprobabilitydrive_uninstall()
  18 {
  19         Hook::unregister('app_menu', 'addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.php', 'infiniteimprobabilitydrive_app_menu');
  20 }
  21
  22 function infiniteimprobabilitydrive_app_menu($a, &$b)
  23 {
  24         $b['app_menu'][] = '<div class="app-title"><a href="infiniteimprobabilitydrive">' . L10n::t('Infinite Improbability Drive') . '</a></div>';
  25 }
  26
  27
  28 function infiniteimprobabilitydrive_module()
  29 {
  30         return;
  31 }
  32
  33
  34 function infiniteimprobabilitydrive_content(&$a)
  35 {
  36         $baseurl = DI::baseUrl()->get() . '/addon/infiniteimprobabilitydrive';
  37         $o = '';
  38
  39         $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'.DI::baseUrl()->get().'/addon/infiniteimprobabilitydrive/infiniteimprobabilitydrive.css"/>';
  40
  41
  42         $baseurl = DI::baseUrl()->get();
  43
  44         $o .= <<< EOT
  45
  46 <br><br>
  47 <p>Try another destination with the <a href="$baseurl/infiniteimprobabilitydrive">Infinite Improbability Drive</a>
  48 <iframe src ="$baseurl/randprof" height="1200" width="1024">
  49
  50 EOT;
  51         return $o;
  52 }