From 7421c3cce15c5712b2bfb76cd5dd857771e8b6b8 Mon Sep 17 00:00:00 2001
From: Andreas Gohr <andi@splitbrain.org>
Date: Thu, 11 May 2006 21:14:50 +0200
Subject: more info is gathered on metaupdate in background indexer

The background indexer now gathers info on contributors and modification
dates from the changelog when adding the missing meta info.

A new io_grep function was added which might be useful for other parts in
the Wiki as well.

darcs-hash:20060511191450-7ad00-baba1b48ea03b823c88a480862c612316f159b5a.gz
---
 inc/io.php | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)

(limited to 'inc/io.php')

diff --git a/inc/io.php b/inc/io.php
index ae1a3611c..a44e498a2 100644
--- a/inc/io.php
+++ b/inc/io.php
@@ -366,4 +366,45 @@ function io_runcmd($cmd){
   return $ret;
 }
 
+/**
+ * Search a file for matching lines
+ *
+ * This is probably not faster than file()+preg_grep() but less
+ * memory intensive because not the whole file needs to be loaded
+ * at once.
+ *
+ * @author Andreas Gohr <andi@splitbrain.org>
+ * @param  string $file    The file to search
+ * @param  string $pattern PCRE pattern
+ * @param  int    $max     How many lines to return (0 for all)
+ * @param  bool   $baxkref When true returns array with backreferences instead of lines
+ * @return matching lines or backref, false on error
+ */
+function io_grep($file,$pattern,$max=0,$backref=false){
+  $fh = @fopen($file,'r');
+  if(!$fh) return false;
+  $matches = array();
+
+  $cnt  = 0;
+  $line = '';
+  while (!feof($fh)) {
+    $line .= fgets($fh, 4096);  // read full line
+    if(substr($line,-1) != "\n") continue;
+
+    // check if line matches
+    if(preg_match($pattern,$line,$match)){
+      if($backref){
+        $matches[] = $match;
+      }else{
+        $matches[] = $line;
+      }
+      $cnt++;
+    }
+    if($max && $max == $cnt) break;
+    $line = '';
+  }
+  fclose($fh);
+  return $matches;
+}
+
 //Setup VIM: ex: et ts=2 enc=utf-8 :
-- 
cgit v1.2.3