moodle/moodle
3
0
Fork 0
mirror of https://github.com/moodle/moodle.git synced 2025-08-06 01:16:44 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Upgraded to ADOdb 2.12

Browse source
This commit is contained in:
martin 2002-06-13 12:31:58 +00:00
parent 22f4320bdb
commit b1a1b00aa6
58 changed files with 1259 additions and 369 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/adodb/adodb-csvlib.inc.php
View file

@ -1,7 +1,7 @@
<?php
/*
V2.00 13 May 2002 (c) 2000-2002 John Lim (jlim@natsoft.com.my). All rights reserved.
V2.12 12 June 2002 (c) 2000-2002 John Lim (jlim@natsoft.com.my). All rights reserved.
Released under both BSD license and Lesser GPL library license.
Whenever there is any discrepancy between the two licenses,
the BSD license will take precedence. See License.txt.
@ -18,13 +18,13 @@ V2.00 13 May 2002 (c) 2000-2002 John Lim (jlim@natsoft.com.my). All rights reser
*/
/**
* convert a recordset into CSV format
* convert a recordset into special format
*
* @param rs the recordset
*
* @return the CSV formated data
*/
function &rs2csv(&$rs,$conn=false,$sql='')
function _rs2serialize(&$rs,$conn=false,$sql='')
{
$max = ($rs) ? $rs->FieldCount() : 0;
@ -196,12 +196,13 @@ V2.00 13 May 2002 (c) 2000-2002 John Lim (jlim@natsoft.com.my). All rights reser
// slurp in the data
$MAXSIZE = 128000;
$text = fread($fp,$MAXSIZE);
if (strlen($text) == $MAXSIZE) {
$text .= fread($fp,filesize($url)-$MAXSIZE);
$cnt = 1;
while (strlen($text) == $MAXSIZE*$cnt) {
$text .= fread($fp,$MAXSIZE);
$cnt += 1;
}
fclose($fp);
//$text = substr($text,0,44);
$arr = @unserialize($text);
//var_dump($arr);