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