View of /contrib/plugins/blocks/mrbs/web/day.php

<?php
# $Id: day.php,v 1.13 2009/06/03 08:48:58 mike1989 Exp $
require_once("../../../config.php");
require_once "grab_globals.inc.php";
include "config.inc.php";
include "functions.php";
include "$dbsys.php";
include "mrbs_auth.php";
include "mincals.php";

$day = optional_param('day', 0, PARAM_INT);
$month = optional_param('month', 0, PARAM_INT);
$year = optional_param('year', 0, PARAM_INT); 
$id = optional_param('id', 0, PARAM_INT);
$area = optional_param('area', get_default_area(),  PARAM_INT);
$room = optional_param('room', 0, PARAM_INT);
$morningstarts_minutes = optional_param('morningstarts_minutes', 0, PARAM_INT);
$pview = optional_param('pview', 0, PARAM_INT);
$debug_flag = optional_param('debug_flag', 0, PARAM_INT);
$timetohighlight = optional_param('$timetohighlight', 0, PARAM_INT);

if ($CFG->forcelogin) {
        require_login();
    }
/*
$id = required_param('id', PARAM_INT);   // course
if (! $course = get_record("course", "id", $id)) {
    error("Course ID is incorrect");
    }
require_course_login($course);
add_to_log($course->id, "mrbs", "view all", "day.php?id=$course->id", "");
*/


if (empty($debug_flag)) $debug_flag = 0;

#If we dont know the right date then make it up 
if (($day==0) or ($month==0) or ($year==0))
{
	$day   = date("d");
	$month = date("m");
	$year  = date("Y");
} else {
# Make the date valid if day is more then number of days in month
	while (!checkdate(intval($month), intval($day), intval($year)))
		$day--;
}
// if (($area>0))
//	$area = get_default_area();

# print the page header
print_header_mrbs($day, $month, $year, $area);

$format = "Gi";
if( $enable_periods ) {
	$format = "i";
	$resolution = 60;
	$morningstarts = 12;
	$morningstarts_minutes = 0;
	$eveningends = 12;
	$eveningends_minutes = count($periods)-1;

}

# ensure that $morningstarts_minutes defaults to zero if not set
# not needed if initialized with optoinal_param - ab.

# Define the start and end of each day in a way which is not affected by
# daylight saving...
# dst_change:
# -1 => no change
#  0 => entering DST
#  1 => leaving DST
$dst_change = is_dst($month,$day,$year);
$am7=mktime($morningstarts,$morningstarts_minutes,0,$month,$day,$year,is_dst($month,$day,$year,$morningstarts));
$pm7=mktime($eveningends,$eveningends_minutes,0,$month,$day,$year,is_dst($month,$day,$year,$eveningends));

if ( $pview != 1 ) {
   echo "<table width=\"100%\"><tr><td width=\"40%\">";

   #Show all avaliable areas
   echo "<u>".get_string('areas','block_mrbs')."</u><br>";

   # need to show either a select box or a normal html list,
   # depending on the settings in config.inc.php
   if ($area_list_format == "select") {
	echo make_area_select_html('day.php', $area, $year, $month, $day); # from functions.php
   } else {
	# show the standard html list
	$sql = "select id, area_name from $tbl_area order by area_name";
   	$res = sql_query($sql);
    
   	if ($res) for ($i = 0; ($row = sql_row($res, $i)); $i++)
   	{
		echo "<a href=\"day.php?year=$year&month=$month&day=$day&area=$row[0]\">";
		if ($row[0] == $area)
			echo "<font color=\"red\">" . htmlspecialchars($row[1]) . "</font></a><br>\n";
		else echo htmlspecialchars($row[1]) . "</a><br>\n";
   	}
   }
   echo "</td>\n";

   //insert the goto room form
   echo"<td width=\"20%\"><h3>Find a room</h3>
        <form action='gotoroom.php' method='get'>
            Go to:<input name='room'>
            <input type='hidden' name='day' value='$day'>
            <input type='hidden' name='month' value='$month'>
            <input type='hidden' name='year' value='$year'>
            <input type='submit' value='Go'>
        </form></td>"; 

   #Draw the three month calendars
   minicals($year, $month, $day, $area, '', 'day');
   echo "</tr></table>";
}

#y? are year, month and day of yesterday
#t? are year, month and day of tomorrow

$i= mktime(12,0,0,$month,$day-1,$year);
$yy = date("Y",$i);
$ym = date("m",$i);
$yd = date("d",$i);

