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