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/newuser.cgi | 29 ----------------------------- 1 file changed, 29 deletions(-) delete mode 100755 pinyweb/cgi-bin/newuser.cgi (limited to 'pinyweb/cgi-bin/newuser.cgi') diff --git a/pinyweb/cgi-bin/newuser.cgi b/pinyweb/cgi-bin/newuser.cgi deleted file mode 100755 index 002d2be..0000000 --- a/pinyweb/cgi-bin/newuser.cgi +++ /dev/null @@ -1,29 +0,0 @@ -#!/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('a') && $q->param('p') ) { - unless( open2( OUT, IN, '/usr/bin/sudo', '/usr/sbin/newuser', '--batch', $q->param('a'), $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('p') . "\n" ); - close( IN ); - while( ) { - print; - }; -} else { - print 'Missing parameters.'; -}; -- cgit v1.2.3