view/theme/diabook/theme.php

   1 <?php
   2
   3 /*
   4  * Name: Diabook
   5  * Description: Diabook: report bugs and request here: http://pad.toktan.org/p/diabook or contact me : thomas_bierey@friendica.eu
   6  * Version: (Version: 1.027)
   7  * Author:
   8  */
   9
  10 function get_diabook_config($key, $default = false) {
  11         if (local_user()) {
  12                 $result = get_pconfig(local_user(), "diabook", $key);
  13                 if ($result !== false)
  14                         return $result;
  15         }
  16
  17         $result = get_config("diabook", $key);
  18         if ($result !== false)
  19                 return $result;
  20
  21         return $default;
  22 }
  23
  24 function diabook_init(&$a) {
  25
  26 set_template_engine($a, 'smarty3');
  27
  28 //print diabook-version for debugging
  29 $diabook_version = "Diabook (Version: 1.027)";
  30 $a->page['htmlhead'] .= sprintf('<META NAME=generator CONTENT="%s"/>', $diabook_version);
  31
  32 //init css on network and profilepages
  33 $cssFile = null;
  34
  35 // Preload config
  36 load_config("diabook");
  37 load_pconfig(local_user(), "diabook");
  38
  39 //get statuses of boxes at right-hand-column
  40 $close_pages      = get_diabook_config( "close_pages", 1 );
  41 $close_profiles   = get_diabook_config( "close_profiles", 0 );
  42 $close_helpers    = get_diabook_config( "close_helpers", 0 );
  43 $close_services   = get_diabook_config( "close_services", 0 );
  44 $close_friends    = get_diabook_config( "close_friends", 0 );
  45 $close_lastusers  = get_diabook_config( "close_lastusers", 0 );
  46 $close_lastphotos = get_diabook_config( "close_lastphotos", 0 );
  47 $close_lastlikes  = get_diabook_config( "close_lastlikes", 0 );
  48 $close_mapquery   = get_diabook_config( "close_mapquery", 1 );
  49
  50 //get resolution (wide/normal)
  51 $resolution=false;
  52 $resolution = get_pconfig(local_user(), "diabook", "resolution");
  53 if ($resolution===false) $resolution="normal";
  54
  55 //Add META viewport tag respecting the resolution to header for tablets
  56 if ($resolution=="wide") {
  57   $a->page['htmlhead'] .= '<meta name="viewport" content="width=1200" />';
  58 } else {
  59   $a->page['htmlhead'] .= '<meta name="viewport" content="width=980" />';
  60 }
  61 //get colour-scheme
  62 $color = get_diabook_config( "color", "diabook" );
  63
  64 if ($color=="diabook") $color_path = "/";
  65 if ($color=="aerith") $color_path = "/diabook-aerith/";
  66 if ($color=="blue") $color_path = "/diabook-blue/";
  67 if ($color=="red") $color_path = "/diabook-red/";
  68 if ($color=="pink") $color_path = "/diabook-pink/";
  69 if ($color=="green") $color_path = "/diabook-green/";
  70 if ($color=="dark") $color_path = "/diabook-dark/";
  71
  72
  73         //build personal menue at lefthand-col (id="profile_side") and boxes at right-hand-col at networkpages
  74         if ($a->argv[0] === "network" && local_user()){
  75
  76         // USER MENU
  77         if(local_user()) {
  78
  79                 $r = q("SELECT micro FROM contact WHERE uid=%d AND self=1", intval($a->user['uid']));
  80
  81                 $userinfo = array(
  82                                         'icon' => (count($r) ? $r[0]['micro']: $a->get_baseurl()."/images/default-profile-mm.jpg"),
  83                                         'name' => $a->user['username'],
  84                                 );
  85                 $ps = array('usermenu'=>array());
  86                 $ps['usermenu']['status'] = Array('profile/' . $a->user['nickname'], t('Home'), "", t('Your posts and conversations'));
  87                 $ps['usermenu']['profile'] = Array('profile/' . $a->user['nickname']. '?tab=profile', t('Profile'), "", t('Your profile page'));
  88                 $ps['usermenu']['contacts'] = Array('contacts' , t('Contacts'), "", t('Your contacts'));
  89                 $ps['usermenu']['photos'] = Array('photos/' . $a->user['nickname'], t('Photos'), "", t('Your photos'));
  90                 $ps['usermenu']['events'] = Array('events/', t('Events'), "", t('Your events'));
  91                 $ps['usermenu']['notes'] = Array('notes/', t('Personal notes'), "", t('Your personal photos'));
  92                 $ps['usermenu']['community'] = Array('community/', t('Community'), "", "");
  93                 $ps['usermenu']['pgroups'] = Array('http://dir.friendica.com/directory/forum', t('Community Pages'), "", "");
  94
  95                 $tpl = get_markup_template('profile_side.tpl');
  96
  97                 $a->page['aside'] = replace_macros($tpl, array(
  98                                 '$userinfo' => $userinfo,
  99                                 '$ps' => $ps,
 100                         )).$a->page['aside'];
 101
 102         }
 103
 104         $ccCookie = $close_pages + $close_mapquery + $close_profiles + $close_helpers + $close_services + $close_friends + $close_lastusers + $close_lastphotos + $close_lastlikes;
 105         //if all boxes closed, dont build right-hand-col and dont use special css
 106         if($ccCookie != "9") {
 107         // COMMUNITY
 108         diabook_community_info();
 109
 110         // CUSTOM CSS
 111         if($resolution == "normal") {$cssFile = $a->get_baseurl($ssl_state)."/view/theme/diabook".$color_path."style-network.css";}
 112         if($resolution == "wide") {$cssFile = $a->get_baseurl($ssl_state)."/view/theme/diabook".$color_path."style-network-wide.css";}
 113         }
 114         }
 115
 116
 117
 118         //build boxes at right_aside at profile pages
 119         if ($a->argv[0].$a->argv[1] === "profile".$a->user['nickname']){
 120         if($ccCookie != "9") {
 121         // COMMUNITY
 122         diabook_community_info();
 123
 124         // CUSTOM CSS
 125         if($resolution == "normal") {$cssFile = $a->get_baseurl($ssl_state)."/view/theme/diabook".$color_path."style-profile.css";}
 126         if($resolution == "wide") {$cssFile = $a->get_baseurl($ssl_state)."/view/theme/diabook".$color_path."style-profile-wide.css";}
 127
 128         }
 129         }
 130
 131         //write js-scripts to the head-section:
 132         //load jquery.cookie.js
 133         $cookieJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.cookie.js";
 134         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s"></script>', $cookieJS);
 135         //load jquery.ae.image.resize.js
 136         $imageresizeJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.ae.image.resize.min.js";
 137         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $imageresizeJS);
 138         //load jquery.ui.js
 139         if($ccCookie != "9") {
 140         $jqueryuiJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery-ui-1.8.20.custom.min.js";
 141         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $jqueryuiJS);
 142         $jqueryuicssJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/jquery-ui-1.8.20.custom.css";
 143         $a->page['htmlhead'] .= sprintf('<link rel="stylesheet" type="text/css" href="%s" />', $jqueryuicssJS);
 144         }
 145
 146         //load jquery.mapquery.js
 147         if($close_mapquery != "1") {
 148         $mqtmplJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.tmpl.js";
 149         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $mqtmplJS);
 150         $mapqueryJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.mapquery.core.js";
 151         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $mapqueryJS);
 152         $openlayersJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/OpenLayers.js";
 153         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $openlayersJS);
 154         $mqmouseposJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.mapquery.mqMousePosition.js";
 155         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $mqmouseposJS);
 156         $mousewheelJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.mousewheel.js";
 157         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $mousewheelJS);
 158    $mqlegendJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.mapquery.legend.js";
 159         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $mqlegendJS);
 160         $mqlayermanagerJS = $a->get_baseurl($ssl_state)."/view/theme/diabook/js/jquery.mapquery.mqLayerManager.js";
 161         $a->page['htmlhead'] .= sprintf('<script type="text/javascript" src="%s" ></script>', $mqlayermanagerJS);
 162         }
 163
 164         $a->page['htmlhead'] .= '
 165         <script>
 166          $(function() {
 167                 $("a.lightbox").colorbox({maxHeight:"90%"}); // Select all links with lightbox class
 168                 $("a#mapcontrol-link").colorbox({inline:true,onClosed: function() { $("#mapcontrol").attr("style","display: none;");}} );
 169                 $("a#closeicon").colorbox({inline:true,onClosed: function() { $("#boxsettings").attr("style","display: none;");}} );
 170                 });
 171
 172          $(window).load(function() {
 173                 var footer_top = $(document).height() - 30;
 174                 $("div#footerbox").attr("style", "border-top: 1px solid #D2D2D2; width: 70%;right: 15%;position: absolute;top:"+footer_top+"px;");
 175          });
 176         </script>';
 177
 178         //check if mapquerybox is active and print
 179         if($close_mapquery != "1") {
 180                 $ELZoom = get_diabook_config( "ELZoom", 0 );
 181                 $ELPosX = get_diabook_config( "ELPosX", 0);
 182                 $ELPosY = get_diabook_config( "ELPosY", 0);
 183                 $a->page['htmlhead'] .= '
 184                 <script>
 185
 186     $(function() {
 187     $("#map").mapQuery({
 188         layers:[{         //add layers to your map; you need to define at least one to be able to see anything on the map
 189             type:"osm"  //add a layer of the type osm (OpenStreetMap)
 190             }],
 191         center:({zoom:'.$ELZoom.',position:['.$ELPosX.','.$ELPosY.']}),
 192        });
 193
 194     });
 195
 196     function open_mapcontrol() {
 197                 $("div#mapcontrol").attr("style","display: block;width:900px;height:900px;");
 198                 $("#map2").mapQuery({
 199                         layers:[{type:"osm", label:"OpenStreetMap" },
 200                                           {type:"wms", label:"Population density 2010", legend:{url:"http://mapserver.edugis.nl/cgi-bin/mapserv?map=maps/edugis/cache/population.map&version=1.1.1&service=WMS&request=GetLegendGraphic&layer=Bevolkingsdichtheid_2010&format=image/png"}, url:"http://t1.edugis.nl/tiles/tilecache.py?map=maps/edugis/cache/population.map",
 201                                           layers:"Bevolkingsdichtheid_2010" },
 202                                           {type:"wms",
 203                                                   label:"OpenLayers WMS",
 204                                                   url:"http://labs.metacarta.com/wms/vmap0",
 205                                                   layers:"basic" }],
 206                         center:({zoom:'.$ELZoom.',position:['.$ELPosX.','.$ELPosY.']})});
 207
 208                 $("#mouseposition").mqMousePosition({
 209         map: "#map2",
 210         x:"",
 211         y:"",
 212         precision:4
 213                 });
 214
 215         $("#layermanager").mqLayerManager({map:"#map2"});
 216         $( "div#layermanager" ).accordion({header: ".mq-layermanager-element-header"});
 217       $(".mq-layermanager-element-content").attr("style", "");
 218
 219         map = $("#map2").mapQuery().data("mapQuery");
 220         textarea = document.getElementById("id_diabook_ELZoom");
 221         textarea.value = "'.$ELZoom.'";
 222                 $("#map2").bind("mousewheel", function(event, delta) {
 223                 if (delta > 0 && textarea.value < 18){
 224                          textarea.value = textarea.value - delta*-1; }
 225                 if (delta < 0 && textarea.value > "0"){
 226                          textarea.value = textarea.value - delta*-1; }
 227                         });
 228                 };
 229                 </script>';
 230         }
 231
 232         //check if community_home-plugin is activated and change css.. we need this, that the submit-wrapper doesn't overlay the login-panel if communityhome-plugin is active
 233         $nametocheck = "communityhome";
 234         $r = q("select id from addon where name = '%s' and installed = 1", dbesc($nametocheck));
 235         if(count($r) == "1" && $a->argv[0] === "home" ) {
 236
 237         $a->page['htmlhead'] .= '
 238         <script>
 239         $(function() {
 240         $("div#login-submit-wrapper").attr("style","padding-top: 120px;");
 241         });
 242         </script>';
 243         }
 244         //comment-edit-wrapper on photo_view... we need this to workaround a global bug in photoview, where the comment-box is between the last comment the the comment before the last
 245         if ($a->argv[0].$a->argv[2] === "photos"."image"){
 246         $a->page['htmlhead'] .= '
 247         <script>
 248                 $(function(){
 249                 $(".comment-edit-form").css("display","table");
 250                         });
 251     </script>';
 252         }
 253         //restore (only) the order right hand col at settingspage
 254         if($a->argv[0] === "settings" && local_user()) {
 255         $a->page['htmlhead'] .= '
 256         <script>
 257         function restore_boxes(){
 258         $.cookie("Boxorder",null, { expires: 365, path: "/" });
 259         alert("Boxorder at right-hand column was restored. Please refresh your browser");
 260    }
 261         </script>';}
 262
 263         if ($a->argv[0].$a->argv[1] === "profile".$a->user['nickname'] or $a->argv[0] === "network" && local_user()){
 264         $a->page['htmlhead'] .= '
 265         <script>
 266         $(function() {
 267         $(".oembed.photo img").aeImageResize({height: 400, width: 400});
 268         });
 269         </script>';
 270
 271         if($ccCookie != "9") {
 272         $a->page['htmlhead'] .= '
 273         <script>
 274         $("right_aside").ready(function(){
 275
 276         if('.$close_pages.')
 277                 {
 278                 document.getElementById( "close_pages" ).style.display = "none";
 279                         };
 280
 281         if('.$close_mapquery.')
 282                 {
 283                 document.getElementById( "close_mapquery" ).style.display = "none";
 284                         };
 285
 286         if('.$close_profiles.')
 287                 {
 288                 document.getElementById( "close_profiles" ).style.display = "none";
 289                         };
 290
 291         if('.$close_helpers.')
 292                 {
 293                 document.getElementById( "close_helpers" ).style.display = "none";
 294                         };
 295
 296         if('.$close_services.')
 297                 {
 298                 document.getElementById( "close_services" ).style.display = "none";
 299                         };
 300
 301         if('.$close_friends.')
 302                 {
 303                 document.getElementById( "close_friends" ).style.display = "none";
 304                         };
 305
 306         if('.$close_lastusers.')
 307                 {
 308                 document.getElementById( "close_lastusers" ).style.display = "none";
 309                         };
 310
 311         if('.$close_lastphotos.')
 312                 {
 313                 document.getElementById( "close_lastphotos" ).style.display = "none";
 314                         };
 315
 316         if('.$close_lastlikes.')
 317                 {
 318                 document.getElementById( "close_lastlikes" ).style.display = "none";
 319                         };}
 320
 321         );
 322
 323         </script>';}
 324         }
 325         //end js scripts
 326
 327         // custom css
 328         if (!is_null($cssFile)) $a->page['htmlhead'] .= sprintf('<link rel="stylesheet" type="text/css" href="%s" />', $cssFile);
 329
 330         //footer
 331         $tpl = get_markup_template('footer.tpl');
 332         $a->page['footer'] .= replace_macros($tpl, array());
 333
 334         //
 335         js_diabook_footer();
 336 }
 337
 338
 339  function diabook_community_info() {
 340         $a = get_app();
 341
 342         $close_pages      = get_diabook_config( "close_pages", 1 );
 343         $close_profiles   = get_diabook_config( "close_profiles", 0 );
 344         $close_helpers    = get_diabook_config( "close_helpers", 0 );
 345         $close_services   = get_diabook_config( "close_services", 0 );
 346         $close_friends    = get_diabook_config( "close_friends", 0 );
 347         $close_lastusers  = get_diabook_config( "close_lastusers", 0 );
 348         $close_lastphotos = get_diabook_config( "close_lastphotos", 0 );
 349         $close_lastlikes  = get_diabook_config( "close_lastlikes", 0 );
 350         $close_mapquery   = get_diabook_config( "close_mapquery", 1 );
 351
 352         // comunity_profiles
 353         if($close_profiles != "1") {
 354         $aside['$comunity_profiles_title'] = t('Community Profiles');
 355         $aside['$comunity_profiles_items'] = array();
 356         $r = q("select gcontact.* from gcontact left join glink on glink.gcid = gcontact.id
 357                           where glink.cid = 0 and glink.uid = 0 order by rand() limit 9");
 358         $tpl = get_markup_template('ch_directory_item.tpl');
 359         if(count($r)) {
 360                 $photo = 'photo';
 361                 foreach($r as $rr) {
 362                         $profile_link = $a->get_baseurl() . '/profile/' . ((strlen($rr['nickname'])) ? $rr['nickname'] : $rr['profile_uid']);
 363                         $entry = replace_macros($tpl,array(
 364                                 '$id' => $rr['id'],
 365                                 '$profile_link' => zrl($rr['url']),
 366                                 '$photo' => $rr[$photo],
 367                                 '$alt_text' => $rr['name'],
 368                         ));
 369                         $aside['$comunity_profiles_items'][] = $entry;
 370                 }
 371         }}
 372
 373         // last 12 users
 374         if($close_lastusers != "1") {
 375         $aside['$lastusers_title'] = t('Last users');
 376         $aside['$lastusers_items'] = array();
 377         $sql_extra = "";
 378         $publish = (get_config('system','publish_all') ? '' : " AND `publish` = 1 " );
 379         $order = " ORDER BY `register_date` DESC ";
 380
 381         $r = q("SELECT `profile`.*, `profile`.`uid` AS `profile_uid`, `user`.`nickname`
 382                         FROM `profile` LEFT JOIN `user` ON `user`.`uid` = `profile`.`uid`
 383                         WHERE `is-default` = 1 $publish AND `user`.`blocked` = 0 $sql_extra $order LIMIT %d , %d ",
 384                 0,
 385                 9
 386         );
 387         $tpl = get_markup_template('ch_directory_item.tpl');
 388         if(count($r)) {
 389                 $photo = 'thumb';
 390                 foreach($r as $rr) {
 391                         $profile_link = $a->get_baseurl() . '/profile/' . ((strlen($rr['nickname'])) ? $rr['nickname'] : $rr['profile_uid']);
 392                         $entry = replace_macros($tpl,array(
 393                                 '$id' => $rr['id'],
 394                                 '$profile_link' => $profile_link,
 395                                 '$photo' => $a->get_cached_avatar_image($rr[$photo]),
 396                                 '$alt_text' => $rr['name'],
 397                         ));
 398                         $aside['$lastusers_items'][] = $entry;
 399                 }
 400         }}
 401
 402         // last 10 liked items
 403         if($close_lastlikes != "1") {
 404         $aside['$like_title'] = t('Last likes');
 405         $aside['$like_items'] = array();
 406         $r = q("SELECT `T1`.`created`, `T1`.`liker`, `T1`.`liker-link`, `item`.* FROM
 407                         (SELECT `parent-uri`, `created`, `author-name` AS `liker`,`author-link` AS `liker-link`
 408                                 FROM `item` WHERE `verb`='http://activitystrea.ms/schema/1.0/like' GROUP BY `parent-uri` ORDER BY `created` DESC) AS T1
 409                         INNER JOIN `item` ON `item`.`uri`=`T1`.`parent-uri`
 410                         WHERE `T1`.`liker-link` LIKE '%s%%' OR `item`.`author-link` LIKE '%s%%'
 411                         GROUP BY `uri`
 412                         ORDER BY `T1`.`created` DESC
 413                         LIMIT 0,5",
 414                         $a->get_baseurl(),$a->get_baseurl()
 415                         );
 416
 417         foreach ($r as $rr) {
 418                 $author  = '<a href="' . $rr['liker-link'] . '">' . $rr['liker'] . '</a>';
 419                 $objauthor =  '<a href="' . $rr['author-link'] . '">' . $rr['author-name'] . '</a>';
 420
 421                 //var_dump($rr['verb'],$rr['object-type']); killme();
 422                 switch($rr['verb']){
 423                         case 'http://activitystrea.ms/schema/1.0/post':
 424                                 switch ($rr['object-type']){
 425                                         case 'http://activitystrea.ms/schema/1.0/event':
 426                                                 $post_type = t('event');
 427                                                 break;
 428                                         default:
 429                                                 $post_type = t('status');
 430                                 }
 431                                 break;
 432                         default:
 433                                 if ($rr['resource-id']){
 434                                         $post_type = t('photo');
 435                                         $m=array();     preg_match("/\[url=([^]]*)\]/", $rr['body'], $m);
 436                                         $rr['plink'] = $m[1];
 437                                 } else {
 438                                         $post_type = t('status');
 439                                 }
 440                 }
 441                 $plink = '<a href="' . $rr['plink'] . '">' . $post_type . '</a>';
 442
 443                 $aside['$like_items'][] = sprintf( t('%1$s likes %2$s\'s %3$s'), $author, $objauthor, $plink);
 444
 445         }}
 446
 447         // last 12 photos
 448         if($close_lastphotos != "1") {
 449         $aside['$photos_title'] = t('Last photos');
 450         $aside['$photos_items'] = array();
 451         $r = q("SELECT `photo`.`id`, `photo`.`resource-id`, `photo`.`scale`, `photo`.`desc`, `user`.`nickname`, `user`.`username` FROM
 452                                 (SELECT `resource-id`, MAX(`scale`) as maxscale FROM `photo`
 453                                         WHERE `profile`=0 AND `contact-id`=0 AND `album` NOT IN ('Contact Photos', '%s', 'Profile Photos', '%s')
 454                                                 AND `allow_cid`='' AND `allow_gid`='' AND `deny_cid`='' AND `deny_gid`='' GROUP BY `resource-id`) AS `t1`
 455                                 INNER JOIN `photo` ON `photo`.`resource-id`=`t1`.`resource-id` AND `photo`.`scale` = `t1`.`maxscale`,
 456                                 `user`
 457                                 WHERE `user`.`uid` = `photo`.`uid`
 458                                 AND `user`.`blockwall`=0
 459                                 AND `user`.`hidewall`=0
 460                                 ORDER BY `photo`.`edited` DESC
 461                                 LIMIT 0, 9",
 462                                 dbesc(t('Contact Photos')),
 463                                 dbesc(t('Profile Photos'))
 464                                 );
 465                 if(count($r)) {
 466                 $tpl = get_markup_template('ch_directory_item.tpl');
 467                 foreach($r as $rr) {
 468                         $photo_page = $a->get_baseurl() . '/photos/' . $rr['nickname'] . '/image/' . $rr['resource-id'];
 469                         $photo_url = $a->get_baseurl() . '/photo/' .  $rr['resource-id'] . '-' . $rr['scale'] .'.jpg';
 470
 471                         $entry = replace_macros($tpl,array(
 472                                 '$id' => $rr['id'],
 473                                 '$profile_link' => $photo_page,
 474                                 '$photo' => $photo_url,
 475                                 '$alt_text' => $rr['username']." : ".$rr['desc'],
 476                         ));
 477
 478                         $aside['$photos_items'][] = $entry;
 479                 }
 480         }}
 481
 482    //right_aside FIND FRIENDS
 483    if($close_friends != "1") {
 484         if(local_user()) {
 485         $nv = array();
 486         $nv['title'] = Array("", t('Find Friends'), "", "");
 487         $nv['directory'] = Array('directory', t('Local Directory'), "", "");
 488         $nv['global_directory'] = Array('http://dir.friendica.com/', t('Global Directory'), "", "");
 489         $nv['match'] = Array('match', t('Similar Interests'), "", "");
 490         $nv['suggest'] = Array('suggest', t('Friend Suggestions'), "", "");
 491         $nv['invite'] = Array('invite', t('Invite Friends'), "", "");
 492
 493         $nv['search'] = '<form name="simple_bar" method="get" action="http://dir.friendica.com/directory">
 494                                                 <span class="sbox_l"></span>
 495                                                 <span class="sbox">
 496                                                 <input type="text" name="search" size="13" maxlength="50">
 497                                                 </span>
 498                                                 <span class="sbox_r" id="srch_clear"></span>';
 499
 500         $aside['$nv'] = $nv;
 501         }}
 502
 503    //Community_Pages at right_aside
 504    if($close_pages != "1") {
 505    if(local_user()) {
 506    $page = '
 507                         <h3 style="margin-top:0px;">'.t("Community Pages").'<a id="closeicon" href="#boxsettings" onClick="open_boxsettings(); return false;" style="text-decoration:none;" class="icon close_box" title="'.t("Settings").'"></a></h3>
 508                         <div id=""><ul style="margin-left: 7px;margin-top: 0px;padding-left: 0px;padding-top: 0px;">';
 509
 510         $pagelist = array();
 511
 512         $contacts = q("SELECT `id`, `url`, `name`, `micro`FROM `contact`
 513                         WHERE `network`= 'dfrn' AND `forum` = 1 AND `uid` = %d
 514                         ORDER BY `name` ASC",
 515                         intval($a->user['uid'])
 516         );
 517
 518         $pageD = array();
 519
 520         // Look if the profile is a community page
 521         foreach($contacts as $contact) {
 522                 $pageD[] = array("url"=>$contact["url"], "name"=>$contact["name"], "id"=>$contact["id"], "micro"=>$contact['micro']);
 523         };
 524
 525
 526         $contacts = $pageD;
 527
 528         foreach($contacts as $contact) {
 529                 $page .= '<li style="list-style-type: none;" class="tool"><img height="20" width="20" style="float: left; margin-right: 3px;" src="' . $contact['micro'] .'" alt="' . $contact['url'] . '" /> <a href="'.$a->get_baseurl().'/redir/'.$contact["id"].'" style="margin-top: 2px; word-wrap: break-word; width: 132px;" title="' . $contact['url'] . '" class="label" target="external-link">'.
 530                                 $contact["name"]."</a></li>";
 531         }
 532         $page .= '</ul></div>';
 533         //if (sizeof($contacts) > 0)
 534                 $aside['$page'] = $page;
 535         }}
 536   //END Community Page
 537
 538    //mapquery
 539
 540   if($close_mapquery != "1") {
 541    $mapquery = array();
 542         $mapquery['title'] = Array("", "<a id='mapcontrol-link' href='#mapcontrol' style='text-decoration:none;' onclick='open_mapcontrol(); return false;'>".t('Earth Layers')."</a>", "", "");
 543         $aside['$mapquery'] = $mapquery;
 544         $ELZoom = get_pconfig(local_user(), 'diabook', 'ELZoom' );
 545         $ELPosX = get_pconfig(local_user(), 'diabook', 'ELPosX' );
 546         $ELPosY = get_pconfig(local_user(), 'diabook', 'ELPosY' );
 547         $aside['$ELZoom'] = array('diabook_ELZoom', t('Set zoomfactor for Earth Layers'), $ELZoom, '', $ELZoom);
 548         $aside['$ELPosX'] = array('diabook_ELPosX', t('Set longitude (X) for Earth Layers'), $ELPosX, '', $ELPosX);
 549         $aside['$ELPosY'] = array('diabook_ELPosY', t('Set latitude (Y) for Earth Layers'), $ELPosY, '', $ELPosY);
 550         if (isset($_POST['diabook-settings-map-sub']) && $_POST['diabook-settings-map-sub']!=''){
 551                 set_pconfig(local_user(), 'diabook', 'ELZoom', $_POST['diabook_ELZoom']);
 552                 set_pconfig(local_user(), 'diabook', 'ELPosX', $_POST['diabook_ELPosX']);
 553                 set_pconfig(local_user(), 'diabook', 'ELPosY', $_POST['diabook_ELPosY']);
 554                 header("Location: network");
 555                 }
 556         }
 557    //end mapquery
 558
 559   //helpers
 560   if($close_helpers != "1") {
 561    $helpers = array();
 562         $helpers['title'] = Array("", t('Help or @NewHere ?'), "", "");
 563         $aside['$helpers'] = $helpers;
 564         }
 565    //end helpers
 566    //connectable services
 567    if($close_services != "1") {
 568    $con_services = array();
 569         $con_services['title'] = Array("", t('Connect Services'), "", "");
 570         $aside['$con_services'] = $con_services;
 571         }
 572    //end connectable services
 573
 574    if($ccCookie != "9") {
 575         $close_pages      = get_diabook_config( "close_pages", 1 );
 576         $close_profiles   = get_diabook_config( "close_profiles", 0 );
 577         $close_helpers    = get_diabook_config( "close_helpers", 0 );
 578         $close_services   = get_diabook_config( "close_services", 0 );
 579         $close_friends    = get_diabook_config( "close_friends", 0 );
 580         $close_lastusers  = get_diabook_config( "close_lastusers", 0 );
 581         $close_lastphotos = get_diabook_config( "close_lastphotos", 0 );
 582         $close_lastlikes  = get_diabook_config( "close_lastlikes", 0 );
 583         $close_mapquery   = get_diabook_config( "close_mapquery", 1 );
 584         $close_or_not = array('1'=>t("don't show"),     '0'=>t("show"),);
 585         $boxsettings['title'] = Array("", t('Show/hide boxes at right-hand column:'), "", "");
 586         $aside['$boxsettings'] = $boxsettings;
 587         $aside['$close_pages'] = array('diabook_close_pages', t('Community Pages'), $close_pages, '', $close_or_not);
 588         $aside['$close_mapquery'] = array('diabook_close_mapquery', t('Earth Layers'), $close_mapquery, '', $close_or_not);
 589         $aside['$close_profiles'] = array('diabook_close_profiles', t('Community Profiles'), $close_profiles, '', $close_or_not);
 590         $aside['$close_helpers'] = array('diabook_close_helpers', t('Help or @NewHere ?'), $close_helpers, '', $close_or_not);
 591         $aside['$close_services'] = array('diabook_close_services', t('Connect Services'), $close_services, '', $close_or_not);
 592         $aside['$close_friends'] = array('diabook_close_friends', t('Find Friends'), $close_friends, '', $close_or_not);
 593         $aside['$close_lastusers'] = array('diabook_close_lastusers', t('Last users'), $close_lastusers, '', $close_or_not);
 594         $aside['$close_lastphotos'] = array('diabook_close_lastphotos', t('Last photos'), $close_lastphotos, '', $close_or_not);
 595         $aside['$close_lastlikes'] = array('diabook_close_lastlikes', t('Last likes'), $close_lastlikes, '', $close_or_not);
 596    $aside['$sub'] = t('Submit');
 597    $baseurl = $a->get_baseurl($ssl_state);
 598    $aside['$baseurl'] = $baseurl;
 599    if (isset($_POST['diabook-settings-box-sub']) && $_POST['diabook-settings-box-sub']!=''){
 600                 set_pconfig(local_user(), 'diabook', 'close_pages', $_POST['diabook_close_pages']);
 601                 set_pconfig(local_user(), 'diabook', 'close_mapquery', $_POST['diabook_close_mapquery']);
 602                 set_pconfig(local_user(), 'diabook', 'close_profiles', $_POST['diabook_close_profiles']);
 603                 set_pconfig(local_user(), 'diabook', 'close_helpers', $_POST['diabook_close_helpers']);
 604                 set_pconfig(local_user(), 'diabook', 'close_services', $_POST['diabook_close_services']);
 605                 set_pconfig(local_user(), 'diabook', 'close_friends', $_POST['diabook_close_friends']);
 606                 set_pconfig(local_user(), 'diabook', 'close_lastusers', $_POST['diabook_close_lastusers']);
 607                 set_pconfig(local_user(), 'diabook', 'close_lastphotos', $_POST['diabook_close_lastphotos']);
 608                 set_pconfig(local_user(), 'diabook', 'close_lastlikes', $_POST['diabook_close_lastlikes']);
 609                 }
 610         }
 611         $close = t('Settings');
 612         $aside['$close'] = $close;
 613
 614         //get_baseurl
 615         $url = $a->get_baseurl($ssl_state);
 616         $aside['$url'] = $url;
 617
 618         //print right_aside
 619         $tpl = get_markup_template('communityhome.tpl');
 620         $a->page['right_aside'] = replace_macros($tpl, $aside);
 621
 622  }
 623
 624  function js_diabook_footer() {
 625         /** @purpose insert stuff in bottom of page
 626          */
 627         $a = get_app();
 628         $baseurl = $a->get_baseurl($ssl_state);
 629         $bottom['$baseurl'] = $baseurl;
 630         $tpl = get_markup_template('bottom.tpl');
 631         $a->page['footer'] = $a->page['footer'].replace_macros($tpl, $bottom);
 632  }
 633
 634