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