[Bps-public-commit] Prophet branch, master, updated. 7b57a8c61eddc1b0f9314d8d0c8c928eaff6fe12

[jesse]

The branch, master has been updated
       via  7b57a8c61eddc1b0f9314d8d0c8c928eaff6fe12 (commit)
       via  3d0040d537b59e304352b6560c31d46c7104b9ff (commit)
       via  4545806eff3ddd0c8e6c67d8b07ef0b7b009b525 (commit)
       via  5a4f13c110b70537ff4d98b7c3aa71e8e83805e6 (commit)
      from  401f51ce5d9ae5aa562506e4994316fb3bbc9007 (commit)

Summary of changes:
 Changes                          |    6 ++++++
 Makefile.PL                      |    5 +++--
 lib/Prophet.pm                   |   10 +++++++---
 lib/Prophet/CLI/Command/Merge.pm |    3 +--
 lib/Prophet/FilesystemReplica.pm |   12 ++++++++++--
 5 files changed, 27 insertions(+), 9 deletions(-)

- Log -----------------------------------------------------------------
commit 5a4f13c110b70537ff4d98b7c3aa71e8e83805e6
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Wed Aug 26 11:04:30 2009 -0400

    Small changes to improve performance on pull-over-http

diff --git a/lib/Prophet/CLI/Command/Merge.pm b/lib/Prophet/CLI/Command/Merge.pm
index 776b6d8..c1d44f3 100644
--- a/lib/Prophet/CLI/Command/Merge.pm
+++ b/lib/Prophet/CLI/Command/Merge.pm
@@ -100,7 +100,6 @@ Returns the number of changesets merged.
 sub _do_merge {
     my ($self) = @_;
 
-    my $source_latest = $self->source->latest_sequence_no() || 0;
     my $last_seen_from_source = $self->target->last_changeset_from_source( $self->source->uuid );
     my %import_args = (
         from  => $self->source,
@@ -140,7 +139,7 @@ sub _do_merge {
         );
 
     } else {
-
+		my $source_latest = $self->source->latest_sequence_no() || 0;
         if ( $self->has_arg('verbose') ) {
             print "Integrating changes from " . $last_seen_from_source . " to " . $source_latest . "\n";
             $import_args{reporting_callback} = sub {
diff --git a/lib/Prophet/FilesystemReplica.pm b/lib/Prophet/FilesystemReplica.pm
index 79f3588..1678af7 100644
--- a/lib/Prophet/FilesystemReplica.pm
+++ b/lib/Prophet/FilesystemReplica.pm
@@ -25,7 +25,7 @@ Returns false otherwise.
 
 sub replica_exists {
     my $self = shift;
-    return ( $self->_file_exists('replica-version')) ? 1 : 0;
+    return $self->uuid ? 1 : 0;
 }
 
 sub can_initialize {
@@ -173,10 +173,18 @@ sub traverse_changesets {
         $latest = $args{until};
     }
 
-    my $chgidx = $self->read_changeset_index;
+
+	#there's no need to iterate if we know there's nothing to read
+	return if ( $first_rev > $latest); 
+	
     $self->log_debug("Traversing changesets between $first_rev and $latest");
     my @range = ( $first_rev .. $latest );
     @range = reverse @range if $args{reverse};
+    
+	
+	my $chgidx = $self->read_changeset_index;
+
+
     for my $rev (@range) {
         $self->log_debug("Fetching changeset $rev");
 

commit 4545806eff3ddd0c8e6c67d8b07ef0b7b009b525
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Wed Aug 26 11:16:19 2009 -0400

    Changes file update

diff --git a/Changes b/Changes
index eaefebd..5575542 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,9 @@
+0.70 - 2009-08-26
+
+	* Performance improvements for pull-over-HTTP
+	* Small documentation, error message and warnings cleanups
+
+
 0.69_01 - 2009-08-21
 
 * Initial release

commit 3d0040d537b59e304352b6560c31d46c7104b9ff
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Wed Aug 26 11:19:48 2009 -0400

    Prose cleanup to Prophet.pm

diff --git a/lib/Prophet.pm b/lib/Prophet.pm
index 73e9d8f..e746f99 100644
--- a/lib/Prophet.pm
+++ b/lib/Prophet.pm
@@ -11,8 +11,9 @@ Prophet
 
 =head1 DESCRIPTION
 
-Prophet is a distributed database system designed for small to medium scale database applications (currently up to around 50,000 records of a given type).
-Our early targets include things such as bug tracking.
+Prophet is a distributed database system designed for small to medium
+scale social database applications.  Our early targets include things
+such as bug tracking.
 
 =head2 Design goals
 
@@ -30,7 +31,10 @@ Our early targets include things such as bug tracking.
 
 =head3 Scaling
 
-We don't currently intend for the first implementation of Prophet to scale to databases with millions of rows or hundreds of concurrent users. There's nothing that makes the design infeasible, but the infrastructure necessary for such a system will...needlessly hamstring it.
+We don't currently intend for the first implementation of Prophet to
+scale to databases with millions of rows or hundreds of concurrent
+users. There's nothing that makes the design infeasible, but the
+infrastructure necessary for such a system will...needlessly hamstring it.
 
 =cut
 

commit 7b57a8c61eddc1b0f9314d8d0c8c928eaff6fe12
Author: Jesse Vincent <jesse at bestpractical.com>
Date:   Wed Aug 26 11:20:16 2009 -0400

    Fix license (spang)++
    
    Don't install the old "prophet" cli tool

diff --git a/Makefile.PL b/Makefile.PL
index a004b6c..9b48b7d 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -2,8 +2,10 @@
 
 use inc::Module::Install;
 name('Prophet');    #  App::Settings App::Settings::CLI App::WebToy App::WebToy::CLI
+
 author('clkao and jesse');
-license('Perl');
+
+license('mit');
 requires('Exporter::Lite');
 requires('Params::Validate');
 requires('IPC::Run3');
@@ -58,7 +60,6 @@ feature 'Bonjour support' => -default => 0,
 
 tests('t/*.t t/*/t/*.t');
 all_from('lib/Prophet.pm');
-install_script('bin/prophet');
 install_share 'share';
 auto_install;
 WriteAll();

-----------------------------------------------------------------------