index.php 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421
  1. <?php // $Id: index.php 14875 2008-04-14 07:06:32Z elixir_inter $
  2. /*
  3. ==============================================================================
  4. Dokeos - elearning and course management software
  5. Copyright (c) 2004-2008 Dokeos SPRL
  6. Copyright (c) 2003 Ghent University (UGent)
  7. Copyright (c) 2001 Universite catholique de Louvain (UCL)
  8. Copyright (c) Olivier Brouckaert
  9. For a full list of contributors, see "credits.txt".
  10. The full license can be read in "license.txt".
  11. This program is free software; you can redistribute it and/or
  12. modify it under the terms of the GNU General Public License
  13. as published by the Free Software Foundation; either version 2
  14. of the License, or (at your option) any later version.
  15. See the GNU General Public License for more details.
  16. Contact: Dokeos, rue du Corbeau, 108, B-1030 Brussels, Belgium, info@dokeos.com
  17. ==============================================================================
  18. */
  19. /**
  20. ==============================================================================
  21. * Index of the admin tools
  22. *
  23. * @package dokeos.admin
  24. ==============================================================================
  25. */
  26. // name of the language file that needs to be included <br />
  27. $language_file=array('admin','tracking');
  28. // resetting the course id
  29. $cidReset=true;
  30. // including some necessary dokeos files
  31. require('../inc/global.inc.php');
  32. require_once(api_get_path(LIBRARY_PATH).'security.lib.php');
  33. // setting the section (for the tabs)
  34. $this_section=SECTION_PLATFORM_ADMIN;
  35. // Access restrictions
  36. api_protect_admin_script(true);
  37. $nameTools = get_lang('PlatformAdmin');
  38. // setting breadcrumbs
  39. $interbreadcrumb[] = array('url' => 'index.php', 'name' => $nameTools);
  40. // setting the name of the tool
  41. $tool_name=get_lang("PlatformAdmin");
  42. // Displaying the header
  43. Display::display_header($nameTools);
  44. if(api_is_platform_admin()):
  45. if(is_dir(api_get_path(SYS_CODE_PATH).'install/') && is_readable(api_get_path(SYS_CODE_PATH).'install/index.php'))
  46. {
  47. Display::display_normal_message(get_lang('InstallDirAccessibleSecurityThreat'));
  48. }
  49. /*
  50. ==============================================================================
  51. ACTION HANDLING
  52. ==============================================================================
  53. */
  54. if ($_POST['Register'])
  55. {
  56. register_site();
  57. Display :: display_confirmation_message(get_lang('VersionCheckEnabled'));
  58. }
  59. /*
  60. ==============================================================================
  61. MAIN SECTION
  62. ==============================================================================
  63. */
  64. $keyword_url = Security::remove_XSS($_GET['keyword']);
  65. ?>
  66. <div class="admin_section">
  67. <h4><img src="../img/members.gif" border="0" style="vertical-align: middle;" alt="" /> <?php echo ucfirst(get_lang('Users')); ?></h4>
  68. <ul><li style="list-style-type:none"><form method="get" action="user_list.php">
  69. <input type="text" name="keyword" value="<?php echo $keyword_url; ?>"/>
  70. <input type="submit" value="<?php echo get_lang('Search'); ?>"/>
  71. </form></li>
  72. <li>
  73. <a href="user_list.php?search=advanced"><?php echo ucfirst(get_lang('AdvancedSearch')); ?></a>
  74. </li>
  75. <li><a href="user_list.php"><?php echo get_lang('UserList') ?></a></li>
  76. <li><a href="user_add.php"><?php echo get_lang('AddUsers') ?></a></li>
  77. <li><a href="user_export.php"><?php echo get_lang('ExportUserListXMLCSV') ?></a></li>
  78. <li><a href="user_import.php"><?php echo get_lang('ImportUserListXMLCSV') ?></a></li>
  79. <li><a href="user_fields.php"><?php echo get_lang('ManageUserFields'); ?></a></li>
  80. </ul>
  81. </div>
  82. <div class="admin_section">
  83. <h4><img src="../img/course.gif" border="0" style="vertical-align: middle;" alt="" /> <?php echo ucfirst(get_lang('Courses')); ?></h4>
  84. <ul><li style="list-style-type:none"><form method="get" action="course_list.php">
  85. <input type="text" name="keyword" value="<?php echo $keyword_url; ?>"/>
  86. <input type="submit" value="<?php echo get_lang('Search'); ?>"/>
  87. </form></li>
  88. <li>
  89. <a href="course_list.php?search=advanced"><?php echo ucfirst(get_lang('AdvancedSearch')); ?></a>
  90. </li>
  91. <li><a href="course_list.php"><?php echo get_lang('CourseList') ?></a></li>
  92. <li><a href="course_add.php"><?php echo get_lang('AddCourse') ?></a></li>
  93. <li><a href="course_import.php"><?php echo get_lang('AddCourse').' CSV'; ?></a></li>
  94. <!--<li><a href="course_virtual.php"><?php //echo get_lang('AdminManageVirtualCourses') ?></a></li>-->
  95. <li><a href="course_category.php"><?php echo get_lang("AdminCategories"); ?></a></li>
  96. <li><a href="subscribe_class2course.php"><?php echo get_lang('AddClassesToACourse'); ?></a></li>
  97. <li><a href="subscribe_user2course.php"><?php echo get_lang('AddUsersToACourse'); ?></a></li>
  98. <li><a href="course_user_import.php"><?php echo get_lang('AddUsersToACourse').' CSV'; ?></a></li>
  99. </ul>
  100. </div>
  101. <div class="admin_section">
  102. <h4>
  103. <img src="../img/settings.gif" border="0" style="vertical-align: middle;" alt="" />
  104. <?php echo ucfirst(get_lang('Platform')); ?>
  105. </h4>
  106. <ul>
  107. <li><a href="settings.php"><?php echo get_lang('DokeosConfigSettings') ?></a></li>
  108. <li><a href="system_announcements.php"><?php echo get_lang('SystemAnnouncements') ?></a></li>
  109. <li><a href="languages.php"><?php echo get_lang('Languages'); ?></a></li>
  110. <li><a href="configure_homepage.php"><?php echo get_lang('ConfigureHomePage'); ?></a></li>
  111. <li><a href="statistics/index.php"><?php echo get_lang('ToolName'); ?> </a></li>
  112. <?php if(!empty($phpMyAdminPath)): ?>
  113. <li><a href="<?php echo $phpMyAdminPath; ?>" target="_blank"><?php echo get_lang("AdminDatabases"); ?></a><br />(<?php echo get_lang("DBManagementOnlyForServerAdmin"); ?>)</li>
  114. <?php endif; ?>
  115. </ul>
  116. </div>
  117. <?php
  118. endif;
  119. if(api_get_setting('use_session_mode')=='true')
  120. {
  121. ?>
  122. <div class="admin_section">
  123. <h4>
  124. <img src="../img/agenda.gif" border="0" align="absmiddle" alt="" />
  125. <?php echo get_lang('Sessions') ?>
  126. </h4>
  127. <ul>
  128. <li style="list-style-type:none"><form method="POST" action="session_list.php">
  129. <input type="text" name="keyword" value="<?php echo $keyword_url; ?>"/>
  130. <input type="submit" value="<?php echo get_lang('Search'); ?>"/>
  131. </form>
  132. </li>
  133. <li><a href="session_list.php"><?php echo get_lang('ListSession') ?></a></li>
  134. <li><a href="session_add.php"><?php echo get_lang('AddSession') ?></a></li>
  135. <li><a href="session_import.php"><?php echo get_lang('ImportSessionListXMLCSV') ?></a></li>
  136. <li><a href="session_export.php"><?php echo get_lang('ExportSessionListXMLCSV') ?></a></li>
  137. </ul>
  138. </div>
  139. <?php
  140. }
  141. else if(api_is_platform_admin())
  142. {
  143. ?>
  144. <div class="admin_section">
  145. <h4><img src="../img/group.gif" border="0" style="vertical-align: middle;" alt="" /> <?php echo ucfirst(get_lang('AdminClasses')); ?></h4>
  146. <ul>
  147. <li style="list-style-type:none"><form method="get" action="class_list.php">
  148. <input type="text" name="keyword" value="<?php echo $keyword_url; ?>"/>
  149. <input type="submit" value="<?php echo get_lang('Search'); ?>"/>
  150. </form>
  151. </li>
  152. <li><a href="class_list.php"><?php echo get_lang('ClassList'); ?></a></li>
  153. <li><a href="class_add.php"><?php echo get_lang('AddClasses'); ?></a></li>
  154. <li><a href="class_import.php"><?php echo get_lang('ImportClassListCSV'); ?></a></li>
  155. <li><a href="class_user_import.php"><?php echo get_lang('AddUsersToAClass'); ?> CSV</a></li>
  156. </ul>
  157. </div>
  158. <?php
  159. }
  160. ?>
  161. <?php
  162. if(api_is_platform_admin()):
  163. ?>
  164. <div class="admin_section">
  165. <h4>
  166. <img src="../img/visio_meeting.gif" border="0" style="vertical-align: middle;" alt="" />
  167. <?php echo ucfirst(get_lang('ConfigureExtensions')); ?>
  168. </h4>
  169. <ul>
  170. <li><a href="configure_extensions.php?display=visio"><?php echo get_lang('Visioconf'); ?></a></li>
  171. <li><a href="configure_extensions.php?display=ppt2lp"><?php echo get_lang('Ppt2lp'); ?></a></li>
  172. <li><a href="configure_extensions.php?display=ephorus"><?php echo get_lang('EphorusPlagiarismPrevention'); ?></a></li>
  173. <li><a href="configure_extensions.php?display=search"><?php echo get_lang('SearchEngine'); ?></a></li>
  174. <li><a href="configure_extensions.php?display=serverstats"><?php echo get_lang('ServerStatistics'); ?></a></li>
  175. <li><a href="configure_extensions.php?display=bandwidthstats"><?php echo get_lang('BandWidthStatistics'); ?></a></li>
  176. </ul>
  177. </div>
  178. <div class="admin_section">
  179. <h4>
  180. <img src="../img/dokeos.gif" border="0" style="vertical-align: middle;" alt="" />
  181. <?php echo "dokeos.com"; ?>
  182. </h4>
  183. <ul>
  184. <li><a href="http://www.dokeos.com/"><?php echo get_lang('DokeosHomepage'); ?></a></li>
  185. <li><a href="http://www.dokeos.com/forum/"><?php echo get_lang('DokeosForum'); ?></a></li>
  186. <li><a href="http://www.dokeos.com/community_add_portal.php?url=<?php echo $_configuration['root_web']; ?>&amp;name=<?php echo urlencode(get_setting('siteName'));?>&amp;organisation=<?php echo urlencode(get_setting('InstitutionUrl'));?>&amp;manager=<?php echo urlencode(get_setting('administratorSurname')." ".get_setting('administratorName'));?>&amp;manageremail=<?php echo urlencode(get_setting('emailAdministrator'));?>"><?php echo get_lang('RegisterYourPortal'); ?></a></li>
  187. <li><a href="http://www.dokeos.com/extensions/"><?php echo get_lang('DokeosExtensions'); ?></a></li>
  188. <li>
  189. <?php
  190. //try to display a maximum before we check the dokeos version and all that
  191. session_write_close(); //close session to avoid blocking concurrent access
  192. flush(); //send data to client as much as allowed by the web server
  193. ob_flush();
  194. echo get_lang('VersionCheck').': '.version_check();
  195. ?>
  196. </li>
  197. </ul>
  198. </div>
  199. <?php
  200. endif;
  201. /**
  202. * Displays either the text for the registration or the message that the installation is (not) up to date
  203. *
  204. * @return string html code
  205. * @author Patrick Cool <patrick.cool@UGent.be>, Ghent University
  206. * @version august 2006
  207. * @todo have a 6monthly re-registration
  208. */
  209. function version_check()
  210. {
  211. // The site has not been registered yet
  212. if (get_setting('registered')=='false' OR get_setting('registered') == false )
  213. {
  214. $return = '';
  215. $return .= '<form action="'.api_get_self().'" id="VersionCheck" name="VersionCheck" method="post">';
  216. $return .= get_lang('VersionCheckExplanation');
  217. $return .= '<input type="checkbox" name="donotlistcampus" value="1" id="checkbox" /> Do not display my campus in the list of Dokeos platforms';
  218. $return .= '<input type="submit" name="Register" value="Enable Version Check" id="register" />';
  219. $return .= '</form>';
  220. }
  221. else
  222. {
  223. // The site has been registered already but is seriously out of date (registration date + 15552000 seconds)
  224. if ((get_setting('registered') + 15552000) > mktime())
  225. {
  226. $return = 'It has been a long time since about your campus has been updated on Dokeos.com';
  227. $return .= '<form action="'.api_get_self().'" id="VersionCheck" name="VersionCheck" method="post">';
  228. $return .= '<input type="submit" name="Register" value="Enable Version Check" id="register" />';
  229. $return .= '</form>';
  230. }
  231. else
  232. {
  233. $return = 'site registered. ';
  234. $return .= check_dokeos_version2();
  235. }
  236. }
  237. return $return;
  238. }
  239. /**
  240. * This setting changes the registration status for the campus
  241. *
  242. * @author Patrick Cool <patrick.cool@UGent.be>, Ghent University
  243. * @version August 2006
  244. *
  245. * @todo the $_settings should be reloaded here. => write api function for this and use this in global.inc.php also.
  246. */
  247. function register_site()
  248. {
  249. // Database Table Definitions
  250. $tbl_settings = Database :: get_main_table(TABLE_MAIN_SETTINGS_CURRENT);
  251. // the SQL statment
  252. $sql = "UPDATE $tbl_settings SET selected_value='true' WHERE variable='registered'";
  253. $result = api_sql_query($sql);
  254. //
  255. if ($_POST['donotlistcampus'])
  256. {
  257. $sql = "UPDATE $tbl_settings SET selected_value='true' WHERE variable='donotlistcampus'";
  258. $result = api_sql_query($sql);
  259. }
  260. // reload the settings
  261. }
  262. /**
  263. * Check if the current installation is up to date
  264. * The code is borrowed from phpBB and slighlty modified
  265. * @author The phpBB Group <support@phpbb.com> (the code)
  266. * @author Patrick Cool <patrick.cool@UGent.be>, Ghent University (the modifications)
  267. * @copyright (C) 2001 The phpBB Group
  268. * @return language string with some layout (color)
  269. */
  270. function check_dokeos_version2()
  271. {
  272. global $_configuration;
  273. $dokeos_version = trim($_configuration['dokeos_version']); // the dokeos version of your installation
  274. if (ini_get('allow_url_fopen')==1)
  275. {
  276. // the number of courses
  277. $sql="SELECT count(code) FROM ".Database::get_main_table(TABLE_MAIN_COURSE);
  278. $result=api_sql_query($sql);
  279. $row = Database::fetch_array($result);
  280. $number_of_courses = $row[0];
  281. // the number of users
  282. $sql="SELECT count(user_id) FROM ".Database::get_main_table(TABLE_MAIN_USER);
  283. $result=api_sql_query($sql);
  284. $row = Database::fetch_array($result);
  285. $number_of_users = $row[0];
  286. $version_url= 'http://www.dokeos.com/version.php?url='.urlencode(api_get_path(WEB_PATH)).'&campus='.urlencode(api_get_setting('siteName')).'&contact='.urlencode(api_get_setting('emailAdministrator')).'&version='.urlencode($dokeos_version).'&numberofcourses='.urlencode($number_of_courses).'&numberofusers='.urlencode($number_of_users).'&donotlistcampus='.api_get_setting('donotlistcampus').'&organisation='.urlencode(api_get_setting('Institution')).'&adminname='.urlencode(api_get_setting('administratorName').' '.api_get_setting('administratorSurname'));
  287. $handle=@fopen($version_url,'r');
  288. $version_info=trim(@fread($handle, 1024));
  289. if ($dokeos_version<>$version_info)
  290. {
  291. $output='<br /><span style="color:red">' . get_lang('YourVersionNotUpToDate') . '. '.get_lang('LatestVersionIs').' <b>Dokeos '.$version_info.'</b>. '.get_lang('YourVersionIs').' <b>Dokeos '.$dokeos_version. '</b>. '.str_replace('http://www.dokeos.com','<a href="http://www.dokeos.com">http://www.dokeos.com</a>',get_lang('PleaseVisitDokeos')).'</span>';
  292. }
  293. else
  294. {
  295. $output = '<br /><span style="color:green">'.get_lang('VersionUpToDate').': Dokeos '.$version_info.'</span>';
  296. }
  297. }
  298. else
  299. {
  300. $output = '<span style="color:red">' . get_lang('AllowurlfopenIsSetToOff') . '</span>';
  301. }
  302. return $output;
  303. }
  304. /**
  305. * Check if the current installation is up to date
  306. * The code is borrowed from phpBB and slighlty modified
  307. * @author The phpBB Group <support@phpbb.com> (the code)
  308. * @author Patrick Cool <patrick.cool@UGent.be>, Ghent University (the modifications)
  309. * @copyright (C) 2001 The phpBB Group
  310. * @return language string with some layout (color)
  311. * @deprecated For some reason this code adds a 9 in front and a 0 at the end of what normally gets displayed by
  312. the http://www.dokeos.com/version.php page (instead of version.txt) . That's why I chose to use fopen which requires however
  313. that allow_url_open is set to true
  314. */
  315. function check_dokeos_version()
  316. {
  317. global $_configuration; // the dokeos version of your installation
  318. $dokeos_version = $_configuration['dokeos_version'];
  319. if ($fsock = @fsockopen('www.dokeos.com', 80, $errno, $errstr))
  320. {
  321. @fputs($fsock, "GET /version.php HTTP/1.1\r\n");
  322. @fputs($fsock, "HOST: www.dokeos.com\r\n");
  323. @fputs($fsock, "Connection: close\r\n\r\n");
  324. $get_info = false;
  325. while (!@feof($fsock))
  326. {
  327. if ($get_info)
  328. {
  329. $version_info .= @fread($fsock, 1024);
  330. }
  331. else
  332. {
  333. if (@fgets($fsock, 1024) == "\r\n")
  334. {
  335. $get_info = true;
  336. }
  337. }
  338. }
  339. @fclose($fsock);
  340. if (trim($dokeos_version)<>trim($version_info))
  341. {
  342. $output='<span style="color:red">' . get_lang('YourVersionNotUpToDate') . '. '.get_lang('LatestVersionIs').' <b>Dokeos '.$version_info.'</b>. '.get_lang('YourVersionIs').' <b>Dokeos '.$dokeos_version. '</b>. '.str_replace('http://www.dokeos.com','<a href="http://www.dokeos.com">http://www.dokeos.com</a>',get_lang('PleaseVisitDokeos')).'</span>';
  343. }
  344. else
  345. {
  346. $output = '<span style="color:green">'.get_lang('VersionUpToDate').': Dokeos '.$version_info.'</span>';
  347. }
  348. }
  349. else
  350. {
  351. if ($errstr)
  352. {
  353. $output = '<span style="color:red">' . get_lang('ConnectSocketError') . ': '. $errstr . '</span>';
  354. }
  355. else
  356. {
  357. $output = '<span>' . get_lang('SocketFunctionsDisabled') . '</span>';
  358. }
  359. }
  360. return $output;
  361. }
  362. /*
  363. ==============================================================================
  364. FOOTER
  365. ==============================================================================
  366. */
  367. Display::display_footer();
  368. ?>