$i= mktime(12,0,0,$month,$day+1,$year);
$ty = date("Y",$i);
$tm = date("m",$i);
$td = date("d",$i);

#We want to build an array containing all the data we want to show
#and then spit it out. 

#Get all appointments for today in the area that we care about
#Note: The predicate clause 'start_time <= ...' is an equivalent but simpler
#form of the original which had 3 BETWEEN parts. It selects all entries which
#occur on or cross the current day.
// Don't continue if there are no areas:

if ($area <= 0) {
    echo "<h1>".get_string('noareas','block_mrbs')."</h1>";
    echo "</table>\n";
    (isset($output)) ? print $output : '';
    show_colour_key();
    include "trailer.php";
    exit;
}


if (!empty($area)) {
    $sql = "SELECT $tbl_room.id, start_time, end_time, name, $tbl_entry.id, type,
            $tbl_entry.description
            FROM $tbl_entry, $tbl_room
            WHERE $tbl_entry.room_id = $tbl_room.id
            AND area_id = $area
            AND start_time <= $pm7 AND end_time > $am7";

    $res = sql_query($sql);
    if (!$res) fatal_error(0, sql_error());
    for ($i = 0; ($row = sql_row($res, $i)); $i++) { //Each row we have is an appointment.
        #Row[0] = Room ID
	    #row[1] = start time
	    #row[2] = end time
	    #row[3] = short description
	    #row[4] = id of this booking
	    #row[5] = type (internal/external)
	    #row[6] = description

    	# $today is a map of the screen that will be displayed
	    # It looks like:
	    #     $today[Room ID][Time][id]
	    #                          [color]
	    #                          [data]
	    #                          [long_descr]

	    # Fill in the map for this meeting. Start at the meeting start time,
	   # or the day start time, whichever is later. End one slot before the
	   # meeting end time (since the next slot is for meetings which start then),
	   # or at the last slot in the day, whichever is earlier.
	   # Time is of the format HHMM without leading zeros.
	   #
	   # Note: int casts on database rows for max may be needed for PHP3.
	   # Adjust the starting and ending times so that bookings which don't
	   # start or end at a recognized time still appear.
	   $start_t = max(round_t_down($row[1], $resolution, $am7), $am7);
	   $end_t = min(round_t_up($row[2], $resolution, $am7) - $resolution, $pm7);
	   for ($t = $start_t; $t <= $end_t; $t += $resolution)
	   {
          //checks for double bookings
          if(empty($today[$row[0]][date($format,$t)])){
          
		  $today[$row[0]][date($format,$t)]["id"]    = $row[4];
		  $today[$row[0]][date($format,$t)]["color"] = $row[5];
              $today[$row[0]][date($format,$t)]["data"]  .= "";
              $today[$row[0]][date($format,$t)]["long_descr"]  .= "";
              $today[$row[0]][date($format,$t)]["double_booked"]  = false;
          }else{
              $today[$row[0]][date($format,$t)]["id"]    .= ','.$row[4];
              $today[$row[0]][date($format,$t)]["data"]  .= "\n";
              $today[$row[0]][date($format,$t)]["long_descr"]  .= ",";
              $today[$row[0]][date($format,$t)]["double_booked"]  = true;
          }
	   }

	   # Show the name of the booker in the first segment that the booking
	   # happens in, or at the start of the day if it started before today.
	   if ($row[1] < $am7)
	   {
		  $today[$row[0]][date($format,$am7)]["data"] .= $row[3];
		  $today[$row[0]][date($format,$am7)]["long_descr"] .= $row[6];
	   }
	   else
	   {
		  $today[$row[0]][date($format,$start_t)]["data"] .= $row[3];
		  $today[$row[0]][date($format,$start_t)]["long_descr"] .= $row[6];
	   }
    }


    if ($debug_flag) 
    {
	   echo "<p>DEBUG:<pre>\n";
	   echo "\$dst_change = $dst_change\n";
	   echo "\$am7 = $am7 or " . date($format,$am7) . "\n";
	   echo "\$pm7 = $pm7 or " . date($format,$pm7) . "\n";
	   if (gettype($today) == "array")
	   while (list($w_k, $w_v) = each($today))
		  while (list($t_k, $t_v) = each($w_v))
			 while (list($k_k, $k_v) = each($t_v))
			 	echo "d[$w_k][$t_k][$k_k] = '$k_v'\n";
	   else echo "today is not an array!\n";
	   echo "</pre><p>\n";
    }

    # We need to know what all the rooms area called, so we can show them all
    # pull the data from the db and store it. Convienently we can print the room
    # headings and capacities at the same time

    $sql = "select room_name, capacity, id, description from $tbl_room where area_id=$area order by 1";

    $res = sql_query($sql);

    # It might be that there are no rooms defined for this area.
    # If there are none then show an error and dont bother doing anything
    # else
    if (! $res) fatal_error(0, sql_error());
    if (sql_count($res) == 0)
    {
	   echo "<h1>".get_string('no_rooms_for_area','block_mrbs')."</h1>";
	   sql_free($res);
    }
    else
    {
	   #Show current date
	   echo "<h2 align=center>" . userdate($am7, "%A %d %B %Y") . "</h2>\n";

	   if ( $pview != 1 ) {
		  #Show Go to day before and after links
            $output = "<table width=\"100%\"><tr><td><a href=\"day.php?year=$yy&month=$ym&day=$yd&area=$area\">&lt;&lt;".get_string('daybefore','block_mrbs')."</a></td>
            <td align=center><a href=\"day.php?area=$area\">".get_string('gototoday','block_mrbs')."</a></td>
            <td align=right><a href=\"day.php?year=$ty&month=$tm&day=$td&area=$area\">".get_string('dayafter','block_mrbs')."&gt;&gt;</a></td></tr></table>\n";
            print $output;
	   }

    	// Include the active cell content management routines.
	   // Must be included before the beginnning of the main table.
	   if ($javascript_cursor) { // If authorized in config.inc.php, include the javascript cursor management.
	       echo "<SCRIPT language=\"JavaScript\" type=\"text/javascript\" src=\"xbLib.js\"></SCRIPT>\n";
           echo "<SCRIPT language=\"JavaScript\">InitActiveCell("
                . ($show_plus_link ? "true" : "false") . ", "
                . "true, "
                . ((FALSE != $times_right_side) ? "true" : "false") . ", "
                . "\"$highlight_method\", "
                . "\"" . get_string('click_to_reserve','block_mrbs') . "\""
                . ");</SCRIPT>\n";
       }

	   #This is where we start displaying stuff
	   echo "<table cellspacing=0 border=1 width=\"100%\">";
	   echo "<tr><th width=\"1%\">".($enable_periods ? get_string('period','block_mrbs') : get_string('time'))."</th>";

        $room_column_width = (int)(95 / sql_count($res));
	   for ($i = 0; ($row = sql_row($res, $i)); $i++) {
            echo "<th width=\"$room_column_width%\">
            <a href=\"week.php?year=$year&month=$month&day=$day&area=$area&room=$row[2]\"
            title=\"" . get_string('viewweek','block_mrbs') . " &#10;&#10;$row[3]\">"
            . htmlspecialchars($row[0]) . ($row[1] > 0 ? "($row[1])" : "") . "
            <br />$row[3]</a></th>";//print the room description as well
		    $rooms[] = $row[2];
	   }

        # next line to display times on right side
        if ( FALSE != $times_right_side )
        {
            echo "<th width=\"1%\">". ( $enable_periods  ? get_string('period','block_mrbs') : get_string('time') )
            ."</th>";
        }
        echo "</tr>\n";
  
	   # URL for highlighting a time. Don't use REQUEST_URI or you will get
	   # the timetohighlight parameter duplicated each time you click.
	   $hilite_url="day.php?year=$year&month=$month&day=$day&area=$area&timetohighlight";

	   # This is the main bit of the display
	   # We loop through time and then the rooms we just got

	   # if the today is a day which includes a DST change then use
	   # the day after to generate timesteps through the day as this
	   # will ensure a constant time step
	   ( $dst_change != -1 ) ? $j = 1 : $j = 0;
	
	   $row_class = "even_row";
	   for (
		  $t = mktime($morningstarts, $morningstarts_minutes, 0, $month, $day+$j, $year);
		  $t <= mktime($eveningends, $eveningends_minutes, 0, $month, $day+$j, $year);
		  $t += $resolution, $row_class = ($row_class == "even_row")?"odd_row":"even_row"
	   )
	   {
		  # convert timestamps to HHMM format without leading zeros
		  $time_t = date($format, $t);

		  # Show the time linked to the URL for highlighting that time
		  echo "<tr>";
		  tdcell("red");
		  if( $enable_periods ){
			 $time_t_stripped = preg_replace( "/^0/", "", $time_t );
			 echo "<a href=\"$hilite_url=$time_t\"  title=\""
             . get_string('highlight_line','block_mrbs') . "\">"
             . $periods[$time_t_stripped] . "</a></td>\n";
		  } else {
			echo "<a href=\"$hilite_url=$time_t\" title=\""
            . get_string('highlight_line','block_mrbs') . "\">"
            . userdate($t,hour_min_format()) . "</a></td>\n";
		  }

		# Loop through the list of rooms we have for this area
		while (list($key, $room) = each($rooms))
		{
			if(isset($today[$room][$time_t]["id"]))
			{
				$id    = $today[$room][$time_t]["id"];
				$color = $today[$room][$time_t]["color"];
				$descr = htmlspecialchars($today[$room][$time_t]["data"]);
				$long_descr = htmlspecialchars($today[$room][$time_t]["long_descr"]);
                $double_booked = $today[$room][$time_t]["double_booked"];
                if($double_booked) $color='DoubleBooked';
			}
			else
				unset($id);

			# $c is the colour of the cell that the browser sees. White normally,
			# red if were hightlighting that line and a nice attractive green if the room is booked.
			# We tell if its booked by $id having something in it
			if (isset($id))
				$c = $color;
			elseif (($timetohighlight>0) && ($time_t == $timetohighlight))
				$c = "red";
			else
				$c = $row_class; # Use the default color class for the row.

			tdcell($c);

			# If the room isnt booked then allow it to be booked
			if(!isset($id))
			{
				$hour = date("H",$t);
				$minute  = date("i",$t);

				if ( $pview != 1 ) {
					if ($javascript_cursor)
					{
						echo "<SCRIPT language=\"JavaScript\">\n<!--\n";
						echo "BeginActiveCell();\n";
						echo "// -->\n</SCRIPT>";
					}
					echo "<center>";
					if( $enable_periods ) {
						echo "<a href=\"edit_entry.php?area=$area&room=$room&period=$time_t_stripped&year=$year&month=$month&day=$day\"><img src=new.gif width=10 height=10 border=0></a>";
					} else {
						echo "<a href=\"edit_entry.php?area=$area&room=$room&hour=$hour&minute=$minute&year=$year&month=$month&day=$day\"><img src=new.gif width=10 height=10 border=0></a>";
					}
					echo "</center>";
					if ($javascript_cursor)
					{
						echo "<SCRIPT language=\"JavaScript\">\n<!--\n";
						echo "EndActiveCell();\n";
						echo "// -->\n</SCRIPT>";
					}
				} else echo '&nbsp;';
			}
            elseif ($double_booked){
                $descrs=split("\n",$descr);
                $long_descrs=split(",",$long_descr);
                $ids=split(",",$id);
            }else{
                $descrs[]=$descr;
                $long_descrs[]=$long_descr;
                $ids[]=$id;
            }
            for($i=0;$i<count($descrs);$i++){
                if ($descrs[$i] != "")
			{
				#if it is booked then show
                echo " <a href=\"view_entry.php?id=$ids[$i]&area=$area&day=$day&month=$month&year=$year\" title=\"$long_descrs[$i]\">$descrs[$i]</a><br>";
			}
			else
                    echo "<a href=\"view_entry.php?id=$ids[$i]&area=$area&day=$day&month=$month&year=$year\" title=\"$long_descrs[$i]\">&nbsp;\"&nbsp;</a><br>";
            }
            unset($descrs);
            unset($long_descrs);
            unset($ids);

			echo "</td>\n";
		}
        # next lines to display times on right side
        if ( FALSE != $times_right_side )
        {
            if( $enable_periods )
            {
                tdcell("red");
                $time_t_stripped = preg_replace( "/^0/", "", $time_t );
                echo "<a href=\"$hilite_url=$time_t\"  title=\""
                . get_string('highlight_line','block_mrbs') . "\">"
                . $periods[$time_t_stripped] . "</a></td>\n";
            }
            else
            {
                tdcell("red");
		        echo "<a href=\"$hilite_url=$time_t\" title=\""
                . get_string('highlight_line','block_mrbs') . "\">"
                . userdate($t,hour_min_format()) . "</a></td>\n";
                
            }
        }

		echo "</tr>\n";
		reset($rooms);
	}
}
echo "</table>\n";
(isset($output)) ? print $output : '';
show_colour_key();
}
include "trailer.php";
?>