File Manager

X7ROOT File Manager

Current Path: /usr/libexec/webmin/mon

📁 ..
📄 CHANGELOG(113 B)
📄 README(287 B)
📄 backup_config.pl(732 B)
📄 config(201 B)
📄 config-Fedora-Linux(189 B)
📄 config.info(362 B)
📄 config.info.ca(397 B)
📄 config.info.cs(375 B)
📄 config.info.de(429 B)
📄 config.info.es(399 B)
📄 config.info.nl(420 B)
📄 config.info.no(381 B)
📄 config.info.ru(506 B)
📄 config.info.uk(511 B)
📄 create_watch.cgi(281 B)
📄 edit_auth.cgi(1.43 KB)
📄 edit_global.cgi(2.01 KB)
📄 edit_service.cgi(8.05 KB)
📄 edit_user.cgi(1.38 KB)
📄 edit_watch.cgi(2.21 KB)
📄 feedback_files.pl(113 B)
📁 help
📁 images
📄 index.cgi(1.52 KB)
📄 install_check.pl(329 B)
📁 lang
📄 list_groups.cgi(832 B)
📄 list_periods.cgi(2.09 KB)
📄 list_users.cgi(1.03 KB)
📄 list_watches.cgi(1.26 KB)
📄 module.info(181 B)
📄 module.info.af(0 B)
📄 module.info.af.auto(108 B)
📄 module.info.ar(0 B)
📄 module.info.ar.auto(136 B)
📄 module.info.be(0 B)
📄 module.info.be.auto(166 B)
📄 module.info.bg(0 B)
📄 module.info.bg.auto(171 B)
📄 module.info.ca(117 B)
📄 module.info.ca.auto(13 B)
📄 module.info.cs(37 B)
📄 module.info.cs.auto(86 B)
📄 module.info.da(0 B)
📄 module.info.da.auto(108 B)
📄 module.info.de(111 B)
📄 module.info.de.auto(12 B)
📄 module.info.el(0 B)
📄 module.info.el.auto(192 B)
📄 module.info.es(32 B)
📄 module.info.es.auto(91 B)
📄 module.info.eu(0 B)
📄 module.info.eu.auto(121 B)
📄 module.info.fa(0 B)
📄 module.info.fa.auto(168 B)
📄 module.info.fi(0 B)
📄 module.info.fi.auto(105 B)
📄 module.info.fr(0 B)
📄 module.info.fr.auto(126 B)
📄 module.info.he(0 B)
📄 module.info.he.auto(136 B)
📄 module.info.hr(0 B)
📄 module.info.hr.auto(119 B)
📄 module.info.hu(0 B)
📄 module.info.hu.auto(122 B)
📄 module.info.it(0 B)
📄 module.info.it.auto(121 B)
📄 module.info.ja(0 B)
📄 module.info.ja.auto(160 B)
📄 module.info.ko(0 B)
📄 module.info.ko.auto(138 B)
📄 module.info.lt(0 B)
📄 module.info.lt.auto(141 B)
📄 module.info.lv(0 B)
📄 module.info.lv.auto(128 B)
📄 module.info.ms(105 B)
📄 module.info.ms.auto(12 B)
📄 module.info.mt(0 B)
📄 module.info.mt.auto(132 B)
📄 module.info.nl(28 B)
📄 module.info.nl.auto(89 B)
📄 module.info.no(31 B)
📄 module.info.no.auto(82 B)
📄 module.info.pl(0 B)
📄 module.info.pl.auto(112 B)
📄 module.info.pt(0 B)
📄 module.info.pt.auto(122 B)
📄 module.info.pt_BR(0 B)
📄 module.info.pt_BR.auto(131 B)
📄 module.info.ro(0 B)
📄 module.info.ro.auto(128 B)
📄 module.info.ru(38 B)
📄 module.info.ru.auto(154 B)
📄 module.info.sk(0 B)
📄 module.info.sk.auto(122 B)
📄 module.info.sl(0 B)
📄 module.info.sl.auto(113 B)
📄 module.info.sv(0 B)
📄 module.info.sv.auto(117 B)
📄 module.info.th(0 B)
📄 module.info.th.auto(255 B)
📄 module.info.tr(0 B)
📄 module.info.tr.auto(123 B)
📄 module.info.uk(0 B)
📄 module.info.uk.auto(214 B)
📄 module.info.ur(0 B)
📄 module.info.ur.auto(158 B)
📄 module.info.vi(0 B)
📄 module.info.vi.auto(155 B)
📄 module.info.zh(0 B)
📄 module.info.zh.auto(121 B)
📄 module.info.zh_TW(0 B)
📄 module.info.zh_TW.auto(130 B)
📄 mon-lib.pl(8.96 KB)
📄 mon.cgi(998 B)
📄 mon_action.cgi(415 B)
📄 moncmd.diff(2.52 KB)
📄 moncmd.pl(5.66 KB)
📄 monshow.cgi(564 B)
📄 monshowrc(166 B)
📄 restart.cgi(180 B)
📄 save_auth.cgi(625 B)
📄 save_global.cgi(1.7 KB)
📄 save_groups.cgi(656 B)
📄 save_periods.cgi(1.11 KB)
📄 save_service.cgi(4.71 KB)
📄 save_user.cgi(823 B)
📄 save_watch.cgi(370 B)
📄 start.cgi(226 B)
📄 stop.cgi(423 B)

