Return to developers.pl CVS log

Up to [Development] / xfs-cmds / xfsmisc

Add script to extract our ptools mods into a git repository.
Merge of master-melb:xfs-cmds:22928a by kenmcd.

package developers;
use strict;

# Username to real name mapping for people who are to blame^W^W
# checking XFS mods into the xfs-kern/xfs-cmds/dmapi ptools trees.
my %names = (
	'arunr',	'Arun Ramakrishnan',
	'alkirkco',	'Mandy Kirkconnell',
	'cattelan',	'Russell Cattelan',
	'dgc',		'David Chinner',
	'felixb',	'Felix Blyakher',
	'gnb',		'Greg Banks',
	'gwehrman',	'Geoffrey Wehrman',
	'hch',		'Christoph Hellwig',
	'jpk',		'John Keller',
	'kfr',		'Kevan Rehm',
	'nathans',	'Nathan Scott',
	'nstraz',	'Nate Straz',
	'overby',	'Glen Overby',
	'roehrich',	'Dean Roehrich',
	'sandeen',	'Eric Sandeen',
	'tes',		'Tim Shimmin',
	'wkendall',	'Bill Kendall',
);

sub developer_check {
	my $username = shift @_;
	if (!defined($names{$username})) {
		die "unknown developer: $username";
	}
}

sub developer {
	my $username = shift @_;
	developer_check($username);
	$names{$username} . ' <' . $username. '@sgi.com>';
}

sub developer_name {
	my $username = shift @_;
	developer_check($username);
	$names{$username};
}

sub developer_email {
	my $username = shift @_;
	developer_check($username);
	$username . '@sgi.com';
}

1;