srvc_book_file.php

<?php
    
require_once "srvc_book_common.php";
require_once "utils.php";

function __impl_book_file_base_dir()
{
    return dirname(__FILE__) . "/../reservation/";
}

function __impl_book_file_dir_4_name($subdir)
{
    return __impl_book_file_base_dir() . "/" . $subdir;
}

function __impl_book_setting_path($vdate, $setting_name)
{
    $date_str = "$vdate";
    if (strlen($date_str) != 8)
    {
        return "";
    }
    
    $dir = __impl_book_file_dir_4_name($date_str);
    
    if (!is_dir($dir))
    {
        mkdir($dir);
    }
    
    $path = $dir . "/config_" . $setting_name . ".json";
    return $path;
}

function __impl_book_lock_setting_path($vdate)
{
    return __impl_book_setting_path($vdate, "lock");
}

function __impl_book_lock_timeslot_setting_path($vdate, $timeslot)
{
    return __impl_book_setting_path($vdate, "lock_" . $timeslot);
}

function __impl_book_file_rticket_path($rticket)
{
    $dir = __impl_book_file_dir_4_name($rticket->visit_date);
    
    if (!is_dir($dir))
    {
        mkdir($dir);
    }
    
    $path = $dir . "/" . $rticket->visit_mins_slot . ".json";
    return $path;
}

define("KEY_FILE_JSON_RTICKET_COUNT",           "COUNT");
define("KEY_FILE_JSON_RTICKET_LIST",            "ALL");
function impl_book_do_reserve($rticket, $max_per_slot=10)
{
    $path = __impl_book_file_rticket_path($rticket);
    
    // it's locked
    if (impl_book_date_is_locked($rticket->visit_date))
    {
        return BOOK_CODE_ERR_BLOCK;
    }
    
    // read json from file
    if (file_exists($path))
    {
        $orig_json_str = file_get_contents($path);
    }
    else
    {
        $orig_json_str = '{ "' . KEY_FILE_JSON_RTICKET_COUNT . '" : 0, "' . KEY_FILE_JSON_RTICKET_LIST . '" : {} }';
    }
    
    $json = json_decode($orig_json_str, true);
    
    // check
    if ($json == null ||
        !array_key_exists(KEY_FILE_JSON_RTICKET_COUNT, $json) ||
        !array_key_exists(KEY_FILE_JSON_RTICKET_LIST, $json))
    {
        return BOOK_CODE_ERR_CORRUPT;
    }
    
    // check if full
    $count_rtickets = $json[KEY_FILE_JSON_RTICKET_COUNT];
    if ($count_rtickets + $rticket->num > $max_per_slot)
    {
        return BOOK_CODE_ERR_FULL;
    }
    
    // check reservation list
    $arr_rtickets = $json[KEY_FILE_JSON_RTICKET_LIST];
    if (!is_array($arr_rtickets))
    {
        return BOOK_CODE_ERR_CORRUPT;
    }
    
    // any dup?
    foreach ($arr_rtickets as $arr_rt)
    {
        $rt = new ReservationTicket(null, 0, "", "");
        if (!$rt->from_array($arr_rt))
        {
            return BOOK_CODE_ERR_CORRUPT;
        }
        
        if ($rt->guid->is_equal_to($rticket->guid))
        {
            return BOOK_CODE_ERR_DUP;
        }
    }
    
    // update json count & list
    array_push($arr_rtickets, $rticket->to_array());
    $json[KEY_FILE_JSON_RTICKET_COUNT] += $rticket->num;
    $json[KEY_FILE_JSON_RTICKET_LIST] = $arr_rtickets;
    $new_json_str = json_encode($json);
    
    // flush
    $handle_f = fopen($path, "w") or die ("ERROR to open $path!");
    $wouldLock = 1;
    if (!lock_file_until_ms($handle_f, 100))
    {
        fclose($handle_f);
        return BOOK_CODE_ERR_UNKNOWN;
    }
    
    fwrite($handle_f, $new_json_str);
    fclose($handle_f);
    
    return BOOK_CODE_OK;
}
    
