<?php

class Bip2012_model extends Import_model {

	public function __construct()
	{
		parent::__construct();
		ini_set('memory_limit', '512M');
		set_time_limit(3600);
		$this->load->helper('excel');
	}

	/* 	===============================
			IMPORT BUKU INDUK PENDUDUK 2012
			===============================
	*/

	/**
	 * Cari baris pertama mulainya blok keluarga
	 *
	 * @access	private
	 * @param		sheet			data excel berisi bip
	 * @param 	integer		jumlah baris di sheet
	 * @param 	integer		cari dari baris ini
	 * @return	integer 	baris pertama blok keluarga
	 */
	private function cari_bip_kk($data_sheet, $baris, $dari=1)
	{
		if ($baris <=1 )
			return 0;

		$baris_kk = 0;
		for ($i=$dari; $i<=$baris; $i++)
		{
			// Baris dengan kolom[2] = "NO.KK" menunjukkan mulainya data keluarga dan anggotanya
			if ($data_sheet[$i][2] == 'NO.KK')
			{
				$baris_kk = $i;
				break;
			}
		}
		return $baris_kk;
	}

	/**
	 * Ambil data keluarga berikutnya
	 *
	 * @access	private
	 * @param		sheet		data excel berisi bip
	 * @param 	integer	cari dari baris ini
	 * @return	array 	data keluarga
	 */
	private function get_bip_keluarga($data_sheet, $i)
	{
		// Contoh alamat: "DUSUN KERANDANGAN, RT:001, RW:001, Kodepos:83355,-"
		// $i = baris judul data keluarga. Data keluarga ada di baris berikutnya
		$baris = $i + 1;
		$alamat = $data_sheet[$baris][7];
		$pos_awal = strpos($alamat, 'DUSUN');
		if ($pos_awal !== false)
		{
			$pos = $pos_awal + 5;
			$data_keluarga['dusun'] = trim(substr($alamat, $pos, strpos($alamat, ',', $pos) - $pos));
			$alamat = substr_replace($alamat, '', $pos_awal, strpos($alamat, ',', $pos) - $pos_awal);
		} else $data_keluarga['dusun'] = 'LAINNYA';
		$pos_awal = strpos($alamat, 'RW:');
		if ($pos_awal !== false)
		{
			$pos = $pos + 3;
			$data_keluarga['rw'] = substr($alamat, $pos, strpos($alamat, ',', $pos) - $pos);
			$alamat = substr_replace($alamat, '', $pos_awal, strpos($alamat, ',', $pos) - $pos_awal);
		} else $data_keluarga['rw'] = '-';
		if ($data_keluarga['rw'] == '') $data_keluarga['rw'] = '-';
		$pos_awal = strpos($alamat, 'RT:');
		if ($pos_awal !== false)
		{
			$pos = $pos_awal + 3;
			$data_keluarga['rt'] = substr($alamat, $pos, strpos($alamat, ',', $pos) - $pos);
			$alamat = substr_replace($alamat, '', $pos_awal, strpos($alamat, ',', $pos) - $pos_awal);
		} else $data_keluarga['rt'] = '-';
		if ($data_keluarga['rt'] == '') $data_keluarga['rt'] = '-';
		$alamat = rtrim(ltrim(preg_replace("/Kodepos:.*,/i", '', $alamat), " ,-")," ,-");
		// $alamat sudah tidak ada dusun, rw, rt atau kodepos -- tinggal jalan, kompleks, gedung dsbnya
		$data_keluarga['alamat'] = $alamat;
		$data_keluarga['no_kk'] = $data_sheet[$baris][2];
		return $data_keluarga;
	}

