Viewing File: /opt/alt/tests/alt-php80-pecl-dbase_7.1.1-1.el8/tests/002.phpt

--TEST--
dbase_open() tests
--SKIPIF--
<?php if (!extension_loaded("dbase")) print "skip"; ?>
--FILE--
<?php

$file = dirname(__FILE__)."/002.dbf";
@unlink($file);

$fp = fopen($file, "w");
fclose($fp);

var_dump(dbase_open($file, -1));
var_dump(dbase_open($file, 1000));
var_dump(dbase_open($file, DBASE_RDONLY));
var_dump(dbase_open($file."nonex", DBASE_RDONLY));
var_dump(dbase_open("", DBASE_RDONLY));

@unlink($file);

$def = array(
  array("date",    "D"),
  array("name",    "C",  50),
  array("age",      "N",  3, 0),
  array("email",    "C", 128),
  array("ismember", "L")
);

var_dump(dbase_create($file, $def));
var_dump(dbase_open($file, DBASE_RDONLY));

@unlink($file);

echo "Done\n";
?>
--EXPECTF--
Warning: dbase_open(): Invalid access mode -1 in %s on line %d
bool(false)

Warning: dbase_open(): Invalid access mode 1000 in %s on line %d
bool(false)

Warning: dbase_open(): unable to open database %s in %s on line %d
bool(false)

Warning: dbase_open(): unable to open database %s in %s on line %d
bool(false)

Warning: dbase_open(): The filename cannot be empty. in %s on line %d
bool(false)
resource(%d) of type (dbase)
resource(%d) of type (dbase)
Done
--CLEAN--
<?php
$file = dirname(__FILE__)."/002.dbf";

unlink($file);
?>