Files
YuCheng Hu ec7a75e6a4 添加到 trunk
+YUCHENG HU+

git-svn-id: https://svn.code.sf.net/p/hawebs/svn@247 a2543c7e-f6e9-4f8a-8bff-1ffc34733512
2010-06-13 04:47:28 +00:00

103 lines
2.7 KiB
PHP

<?php
/*+*******************************************************************************
* The contents of this file are subject to the vtiger CRM Public License Version 1.0
* ("License"); You may not use this file except in compliance with the License
* The Original Code is: vtiger CRM Open Source
* The Initial Developer of the Original Code is vtiger.
* Portions created by vtiger are Copyright (C) vtiger.
* All Rights Reserved.
********************************************************************************/
require_once('class_http/class_http.php');
/** Function to get data from the external site
* @param $url -- url:: Type string
* @param $variable -- variable:: Type string
* @returns $desc -- desc:: Type string array
*
*/
function getComdata($url,$variable="")
{
$h = new http();
$desc = array();
$h->dir = "class_http_dir/";
if (!$h->fetch($url, 2)) {
echo "<h2>There is a problem with the http request!</h2>";
echo $h->log;
exit();
}
if($variable != "")
{
$msft_stats = http::table_into_array($h->body, 'Find Symbol', 0, null);
if($msft_stats != '')
{
$desc=$msft_stats[0];
$data=getQuoteData($variable);
if(is_array($data))
{
foreach($data as $key=>$value)
array_push($desc,$value);
return $desc;
}
else
{
die;
}
}
else
return "Information on ".$variable." is not available or '".$variable."' is not a valid ticker symbol.";
}
else
{
$headlines = array();
$news = http::table_into_array($h->body, 'HEADLINES',0, null);
if(is_array($news))
{
$headlines[] = $news[35];
$headlines[] = $news[37];
$headlines[] = $news[39];
$headlines[] = $news[41];
return $headlines;
}
else
return "No headlines available";
}
}
/** Function to get company quotes from external site
* @param $var -- var:: Type string(company trickersymbol)
* @returns $quote_data -- quote_data:: Type string array
*
*/
function getQuoteData($var)
{
$url = "http://finance.yahoo.com/q?s=".$var;
$h = new http();
$h->dir = "class_http_dir/";
if (!$h->fetch($url, 2)) {
echo "<h2>There is a problem with the http request!</h2>";
echo $h->log;
exit();
}
$res_arr=array();
$quote_data = http::table_into_array($h->body, 'Delayed quote data', 0, null);
if(is_array($quote_data))
{
array_shift($quote_data);
array_shift($quote_data);
if($quote_data[0][0]!= 'Last Trade:')
array_shift($quote_data);
}
else
{
die;
}
for($i=0;$i<16;$i++)
{
if($quote_data !='')
$res_arr[]=$quote_data[$i];
}
return $res_arr;
}
?>