From 0603e84c9af78b5e6d76db66d45934819e9f6d3b Mon Sep 17 00:00:00 2001 From: Joe Rayhawk Date: Thu, 30 Dec 2010 22:40:24 -0800 Subject: Revert "Some minor reorg." This makes newuser.cgi usable again. This reverts commit 3e9efc02288fd4cd386f825adf9017d6117e6383. --- pinyweb/cgi-bin/piny/newrepo.cgi | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100755 pinyweb/cgi-bin/piny/newrepo.cgi (limited to 'pinyweb/cgi-bin/piny/newrepo.cgi') diff --git a/pinyweb/cgi-bin/piny/newrepo.cgi b/pinyweb/cgi-bin/piny/newrepo.cgi new file mode 100755 index 0000000..450fa82 --- /dev/null +++ b/pinyweb/cgi-bin/piny/newrepo.cgi @@ -0,0 +1,29 @@ +#!/usr/bin/perl +$| = 1; + +use warnings; + +use CGI; + +use IPC::Open2; + +$q = CGI->new; + +print( "Content-type: text/plain\n\n"); + +if( $q->param('n') && $q->param('d') ) { + unless( open2( OUT, IN, '/usr/sbin/piny-suid', $ENV{'REMOTE_USER'}, 'newrepo', $q->param('n') ) ) { + print 'could not execute newrepo'; + die; + }; + # make things flushier + select( (select(IN), $| = 1)[0] ); + select( (select(OUT), $| = 1)[0] ); + print( IN $q->param('d') . "\n" ); + close( IN ); + while( ) { + print; + }; +} else { + print 'Missing parameters.'; +}; -- cgit v1.2.3