function impl_book_query_schedule($prev_n, $next_n, &$result_arr)
{
    $begin_day = time() - $prev_n * SEC_PER_DAY;
    
    for ($k = 0; $k < $prev_n + $next_n; $k++)
    {
        $cur = $begin_day + $k * SEC_PER_DAY;
        $subdir = date("Ymd", $cur);
        $dir = __impl_book_file_dir_4_name($subdir);
        
        if (!is_dir($dir))
        {
            continue;
        }
        
        $dh = opendir($dir);
        if ($dh == false)
        {
            continue;
        }
        
        // all slots in one array
        $all_slots = array();
        
        while (($fname = readdir($dh)) != false)
        {
            $fpath = $dir . "/" . $fname;
            
            // skip folders
            if (is_dir($fpath))
            {
                continue;
            }
            
            // file-name without ext
            $minutes_slot = pathinfo($fpath, PATHINFO_FILENAME);
            $visit_clock = minutes_to_clock_str($minutes_slot);
            
            // read from file
            $json_str = file_get_contents($fpath);
            
            // decode and check
            $json = json_decode($json_str, true);
            if ($json == null || 
                !is_array($json) ||
                !array_key_exists(KEY_FILE_JSON_RTICKET_COUNT, $json) ||
                !array_key_exists(KEY_FILE_JSON_RTICKET_LIST, $json))
            {
                continue;
            }
            
            // total guest number
            $count_rtickets = $json[KEY_FILE_JSON_RTICKET_COUNT];
            if ($count_rtickets <= 0)
            {
                continue;
            }
            
            // put all reservations of this slot in one array
            $slot_inf = array();
            
            // go through each reservation
            $arr_rtickets = $json[KEY_FILE_JSON_RTICKET_LIST];
            foreach ($arr_rtickets as $arr_rt)
            {
                $rticket = new ReservationTicket(null, 0, "", "");
                if (!$rticket->from_array($arr_rt))
                {
                    continue;
                }
                
                $guid = $rticket->guid;
                $guid_str = $guid->to_string();
                $guest_num = $rticket->num;
                $ttoken = $rticket->trade_token;
                
                $small_b    = $rticket->small_board;
                $medium_b   = $rticket->medium_board;
                $large_b    = $rticket->large_board;
                
                // e.g. [N] ==> #2, PHONE_138xxxxxxxx
                $slot_inf[] = array("GUEST_NUM"         => $guest_num,
                                    "GUID_STR"          => $guid_str,
                                    "BOARD_S"           => $small_b,
                                    "BOARD_M"           => $medium_b,
                                    "BOARD_L"           => $large_b,
                                    "T_TOKEN"           => $ttoken);
            }
            
            // e.g. 15:30 ==> [ xxx ]
            $all_slots[] = array("CLOCK"            => $visit_clock,
                                 "COUNT"            => $count_rtickets,
                                 "VISITORs"         => $slot_inf);
        }
        
        closedir($dh);
        
        // e.g. 20160210 ==> [ xxx ]
        $result_arr[] = array("DATE"            => $subdir,
                              "SLOTS"           => $all_slots); 
    }
    
    return BOOK_CODE_OK;
}

// lock one day
function impl_book_lock_date($vdate)
{
    $path = __impl_book_lock_setting_path($vdate);
    
    if (file_exists($path))
    {
        return BOOK_CODE_OK;
    }
    
    $json_str = json_encode(array());
    $handle_f = fopen($path, "w") or die ("ERROR to open $path!");
    $wouldLock = 1;
    if (!lock_file_until_ms($handle_f, 100))
    {
        fclose($handle_f);
        return BOOK_CODE_ERR_UNKNOWN;
    }
    
    fwrite($handle_f, $json_str);
    fclose($handle_f);
    
    return BOOK_CODE_OK;
}

function impl_book_unlock_date($vdate)
{
    $path = __impl_book_lock_setting_path($vdate);
    if (file_exists($path))
    {
        unlink($path);
    }
    
    return BOOK_CODE_OK;
}

function impl_book_date_is_locked($vdate)
{
    $dir = __impl_book_file_dir_4_name("$vdate");
    if (!is_dir($dir))
    {
        return false;
    }
    
    $path = __impl_book_lock_setting_path($vdate);
    return file_exists($path);
}

// lock one slot
function impl_book_lock_timeslot($vdate, $timeslot)
{
    $path = __impl_book_lock_timeslot_setting_path($vdate, $timeslot);
    
    if (file_exists($path))
    {
        return BOOK_CODE_OK;
    }
    
    $json_str = json_encode(array());
    $handle_f = fopen($path, "w") or die ("ERROR to open $path!");
    $wouldLock = 1;
    if (!lock_file_until_ms($handle_f, 100))
    {
        fclose($handle_f);
        return BOOK_CODE_ERR_UNKNOWN;
    }
    
    fwrite($handle_f, $json_str);
    fclose($handle_f);
    
    return BOOK_CODE_OK;
}

function impl_book_unlock_timeslot($vdate, $timeslot)
{
    $path = __impl_book_lock_timeslot_setting_path($vdate, $timeslot);
    if (file_exists($path))
    {
        unlink($path);
    }
    
    return BOOK_CODE_OK;
}

function impl_book_timeslot_is_locked($vdate, $timeslot)
{
    $dir = __impl_book_file_dir_4_name("$vdate");
    if (!is_dir($dir))
    {
        return false;
    }
    
    $path = __impl_book_lock_timeslot_setting_path($vdate, $timeslot);
    return file_exists($path);
}

function impl_book_query_lock($prev_n, $next_n, &$result_arr)
{
    $begin_day = time() - $prev_n * SEC_PER_DAY;
    
    for ($k = 0; $k < $prev_n + $next_n; $k++)
    {
        $blocked_slots = [];
        $blocked_slots_len = 0;
        
        $cur = $begin_day + $k * SEC_PER_DAY;
        $vdate = date("Ymd", $cur);
        
        if (impl_book_date_is_locked($vdate))
        {
            $blocked_slots[] = "all";
            $blocked_slots_len++;
        }
        
        for ($cur_hour = OPEN_HOUR_BEGIN; 
             $cur_hour <= OPEN_HOUR_END; 
             $cur_hour += OPEN_HOUR_SLOT)
        {
            if (impl_book_timeslot_is_locked($vdate,$cur_hour))
            {
                $blocked_slots[] = $cur_hour;
                $blocked_slots_len++;
            }
        }
        
        if ($blocked_slots_len > 0)
        {
            $result_arr[$vdate] = $blocked_slots;
        }
    }
    
    return BOOK_CODE_OK;
}

?>