mbanka.cz – php parser

9. 3. 2012 10:20:29

to je super, opravdu to funguje skvele. Treba to nekdy vyuziju, spise me ale zajima neco podobneho ale pro Komercni banku. Hledal jsem vsude mozne ale nejakou vetsi diskuzi na toto tema jsem nenasel. Nevite o nejakem parseru i pro komercni banku?

9. 3. 2012 10:20:29

https://webtrh.cz/diskuse/mbanka-cz-php-parser/strana/2#reply301441

Zdeněk

(8 hodnocení)

30. 8. 2013 15:21:00

link uz bohuzel nejede, nemuze to nečkdo nahodit sem? do vlákna?

30. 8. 2013 15:21:00

https://webtrh.cz/diskuse/mbanka-cz-php-parser/strana/2#reply301440

slovak.cz

(22 hodnocení)

31. 8. 2013 00:27:34

je to uz asi 2 roky co jsem to z te URL stahoval, takze nevim, jestli jsem v te tride nedelal nejake upravy.. mozna jo, mozna ne, kadopadne me to funguje.

ve slozce se tridou mam jeste prazdny soubor bez pripomy s nazvem cookiefile, nevim jeslti si ho trida vytvari nebo je tam opravdu nutne ho mit, koukam, cele 2 roky nebyl modifikovan..

a kod tridy:

