david
28b02db2ea
git-svn-id: https://192.168.0.254/svn/Proyectos.Incam_SGD/tags/3.7.0.2_original@1 eb19766c-00d9-a042-a3a0-45cb8ec72764
32 lines
526 B
PHP
32 lines
526 B
PHP
<?php
|
|
|
|
require_once("../../config/dmsDefaults.php");
|
|
|
|
require_once(KT_LIB_DIR . '/filelike/fsfilelike.inc.php');
|
|
|
|
$sFilename = "critique-of-pure-reason.txt";
|
|
|
|
$norm = file_get_contents($sFilename);
|
|
|
|
$f = new KTFSFileLike($sFilename);
|
|
|
|
$getcont = $f->get_contents();
|
|
|
|
$g = new KTFSFileLike($sFilename);
|
|
$g->open();
|
|
$chunk = "";
|
|
while (!$g->eof()) {
|
|
$chunk .= $g->read(8192);
|
|
}
|
|
$g->close();
|
|
|
|
if ($getcont !== $norm) {
|
|
print "get_contents not working!\n";
|
|
}
|
|
|
|
if ($chunk !== $norm) {
|
|
print "chunk not working!\n";
|
|
}
|
|
|
|
|