Below is the list of changes that have just been committed into a local
5.1 repository of knielsen. When knielsen does a push these changes will
be propagated to the main repository and, within 24 hours after the
push, to the public repository.
For information on how to access the public repository
see http://dev.mysql.com/doc/mysql/en/installing-source-tree.html
ChangeSet
1.2190 06/06/08 16:39:08 knielsen@stripped +1 -0
Add trigger to prevent pushing from clones of the crashed 5.1 tree.
BitKeeper/triggers/pre-outgoing.crash-protect.pl
1.1 06/06/08 16:38:59 knielsen@stripped +114 -0
BitKeeper/triggers/pre-outgoing.crash-protect.pl
1.0 06/06/08 16:38:59 knielsen@stripped +0 -0
BitKeeper file /data0/bk/mysql-5.1/BitKeeper/triggers/pre-outgoing.crash-protect.pl
# This is a BitKeeper patch. What follows are the unified diffs for the
# set of deltas contained in the patch. The rest of the patch, the part
# that BitKeeper cares about, is below these diffs.
# User: knielsen
# Host: bk-internal.mysql.com
# Root: /data0/bk/mysql-5.1
--- New file ---
+++ BitKeeper/triggers/pre-outgoing.crash-protect.pl 06/06/08 16:38:59
#! /usr/bin/perl
use strict;
use warnings;
print "Checking for bad changesets from old crashed 5.1 tree...\n";
my @bad_csets=
( 'msvensson@shellback.(none)|ChangeSet|20060529142745|46985',
'msvensson@shellback.(none)|ChangeSet|20060529143332|33946',
'msvensson@shellback.(none)|ChangeSet|20060531083338|34492',
'mskold@stripped|ChangeSet|20060531133249|59726',
'msvensson@shellback.(none)|ChangeSet|20060531141906|46150',
'msvensson@shellback.(none)|ChangeSet|20060531142803|34535',
'msvensson@shellback.(none)|ChangeSet|20060531143208|29327',
'msvensson@shellback.(none)|ChangeSet|20060531201917|31727',
'msvensson@shellback.(none)|ChangeSet|20060531202140|30569',
'msvensson@shellback.(none)|ChangeSet|20060531210656|30302',
'msvensson@shellback.(none)|ChangeSet|20060531213650|30228',
'msvensson@stripped|ChangeSet|20060531220152|32024',
'mskold@stripped|ChangeSet|20060601064347|57850',
'jonas@stripped|ChangeSet|20060601065058|57665',
'jonas@stripped|ChangeSet|20060601065157|32046',
'msvensson@shellback.(none)|ChangeSet|20060601103235|30886',
'jonas@stripped|ChangeSet|20060601105712|57872',
'msvensson@shellback.(none)|ChangeSet|20060601113527|58530',
'elliot@stripped|ChangeSet|20060604134029|08076',
'elliot@stripped|ChangeSet|20060428201319|48501',
'msvensson@neptunus.(none)|ChangeSet|20060523093514|36516',
'elliot@stripped|ChangeSet|20060524130255|05714',
'iggy@stripped|ChangeSet|20060524133436|07673',
'msvensson@neptunus.(none)|ChangeSet|20060529111121|49878',
'msvensson@neptunus.(none)|ChangeSet|20060529111617|54251',
'msvensson@neptunus.(none)|ChangeSet|20060529130531|54248',
'msvensson@neptunus.(none)|ChangeSet|20060529130637|37471',
'iggy@stripped|ChangeSet|20060530122212|37016',
'tnurnberg@stripped|ChangeSet|20060531122731|36474',
'msvensson@shellback.(none)|ChangeSet|20060601103352|33933',
'cmiller@zippy.(none)|ChangeSet|20060601184744|61577',
'elliot@stripped|ChangeSet|20060604220244|04353',
'monty@stripped|ChangeSet|20060418090255|16983',
'monty@stripped|ChangeSet|20060418090458|02628',
'monty@stripped|ChangeSet|20060419084236|49576',
'monty@stripped|ChangeSet|20060503164655|51444',
'monty@stripped|ChangeSet|20060503225814|60133',
'monty@stripped|ChangeSet|20060504033006|54878',
'monty@stripped|ChangeSet|20060504130520|48660',
'monty@stripped|ChangeSet|20060504164102|03511',
'monty@stripped|ChangeSet|20060504193112|04109',
'monty@stripped|ChangeSet|20060505015314|02799',
'monty@stripped|ChangeSet|20060505084007|16704',
'monty@stripped|ChangeSet|20060505104008|16695',
'monty@stripped|ChangeSet|20060505171041|13924',
'monty@stripped|ChangeSet|20060508121933|13866',
'monty@stripped|ChangeSet|20060508160902|15029',
'monty@stripped|ChangeSet|20060509145448|38636',
'monty@stripped|ChangeSet|20060509224111|40037',
'monty@stripped|ChangeSet|20060510090758|40678',
'monty@stripped|ChangeSet|20060515164104|46760',
'monty@stripped|ChangeSet|20060530114549|35852',
'monty@stripped|ChangeSet|20060604155222|37062',
'monty@stripped|ChangeSet|20060604180522|19990',
'monty@stripped|ChangeSet|20060605031608|14088',
'monty@stripped|ChangeSet|20060605032828|23579',
'monty@stripped|ChangeSet|20060605033011|10641',
'monty@stripped|ChangeSet|20060605060652|09843',
'msvensson@neptunus.(none)|ChangeSet|20060605094744|10838',
'msvensson@neptunus.(none)|ChangeSet|20060605105746|11800',
'msvensson@neptunus.(none)|ChangeSet|20060605122345|12772',
'jmiller@stripped|ChangeSet|20060531210831|36442',
'jmiller@stripped|ChangeSet|20060602151941|36118',
'jmiller@stripped|ChangeSet|20060602152136|27762',
'jmiller@stripped|ChangeSet|20060605121748|12864',
'jmiller@stripped|ChangeSet|20060605160304|14798',
'jimw@stripped|ChangeSet|20060605210201|14667',
'igor@stripped|ChangeSet|20060605220727|15265',
'igor@stripped|ChangeSet|20060605221206|15134',
'stewart@stripped|ChangeSet|20060525073521|11169',
'stewart@stripped|ChangeSet|20060605154220|12975',
'stewart@stripped|ChangeSet|20060606040001|15337',
);
# Read the list of changesets.
my $csetlist = $ENV{BK_CSETLIST};
if(!defined($csetlist) || !open(FH, '<', $csetlist)) {
die "Failed to open list of incoming changesets '$csetlist': $!.\n";
}
my @csets = <FH>;
close FH;
# Reject any attempt to push/pull a bad changeset.
for my $cs (@csets) {
# Do this the raw way, don't want to be bitten by different EOL conventions
# on server and client (Unix/Windows/Mac).
$cs =~ s/\x0d?\x0a?$//s;
if(grep($_ eq $cs, @bad_csets)) {
print <<END;
BAD CHANGESET DETECTED! $ENV{BK_EVENT} REJECTED!
The changeset with key '$cs' was detected in the attempted push or pull.
This changeset is from the corrupt part of the crashed mysql-5.1-new tree.
Pushing or pulling this changeset would result in corruption of the new tree,
and therefore the operation has been rejected.
Contact Kristian Nielsen (knielsen\@mysql.com, IRC knielsen) if you have any
questions regarding this.
END
exit 1;
}
}
print "No bad changesets found, proceeding.\n";
exit 0;
| Thread |
|---|
| • bk commit into 5.1 tree (knielsen:1.2190) | knielsen | 8 Jun |