{"header":{"message":"hydra: added some user admin","description":null,"timestamp":"2010-12-03T09:40:25Z","authors":[{"email":"rob.vermaas@gmail.com","name":"Rob Vermaas"}]},"hash":"SZYDW2DG5Z7BR3ICKWDXVUNSMCDSXMYZUB6FQ4W2B2FVZJD6PULQC","authors":[],"deps":{"hashes":[["SZYDW2DG5Z7BR3ICKWDXVUNSMCDSXMYZUB6FQ4W2B2FVZJD6PULQC","hydra: added some user admin"],["AA",null],["MVB7RRLTOLZALMUVUNSCMXDB76QLICJAV2GYQQZO7E6S327LHMSQC","* Move NARs from the NixChannel controller to the Root controller and"],["6XJH4OFLFN6PC5FXKMHSPQQVT5DKWFUWO43HMQ7BDM454ZDMD5VQC","add datetime to deps"],["SMCOU72FKTPFNCDXFJAILVUWFE4DY33CJJE4436H5POKENFFDFFAC","hydra: add some admin for adding/enabling/etc build machines"],["SHBLLAVHMMHOPCJ5NPGDZQPVRAMPMGXSFEMX7H7BETW6GTRGUUBAC","* More global substitution."],["FPK5LF53CFUEKFYJ3IYXT4UTVC6IITWJOCFATMC4PLHEUP5SIEAAC","* Put the project-related actions in a separate controller. Put the"],["2GK5DOU7ODF4WBSN3QTD3WIO52VTL2LOAXKGCDEMMAQPTEO4A4HAC","* Downloading closures."],["SMM4HQTPAY45254O7GQOJVLHP5LZ6BXDKGNE7IKUJHB5XKH244ZAC","* Put actions related to builds under /build (e.g. /log/"],["5NO7NCKTMM5ZW7JYOETUFOSWK2ACTXWDZGJAFXZN6L3OF6BFTNOQC","* Refactoring."],["J5UVLXOK6EDIL5I7VKWH4V2QDS4DPD7FHRK6XBWSXFRQS4JKXFZQC","* Start of a basic Catalyst web interface."],["LBNVQXUBEZ45SOTGVXK5UEZXIAIZTJLWZNUYFI4JZ6J65N3KPDVQC","* Build the /build stuff in a separate controller."],["2JQ7WEFMU5IPCUKLGRLVVT4MYMKVHJDZVMOOOPL6K5RLEZ532LGQC",""],["SAFVRDTKKD25U6VW5IVNUILLLXNQXFU72XARYC6NRVXU6MJEW2WAC","* Put Hydra's dependencies so that they can easily be installed in a"],["DO432JDJH2NWZC6AMN7PG6WYD2Y26U6O54GDMBEVBQTZEVNKBN5QC","* Build Hydra with the Nix Perl bindings."],["ZWCTAZGLJZQNTYWTC2XQUKMILJF6JGDL5IND6QNYWK4FIGMLRFXAC","added newsitems, added some admin options to clear various caches."],["D5QIOJGPKQJIYBUCSC3MFJ3TXLPNZ2XMI37GXMFRVRFWWR2VMTFAC","* Move everything up one directory."],["ODNCGFQ5FPKFI624BVMLW7PJ2EFJOR3TY66OCZM42UNNTWBCF2TQC","* Improved the navigation bar: don't include all projects (since that"]],"deps":["MVB7RRLTOLZALMUVUNSCMXDB76QLICJAV2GYQQZO7E6S327LHMSQC","6XJH4OFLFN6PC5FXKMHSPQQVT5DKWFUWO43HMQ7BDM454ZDMD5VQC","SMCOU72FKTPFNCDXFJAILVUWFE4DY33CJJE4436H5POKENFFDFFAC"],"known":["J5UVLXOK6EDIL5I7VKWH4V2QDS4DPD7FHRK6XBWSXFRQS4JKXFZQC","2GK5DOU7ODF4WBSN3QTD3WIO52VTL2LOAXKGCDEMMAQPTEO4A4HAC","SHBLLAVHMMHOPCJ5NPGDZQPVRAMPMGXSFEMX7H7BETW6GTRGUUBAC","SMM4HQTPAY45254O7GQOJVLHP5LZ6BXDKGNE7IKUJHB5XKH244ZAC","LBNVQXUBEZ45SOTGVXK5UEZXIAIZTJLWZNUYFI4JZ6J65N3KPDVQC","5NO7NCKTMM5ZW7JYOETUFOSWK2ACTXWDZGJAFXZN6L3OF6BFTNOQC","2JQ7WEFMU5IPCUKLGRLVVT4MYMKVHJDZVMOOOPL6K5RLEZ532LGQC","FPK5LF53CFUEKFYJ3IYXT4UTVC6IITWJOCFATMC4PLHEUP5SIEAAC"]},"hunks":[{"Edit":{"inode":{"change":14,"pos":1},"path":"deps.nix","line":40,"atom":{"NewVertex":{"up_context":[{"change":3,"pos":24}],"down_context":[{"change":15,"pos":327}],"flag":"BLOCK","start":0,"end":57,"inode":{"change":14,"pos":1}}},"contents":[{"Add":" perlPackages.DigestSHA1"},{"Add":" perlPackages.CryptRandPasswd"}]}},{"Edit":{"inode":{"change":16,"pos":1},"path":"src/lib/Hydra/Controller/Admin.pm","line":10,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":25}],"down_context":[{"change":4,"pos":25}],"flag":"BLOCK","start":58,"end":232,"inode":{"change":16,"pos":1}}},"contents":[{"Add":"use Digest::SHA1 qw(sha1_hex);"},{"Add":"use Crypt::RandPasswd;"},{"Add":"use Sys::Hostname::Long;"},{"Add":"use Email::Simple;"},{"Add":"use Email::Sender::Simple qw(sendmail);"},{"Add":"use Email::Sender::Transport::SMTP;"}]}},{"Edit":{"inode":{"change":16,"pos":1},"path":"src/lib/Hydra/Controller/Admin.pm","line":65,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":1491}],"down_context":[{"change":4,"pos":1491}],"flag":"BLOCK","start":233,"end":1585,"inode":{"change":16,"pos":1}}},"contents":[{"Add":" "},{"Add":"sub updateUser {"},{"Add":" my ($c, $user) = @_;"},{"Add":""},{"Add":" my $username = trim $c->request->params->{\"username\"};"},{"Add":" my $fullname = trim $c->request->params->{\"fullname\"};"},{"Add":" my $emailaddress = trim $c->request->params->{\"emailaddress\"};"},{"Add":" my $emailonerror = trim $c->request->params->{\"emailonerror\"};"},{"Add":" my $roles = $c->request->params->{\"roles\"} ; "},{"Add":" "},{"Add":" error($c, \"Invalid or empty username.\") if $username eq \"\";"},{"Add":" "},{"Add":" $user->update("},{"Add":" { username => $username"},{"Add":" , maxconcurrent => $fullname"},{"Add":" , emailaddress => $emailaddress"},{"Add":" , emailonerror => $emailonerror"},{"Add":" });"},{"Add":" $user->userroles->delete_all;"},{"Add":" if(ref($roles) eq 'ARRAY') {"},{"Add":" for my $s (@$roles) {"},{"Add":" $user->userroles->create({ role => $s}) ;"},{"Add":" } "},{"Add":" } else {"},{"Add":" $user->userroles->create({ role => $roles}) ;"},{"Add":" } "},{"Add":"}"},{"Add":""},{"Add":"sub user : Chained('admin') PathPart('user') CaptureArgs(1) {"},{"Add":" my ($self, $c, $username) = @_;"},{"Add":""},{"Add":" requireAdmin($c);"},{"Add":""},{"Add":" my $user = $c->model('DB::Users')->find($username)"},{"Add":" or notFound($c, \"User $username doesn't exist.\");"},{"Add":""},{"Add":" $c->stash->{user} = $user;"},{"Add":"}"},{"Add":""},{"Add":"sub users : Chained('admin') PathPart('users') Args(0) {"},{"Add":" my ($self, $c) = @_;"},{"Add":" $c->stash->{users} = [$c->model('DB::Users')->search({}, {order_by => \"username\"})];"},{"Add":""},{"Add":" $c->stash->{template} = 'users.tt';"},{"Add":"}"}]}},{"Edit":{"inode":{"change":16,"pos":1},"path":"src/lib/Hydra/Controller/Admin.pm","line":111,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":1492}],"down_context":[{"change":4,"pos":1492}],"flag":"BLOCK","start":1586,"end":3009,"inode":{"change":16,"pos":1}}},"contents":[{"Add":"sub user_edit : Chained('user') PathPart('edit') Args(0) {"},{"Add":" my ($self, $c) = @_;"},{"Add":""},{"Add":" $c->stash->{template} = 'user.tt';"},{"Add":" $c->stash->{edit} = 1;"},{"Add":"}"},{"Add":""},{"Add":"sub user_edit_submit : Chained('user') PathPart('submit') Args(0) {"},{"Add":" my ($self, $c) = @_;"},{"Add":" requirePost($c);"},{"Add":""},{"Add":" txn_do($c->model('DB')->schema, sub {"},{"Add":" updateUser($c, $c->stash->{user}) ;"},{"Add":" });"},{"Add":" $c->res->redirect(\"/admin/users\");"},{"Add":"}"},{"Add":""},{"Add":"sub sendemail {"},{"Add":" my ($to, $subject, $body) = @_; "},{"Add":" "},{"Add":" my $url = hostname_long;"},{"Add":" my $sender = ($ENV{'USER'} || \"hydra\") . \"@\" . $url;"},{"Add":" "},{"Add":" my $email = Email::Simple->create("},{"Add":" header => ["},{"Add":" To => $to,"},{"Add":" From => \"Hydra <$sender>\","},{"Add":" Subject => $subject"},{"Add":" ],"},{"Add":" body => $body"},{"Add":" );"},{"Add":""},{"Add":" sendmail($email);"},{"Add":"}"},{"Add":""},{"Add":"sub reset_password : Chained('user') PathPart('reset-password') Args(0) {"},{"Add":" my ($self, $c) = @_;"},{"Add":""},{"Add":" # generate password"},{"Add":" my $password = Crypt::RandPasswd->word(8,10);"},{"Add":" "},{"Add":" # calculate hash"},{"Add":" my $hashed = sha1_hex($password);"},{"Add":""},{"Add":" $c->stash->{user}-> update({ password => $hashed}) ;"},{"Add":""},{"Add":" # send email"},{"Add":""},{"Add":" sendemail("},{"Add":" $c->user->emailaddress, "},{"Add":" \"New password for Hydra\","},{"Add":" \"Hi,\\n\\n\"."},{"Add":" \"Your password has been reset. Your new password is '$password'.\\n\"."},{"Add":" \"You can change your password at http://\".hostname_long.\" .\\n\"."},{"Add":" \"With regards, Hydra\\n\""},{"Add":" );"},{"Add":""},{"Add":" $c->res->redirect(\"/admin/users\");"},{"Add":"}"},{"Add":""}]}},{"Replacement":{"inode":{"change":5,"pos":804},"path":"src/lib/Hydra/Controller/Root.pm","line":8,"ins":{"up_context":[{"change":5,"pos":3368}],"down_context":[{"change":5,"pos":0}],"flag":"BLOCK","start":3010,"end":3041,"inode":{"change":5,"pos":804}},"del":{"edges":[{"previous":"","flag":"DELETED","from":{"change":5,"pos":32},"to":{"change":5,"start":908,"end":909},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":110},"to":{"change":5,"start":908,"end":909},"introduced_by":5},{"previous":"","flag":"DELETED","from":{"change":5,"pos":3368},"to":{"change":5,"start":908,"end":909},"introduced_by":5},{"previous":"BLOCK","flag":"BLOCK | DELETED","from":{"change":5,"pos":908},"to":{"change":5,"start":908,"end":909},"introduced_by":5}],"inode":{"change":5,"pos":804}},"ins_contents":[{"Add":"use Digest::SHA1 qw(sha1_hex);"}],"del_contents":[{"Del":"\n"}]}},{"Edit":{"inode":{"change":5,"pos":804},"path":"src/lib/Hydra/Controller/Root.pm","line":199,"atom":{"NewVertex":{"up_context":[{"change":2,"pos":684}],"down_context":[{"change":2,"pos":684}],"flag":"BLOCK","start":3042,"end":3802,"inode":{"change":5,"pos":804}}},"contents":[{"Add":"sub change_password : Path('change-password') : Args(0) {"},{"Add":" my ($self, $c) = @_;"},{"Add":" "},{"Add":" requireLogin($c) if !$c->user_exists;"},{"Add":" "},{"Add":" $c->stash->{template} = 'change-password.tt'; "},{"Add":"}"},{"Add":""},{"Add":"sub change_password_submit : Path('change-password/submit') : Args(0) {"},{"Add":" my ($self, $c) = @_;"},{"Add":" "},{"Add":" requireLogin($c) if !$c->user_exists;"},{"Add":" "},{"Add":" my $password = $c->request->params->{\"password\"}; "},{"Add":" my $password_check = $c->request->params->{\"password_check\"};"},{"Add":" print STDERR \"$password \\n\";"},{"Add":" print STDERR \"$password_check \\n\";"},{"Add":" error($c, \"Passwords did not match, go back and try again!\") if $password ne $password_check;"},{"Add":" "},{"Add":" my $hashed = sha1_hex($password);"},{"Add":" $c->user->update({ password => $hashed}) ;"},{"Add":" "},{"Add":" $c->res->redirect(\"/\"); "},{"Add":"}"}]}},{"FileAdd":{"meta":{"basename":"change-password.tt","metadata":0},"context":[{"change":17,"pos":1486}],"contents":[{"Add":"[% WRAPPER layout.tt title=\"Change password\" %]"},{"Add":"[% PROCESS common.tt %]"},{"Add":""},{"Add":"

"},{"Add":""},{"Add":"

Change password

"},{"Add":""},{"Add":""},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":"

Enter password:
Enter password again:

"},{"Add":""},{"Add":"

"},{"Add":""},{"Add":"[% END %]"}]}},{"Edit":{"inode":{"change":18,"pos":15137},"path":"src/root/navbar.tt","line":85,"atom":{"NewVertex":{"up_context":[{"change":4,"pos":12341}],"down_context":[{"change":4,"pos":12341}],"flag":"BLOCK","start":4439,"end":4559,"inode":{"change":18,"pos":15137}}},"contents":[{"Add":" [% INCLUDE makeLink"},{"Add":" uri = c.uri_for(c.controller('Admin').action_for('users'))"},{"Add":" title = \"Users\" %]"}]}},{"FileAdd":{"meta":{"basename":"user.tt","metadata":0},"context":[{"change":17,"pos":1486}],"contents":[{"Add":"[% WRAPPER layout.tt title=(create ? \"New user\" : \"Editing user '$user.username'\") %]"},{"Add":"[% PROCESS common.tt %]"},{"Add":""},{"Add":"[% BLOCK roleoption %]"},{"Add":" "},{"Add":"[% END %]"},{"Add":""},{"Add":"

"},{"Add":""},{"Add":"

User[% IF ! create %] '[% user.username %]'[% END %]

"},{"Add":""},{"Add":""},{"Add":" [% IF create %]"},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" [% END %]"},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":"

Username:	[% INCLUDE maybeEditString param=\"username\" value=user.username %]
Full name:	[% INCLUDE maybeEditString param=\"fullname\" value=user.fullname %]
Email:	[% INCLUDE maybeEditString param=\"emailaddress\" value=user.emailaddress %]
Evaluation error notifications:	"},{"Add":" [% INCLUDE renderSelection param=\"emailonerror\" curValue=user.emailonerror options={\"1\" = \"Yes\", \"0\" = \"No\"} %]"},{"Add":"
Roles:	"},{"Add":" "},{"Add":"

"},{"Add":""},{"Add":"

"},{"Add":""},{"Add":"[% IF !create %]"},{"Add":""},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":"[% END %]"},{"Add":""},{"Add":"[% END %]"}]}},{"FileAdd":{"meta":{"basename":"users.tt","metadata":0},"context":[{"change":17,"pos":1486}],"contents":[{"Add":"[% WRAPPER layout.tt title=\"Users\" %]"},{"Add":"[% PROCESS common.tt %]"},{"Add":""},{"Add":"

Users

"},{"Add":""},{"Add":""},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" [% FOREACH u IN users %]"},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" "},{"Add":" [% END %]"},{"Add":" "},{"Add":" "},{"Add":"

Username	Name	Email	Roles	Eval. notifications	Options
[% INCLUDE maybeLink uri = c.uri_for(c.controller('Admin').action_for('user_edit'), [u.username]) content = u.username %]	[% u.fullname %]	[% u.emailaddress %]	[% FOREACH r IN u.userroles %][% r.role %] [% END %]	[% IF u.emailonerror %]Yes[% ELSE %]No[% END %]	[ [% INCLUDE maybeLink uri = c.uri_for(c.controller('Admin').action_for('reset_password'), [u.username]) content = \"Reset password\" confirmmsg = \"Are you sure you want to reset the password for this user?\" %] ]

"},{"Add":""},{"Add":"

[ Add a new user ]

"},{"Add":""},{"Add":"[% END %]"}]}}],"owner":"grahamc","repo":"hydra2","token":"MH87LA1uOH+M9Et7KvVi0Cx3DmEaRWOb2lCC/F01UCE=","login":null}

…

Dependencies

Change contents