summaryrefslogtreecommitdiff
path: root/usr
diff options
context:
space:
mode:
authorjrayhawk+piny.be@omgwallhack.org <jrayhawk@dev.piny.svcs.cs.pdx.edu>2010-10-16 21:56:25 -0700
committerjrayhawk+piny.be@omgwallhack.org <jrayhawk@dev.piny.svcs.cs.pdx.edu>2010-10-16 21:56:25 -0700
commitf91f128d8789a2c42a84d7f6593ff9d479ac283e (patch)
tree2fbb40b77bea7abbf4f392ed0c163f42f8812f23 /usr
parent8d4a1e9ec89e6fddeffebf48df667be8de659359 (diff)
downloadpiny-code-f91f128d8789a2c42a84d7f6593ff9d479ac283e.tar.gz
piny-code-f91f128d8789a2c42a84d7f6593ff9d479ac283e.zip
Changing pinyconfig over to sbin with sudo wrapper
Diffstat (limited to 'usr')
-rwxr-xr-xusr/src/pinyadmin/bin/pinyconfig40
-rwxr-xr-xusr/src/pinyadmin/sbin/pinyconfig38
2 files changed, 40 insertions, 38 deletions
diff --git a/usr/src/pinyadmin/bin/pinyconfig b/usr/src/pinyadmin/bin/pinyconfig
index f6752db..4e54f76 100755
--- a/usr/src/pinyadmin/bin/pinyconfig
+++ b/usr/src/pinyadmin/bin/pinyconfig
@@ -1,38 +1,2 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Piny;
-
-my ( $reponame, $attr, $value ) = @ARGV;
-
-if ( not defined $reponame or not defined $attr ) {
- die "Usage: $0 reponame tweakable [value]\n";
-};
-
-$attr = lc $attr;
-$attr =~ s/\./_/g;
-
-my $repo = Piny::Repo->new( $reponame );
-
-if ( defined $value ) {
- undef $@;
- eval {
- $repo->config->$attr( $value );
- };
- if ( $@ ) {
- print STDERR "$attr is not a legal tweakable, or $value is not a legal value for that tweakable.\n$@\n";
- };
- if ( $value ne $repo->config->$attr ) {
- print STDERR "Failed to set $attr (perhaps an override is in place)\n";
- };
-};
-
-undef $@;
-eval {
- print "$attr = " . $repo->config->$attr . "\n";
-};
-if ( $@ ) {
- print STDERR "$attr is not a legal tweakable, or its current value is illegal.\n$@\n";
-};
+#!/bin/sh
+exec /usr/bin/sudo /usr/sbin/pinyconfig "$@"
diff --git a/usr/src/pinyadmin/sbin/pinyconfig b/usr/src/pinyadmin/sbin/pinyconfig
new file mode 100755
index 0000000..f6752db
--- /dev/null
+++ b/usr/src/pinyadmin/sbin/pinyconfig
@@ -0,0 +1,38 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Piny;
+
+my ( $reponame, $attr, $value ) = @ARGV;
+
+if ( not defined $reponame or not defined $attr ) {
+ die "Usage: $0 reponame tweakable [value]\n";
+};
+
+$attr = lc $attr;
+$attr =~ s/\./_/g;
+
+my $repo = Piny::Repo->new( $reponame );
+
+if ( defined $value ) {
+ undef $@;
+ eval {
+ $repo->config->$attr( $value );
+ };
+ if ( $@ ) {
+ print STDERR "$attr is not a legal tweakable, or $value is not a legal value for that tweakable.\n$@\n";
+ };
+ if ( $value ne $repo->config->$attr ) {
+ print STDERR "Failed to set $attr (perhaps an override is in place)\n";
+ };
+};
+
+undef $@;
+eval {
+ print "$attr = " . $repo->config->$attr . "\n";
+};
+if ( $@ ) {
+ print STDERR "$attr is not a legal tweakable, or its current value is illegal.\n$@\n";
+};