	/**
	 * Ambil data anggota keluarga berikutnya
	 *
	 * @access	private
	 * @param		sheet		data excel berisi bip
	 * @param 	integer	cari dari baris ini
	 * @param 	array		data keluarga untuk anggota yg dicari
	 * @return	array 	data anggota keluarga
	 */
	private function get_bip_anggota_keluarga($data_sheet, $i, $data_keluarga)
	{
		// $i = baris data anggota keluarga
		$data_anggota = $data_keluarga;
		$data_anggota['nik'] = preg_replace('/[^0-9]/', '', trim($data_sheet[$i][3]));
		$data_anggota['nama'] = trim($data_sheet[$i][4]);
		$tmp = unserialize(KODE_SEX);
		$data_anggota['sex'] = $tmp[trim($data_sheet[$i][5])];
		$data_anggota['tempatlahir'] = trim($data_sheet[$i][6]);
		$tanggallahir = trim($data_sheet[$i][7]);
		$data_anggota['tanggallahir'] = $this->format_tanggal($tanggallahir);
		$tmp = unserialize(KODE_AGAMA);
		$data_anggota['agama_id'] = $tmp[strtolower(trim($data_sheet[$i][9]))];
		$tmp = unserialize(KODE_STATUS);
		$data_anggota['status_kawin'] = $tmp[strtolower(trim($data_sheet[$i][10]))];
		$tmp = unserialize(KODE_HUBUNGAN);
		$data_anggota['kk_level'] = $tmp[strtolower(trim($data_sheet[$i][11]))];
		$tmp = unserialize(KODE_PENDIDIKAN);
		$data_anggota['pendidikan_kk_id'] = $tmp[strtolower(trim($data_sheet[$i][12]))];
		$tmp = unserialize(KODE_PEKERJAAN);
		$data_anggota['pekerjaan_id'] = $tmp[strtolower(trim($data_sheet[$i][13]))];
		$nama_ibu = trim($data_sheet[$i][14]);
		if ($nama_ibu == "")
		{
			$nama_ibu = "-";
		}
		$data_anggota['nama_ibu'] = $nama_ibu;
		$nama_ayah = trim($data_sheet[$i][15]);
		if ($nama_ayah == "")
		{
			$nama_ayah = "-";
		}
		$data_anggota['nama_ayah'] = $nama_ayah;
		$data_anggota['akta_lahir'] = trim($data_sheet[$i][16]);

		// Isi kolom default
		$data_anggota['warganegara_id'] = "1";
		$data_anggota['golongan_darah_id'] = "13";
		$data_anggota['pendidikan_sedang_id'] = "";

		return $data_anggota;
	}

	/**
	 * Proses impor data bip
	 *
	 * @access	public
	 * @param		sheet		data excel berisi bip
	 * @return	setting $_SESSION untuk info hasil impor
			$_SESSION['gagal']=						jumlah baris yang gagal
			$_SESSION['total_keluarga']=	jumlah keluarga yang diimpor
			$_SESSION['total_penduduk']=	jumlah penduduk yang diimpor
			$_SESSION['baris']=						daftar baris yang gagal
	 */
	function impor_data_bip($data)
	{
		$gagal_penduduk = 0;
		$baris_gagal = "";
		$total_keluarga = 0;
		$total_penduduk = 0;

		// BIP bisa terdiri dari beberapa worksheet
		// Proses sheet satu-per-satu
		for ($sheet_index=0; $sheet_index<count($data->boundsheets); $sheet_index++)
		{
			// membaca jumlah baris di sheet ini
			$baris = $data->rowcount($sheet_index);
			$data_sheet = $data->sheets[$sheet_index]['cells'];
			if ($this->cari_bip_kk($data_sheet, $baris, 1) < 1)
			{
				// Tidak ada data keluarga
				continue;
			}
			// Import data sheet ini mulai baris pertama
			for ($i=1; $i<=$baris; $i++)
			{
				// Cari keluarga berikutnya
				if ($data_sheet[$i][2] != "NO.KK") continue;
				// Proses keluarga
				$data_keluarga = $this->get_bip_keluarga($data_sheet, $i);
				$this->tulis_tweb_wil_clusterdesa($data_keluarga);
				$this->tulis_tweb_keluarga($data_keluarga);
				$total_keluarga++;
				// Pergi ke data anggota keluarga
				$i = $i + 3;
				// Proses setiap anggota keluarga
				while ($data_sheet[$i][2] != "NO.KK" AND $i <= $baris)
				{
					$data_anggota = $this->get_bip_anggota_keluarga($data_sheet, $i, $data_keluarga);
					if ($this->data_import_valid($data_anggota))
					{
						$this->tulis_tweb_penduduk($data_anggota);
						$total_penduduk++;
					}
					else
					{
						$gagal_penduduk++;
						$baris_gagal .=$i.",";
					}
					$i++;
				}
				$i = $i - 1;
			}
		}

		if ($gagal_penduduk == 0)
			$baris_gagal = "tidak ada data yang gagal di import.";
		else $_SESSION['success'] = -1;

		$_SESSION['gagal'] = $gagal_penduduk;
		$_SESSION['total_keluarga'] = $total_keluarga;
		$_SESSION['total_penduduk'] = $total_penduduk;
		$_SESSION['baris'] = $baris_gagal;
	}

}
?>
