<?php
/**
 * Copyright (C) 2010  Arie Nugraha (dicarve@gmail.com)
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 *
 */

/* Send Catalog data to UCS server */

// key to authenticate
define('INDEX_AUTH', '1');

// main system configuration
require '../../../sysconfig.inc.php';

// load settings
utility::loadSettings($dbs);

// check if UCS is enabled or not
if (!$sysconf['ucs']['enable']) {
	die(__('UCS is not enabled! Change global system configuration to enable UCS'));
}

require SB.'admin/default/session.inc.php';
require SB.'admin/default/session_check.inc.php';
require LIB.'http_request.inc.php';

// privileges checking
$can_read = utility::havePrivilege('bibliography', 'r');
$can_write = utility::havePrivilege('bibliography', 'w');

// sent HTTP header
header('Content-type: text/json');

if (!($can_read && $can_write)) {
    die(json_encode(array('status' => 'UNAUTHORIZED', 'message' => 'Unauthorized Access!')));
}

if (isset($_POST['itemID']) AND !empty($_POST['itemID'])) {
    $biblioIDS = '';
    // concat all ID
    foreach ($_POST['itemID'] as $itemID) {
        $biblioID = (integer)$itemID;
        $biblioIDS .= $biblioID.',';
    }
    // remove last comma
    $biblioIDS = substr_replace($biblioIDS, '', -1);

    // fetch all data from biblio table
    $sql = "SELECT
        b.biblio_id, b.title, b.spec_detail_info, gmd.gmd_code, gmd.gmd_name, b.edition,
        b.isbn_issn, publ.publisher_name, b.publish_year,
        b.collation, b.series_title, b.call_number, lang.language_id,
        lang.language_name, pl.place_name, b.classification, b.notes, fr.frequency
        FROM biblio AS b
        LEFT JOIN mst_gmd AS gmd ON b.gmd_id=gmd.gmd_id
        LEFT JOIN mst_publisher AS publ ON b.publisher_id=publ.publisher_id
        LEFT JOIN mst_language AS lang ON b.language_id=lang.language_id
        LEFT JOIN mst_frequency AS fr ON b.frequency_id=fr.frequency_id
        LEFT JOIN mst_place AS pl ON b.publish_place_id=pl.place_id WHERE b.biblio_id IN ($biblioIDS) LIMIT 50";

    // invoke query
    $q = @$dbs->query($sql);
    // die(json_encode(array('status' => 'DEBUG_SQL', 'message' => $sql)));
    if ($dbs->error) {
        die(json_encode(array('status' => 'DB_ERROR', 'message' => 'Database Error: '.$dbs->error)));
    }

    $data = array();
    // loop record and poll it in an array
    while ($d = $q->fetch_assoc()) {
        $id = (integer)$d['biblio_id'];
        $data[$id] = $d;
        $data[$id]['authors'] = array();
        $data[$id]['subjects'] = array();
        // author
        $author_q = @$dbs->query("SELECT a.author_name, ba.level, a.authority_type, a.auth_list FROM biblio_author AS ba
            LEFT JOIN mst_author AS a ON ba.author_id=a.author_id
            WHERE ba.biblio_id=$id ORDER BY level ASC");
        while ($author_d = $author_q->fetch_row()) { $data[$id]['authors'][] = array('name' => $author_d[0], 'level' => $author_d[1], 'type' => $author_d[2], 'auth_list' => $author_d[3]); }
        // subject
        $topic_q = @$dbs->query("SELECT t.topic, bt.level, t.topic_type, t.auth_list FROM biblio_topic AS bt
            LEFT JOIN mst_topic AS t ON bt.topic_id=t.topic_id
            WHERE bt.biblio_id=$id ORDER BY level ASC");
        while ($topic_d = $topic_q->fetch_row()) { $data[$id]['subjects'][] = array('name' => $topic_d[0], 'level' => $topic_d[1], 'type' => $topic_d[2], 'auth_list' => $topic_d[3]); }
    }

    // encode array to json format
    if ($data) {
        $to_sent['node_info'] = $sysconf['ucs'];
        $to_sent['node_data'] = $data;
        // create HTTP request
        $http_request = new http_request();
        // send HTTP POST request
        $server_addr = isset($_SERVER['SERVER_ADDR']) ? $_SERVER['SERVER_ADDR'] : (isset($_SERVER['LOCAL_ADDR']) ? $_SERVER['LOCAL_ADDR'] : gethostbyname($_SERVER['SERVER_NAME']));

		if (isset($sysconf['ucs']['serverversion']) && $sysconf['ucs']['serverversion'] < 3) {
          $http_request->send_http_request($sysconf['ucs']['serveraddr'].'/ucpoll.php', $server_addr, $to_sent, 'POST', 'text/json');
		} else {
		  $http_request->send_http_request($sysconf['ucs']['serveraddr'].'/ucs.php', $server_addr, $to_sent, 'POST', 'text/json');
		}

        // below is for debugging purpose only
	    // die(json_encode(array('status' => 'RAW', 'message' => $http_request->body())));

	    // check for http request error
	    if ($req_error = $http_request->error()) {
		  die(json_encode(array('status' => 'HTTP_REQUEST_ERROR', 'message' => $req_error['message'])));
	    }

        // print out body of request result
        echo $http_request->body();
        exit();
    } else {
        die(json_encode(array('status' => 'NO_DATA', 'message' => 'No Data to be uploaded to Union Catalog Server')));
    }
} else {
    die(json_encode(array('status' => 'NO_BIBLIO_SELECTED', 'message' => 'Please select bibliographic data to upload!')));
}
