]>
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 ;
57 * Record count - the number of records in cacheV
64 * Memcache for all fetched revisions so we don't have to query-dupe
68 var $memcache = array ( 'revs' => array (), 'nodes' => array ());
70 // ###################################################################
72 * Constructor: initialies the registry
74 * @param object Controller
76 function cacheV (& $controller )
78 $this- > controller
=& $controller ;
82 // ###################################################################
84 * Sets the hash so we know what table we're dealing with
90 $this- > hash
= md5 ( $this- > controller
-> repospath
);
91 $this- > controller
-> registry
-> debug ( "hash: $this- >hash" );
94 // ###################################################################
96 * Returns a node string that has the beginning and ending slashes
97 * removed to allow it to match to the _nodes cacheV table
101 * @param string Original string
103 * @return string Matchable string
105 function fetch_node_string ( $node )
107 trigger_error ( 'You shouldn \' t be calling fetch_node_string. It \' s evil.' , E_USER_WARNING
);
108 return preg_replace ( '#(^/|/$)#' , '' , $node );
111 // ###################################################################
113 * Returns a specific log entry
117 * @param integer Revision number
119 * @return array Complete revision/commit entry
121 function fetch_revision ( $revision )
123 $revision = $this- > controller
-> registry
-> clean ( $revision , TYPE_UINT
);
125 if (! isset ( $this- > memcache
[ 'revs' ][ " $revision" ]))
127 $this- >memcache['revs'][" $revision" ] = $this- > controller
-> registry
-> db
-> query_first ( "SELECT * FROM c {$this->hash} _revs " . ( $revision == 0 ? " ORDER BY revision DESC LIMIT 1" : "WHERE revision = $revision" ));
128 $this- >memcache['revs'][" $revision" ][ 'files' ] = unserialize ( $this- > memcache
[ 'revs' ][ " $revision" ]['files']);
131 return $this- >memcache['revs'][" $revision" ];
134 // ###################################################################
136 * Returns the revision entry before the specified one
140 * @param integer Revision number
142 * @return array Complete revision/commit entry
144 function fetch_prev_revision ( $revision )
146 $data = $this- > fetch_node ();
147 $data = $data [ 'history' ];
148 if ( sizeof ( $data ) < 1 )
150 return $this- > fetch_revision ( 0 );
153 $list = array_keys ( $data );
154 $key = array_search ( $revision , $list );
156 if ( $revision == 'HEAD' )
161 $key ++
; // go to the next earliest revision
162 if (! isset ( $list [ " $key" ]))
167 return $this- >fetch_revision( $list [" $key" ]);
170 // ###################################################################
172 * Returns the latest revision that the file is at
176 * @return integer HEAD revision
178 function fetch_head_revision ()
180 $data = $this- > fetch_node ();
181 $data = $data [ 'history' ];
185 return max ( array_keys ( $data ));
193 // ###################################################################
195 * Returns the revision entry that it's in context with the node. For
196 * instance, if the version 50 was passed and this node only has 48 as
197 * it's max, 48 will be returned.
201 * @param integer Target revision
203 * @return integer Contextual revision
205 function fetch_revision_context ( $target )
207 $data = $this- > fetch_node ();
208 $data = $data [ 'history' ];
210 if ( $target == 'HEAD' )
212 $target = $this- > fetch_head_revision ();
215 if ( isset ( $data [ " $target" ]))
217 return $this- >fetch_revision( $target );
222 $keys = array_keys( $data );
230 foreach ( $keys AS $id => $revnum )
232 if ( $target > $revnum )
240 else if ( $target < $revnum )
250 return $this- >fetch_revision( $rev );
253 // ###################################################################
255 * Fetches the latest revision for a given path
259 * @return integer Latest revision; FALSE if none (not in HEAD)
261 function fetch_node()
263 $node = $this- >controller->path;
264 if (!isset( $this- >memcache['nodes'][" $node" ]))
266 $result = $this- > controller
-> registry
-> db
-> query_first ( "SELECT * FROM c {$this->hash} _nodes WHERE name = '" . $this- > controller
-> registry
-> escape ( $node ) . "'" );
267 if ( $result == false )
272 $this- > memcache
[ 'nodes' ][ " $node" ] = $result ;
273 $this- >memcache['nodes'][" $node" ][ 'history' ] = unserialize ( $this- > memcache
[ 'nodes' ][ " $node" ]['history']);
274 $this- >memcache['nodes'][" $node" ][ 'properties' ] = unserialize ( $this- > memcache
[ 'nodes' ][ " $node" ]['properties']);
277 return $this- >memcache['nodes'][" $node" ];
280 // ###################################################################
282 * Checks to see if a given node is a directory. Returns TRUE if so.
286 * @return bool TRUE if directory, FALSE if not
290 $node = $this- > fetch_node ();
291 if ( $node [ 'node' ] == 'dir' )
299 // ###################################################################
301 * Checks to see if it's necessary to rebuild the cacheV table for the
302 * current repository. This is done by making sure $count > 0. If not,
303 * then rebuild() is run. This also checks against the cacheV table
304 * to make sure that it's up-to-date against the root repository.
308 * @return bool Whether or not any part of the cache was (re-)built
310 function exec_build ()
312 $result = $this- > controller
-> registry
-> db
-> query_first ( "SELECT MAX(revision) AS max FROM c {$this->hash} _revs" );
313 $this- > count
= $result [ 'max' ];
315 // time to go from the start
316 if ( $this- > count
== 0 )
322 // send an Xquery to SVN to see if we need to update
323 $query = $this- > controller
-> library
-> svn ( 'info --xml ' . $this- > controller
-> repospath
);
324 $query = implode ( " \n " , $query );
326 $tree = $this- > controller
-> registry
-> xml
-> parse ( $query );
328 if ( $tree [ 'info' ][ 'entry' ][ 'revision' ] != $this- > count
)
330 $this- > build ( $this- > count
);
338 // ###################################################################
340 * Builds the cacheV table. This can be used to build only part of the
341 * cache or the entire thing, if the revision is set to NULL.
345 * @param integer Lower (current) revision
346 * @param bool Use separate and individual queries for inserting?
348 function build ( $revision , $seps = false )
350 $start = microtime ();
353 $output = $this- > controller
-> library
-> svn ( 'log --xml -v ' . ( $revision !== null ? '-r' . $revision . ':HEAD ' : '' ) . $this- > controller
-> repospath
);
354 $output = implode ( " \n " , $output );
355 $tree = $this- > controller
-> registry
-> xml
-> parse ( $output );
357 // construct _revs inserts and the list of add revisions
358 foreach ( $tree [ 'log' ][ 'logentry' ] AS $log )
360 XML
:: unify_node ( $log [ 'paths' ][ 'path' ]);
362 $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' ])) . "')" ;
364 foreach ( $log [ 'paths' ][ 'path' ] AS $path )
366 if ( trim ( $path [ 'action' ]) == 'A' )
368 $path [ 'value' ] = preg_replace ( '#^/#' , '' , $path [ 'value' ]);
369 $addlist [ " $path [value]" ] = $log [ 'revision' ];
372 $filelist [] = $this- > controller
-> repospath
. $path [ 'value' ] . '@' . $log [ 'revision' ];
376 $newfilelist = array ();
377 foreach ( $filelist AS $item )
383 $output = $this- > controller
-> library
-> svn ( 'info --xml ' . implode ( ' ' , $filelist ));
384 $output = implode ( " \n " , $output );
385 $infolist = $this- > controller
-> registry
-> xml
-> parse ( $output );
387 // other part of _nodes: properties
388 $output = $this- > controller
-> library
-> svn ( 'proplist -v ' . implode ( ' ' , $filelist ));
390 foreach ( $output AS $line )
392 if ( preg_match ( '#^Properties on \' (.*?) \' :$#' , $line , $bits ))
396 $proplist [ " $index" ][" $curprop" ] = trim ( $proplist [ " $index" ][" $curprop" ]);
400 $index = str_replace ( $this- > controller
-> repospath
, '' , $bits [ 1 ]);
401 $index = ( $index == '' ? '/' : $index );
406 if ( preg_match ( '#^\s+(.*)\s:\s(.*)#' , $line , $matches ))
408 $curprop = $matches [ 1 ];
409 $proplist [ " $index" ][" $curprop" ] = $matches [ 2 ] . " \n " ;
412 else if ( $capture == true )
414 $proplist [ " $index" ][" $curprop" ] .= $line . " \n " ;
419 XML
:: unify_node ( $infolist [ 'info' ][ 'entry' ]);
423 // construct list of HEAD nodes for _nodes
424 foreach ( $infolist [ 'info' ][ 'entry' ] AS $node )
426 $history = $this- > controller
-> library
-> svn ( 'log --xml ' . $node [ 'url' ][ 'value' ]);
427 $history = implode ( " \n " , $history );
428 $history = $this- > controller
-> registry
-> xml
-> parse ( $history );
432 foreach ( $history [ 'log' ][ 'logentry' ] AS $log )
434 // WHY THE HELL DOES THIS GET HIT ON REBUILDS?
441 $loglist [ " $log [revision]" ] = array (
442 'revision' => $log [ 'revision' ],
443 'author' => $log [ 'author' ][ 'value' ], // why does PHP5 hate this?
444 'date' => $log [ 'date' ][ 'value' ],
445 'message' => $log [ 'msg' ][ 'value' ]
449 $path = str_replace ( $this- > controller
-> repospath
, '' , $node [ 'url' ][ 'value' ]);
450 $path = ( $path == '' ? '/' : $path );
452 $nodesat [ " $path" ][ $node ['commit']['revision'] ] = $nodeindex ;
453 $max = max(array_keys( $nodesat [" $path" ]));
454 if ( $max < $node [ 'commit' ][ 'revision' ])
458 else if ( $max >= $node [ 'commit' ][ 'revision' ])
460 foreach ( $nodesat [ " $path" ] AS $rev => $ind )
462 if ( $rev != $node ['commit']['revision'])
464 unset( $inserts ['nodes'][ $nodesat [" $path" ][ " $rev" ] ]);
469 $inserts ['nodes'][" $nodeindex" ] = "(' $path' , '" . $node [ 'kind' ] . "', " . $node [ 'commit' ][ 'revision' ] . ", '" . $this- > controller
-> registry
-> escape ( serialize ( $loglist )) . "', '" . $this- > controller
-> registry
-> escape ( serialize ( $proplist [ " $path" ])) . " ')";
478 REPLACE INTO c {$this->hash} _revs
479 (revision, author, dateline, message, files)
481 " . implode(", \n ", $inserts [' revs
'])
486 REPLACE INTO c {$this->hash} _nodes
487 (name, node, revision, history, properties)
489 " . implode(", \n ", $inserts [' nodes
'])
495 foreach ( $inserts [' revs
'] AS $insert )
497 $this- >controller->registry->db->query("
498 REPLACE INTO c {$this->hash} _revs
499 (revision, author, dateline, message, files)
506 foreach ( $inserts [' nodes
'] AS $insert )
508 $this- >controller->registry->db->query("
509 REPLACE INTO c {$this->hash} _nodes
510 (name, node, revision, history, properties)
517 $this- >controller->registry->debug("TIME TO (RE)BUILD: " . $this- >controller->registry->funct->fetch_microtime_diff( $start ));
521 /*=====================================================================*\
522 || ###################################################################
525 || ###################################################################
526 \*=====================================================================*/