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