123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515 |
- <?php
- /* Copyright (C) 2010-2012 Laurent Destailleur <eldy@users.sourceforge.net>
- * Copyright (C) 2012 Regis Houssin <regis.houssin@inodbox.com>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program. If not, see <https://www.gnu.org/licenses/>.
- * or see https://www.gnu.org/
- */
- /**
- * \file test/phpunit/FilesLibTest.php
- * \ingroup test
- * \brief PHPUnit test
- * \remarks To run this script as CLI: phpunit filename.php
- */
- global $conf,$user,$langs,$db;
- //define('TEST_DB_FORCE_TYPE','mysql'); // This is to force using mysql driver
- //require_once 'PHPUnit/Autoload.php';
- require_once dirname(__FILE__).'/../../htdocs/master.inc.php';
- require_once dirname(__FILE__).'/../../htdocs/core/lib/files.lib.php';
- if (empty($user->id)) {
- print "Load permissions for admin user nb 1\n";
- $user->fetch(1);
- $user->getrights();
- }
- $conf->global->MAIN_DISABLE_ALL_MAILS=1;
- /**
- * Class for PHPUnit tests
- *
- * @backupGlobals disabled
- * @backupStaticAttributes enabled
- * @remarks backupGlobals must be disabled to have db,conf,user and lang not erased.
- */
- class FilesLibTest extends PHPUnit\Framework\TestCase
- {
- protected $savconf;
- protected $savuser;
- protected $savlangs;
- protected $savdb;
- /**
- * Constructor
- * We save global variables into local variables
- *
- * @return FilesLibTest
- */
- public function __construct()
- {
- parent::__construct();
- //$this->sharedFixture
- global $conf,$user,$langs,$db;
- $this->savconf=$conf;
- $this->savuser=$user;
- $this->savlangs=$langs;
- $this->savdb=$db;
- print __METHOD__." db->type=".$db->type." user->id=".$user->id;
- //print " - db ".$db->db;
- print "\n";
- }
- /**
- * setUpBeforeClass
- *
- * @return void
- */
- public static function setUpBeforeClass()
- {
- global $conf,$user,$langs,$db;
- $db->begin(); // This is to have all actions inside a transaction even if test launched without suite.
- print __METHOD__."\n";
- }
- /**
- * tearDownAfterClass
- *
- * @return void
- */
- public static function tearDownAfterClass()
- {
- global $conf,$user,$langs,$db;
- $db->rollback();
- print __METHOD__."\n";
- }
- /**
- * Init phpunit tests
- *
- * @return void
- */
- protected function setUp()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- print __METHOD__."\n";
- }
- /**
- * End phpunit tests
- *
- * @return void
- */
- protected function tearDown()
- {
- print __METHOD__."\n";
- }
- /**
- * testDolBasename
- *
- * @return void
- */
- public function testDolBasename()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $result=dol_basename('adir/afile');
- print __METHOD__." result=".$result."\n";
- $this->assertEquals('afile', $result);
- $result=dol_basename('adir/afile/');
- print __METHOD__." result=".$result."\n";
- $this->assertEquals('afile', $result);
- $result=dol_basename('adir/νεο'); // With cyrillic data. Here basename fails to return correct value
- print __METHOD__." result=".$result."\n";
- $this->assertEquals('νεο', $result);
- $result=dol_basename('adir/νεο/'); // With cyrillic data. Here basename fails to return correct value
- print __METHOD__." result=".$result."\n";
- $this->assertEquals('νεο', $result);
- }
- /**
- * testDolCountNbOfLine
- *
- * @return int
- */
- public function testDolCountNbOfLine()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $file=dirname(__FILE__).'/Example_import_company_1.csv';
- $result=dol_count_nb_of_line($file);
- print __METHOD__." result=".$result."\n";
- $this->assertEquals(3, $result);
- return $result;
- }
- /**
- * testDolIsFileDir
- *
- * @return int
- */
- public function testDolIsFileDir()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $file=dirname(__FILE__).'/Example_import_company_1.csv';
- $result=dol_is_file($file);
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result);
- $result=dol_is_dir($file);
- print __METHOD__." result=".$result."\n";
- $this->assertFalse($result);
- return $result;
- }
- /**
- * testDolOther
- *
- * @return boolean
- */
- public function testDolOther()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $url='http://www.dolibarr.org';
- $result=dol_is_url($url);
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result);
- $url='https://www.dolibarr.org';
- $result=dol_is_url($url);
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result);
- $url='file://www.dolibarr.org/download/file.zip';
- $result=dol_is_url($url);
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result);
- return $result;
- }
- /**
- * testDolMimeType
- *
- * @return void
- */
- public function testDolMimeType()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- // file.png
- $result=dol_mimetype('file.png', '', 0);
- $this->assertEquals('image/png', $result);
- $result=dol_mimetype('file.png', '', 1);
- $this->assertEquals('png', $result);
- $result=dol_mimetype('file.png', '', 2);
- $this->assertEquals('image.png', $result);
- $result=dol_mimetype('file.png', '', 3);
- $this->assertEquals('', $result);
- // file.odt
- $result=dol_mimetype('file.odt', '', 0);
- $this->assertEquals('application/vnd.oasis.opendocument.text', $result);
- $result=dol_mimetype('file.odt', '', 1);
- $this->assertEquals('vnd.oasis.opendocument.text', $result);
- $result=dol_mimetype('file.odt', '', 2);
- $this->assertEquals('ooffice.png', $result);
- $result=dol_mimetype('file.odt', '', 3);
- $this->assertEquals('', $result);
- // file.php
- $result=dol_mimetype('file.php', '', 0);
- $this->assertEquals('text/plain', $result);
- $result=dol_mimetype('file.php', '', 1);
- $this->assertEquals('plain', $result);
- $result=dol_mimetype('file.php', '', 2);
- $this->assertEquals('php.png', $result);
- $result=dol_mimetype('file.php', '', 3);
- $this->assertEquals('php', $result);
- // file.php.noexe
- $result=dol_mimetype('file.php.noexe', '', 0);
- $this->assertEquals('text/plain', $result);
- }
- /**
- * testDolDeleteDir
- *
- * @return void
- */
- public function testDolDeleteDir()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $dirout=$conf->admin->dir_temp.'/test';
- $dirout2=$conf->admin->dir_temp.'/test2';
- $count=0;
- $result=dol_delete_dir_recursive($dirout, $count); // If it has no permission to delete, it will fails as if dir does not exists, so we can't test it
- print __METHOD__." result=".$result."\n";
- $this->assertGreaterThanOrEqual(0, $result);
- $count=0;
- $countdeleted=0;
- $result=dol_delete_dir_recursive($dirout, $count, 1, 0, $countdeleted); // If it has no permission to delete, it will fails as if dir does not exists, so we can't test it
- print __METHOD__." result=".$result."\n";
- $this->assertGreaterThanOrEqual(0, $result);
- $this->assertGreaterThanOrEqual(0, $countdeleted);
- dol_mkdir($dirout2);
- $count=0;
- $countdeleted=0;
- $result=dol_delete_dir_recursive($dirout2, $count, 1, 0, $countdeleted); // If it has no permission to delete, it will fails as if dir does not exists, so we can't test it
- print __METHOD__." result=".$result."\n";
- $this->assertGreaterThanOrEqual(1, $result);
- $this->assertGreaterThanOrEqual(1, $countdeleted);
- }
- /**
- * testDolCopyMoveDelete
- *
- * @return void
- */
- public function testDolCopyMoveDelete()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $file=dirname(__FILE__).'/Example_import_company_1.csv';
- $result=dol_copy($file, '/adir/that/does/not/exists/file.csv');
- print __METHOD__." result=".$result."\n";
- $this->assertLessThan(0, $result, 'copy dir that does not exists'); // We should have error
- $result=dol_copy($file, $conf->admin->dir_temp.'/file.csv', 0, 1);
- print __METHOD__." result=".$result."\n";
- $this->assertGreaterThanOrEqual(1, $result, 'copy file ('.$file.') into a dir that exists ('.$conf->admin->dir_temp.'/file.csv)'); // Should be 1
- // Again to test with overwriting=0
- $result=dol_copy($file, $conf->admin->dir_temp.'/file.csv', 0, 0);
- print __METHOD__." result=".$result."\n";
- $this->assertEquals(0, $result, 'copy destination already exists, no overwrite'); // Should be 0
- // Again to test with overwriting=1
- $result=dol_copy($file, $conf->admin->dir_temp.'/file.csv', 0, 1);
- print __METHOD__." result=".$result."\n";
- $this->assertGreaterThanOrEqual(1, $result, 'copy destination already exists, overwrite'); // Should be 1
- // To test a move that should work
- $result=dol_move($conf->admin->dir_temp.'/file.csv', $conf->admin->dir_temp.'/file2.csv', 0, 1);
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result, 'move with default mask');
- // To test a move that should work with forced mask
- $result=dol_move($conf->admin->dir_temp.'/file2.csv', $conf->admin->dir_temp.'/file3.csv', '0754', 1); // file should be rwxr-wr--
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result, 'move with forced mask');
- // To test a delete that should success
- $result=dol_delete_file($conf->admin->dir_temp.'/file3.csv');
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result, 'delete file');
- // Again to test there is error when deleting a non existing file with option disableglob
- $result=dol_delete_file($conf->admin->dir_temp.'/file3.csv', 1, 1);
- print __METHOD__." result=".$result."\n";
- $this->assertFalse($result, 'delete file that does not exists with disableglo must return ko');
- // Again to test there is no error when deleting a non existing file without option disableglob
- $result=dol_delete_file($conf->admin->dir_temp.'/file3csv', 0, 1);
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result, 'delete file that does not exists without disabling glob must return ok');
- // Test copy with special char / delete with blob
- $result=dol_copy($file, $conf->admin->dir_temp.'/file with [x] and é.csv', 0, 1);
- print __METHOD__." result=".$result."\n";
- $this->assertGreaterThanOrEqual(1, $result, 'copy file with special chars, overwrite'); // Should be 1
- // Try to delete using a glob criteria
- $result=dol_delete_file($conf->admin->dir_temp.'/file with [x]*é.csv');
- print __METHOD__." result=".$result."\n";
- $this->assertTrue($result, 'delete file using glob');
- }
- /**
- * testDolCompressUnCompress
- *
- * @return void
- */
- public function testDolCompressUnCompress()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- $format='zip';
- $filein=dirname(__FILE__).'/Example_import_company_1.csv';
- $fileout=$conf->admin->dir_temp.'/test.'.$format;
- $dirout=$conf->admin->dir_temp.'/test';
- dol_delete_file($fileout);
- $count=0;
- dol_delete_dir_recursive($dirout, $count, 1);
- $errorstring = '';
- dol_mkdir($conf->admin->dir_temp);
- $conf->global->MAIN_ENABLE_LOG_TO_HTML=1; $conf->syslog->enabled=1; $_REQUEST['logtohtml']=1;
- $conf->logbuffer=array();
- $result=dol_compress_file($filein, $fileout, $format, $errorstring);
- print __METHOD__." result=".$result."\n";
- print join(', ', $conf->logbuffer);
- $this->assertGreaterThanOrEqual(1, $result, "Pb with dol_compress_file on ".$filein." into ".$fileout." : ".$errorstring);
- $result=dol_uncompress($fileout, $dirout);
- print __METHOD__." result=".join(',', $result)."\n";
- $this->assertEquals(0, count($result), "Pb with dol_uncompress_file of file ".$fileout);
- }
- /**
- * testDolDirList
- *
- * @return void
- *
- * @depends testDolCompressUnCompress
- * The depends says test is run only if previous is ok
- */
- public function testDolDirList()
- {
- global $conf,$user,$langs,$db;
- // Scan dir to guaruante we on't have library jquery twice (we accept exception of duplicte into ckeditor because all dir is removed for debian package, so there is no duplicate).
- $founddirs=dol_dir_list(DOL_DOCUMENT_ROOT.'/includes/', 'files', 1, '^jquery\.js', array('ckeditor'));
- print __METHOD__." count(founddirs)=".count($founddirs)."\n";
- $this->assertEquals(1, count($founddirs));
- }
- /**
- * testDolCheckSecureAccessDocument
- *
- * @return void
- */
- public function testDolCheckSecureAccessDocument()
- {
- global $conf,$user,$langs,$db;
- $conf=$this->savconf;
- $user=$this->savuser;
- $langs=$this->savlangs;
- $db=$this->savdb;
- //$dummyuser=new User($db);
- //$result=restrictedArea($dummyuser,'societe');
- // We save user properties
- $savpermlire = $user->rights->facture->lire;
- $savpermcreer = $user->rights->facture->creer;
- // Check access to SPECIMEN
- $user->rights->facture->lire = 0;
- $user->rights->facture->creer = 0;
- $filename='SPECIMEN.pdf'; // Filename relative to module part
- $result=dol_check_secure_access_document('facture', $filename, 0, '', '', 'read');
- $this->assertEquals(1, $result['accessallowed']);
- // Check read permission
- $user->rights->facture->lire = 1;
- $user->rights->facture->creer = 1;
- $filename='FA010101/FA010101.pdf'; // Filename relative to module part
- $result=dol_check_secure_access_document('facture', $filename, 0, '', '', 'read');
- $this->assertEquals(1, $result['accessallowed']);
- $user->rights->facture->lire = 0;
- $user->rights->facture->creer = 0;
- $filename='FA010101/FA010101.pdf'; // Filename relative to module part
- $result=dol_check_secure_access_document('facture', $filename, 0, '', '', 'read');
- $this->assertEquals(0, $result['accessallowed']);
- // Check write permission
- $user->rights->facture->lire = 0;
- $user->rights->facture->creer = 0;
- $filename='FA010101/FA010101.pdf'; // Filename relative to module part
- $result=dol_check_secure_access_document('facture', $filename, 0, '', '', 'write');
- $this->assertEquals(0, $result['accessallowed']);
- $user->rights->facture->lire = 1;
- $user->rights->facture->creer = 1;
- $filename='FA010101/FA010101.pdf'; // Filename relative to module part
- $result=dol_check_secure_access_document('facture', $filename, 0, '', '', 'write');
- $this->assertEquals(1, $result['accessallowed']);
- $user->rights->facture->lire = 1;
- $user->rights->facture->creer = 0;
- $filename='FA010101/FA010101.pdf'; // Filename relative to module part
- $result=dol_check_secure_access_document('facture', $filename, 0, '', '', 'write');
- $this->assertEquals(0, $result['accessallowed']);
- // We restore user properties
- $user->rights->facture->lire = $savpermlire;
- $user->rights->facture->creer = $savpermcreer;
- }
- }
|