[ Index ]

PHP Cross Reference of Moodle 1.9.3 [Build 15-Oct-2008]

title

Body

[close]

/ -> index.php (source)

   1  <?php  // $Id: index.php,v 1.201.2.7 2008/09/19 06:22:43 nicolasconnault Exp $
   2         // index.php - the front page.
   3  
   4  ///////////////////////////////////////////////////////////////////////////
   5  //                                                                       //
   6  // NOTICE OF COPYRIGHT                                                   //
   7  //                                                                       //
   8  // Moodle - Modular Object-Oriented Dynamic Learning Environment         //
   9  //          http://moodle.org                                            //
  10  //                                                                       //
  11  // Copyright (C) 1999 onwards  Martin Dougiamas  http://moodle.com       //
  12  //                                                                       //
  13  // This program is free software; you can redistribute it and/or modify  //
  14  // it under the terms of the GNU General Public License as published by  //
  15  // the Free Software Foundation; either version 2 of the License, or     //
  16  // (at your option) any later version.                                   //
  17  //                                                                       //
  18  // This program is distributed in the hope that it will be useful,       //
  19  // but WITHOUT ANY WARRANTY; without even the implied warranty of        //
  20  // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         //
  21  // GNU General Public License for more details:                          //
  22  //                                                                       //
  23  //          http://www.gnu.org/copyleft/gpl.html                         //
  24  //                                                                       //
  25  ///////////////////////////////////////////////////////////////////////////
  26  
  27  
  28      if (!file_exists('./config.php')) {
  29          header('Location: install.php');
  30          die;
  31      }
  32  
  33      require_once('config.php');
  34      require_once($CFG->dirroot .'/course/lib.php');
  35      require_once($CFG->dirroot .'/lib/blocklib.php');
  36  
  37      if (empty($SITE)) {
  38          redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
  39      }
  40  
  41      // Bounds for block widths
  42      // more flexible for theme designers taken from theme config.php
  43      $lmin = (empty($THEME->block_l_min_width)) ? 100 : $THEME->block_l_min_width;
  44      $lmax = (empty($THEME->block_l_max_width)) ? 210 : $THEME->block_l_max_width;
  45      $rmin = (empty($THEME->block_r_min_width)) ? 100 : $THEME->block_r_min_width;
  46      $rmax = (empty($THEME->block_r_max_width)) ? 210 : $THEME->block_r_max_width;
  47  
  48      define('BLOCK_L_MIN_WIDTH', $lmin);
  49      define('BLOCK_L_MAX_WIDTH', $lmax);
  50      define('BLOCK_R_MIN_WIDTH', $rmin);
  51      define('BLOCK_R_MAX_WIDTH', $rmax);
  52  
  53      // check if major upgrade needed - also present in login/index.php
  54      if ((int)$CFG->version < 2006101100) { //1.7 or older
  55          @require_logout();
  56          redirect("$CFG->wwwroot/$CFG->admin/");
  57      }
  58      // Trigger 1.9 accesslib upgrade?
  59      if ((int)$CFG->version < 2007092000 
  60          && isset($USER->id) 
  61          && is_siteadmin($USER->id)) { // this test is expensive, but is only triggered during the upgrade
  62          redirect("$CFG->wwwroot/$CFG->admin/");
  63      }
  64  
  65      if ($CFG->forcelogin) {
  66          require_login();
  67      } else {
  68          user_accesstime_log();
  69      }
  70  
  71      if ($CFG->rolesactive) { // if already using roles system
  72          if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
  73              if (moodle_needs_upgrading()) {
  74                  redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
  75              }
  76          } else if (!empty($CFG->mymoodleredirect)) {    // Redirect logged-in users to My Moodle overview if required
  77              if (isloggedin() && $USER->username != 'guest') {
  78                  redirect($CFG->wwwroot .'/my/index.php');
  79              }
  80          }
  81      } else { // if upgrading from 1.6 or below
  82          if (isadmin() && moodle_needs_upgrading()) {
  83              redirect($CFG->wwwroot .'/'. $CFG->admin .'/index.php');
  84          }
  85      }
  86  
  87  
  88      if (get_moodle_cookie() == '') {
  89          set_moodle_cookie('nobody');   // To help search for cookies on login page
  90      }
  91  
  92      if (!empty($USER->id)) {
  93          add_to_log(SITEID, 'course', 'view', 'view.php?id='.SITEID, SITEID);
  94      }
  95  
  96      if (empty($CFG->langmenu)) {
  97          $langmenu = '';
  98      } else {
  99          $currlang = current_language();
 100          $langs = get_list_of_languages();
 101          $langlabel = get_accesshide(get_string('language'));
 102          $langmenu = popup_form($CFG->wwwroot .'/index.php?lang=', $langs, 'chooselang', $currlang, '', '', '', true, 'self', $langlabel);
 103      }
 104  
 105      $PAGE       = page_create_object(PAGE_COURSE_VIEW, SITEID);
 106      $pageblocks = blocks_setup($PAGE);
 107      $editing    = $PAGE->user_is_editing();
 108      $preferred_width_left  = bounded_number(BLOCK_L_MIN_WIDTH, blocks_preferred_width($pageblocks[BLOCK_POS_LEFT]),
 109                                              BLOCK_L_MAX_WIDTH);
 110      $preferred_width_right = bounded_number(BLOCK_R_MIN_WIDTH, blocks_preferred_width($pageblocks[BLOCK_POS_RIGHT]),
 111                                              BLOCK_R_MAX_WIDTH);
 112      print_header($SITE->fullname, $SITE->fullname, 'home', '',
 113                   '<meta name="description" content="'. s(strip_tags($SITE->summary)) .'" />',
 114                   true, '', user_login_string($SITE).$langmenu);
 115  
 116  ?>
 117  
 118  
 119  <table id="layout-table" summary="layout">
 120    <tr>
 121    <?php
 122      $lt = (empty($THEME->layouttable)) ? array('left', 'middle', 'right') : $THEME->layouttable;
 123      foreach ($lt as $column) {
 124          switch ($column) {
 125              case 'left':
 126      if (blocks_have_content($pageblocks, BLOCK_POS_LEFT) || $editing) {
 127          echo '<td style="width: '.$preferred_width_left.'px;" id="left-column">';
 128          print_container_start();
 129          blocks_print_group($PAGE, $pageblocks, BLOCK_POS_LEFT);
 130          print_container_end();
 131          echo '</td>';
 132      }
 133              break;
 134              case 'middle':
 135      echo '<td id="middle-column">'. skip_main_destination();
 136  
 137      print_container_start();
 138  
 139  /// Print Section
 140      if ($SITE->numsections > 0) {
 141  
 142          if (!$section = get_record('course_sections', 'course', $SITE->id, 'section', 1)) {
 143              delete_records('course_sections', 'course', $SITE->id, 'section', 1); // Just in case
 144              $section->course = $SITE->id;
 145              $section->section = 1;
 146              $section->summary = '';
 147              $section->sequence = '';
 148              $section->visible = 1;
 149              $section->id = insert_record('course_sections', $section);
 150          }
 151  
 152          if (!empty($section->sequence) or !empty($section->summary) or $editing) {
 153              print_box_start('generalbox sitetopic');
 154  
 155              /// If currently moving a file then show the current clipboard
 156              if (ismoving($SITE->id)) {
 157                  $stractivityclipboard = strip_tags(get_string('activityclipboard', '', addslashes($USER->activitycopyname)));
 158                  echo '<p><font size="2">';
 159                  echo "$stractivityclipboard&nbsp;&nbsp;(<a href=\"course/mod.php?cancelcopy=true&amp;sesskey=$USER->sesskey\">". get_string('cancel') .'</a>)';
 160                  echo '</font></p>';
 161              }
 162  
 163              $options = NULL;
 164              $options->noclean = true;
 165              echo format_text($section->summary, FORMAT_HTML, $options);
 166  
 167              if ($editing) {
 168                  $streditsummary = get_string('editsummary');
 169                  echo "<a title=\"$streditsummary\" ".
 170                       " href=\"course/editsection.php?id=$section->id\"><img src=\"$CFG->pixpath/t/edit.gif\" ".
 171                       " class=\"iconsmall\" alt=\"$streditsummary\" /></a><br /><br />";
 172              }
 173  
 174              get_all_mods($SITE->id, $mods, $modnames, $modnamesplural, $modnamesused);
 175              print_section($SITE, $section, $mods, $modnamesused, true);
 176  
 177              if ($editing) {
 178                  print_section_add_menus($SITE, $section->section, $modnames);
 179              }
 180              print_box_end();
 181          }
 182      }
 183  
 184      if (isloggedin() and !isguest() and isset($CFG->frontpageloggedin)) {
 185          $frontpagelayout = $CFG->frontpageloggedin;
 186      } else {
 187          $frontpagelayout = $CFG->frontpage;
 188      }
 189  
 190      foreach (explode(',',$frontpagelayout) as $v) {
 191          switch ($v) {     /// Display the main part of the front page.
 192              case FRONTPAGENEWS:
 193                  if ($SITE->newsitems) { // Print forums only when needed
 194                      require_once($CFG->dirroot .'/mod/forum/lib.php');
 195  
 196                      if (! $newsforum = forum_get_course_forum($SITE->id, 'news')) {
 197                          error('Could not find or create a main news forum for the site');
 198                      }
 199  
 200                      if (!empty($USER->id)) {
 201                          $SESSION->fromdiscussion = $CFG->wwwroot;
 202                          if (forum_is_subscribed($USER->id, $newsforum)) {
 203                              $subtext = get_string('unsubscribe', 'forum');
 204                          } else {
 205                              $subtext = get_string('subscribe', 'forum');
 206                          }
 207                          print_heading_block($newsforum->name);
 208                          echo '<div class="subscribelink"><a href="mod/forum/subscribe.php?id='.$newsforum->id.'">'.$subtext.'</a></div>';
 209                      } else {
 210                          print_heading_block($newsforum->name);
 211                      }
 212  
 213                      forum_print_latest_discussions($SITE, $newsforum, $SITE->newsitems, 'plain', 'p.modified DESC');
 214                  }
 215              break;
 216  
 217              case FRONTPAGECOURSELIST:
 218  
 219                  if (isloggedin() and !has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM)) and !isguest() and empty($CFG->disablemycourses)) {
 220                      print_heading_block(get_string('mycourses'));
 221                      print_my_moodle();
 222                  } else if ((!has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM)) and !isguest()) or (count_records('course') <= FRONTPAGECOURSELIMIT)) {
 223                      // admin should not see list of courses when there are too many of them
 224                      print_heading_block(get_string('availablecourses'));
 225                      print_courses(0);
 226                  }
 227              break;
 228  
 229              case FRONTPAGECATEGORYNAMES:
 230  
 231                  print_heading_block(get_string('categories'));
 232                  print_box_start('generalbox categorybox');
 233                  print_whole_category_list(NULL, NULL, NULL, -1, false);
 234                  print_box_end();
 235                  print_course_search('', false, 'short');
 236              break;
 237  
 238              case FRONTPAGECATEGORYCOMBO:
 239  
 240                  print_heading_block(get_string('categories'));
 241                  print_box_start('generalbox categorybox');
 242                  print_whole_category_list(NULL, NULL, NULL, -1, true);
 243                  print_box_end();
 244                  print_course_search('', false, 'short');
 245              break;
 246  
 247              case FRONTPAGETOPICONLY:    // Do nothing!!  :-)
 248              break;
 249  
 250          }
 251          echo '<br />';
 252      }
 253  
 254      print_container_end();
 255  
 256      echo '</td>';
 257              break;
 258              case 'right':
 259      // The right column
 260      if (blocks_have_content($pageblocks, BLOCK_POS_RIGHT) || $editing || $PAGE->user_allowed_editing()) {
 261          echo '<td style="width: '.$preferred_width_right.'px;" id="right-column">';
 262          print_container_start();
 263          if ($PAGE->user_allowed_editing()) {
 264              echo '<div style="text-align:center">'.update_course_icon($SITE->id).'</div>';
 265              echo '<br />';
 266          }
 267          blocks_print_group($PAGE, $pageblocks, BLOCK_POS_RIGHT);
 268          print_container_end();
 269          echo '</td>';
 270      }
 271              break;
 272          }
 273      }
 274  ?>
 275  
 276    </tr>
 277  </table>
 278  
 279  <?php
 280      print_footer('home');     // Please do not modify this line
 281  ?>


Generated: Wed Jan 14 11:33:29 2009 Cross-referenced by PHPXref 0.7