PHP网页编程之一组文件数据库函数
PHP成功的插入，删除，更新数据的时候，显然，你已经距离成功指日可待了。函数|数据|数据库 <?/**
* 文件数据库函数
* 商定：
* 数据库名为同项目录
* 数据表名后缀为 tab
* 索引文件后缀为 ind
* 办理文件名为 数据库同项目录/manage.ini
* 备注型字段以自力文件存在，表中保存文件名
* 字段以定长体例或csv体例保留，由办理文件指定
* 每行一笔记录
* 索引文件以二进制体例包存键值(定长)和偏移量(长整型)
*
** 函数列表(后面有：+ 为已完成，- 为局部完成，其他为还没有完成)
套用 MySQL 函数集 取名 FILE_DB
* file_affected_rows: 失掉 FILE_DB 最初操作影响的列数量。
*-file_close: 封闭 FILE_DB 办事器毗连。
* file_connect: 翻开 FILE_DB 办事器毗连。
*+file_create_db: 创立一个 FILE_DB 新数据库。
* file_data_seek: 挪动外部前往指针。
* file_db_query: 送查询字符串 (query) 到 FILE_DB 数据库。
* file_drop_db: 移除数据库。
* file_errno: 前往毛病信息代码。
* file_error: 前往毛病信息。
*+file_fetch_array: 前往数组材料。
* file_fetch_field: 获得字段信息。
* file_fetch_lengths: 前往单列各栏材料最大长度。
* file_fetch_object: 前往类材料。
*+file_fetch_row: 前往单列的各字段。
*+file_field_name: 前往指定字段的称号。
* file_field_seek: 设置装备摆设指针到前往值的某字段。
* file_field_table: 取得今朝字段的材料表 (table) 称号。
* file_field_type: 取得今朝字段的类型。
* file_field_flags: 取得今朝字段的标记。
* file_field_len: 取得今朝字段的长度。
* file_free_result: 释放前往占用内存。
* file_insert_id: 前往最初一次利用 INSERT 指令的 ID。
* file_list_fields: 列出指定材料表的字段 (field)。
* file_list_dbs: 列出 FILE_DB 办事器可用的数据库 (database)。
* file_list_tables: 列出指定命据库的材料表 (table)。
*+file_num_fields: 获得前往字段的数量。
*+file_num_rows: 获得前往列的数量。
* file_pconnect: 翻开 FILE_DB 办事器延续毗连。
*-file_query: 送出一个 query 字符串。
* file_result: 获得查询 (query) 的了局。
* file_select_db: 选择一个数据库。
* file_tablename: 获得材料表称号。
*/
/**
*
*
$cmp_key;
/** 保持至 FILE_DB 材料库
* @param 数据库名
*/
function &file_connect($dbname) {
$filename = $dbname."/manage.ini";
if(!file_exists($filename))
die("数据库:$dbnamee不存在");
$fp = fopen($filename,"r");
$s = fgets($fp,filesize($filename)+1);
fclose($fp);
$db = unserialize($s);
return $db;
}
/** 封闭 FILE_DB 保持
*
*/
function file_close(&$connection_id) {
unset($connection_id);
}
/** 创立 FILE_DB 数据库
* @param 数据库名
*/
function file_create_db($dbname) {
if(! @mkdir($dbname,0700))
$err = "目次已存在";
$filename = $dbname."/manage.ini";
$ar = "$dbname/";
$s = serialize($ar);
$fp = fopen($filename,"w");
fputs($fp,$s);
fclose($fp);
}
/** 履行 SQL 指令
*
*/
function file_query($query,&$connection_id,$_line = __LINE__) {
// 解析 $query
$query = eregi_replace("[ ]+"," ",$query);
$ar = split(" ",trim(str_replace(""," ",$query)));
$query = eregi_replace("\r?\n","",$query);
$ch = each($ar);
switch(strtoupper($ch)) {
case "CREATE":
if(! eregi("create table (.+) [(] *(.+)[)] *$",$query,$pp))
die("SQL表达式错,$_line");
$table = $pp;
if(empty($connection_id[$table])) {
// 解析字段表达式
$ar = split(",",$pp);
while(list($key,$value) = each($ar)) {
$str = split(" ",trim($value));
eregi("(+) (+) ?([(](+)[)])?(.+)?",$value,$pp);
$field = $pp;
$field = $pp;
$field = $pp;
$field = trim($pp);
$sss[] = $field;
}
$connection_id[$table] = array(
"fields" => $sss,
"filename" => $table.".tab",
"type" => "CSV"
);
}
$fp = fopen($connection_id."manage.ini","w");
fputs($fp,serialize($connection_id));
fclose($fp);
break;
case "SELECT":
if(! eregi("select (.+) from ([^ ]+) *(.+)*$",$query,$pp))
die("SQL表达式错,$_line");
// 解析SQL语句的掌握局部
$exte = $pp;
if(! eregi("where ",$exte))
$exte = "where true ".$exte;
if(! eregi("order ",$exte))
$exte .= "order by 0";
if(! eregi("group ",$exte))
$exte = eregi_replace("order ","group by _ order ",$exte);
eregi("where (.+) *group by (.+) order by (.+)",$exte,$regs);
$filter = trim($regs);
$group = trim($regs);
$order = trim($regs);
if($group == "_") $group = "";
if($order == "0") $order = "";
// 读取数据文件
if(empty($connection_id[$pp]))
die("表".$pp."不存在");
$table = $connection_id[$pp];
if(!file_exists($connection_id.$table)) {
// 数据表还没有创立
return false;
}else {
// 获得表界说字段名
for($i=0;$i<count($table);$i++)
$defaultfield[] = $table[$i];
$defaultfield = array_flip($defaultfield);
// 解析挑选表达式
if($filter != "true") {
$filter = eregi_replace(" and "," && ",$filter);
$filter = eregi_replace(" or "," || ",$filter);
$filter = eregi_replace("=","==",$filter);
$filter = eregi_replace("==>","=>",$filter);
$filter = eregi_replace("<==","<=",$filter);
$filter = eregi_replace("===","==",$filter);
while (ereg ('(*)', $filter, $regs)) {
$found = $regs;
$filter = eregi_replace("$found","[". $defaultfield][$found]."]", $filter);
}
$filter = eregi_replace("\[","\$tmp][",$filter);
$filter = "\$key=($filter);";
}else
$filter ="";
// 装入数据
$fp = fopen($connection_id].$table,"r");
$key = true;
while($tmp = fgetcsv($fp,4096,"`")) {
if(!empty($filter)) eval($filter);
if($key)
$temp[] = $tmp;
}
fclose($fp);
}
// 解析输入字段
$f = split(",",$pp);
$expr = "";
while(list($key,$value) = each($f)) {
if(eregi("(.+)[(](.+)[)]( as (.+))?",$value,$pp)) {
// 有函数
switch(strtoupper($pp)) {
case "COUNT":
if(empty($pp))
$n = "cnt";
else
$n = $pp;
$expr .= "\$rs[$n]=1;";
$sumname[] = $n;
break;
}
}else if(eregi("(.+) as (.+)",$value,$pp)) {
// 有重定名
$n = $defaultfield[$pp];
if(!isset($n)) die("字段名 $n 不法");
$expr .= "\$rs[$pp]=\$temp[\$i][$n];";
}else if($value == "*") {
for($i=0;$i<count($table);$i++) {
$value = $table[$i];
$expr .= "\$rs[$value]=\$temp[\$i][$i];";
}
}else {
$n = $defaultfield[$value];
if(!isset($n)) die("SQL error");
$expr .= "\$rs[$value]=\$temp[\$i][$n];";
}
}
// 获得输入字段列表
$i=0;
eval($expr);
$outfield = array_keys($rs);
// 解析分组
if($group) {
$groups = split(",",$group);
for($i=0;$i<count($groups);$i++)
if(eregi("+",$groups[$i])) {
$n = $groups[$i]>0?$groups[$i]-1:0;
$groups[$i] = $outfield[$n];
}
}
// 过录数据
for($i=0;$i<count($temp);$i++) {
eval($expr);
if(!$group)
$result[] = $rs;
else {
$n = $rs[$groups];
if($sumname) {
for($ii=0;$ii<count($sumname);$ii++)
$sumdata[$sumname][$ii]] = $result[$n][$sumname][$ii]];
$result[$n] = $rs;
for($ii=0;$ii<count($sumname);$ii++)
$result[$n][$sumname][$ii]] += $sumdata[$sumname][$ii]];
}else
$result[$n] = $rs;
}
}
unset($temp);
// 解析排序
if($order) {
global $cmp_key;
$orders = split(",",$order);
for($i=count($orders)-1;$i>=0;$i--) {
eregi("(+)?(*)? *(desc)?",$orders[$i],$regs);
if(!empty($regs)) {
$n = $regs-1;
if($n<0) $n = 0;
$cmp_key = $outfield[$n];
}else
$cmp_key = $regs;
if(empty($regs))
usort($result, cmp_asc);
else
usort($result, cmp_desc);
}
}
return $result;
break;
case "INSERT":
if(! eregi("insert into table (.+) [(](.+)[)] *values? *[(](.+)[)]",$query,$pp))
die("SQL表达式错,$_line");
if(empty($connection_id[$pp]))
die("表".$pp."不存在");
$table = $connection_id[$pp];
// 解析方针字段名
$f = split(",",$pp);
// 反省字段是不是正当
for($i=0;$i<count($f);$i++)
if(!array_scan($table,$f[$i],"name"))
die("字段名不法 ".$f[$i]);
// 依据表字段表机关数据数组
for($i=0;$i<count($table);$i++)
$data[$table][$i]] = "";
// 解析数据
eval("\$d=array($pp);");
// 填表
for($i=0;$i<count($f);$i++) {
$data[$f[$i]] = $d[$i];
}
$fp = fopen($connection_id.$table,"a");
fputs($fp,join("`",$data)."\n");
fclose($fp);
break;
case "UPDATE":
break;
default:
die("毛病的SQL指令,在".$_line."行");
}
}
/** file_fetch_row: 前往单列的各字段
*
*/
function file_fetch_row(&$result) {
$ar = each($result);
if(! $ar) return false;
while(list($k,$ch) = each($ar))
$br[] = $ch;
return $br;
}
/** file_fetch_array: 前往数组材料
*
*/
function file_fetch_array(&$result) {
$ar = each($result);
if(! $ar) return false;
while(list($k,$ch) = each($ar)) {
$br[] = $ch;
$br[$k] = $ch;
}
return $br;
}
/** file_field_name: 前往指定字段的称号
*
*/
function file_field_name(&$result,$n=0) {
$outfield = array_keys($result);
return $outfield[$n];
}
/** file_num_rows: 获得前往列的数量
*
*/
function file_num_rows(&$result) {
return count($result);
}
/** file_num_fields: 获得前往字段的数量
*
*/
function file_num_fields(&$result) {
return count($result);
}
/** 任务函数集
*/
/** 在数组中检索
* @param $ar 数组
* @param $val 待检索的值
* @param $key 键
*/
function array_scan($ar,$val,$key=0) {
for($i=0;$i<count($ar);$i++)
if($ar[$i][$key] == $val)
return true;
return false;
}
/** 排序用任务函数(降序 由usort()挪用)
*/
function cmp_desc($a,$b) {
global $cmp_key;
if ($a[$cmp_key] == $b[$cmp_key]) return 0;
return ($a[$cmp_key] > $b[$cmp_key]) ? -1 : 1;
}
/** 排序用任务函数(升序 由usort()挪用)
*/
function cmp_asc($a,$b) {
global $cmp_key;
if ($a[$cmp_key] == $b[$cmp_key]) return 0;
return ($a[$cmp_key] > $b[$cmp_key]) ? 1 : -1;
}
// 使用实例
file_create_db("test");
$conn = file_connect("test");
$s = "create table board (
sn int primary key auto_increment,
name varchar(15) not null,
email varchar(30),
ip varchar(15),
time datetime,
content tinyblob not null)";
file_query($s,$conn);
//file_query("insert into table board (sn,name,ip) value (15,'w,r,r,oi','$REMOTE_ADDR')",$conn);
//$rs = file_query("select * from board",$conn);
$rs = file_query("select * from board where true group by 2 order by 2 desc",$conn);
//$rs = file_query("select count(*) as js,time as hj,ip as pi,name,sn from board group by name order by sn desc",$conn);
//$rs = file_query("select sn,name,email,io from board where true group by 1 order by 2 desc",$conn);
file_close($conn);
echo "<table border = 1>";
echo "<tr>";
for($i=0;$i<file_num_fields($rs);$i++)
echo "<th>".file_field_name($rs,$i)."</th>";
echo "</tr>";
for($j=0;$j<file_num_rows($rs);$j++) {
echo "<tr>";
$d = file_fetch_row($rs);
for($i=0;$i<file_num_fields($rs);$i++)
echo "<td>".$d[$i]."</td>";
echo "</tr>";
}
echo "</table>";
?>
对于PHP的语法结构，刚开始真的很不习惯，真搞不懂为什么每个变量之前都要加个“$”符号，每个语句写完之后都必须加上“分号”来表示此句已经结束，还有，PHP对字母的大小写是敏感的，写的时候一定要注意大小写的区别。 当留言板完成的时候，下步可以把做1个单人的blog程序，做为目标， 说php的话，首先得提一下数组，开始的时候我是最烦数组的，总是被弄的晕头转向，不过后来呢，我觉得数组里php里最强大的存储方法，所以建议新手们要学好数组。 作为一个合格的coder 编码的规范是必须，命名方面我推崇“驼峰法”，另外就是自己写的代码最好要带注释，不然时间长了，就算是自己的代码估计看起来都费事，更不用说别人拉。 本人接触php时间不长，算是phper中的小菜鸟一只吧。由于刚开始学的时候没有名师指，碰过不少疙瘩，呗很多小问题卡过很久，白白浪费不少宝贵的时间，在次分享一些子的学习的心得。 作为一个合格的coder 编码的规范是必须，命名方面我推崇“驼峰法”，另外就是自己写的代码最好要带注释，不然时间长了，就算是自己的代码估计看起来都费事，更不用说别人拉。 说php的话，首先得提一下数组，开始的时候我是最烦数组的，总是被弄的晕头转向，不过后来呢，我觉得数组里php里最强大的存储方法，所以建议新手们要学好数组。 基础有没有对学习php没有太大区别，关键是兴趣。 写js我最烦的就是 ie 和 firefox下同样的代码 结果显示的结果千差万别，还是就是最好不要用遨游去调试，因为有时候遨游是禁用js的，有可能代码是争取结果被遨游折腾的认为是代码写错。 有位前辈曾经跟我说过，phper 至少要掌握200个函数 编起程序来才能顺畅点，那些不熟悉的函数记不住也要一拿手册就能找到。所以建议新手们没事就看看php的手册（至少array函数和string函数是要记牢的）。 首推的搜索引擎当然是Google大神，其次我比较喜欢 百度知道。不过搜出来的结果往往都是 大家copy来copy去的，运气的的概率很大。 有时候汉字的空格也能导致页面出错，所以在写代码的时候，要输入空格最好用引文模式。 先学习php和mysql,还有css(html语言很简单)我认为现在的效果比以前的方法好。 没接触过框架的人，也不用害怕，其实框架就是一种命名规范及插件，学会一个框架其余的框架都很好上手的。 ,熟悉html,能用div+css，还有javascript，优先考虑linux。我在开始学习的时候，就想把这些知识一起学习，我天真的认为同时学习能够互相呼应，因为知识是相通的。 ,熟悉html,能用div+css，还有javascript，优先考虑linux。我在开始学习的时候，就想把这些知识一起学习，我天真的认为同时学习能够互相呼应，因为知识是相通的。 刚开始安装php的时候，我图了个省事，把php的扩展全都打开啦（就是把php.ini 那一片 extension 前面的冒号全去掉啦），这样自然有好处，以后不用再需要什么功能再来打开。 爱上php，他也会爱上你。 学习php的目的往往是为了开发动态网站，phper就业的要求也涵盖了很多。我大致总结为：精通php和mysql php里的数组为空的时候是不能拿来遍历的；（这个有点低级啊，不过我刚被这个边界问题墨迹了好长一会）
页:
[1]