Editing: moncmd.diff

--- /usr/bin/moncmd	Thu Sep  6 13:46:26 2001
+++ /webmin-0.87/mon/moncmd.pl	Mon Sep 10 13:40:37 2001
@@ -2,6 +2,8 @@
 #
 # moncmd - send a command to the mon server
 #
+# original file is modified to suit for the operation in this webmin module of msclinux--dt 09 Sept 2001
+#
 # Jim Trocki, trockij@transmeta.com
 #
 # $Id: moncmd 1.2 Fri, 12 Jan 2001 08:13:31 -0800 trockij $
@@ -53,10 +55,12 @@
 if ($opt_f) {
     if ($opt_f eq "-") {
     	$H = STDIN;
+#print LOG "READING H from STDIN<br>";
     } else {
     	open (IN, $opt_f) ||
 	    die "could not open input file: $!\n";
 	$H = IN;
+#print LOG "READING H from IN<br>";
     }
 
 } elsif (!@ARGV) {
@@ -77,14 +81,18 @@
 # get auth info
 #
 if ($opt_a) {
+#open (LOG,">/tmp/monlog");
     if ($opt_l) {
     	$USER = $opt_l;
+#print LOG "USER READ FROM -l OPTION =$USER\n";
     } else {
 	die "could not determine username\n"
 	    unless defined ($USER = getpwuid($EUID));
+#print LOG "USER DEFAULT TAKEN=$USER\n";
     }
 
     if (-t STDIN) {
+#print LOG "READING PASSWD FROM STDIN\n";
 	system "stty -echo";
 	print "Password: ";
 	chop ($PASS = <STDIN>);
@@ -94,19 +102,27 @@
 
     } elsif (!@ARGV) {
 	$cmd = <$H>;
+#print LOG "READING CMD FROM $H\n";
+#print LOG "CMD:$cmd\n";
 	while (defined ($cmd) && $cmd =~ /user=|pass=/i) {
+	#while (defined ($cmd) && $cmd =~ /user|pass/i) {
 	    chomp $cmd;
+#print LOG "CMD AFTER CHOMP:$cmd\n";
 	    if ($cmd =~ /^user=(\S+)$/i) {
 		$USER=$1 if (!defined ($USER));
+#print LOG "READING USER FROM $H:$USER\n";
 	    } elsif ($cmd =~ /^pass=(\S+)$/i) {
 		$PASS=$1;
+#print LOG "READING PASSWD FROM $H:$PASS\n";
 	    }
 	    
 	    $cmd = <$H>;
+	    $cmd1=$cmd;	
+#print LOG "FINAL CMD: $cmd\n";
 	}
 
     }
-
+     
     die "inadequate authentication information supplied\n"
     	if ($USER eq "" || $PASS eq "");
 }
@@ -148,13 +164,16 @@
 
 
 if ($opt_f or !@ARGV) {
-    $cmd = <$H> if ($opt_f || !@ARGV);
+    #$cmd = <$H> if ($opt_f || !@ARGV);
+    $cmd = (<$H>||$cmd1) if ($opt_f || !@ARGV);
     $l = "";
+#print LOG "ENTERING TO SEND THE CMD:$cmd\n";
     while (defined ($cmd) && defined ($l)) {
 	#
 	# send the command
 	#
 	chomp $cmd;
+#print LOG "SENDING THE CMD:$cmd\n";
 	($l, @out) = do_cmd (MON, $cmd);
 	last if (!defined ($l));
 	for (@out) {
@@ -181,6 +200,7 @@
 
 close(MON);
 
+#close(LOG);
 
 #
 # submit a command to the server, wait for a response
@@ -193,6 +213,7 @@
 
     @out = ();
     print $fd "$cmd\n";
+#print LOG "SUBMITTING CMD:$cmd\n";
     while (defined($l = <$fd>)) {
         chomp $l;
         if ($l =~ /^(\d{3}\s)/) {

X7ROOT File Manager

Editing: moncmd.diff

Upload File

Create Folder