<?php/*** mBANK HTTP API** @author Martin Zvarík** @license http://www.teplaky.net/mbank-http-api** @version 2011-07-25*/class mBank{	private $ucty; // seznam účtů		private $ch; // curl		public $url_logon = 'https://cz.mbank.eu/logon.aspx';		public $url_accounts_list = 'https://cz.mbank.eu/accounts_list.aspx';		public $url_view_settings = 'https://cz.mbank.eu/account_oper_list.aspx'; // formulář s nastavením výpisu transakcí		public $url_printout = 'https://cz.mbank.eu/printout_oper_list.aspx'; // export transakcí do souboru			/**	* SAFE_MODE nepodporuje CURLOPT_FOLLOWLOCATION	*/	function curl_redir_exec(&$ch, $request_url, $post_data = null, $loops = 0)	{		if ($loops == 0) {			curl_setopt($ch, CURLOPT_URL, $request_url);			if (isset($post_data)) {				curl_setopt($ch, CURLOPT_POST, true);				curl_setopt($ch, CURLOPT_POSTFIELDS, $post_data);			} else {				curl_setopt($ch, CURLOPT_POST, 0);				curl_setopt($ch, CURLOPT_POSTFIELDS, '');			}		}				$curl_max_loops = 20;		if ($loops++ >= $curl_max_loops) return false;				$res = curl_exec($ch);				$http_code = curl_getinfo($ch, CURLINFO_HTTP_CODE);						/*echo $http_code."<br>";		echo $request_url."<br>";		echo $res."<br>";		echo "--------------------<br>n<br>n";		*/				if ($http_code > 300 && $http_code < 400) //--- přesměrování		{			preg_match('~location: (.*?)n~i', $res, $m);						$url = trim($m);			if (!$url) {				die("Chyba redirect");			}						if (substr($url, 0, 4) != 'http') {				$request_url = substr($request_url, 0, strrpos($request_url, '/'));				$url = $request_url . ($url{0} == '/' ? '' : '/') . $url;			}						curl_setopt($ch, CURLOPT_URL, $url);						//echo "redirect: ".$url."<br>n";						return $this->curl_redir_exec($ch, $url, null, $loops);		}		else			return $res;	}			/**	* LOGIN	*	* @param (string) Uživatelské jméno	* @param (string) Heslo	*/	function __construct($customer, $password)	{		$fp = fopen('cookiefile', 'w');		fclose($fp);				//--------------------- globální nastavení CURL		$ch =& $this->ch;				$ch = curl_init();		curl_setopt($ch, CURLOPT_COOKIEFILE, "cookiefile");		curl_setopt($ch, CURLOPT_COOKIEJAR, "cookiefile");		curl_setopt($ch, CURLOPT_USERAGENT, $_SERVER); // Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)				curl_setopt($ch, CURLOPT_HEADER, true);		curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);		curl_setopt($ch, CURLOPT_TIMEOUT, 40);		curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);		curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);				curl_setopt($ch, CURLOPT_REFERER, ''); // referer není vyžadován						//--- načteme přihlašovací stránku		$res = $this->curl_redir_exec($ch, $this->url_logon);				//--- vytáhneme údaje z formu		preg_match('~<input.+__EVENTVALIDATION.+value=("|')(.*)1~isU', $res, $m);		$_eventvalidation = $m;		preg_match('~<input.+seed.+value=("|')(.*)1~isU', $res, $m);		$seed = $m;		preg_match('~<input.+__STATE.+value=("|')(.*)1~isU', $res, $m);		$_state = $m;						//--- odešleme login		$data = array(			'customer' => $customer,			'password' => $password,			'localDT' => date("D M d Y H:i:s")." GMT +0100 (Central Europe Standard Time)",			'__PARAMETERS' => '', // prazdne			'__VIEWSTATE' => '', // prazdne			'seed' => $seed,			'__STATE' => $_state,			'__EVENTVALIDATION' => $_eventvalidation,		);				$res = $this->curl_redir_exec($ch, $this->url_logon, $data);						// jsme přihlášeni	}			/**	* Odpojení	*/	function __destruct()	{		curl_close($this->ch);		unset($this->ch);	}			/**	* Seznam účtů	*	* @return (array) účty	*/	function ucty()	{		if (isset($this->ucty)) return $this->ucty;				$res = $this->curl_redir_exec($this->ch, $this->url_accounts_list);				//-----------------------------------				$dm = new DataMiner($res);				$dm->setBound('účtů', '</ul>');				$ucty = array();				$s = $dm->get('li'); // první jsou nadpisy				while ($s = $dm->get('li'))		{			$dm2 = new DataMiner($s);						$s = strip_tags($dm2->get('p'));			preg_match('~(.*)(d+-d+)/6210~iU', $s, $m);						if(!count($m)) continue;						$ucet = array();			$ucet = $m;						$ucet = $m;						$ucet = $dm2->get('p', 'number');						$ucet = $dm2->get('p', 'number');									//--- najdeme odkaz na historii transakcí			$akce = $dm2->get('p');			$akce = $dm2->get('a'); // někdy je: provest prikaz			if (strip_tags($akce) != 'Historie transakcí') {				$akce = $dm2->get('a'); // obvykle na druhém místě: historie transakci			}						preg_match('~POST','(.*)'~iUm', $akce, $m);						$_parameters = $m;						$ucet = $_parameters;						$ucty] = $ucet;		}				array_pop($ucty); // poslední je součet								$this->ucty = $ucty;				return $ucty;	}			/**	* Výpis transakcí	*	* @param (mixed) číslo účtu (string) / čísla účtů (array) -- včetně předčíslí 670100 a bez /6210	* @param (string) od kdy - výchozí posledních 31 dní, jinak lze zadat YYYY-MM-DD nebo záporné číslo (počet posledních dní)	* @param (string) do kdy - výchozí je dnes, jinak YYYY-MM-DD	* @param (mixed) null (ponechá výchozí řazení mBank), 'datum' (podle datumu transakcí), 'zauctovani' (podle datumu zaúčtování)	*	* @return (array) transakce	*/	function transakce($ucty, $od = null, $do = null, $sortby = null)	{		if (!is_array($ucty)) {			$ucty = array($ucty);		}				$data = array();		$i = 0;						foreach ($ucty as $ucet_k => $ucet_v)		{			$ucet = strlen($ucet_k) > 6 ? $ucet_k : $ucet_v; // číslo účtu můžeme dát jako "key"						if (!$ucet) continue;						$csv = $this->csv_transakce($ucet, $od, $do);						$rows = explode("n", $csv);						$start = false;									foreach ($rows as $r)			{								$cols = explode(';', $r);										//--- struktura CSV				#0, Datum uskutečnění transakce				#1, Datum zaúčtování transakce				#2, Popis transakce				#3, Zpráva pro příjemce				#4, Plátce/Příjemce				#5, Číslo účtu plátce/příjemce				#6, KS				#7, VS				#8, SS				#9, Částka transakce				#10, Účetní zůstatek po transakci								if ($start)				{										foreach ($cols as &$col) {						$col = trim($this->csv_string($col));					}										if (!$cols						&& isset($cols) && !$cols						&& isset($cols) && !$cols) {						break; // konec údajů					}										if (!$cols) continue; // vynechaný řádek										list($d, $m, $Y) = explode('-', $cols); // #0, Datum uskutečnění transakce					$datum = mktime(0, 0, 0, (int)$m, (int)$d, (int)$Y);										list($d, $m, $Y) = explode('-', $cols); // #1, Datum zaúčtování transakce					$datum2 = mktime(0, 0, 0, (int)$m, (int)$d, (int)$Y);										$i++;					if ($sortby == 'datum') {						 // transakce ve stejný den řadíme podle částky						$key = $datum.'_'.abs($this->format_num($cols)).($this->format_num($cols) < 0 ? 'a' : 'b');					} elseif ($sortby == 'zauctovani') {						// transakce ve stejný den řadíme podle částky						$key = $datum2.'_'.abs($this->format_num($cols)).($this->format_num($cols) < 0 ? 'a' : 'b');					} else {						$key = $i;					}					//---										$popis = $cols; // #2, Popis transakce					if ($cols) {						$popis.= ($popis ? ' - ' : '').$cols; // připojíme "#3, Zpráva pro příjemce"					}										if (isset($data)) $key.= '_'.$i;										// Vydaj nebo prijem					$typ_transakce = 'PRIJEM';					$castka = (float) $this->format_num($cols);					if($castka<0) $typ_transakce = 'VYDAJ';										$data = array(						'datum' => $datum, // vracíme jako 'timestamp'						'zauctovani' => $datum2,						'popis' => iconv("windows-1250", "utf-8", $popis),						'jmeno' => iconv("windows-1250", "utf-8", ($cols && $cols != '-') ? $cols : ''), // platce / prijemce						'ks' => $cols ? preg_replace('~^0+~', '', $cols) : '',						'vs' => $cols ? preg_replace('~^0+~', '', $cols) : '', // odstraní počáteční nuly						'ss' => $cols ? preg_replace('~^0+~', '', $cols) : '',						'castka' => (float) $this->format_num($cols), // #9, Částka transakce						'zustatek' => (float) $this->format_num($cols), // #10, Účetní zůstatek po transakci						'ucet' => $ucet,						'ucet_prijemce' => $cols,						'type_transakce' => $typ_transakce,					);				}				elseif (substr($cols, 0, 13) == '#Datum uskute')				{					$start = true;				}			}		}						if (!isset($sortby)) {			$data = array_reverse($data); // mbank seřazuje od nejstaršího data => jenom přehodíme		}		else {			krsort($data); // seřadíme podle klíče		}				return $data;	}			/**	* PDF výpis	*	* @param (mixed) číslo účtu (string) / čísla účtů (array) -- včetně předčíslí 670100 a bez /6210	* @param (string) od kdy - výchozí posledních 31 dní, jinak lze zadat YYYY-MM-DD nebo záporné číslo (počet posledních dní)	* @param (string) do kdy - výchozí je dnes, jinak YYYY-MM-DD	* @param (string) složka kam PDF uložit - výchozí je "" (aktuální složka)	*	* @example	* pdf_export('670100-xxxxxx');	* pdf_export(array('670100-xxxxxx1' => 'nazev_souboru', '670100-xxx2'));	*	* @return (array) transakce	*/	function pdf_export($ucty, $od = null, $do = null, $folder = "")	{		if (!is_array($ucty)) {			$ucty = array($ucty);		}		//----		if (!isset($od) || $od < 0) {			$days_ago = $od < 0 ? (int)$od : -31;			$od = date("Y-m-d", strtotime(($days_ago+1)." days")); // včetně toho dnešního, proto +1		}		if (!isset($do)) {			$do = date("Y-m-d");		}		$od = explode('-', $od);		$do = explode('-', $do);				//----		if ($folder != "" && substr($folder, -1) != '/') {			$folder.= "/";		}				if (!isset($this->ucty)) {			$this->ucty(); // musíme najít účty		}				foreach ($ucty as $ucet_k => $ucet_v)		{			$ucet = strlen($ucet_k) > 6 ? $ucet_k : $ucet_v; // jako "key" můžeme dát číslo účtu a jako "value" název PDF souboru						if (!$ucet) continue;						$filepath = $folder.$ucet_v."_".implode("-", $od)."_".implode("-", $do).".pdf"; // cesta k souboru						if (!isset($this->ucty)) {				die('Chyba! Účet "'.$ucet.'" neexistuje.');			}			//---------						$data = array(				'__PARAMETERS' => $this->ucty,			);			$res = $this->curl_redir_exec($this->ch, $this->url_view_settings, $data);									preg_match('~<input.+__STATE.+value=("|')(.*)1~isU', $res, $m);			$_state = $m;			preg_match('~<input.+__EVENTVALIDATION.+value=("|')(.*)1~isU', $res, $m);			$_eventvalidation = $m;						//---------						$data = array(				'__PARAMETERS' => '',				'__STATE' => $_state,				'__VIEWSTATE' => '',				'__EVENTVALIDATION' => $_eventvalidation,				'rangepanel_group' => 'daterange_radio',				'daterange_from_day' => (int)$od,				'daterange_from_month' => (int)$od,				'daterange_from_year' => (int)$od,				'daterange_to_day' => (int)$do,				'daterange_to_month' => (int)$do,				'daterange_to_year' => (int)$do,				'accoperlist_typefilter_group' => 'ALL',				'accoperlist_amountfilter_amountmin' => '',				'accoperlist_amountfilter_amountmax' => '',				'export_oper_history_check' => 'on',				'export_oper_history_format' => 'PDF',			);						$res = $this->curl_redir_exec($this->ch, $this->url_printout, $data);									file_put_contents($filepath, $res); // uložíme		}	}			/**	* Odstraní uvozovky	*/	function csv_string($str)	{		$str = preg_replace('~^(.*)$~', '1', $str);				$str = preg_replace('~s{2,}~', ' ', $str); // více mezer nahradí jednou				$str = trim($str);		return $str;	}			/**	* Z řetězce vybere číslo	*	* @param (string) číslo	*	* @return (double) číslo	*/	function format_num($s)	{		$s = strip_tags($s);		$s = preg_replace('~+~', '', $s);		$s = str_replace(',', '.', $s);		//$s = (double)$s; -- vrací s čárkou, což nelze použít pro DB (zřejmě je to podle locale)		return $s;	}			/**	* Výpis transakcí v CSV (originál výstup z mBank)	*	* @param (mixed) číslo účtu (string) / čísla účtů (array) -- včetně předčíslí 670100 a bez /6210	* @param (string) od kdy - výchozí posledních 31 dní, jinak lze zadat YYYY-MM-DD nebo záporné číslo (počet posledních dní)	* @param (string) do kdy - výchozí je dnes, jinak YYYY-MM-DD	*	* @return (string) transakce	*/	function csv_transakce($ucet, $od = null, $do = null)	{		if (!isset($od) || $od < 0) {			$days_ago = $od < 0 ? (int)$od : -31;			$od = date("Y-m-d", strtotime(($days_ago+1)." days")); // včetně toho dnešního, proto +1		}		if (!isset($do)) {			$do = date("Y-m-d");		}				$od = explode('-', $od);		$do = explode('-', $do);				if (!isset($this->ucty)) {			$this->ucty(); // musíme najít účty		}				if (!isset($this->ucty)) {			die('Chyba! Účet "'.$ucet.'" neexistuje.');		}				//---------				$data = array(			'__PARAMETERS' => $this->ucty,		);		$res = $this->curl_redir_exec($this->ch, $this->url_view_settings, $data);						preg_match('~<input.+__STATE.+value=("|')(.*)1~isU', $res, $m);		$_state = $m;		preg_match('~<input.+__EVENTVALIDATION.+value=("|')(.*)1~isU', $res, $m);		$_eventvalidation = $m;				//---------				$data = array(			'__PARAMETERS' => '',			'__STATE' => $_state,			'__VIEWSTATE' => '',			'__EVENTVALIDATION' => $_eventvalidation,			'rangepanel_group' => 'daterange_radio',			'daterange_from_day' => (int)$od,			'daterange_from_month' => (int)$od,			'daterange_from_year' => (int)$od,			'daterange_to_day' => (int)$do,			'daterange_to_month' => (int)$do,			'daterange_to_year' => (int)$do,			'accoperlist_typefilter_group' => 'ALL',			'accoperlist_amountfilter_amountmin' => '',			'accoperlist_amountfilter_amountmax' => '',			'export_oper_history_check' => 'on',			'export_oper_history_format' => 'CSV',		);				$res = $this->curl_redir_exec($this->ch, $this->url_printout, $data);				return $res;	}}/*** Jednoduchý extraktor dat z HTML** @author Martin Zvarík - www.Teplaky.NET*/class DataMiner{	public $c;	public $c2;	public $c2_bound;		public $cur = 0;	public $start = 0;	public $end;			function __construct($content)	{		$content = trim($content);		$this->c = $content;		$this->c2 = strtolower($content);	}			function setBound($start, $end = null)	{		if (isset($start)) {			//$s = strtolower($start); // nefunguje na diakritiku!!			$s = iconv('utf-8','iso-8859-2',mb_strtolower($start,'utf-8')); // nefunguje na diakritiku!!						$pos = strpos($this->c2, $s);						if ($pos !== false) {				$this->start = $pos;			}		}				if (isset($end)) {			$s = strtolower($end);			$pos = strpos($this->c2, $s, $this->start);			if ($pos !== false) {				$this->end = $pos;			}		}				if ($this->start > 0 || isset($this->end)) {			$this->c2_bound = substr($this->c2, $this->start, $this->end - $this->start);		}	}			function get($tag, $format = false)	{		$tag = strtolower($tag);				$c2 = isset($this->c2_bound) ? $this->c2_bound : $this->c2;				$pos = strpos($c2, '<'.$tag, $this->cur);				$this->cur = $pos + strlen($tag);				if ($pos === false) return false;				$end = strpos($c2, '</'.$tag.'>', $pos); // konec tagu - pro naše potřeby stačí takto						$entry = substr($this->c, $this->start + $pos, $end - $pos + strlen($tag) + 3);				if ($format == 'number')		{			$entry = strip_tags($entry);			$entry = preg_replace('~*~', '', $entry);			$entry = str_replace(',', '.', $entry);			$entry = (double)$entry;		}				return $entry;	}}

pouziti (koukam do presenteru co s tou tridou delam.. nezkoumam kazdou metodu, takze jeslti tady bude nekde nejaka chybka tak se predem omlouvam. nektere parametry metod si taham z databaze a nemam ted cas zkoukat jak mam cislo uctu v DB ulozeno, jeslti i s tim /6210 nebo bez treba...):

snad to pomohlo... co s tim jde delat dal vyctes z metod tridy mBank :o) tady je jen cast kterou pouzivam ja... mam to uz vice nez 2 roky a stale to funguje :o) kdyby neco neslo muzu pomoct nebo ti to nekam cele implementovat, napis zpravu, dohodnem se..

31. 8. 2013 00:27:34

https://webtrh.cz/diskuse/mbanka-cz-php-parser/strana/2#reply301439

Zdeněk

(8 hodnocení)

31. 8. 2013 06:45:13

Jo, jo, díky, rozjel jsem to, vše funguje, jen musim nejak vychytat čestinu, místo háčku a čárek mi to tam píše čtverce .) Bude to asi nejakym spatnym kodovanim;)

31. 8. 2013 06:45:13

https://webtrh.cz/diskuse/mbanka-cz-php-parser/strana/2#reply301438

peto