]>
src.bluestatic.org Git - viewsvn.git/blob - includes/cachev.php
2 /*=====================================================================*\
3 || ###################################################################
4 || # ViewSVN [#]version[#]
5 || # Copyright ©2002-[#]year[#] Iris Studios, Inc.
7 || # This program is free software; you can redistribute it and/or modify
8 || # it under the terms of the GNU General Public License as published by
9 || # the Free Software Foundation; version [#]gpl[#] of the License.
11 || # This program is distributed in the hope that it will be useful, but
12 || # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 || # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16 || # You should have received a copy of the GNU General Public License along
17 || # with this program; if not, write to the Free Software Foundation, Inc.,
18 || # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
19 || ###################################################################
20 \*=====================================================================*/
23 * File container for cacheV class
31 * This class is responsible for interacting with a given cacheV table.
32 * It controls rebuilding from scratch, updates, and querying the cache.
34 * @author Iris Studios, Inc.
35 * @copyright Copyright ©2002 - [#]year[#], Iris Studios, Inc.
47 var $controller = null ;
56 * Record count - the number of records in cacheV
62 * Memcache for all fetched revisions so we don't have to query-dupe
65 var $memcache = array ( 'revs' => array (), 'nodes' => array ());
67 // ###################################################################
69 * Constructor: initialies the registry
71 * @param object Controller
73 function cacheV (& $controller )
75 $this- > controller
=& $controller ;
79 // ###################################################################
81 * Sets the hash so we know what table we're dealing with
87 $this- > hash
= md5 ( $this- > controller
-> repospath
);
90 // ###################################################################
92 * Returns a node string that has the beginning and ending slashes
93 * removed to allow it to match to the _nodes cacheV table
97 * @param string Original string
99 * @return string Matchable string
101 function fetch_node_string ( $node )
103 return preg_replace ( '#(^/|/$)#' , '' , $node );
106 // ###################################################################
108 * Returns a specific log entry
112 * @param integer Revision number
114 * @return array Complete revision/commit entry
116 function fetch_revision ( $revision )
118 $revision = $this- > controller
-> registry
-> clean ( $revision , TYPE_UINT
);
120 if (! isset ( $this- > memcache
[ 'revs' ][ " $revision" ]))
122 $this- >memcache['revs'][" $revision" ] = $this- > controller
-> registry
-> db
-> query_first ( "SELECT * FROM {$this->hash} _revs " . ( $revision == 0 ? " ORDER BY revision DESC LIMIT 1" : "WHERE revision = $revision" ));
123 $this- >memcache['revs'][" $revision" ][ 'files' ] = unserialize ( $this- > memcache
[ 'revs' ][ " $revision" ]['files']);
126 return $this- >memcache['revs'][" $revision" ];
129 // ###################################################################
131 * Returns the revision entry before the specified one
135 * @param string Node path
136 * @param integer Revision number
138 * @return array Complete revision/commit entry
140 function fetch_prev_revision ( $node , $revision )
142 $data = $this- > fetch_node ( $node );
143 $data = $data [ 'history' ];
145 if ( count ( $data [ 'history' ]) < 1 )
147 return $this- > fetch_revision ( 0 );
150 unset ( $data [ max ( array_keys ( $data )) ]);
152 return $this- > fetch_revision ( max ( array_keys ( $data )));
155 // ###################################################################
157 * Fetches the latest revision for a given path
161 * @param string Node path
163 * @return integer Latest revision; FALSE if none (not in HEAD)
165 function fetch_node ( $node )
167 $node = $this- > fetch_node_string ( $node );
168 if (! isset ( $this- > memcache
[ 'nodes' ][ " $node" ]))
170 $result = $this- >controller->registry->db->query_first(" SELECT
* FROM {$this
-> hash
} _nodes WHERE name
= '" . $this- >controller->registry->escape( $node ) . "' ");
171 if ( $result == false)
176 $this- >memcache['nodes'][" $node" ] = $result ;
177 $this- > memcache
[ 'nodes' ][ " $node" ]['history'] = unserialize( $this- >memcache['nodes'][" $node" ][ 'history' ]);
180 return $this- > memcache
[ 'nodes' ][ " $node" ];
183 // ###################################################################
185 * Checks to see if a given node is a directory. Returns TRUE if so.
189 * @param string Node path
191 * @return bool TRUE if directory, FALSE if not
193 function isdir( $node )
195 $node = $this- >fetch_node( $node );
196 if ( $node ['node'] == 'dir')
204 // ###################################################################
206 * Checks to see if it's necessary to rebuild the cacheV table for the
207 * current repository. This is done by making sure $count > 0. If not,
208 * then rebuild() is run. This also checks against the cacheV table
209 * to make sure that it's up-to-date against the root repository.
213 function exec_build()
215 $result = $this- >controller->registry->db->query_first(" SELECT
MAX ( revision
) AS max FROM {$this
-> hash
} _revs
");
216 $this- >count = $result ['max'];
218 // time to go from the start
219 if ( $this- >count == 0)
225 // send an Xquery to SVN to see if we need to update
226 $query = $this- >controller->library->svn('info --xml ' . $this- >controller->repospath);
227 $query = implode(" \n
", $query );
229 $tree = $this- >controller->registry->xml->parse( $query );
231 if ( $tree ['info']['entry']['revision'] != $this- >count)
233 $this- >build( $this- >count);
238 // ###################################################################
240 * Builds the cacheV table. This can be used to build only part of the
241 * cache or the entire thing, if the revision is set to NULL.
245 * @param integer Lower (current) revision
247 function build( $revision )
249 $start = microtime();
252 $output = $this- >controller->registry->svn->svn('log --xml -v ' . ( $revision !== null ? '-r' . $revision . ':HEAD ' : '') . $this- >controller->registry->repos->fetch_path( $this- >controller->registry->paths->repos));
253 $output = implode(" \n
", $output );
254 $tree = $this- >controller->registry->xml->parse( $output );
257 $output = $this- >controller->registry->svn->svn('info --xml -R ' . ( $revision !== null ? '-r' . $revision . ':HEAD ' : '') . $this- >controller->registry->repos->fetch_path( $this- >controller->registry->paths->repos));
258 $output = implode(" \n
", $output );
259 $infolist = $this- >controller->registry->xml->parse( $output );
261 // other part of _nodes: properties
262 $output = $this- >controller->registry->svn->svn('proplist -v -R ' . ( $revision !== null ? ' -r' . $revision . ':HEAD ' : '') . $this- >controller->registry->repos->fetch_path( $this- >controller->registry->paths->repos));
263 foreach ( $output AS $line )
265 if (preg_match('#^Properties on \' (.*?) \' :$#', $line , $bits ))
267 $proplist [" $index" ][ " $curprop" ] = trim( $proplist [" $index" ][ " $curprop" ]);
268 $index = str_replace( $this- >controller->registry->repos->fetch_path( $this- >controller->registry->paths->repos), '', $bits [1]);
273 if (preg_match('#^\s+(.*)\s:\s(.*)#', $line , $matches ))
275 $curprop = $matches [1];
276 $proplist [" $index" ][ " $curprop" ] = $matches [2] . " \n
";
279 else if ( $capture == true)
281 $proplist [" $index" ][ " $curprop" ] .= $line . " \n
";
286 // construct _revs inserts and the list of add revisions
287 foreach ( $tree ['log']['logentry'] AS $log )
289 $this- >controller->registry->xml->unify_node( $log ['paths']['path']);
291 $inserts ['revs'][] = " ( $log [ revision
], ' {$log['author']['value']} ' , ' {$log['date']['value']} ' , '" . $this- >controller->registry->escape( $log [' msg
'][' value
']) . "' , '" . $this- >controller->registry->escape(serialize( $log [' paths
'][' path
'])) . "' ) ";
293 foreach ( $log ['paths']['path'] AS $path )
295 if (trim( $path ['action']) == 'A')
297 $path ['value'] = preg_replace('#^/#', '', $path ['value']);
298 $addlist [" $path [ value
] "] = $log ['revision'];
303 // construct list of HEAD nodes for _nodes
304 foreach ( $infolist ['info']['entry'] AS $node )
306 $history = $this- >controller->registry->svn->svn('log --xml ' . $node ['url']['value']);
307 $history = implode(" \n
", $history );
308 $history = $this- >controller->registry->xml->parse( $history );
312 foreach ( $history ['log']['logentry'] AS $log )
314 $loglist [" $log [ revision
] "] = array(
315 'revision' => $log ['revision'],
316 'author' => $log ['author']['value'],
317 'date' => $log ['date']['value'],
318 'message' => $log ['msg']['value']
322 $inserts ['nodes'][] = " ( ' $node [path]' , '" . $node [' kind
'] . "' , " . $node ['commit']['revision'] . " , '" . $this- >controller->registry->escape(serialize( $loglist )) . "' , '" . $this- >controller->registry->escape(serialize( $proplist [" $node [path]"])) . "' ) ";
326 $this- >controller->registry->db->query("
327 REPLACE INTO {$this
-> hash
} _revs
328 ( revision
, author
, dateline
, message
, files
)
330 " . implode(" ,\n ", $inserts ['revs'])
334 $this- >controller->registry->db->query("
335 REPLACE INTO {$this
-> hash
} _nodes
336 ( name
, node
, revision
, history
, properties
)
338 " . implode(" ,\n ", $inserts ['nodes'])
341 $this- >controller->registry->debug(" TIME
TO ( RE
) BUILD
: " . $this- >controller->registry->funct->fetch_microtime_diff( $start ));
345 /*=====================================================================*\
346 || ###################################################################
349 || ###################################################################
350 \*=====================================================================*/