lug-bg: Pomosht malko za edna "glupost"
http://ns2.linuxbox.co.za/ Dolo izpisva Uptime na mashinata tova moje li niakoi da mi kaje dali e php,java ili html I kak da si go napravia i na moia sait ... vse pak ne sam pravil do sia takiva neshta i ne znam ta ako niakoi pomogne nema da e zle :) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
On Tue, 2 Jul 2002 05:30:41 -0400 <[EMAIL PROTECTED]> wrote: Ama tvojto verno sa gluposti veche... Ami pomisli malko de. imash komanda "uptime", i kakvo ti dava tja? $uptime 12:40PM up 10 days, 23:31, 1 user, load averages: 0.30, 0.51, 0.74 ami dava ti uptime na mashinata. Znachi izberi si ezika s kojto si pravish web-a i prisvoi na edna promenliva rezultata ot izpulnenieto na "uptime". Primer za PERL: $UPTIME=`/usr/bin/uptime`; print $KUP_HTML_NESHTA; print $UPTIME; print $DRUGI_HTML_NESHTA; Take care Boris Jordanov (borj) <[EMAIL PROTECTED]> ICQ 10751645 PGP-key-fingerprint:-- CB23 8B52 5FBC F36A 1B61 F1ED 2831 E52D AAFF 7B08 -- Public-key:--- http://borj.freeshell.org/borj.asc -- To err is human... to really foul up requires the root password. msg11577/pgp0.pgp Description: PGP signature
Re: lug-bg: Pomosht malko za edna "glupost"
On Tuesday 02 July 2002 12:30, [EMAIL PROTECTED] wrote: > http://ns2.linuxbox.co.za/ > Dolo izpisva Uptime na mashinata > tova moje li niakoi da mi kaje dali e php,java ili html > I kak da si go napravia i na moia sait ... > vse pak ne sam pravil do sia takiva neshta i ne znam > ta ako niakoi pomogne nema da e zle :) am sto se zanimavash v gluposti ... eto edno cgi ;-) #!/usr/bin/perl print "Content-type: text/html\n\n", `uname -mr ; echo " ; " ; uptime`; -- Greets, fr33zb1 A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
On Tue, Jul 02, 2002 at 05:30:41AM -0400, [EMAIL PROTECTED] wrote: > http://ns2.linuxbox.co.za/ > Dolo izpisva Uptime na mashinata > tova moje li niakoi da mi kaje dali e php,java ili html > I kak da si go napravia i na moia sait ... > vse pak ne sam pravil do sia takiva neshta i ne znam > ta ako niakoi pomogne nema da e zle :) Na toia site specialno e napraveno na PHP, no na kakvoto i da si pishesh site-a, mojesh da go napravish - kato izpolzvash unix commandata 'uptime' naprimer. Na PHP naj-lesno e da napishesh neshto kato : rgds, Andrei A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
#!/bin/sh set -f echo Content-type: text/plain echo echo "" echo "" echo "" uname -rsm echo "," w | grep "users" echo " " - Original Message - From: <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Tuesday, July 02, 2002 12:30 PM Subject: lug-bg: Pomosht malko za edna "glupost" > http://ns2.linuxbox.co.za/ > Dolo izpisva Uptime na mashinata > tova moje li niakoi da mi kaje dali e php,java ili html > I kak da si go napravia i na moia sait ... > vse pak ne sam pravil do sia takiva neshta i ne znam > ta ako niakoi pomogne nema da e zle :) > > A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). > http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora > To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html > > A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
Az go pravia na html saita ... Nekoi da mi dade edno redche da vmetna v nego sus koeto shte stane tova ?:) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
RE: lug-bg: Pomosht malko za edna "glupost"
Uptime = (current_time - start_time) Ako shtesh na basic go napishi :-) -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Tuesday, July 02, 2002 12:31 To: [EMAIL PROTECTED] Subject: lug-bg: Pomosht malko za edna "glupost" http://ns2.linuxbox.co.za/ Dolo izpisva Uptime na mashinata tova moje li niakoi da mi kaje dali e php,java ili html I kak da si go napravia i na moia sait ... vse pak ne sam pravil do sia takiva neshta i ne znam ta ako niakoi pomogne nema da e zle :) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
On Tue, 2 Jul 2002 [EMAIL PROTECTED] wrote: > Az go pravia na html saita ... > Nekoi da mi dade edno redche da vmetna v nego sus koeto shte > stane tova ?:) [FLAME MODE ON] "Protiv glupostta i samite bogove sa bezsilni" http://www.albion.com/netiquette/book/index.html [FLAME MODE OFF] naprawi si shell script, koito da ti generira wyrposnoto html s uptime i go runwai prez crona na wsiaka minuta... ! blah ! -- Alexander 'fccf' Velin, [EMAIL PROTECTED] /* Don't meddle in the affairs of sysadmins, * for they are subtle and quick to anger. * # chown -R us:us yourbase */ A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
RE: lug-bg: Pomosht malko za edna "glupost"
uptime.cgi si napravih taka ... Samoche sia ne moga da go loadna v html PRobvam sus -=> Ama ne staa Aide sia nekoi da mi kaje i kak da go loadna v htmla dolo :) i sha ste zlatni :))) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
RE: lug-bg: Pomosht malko za edna "glupost"
uptime.cgi si napravih taka ... Samoche sia ne moga da go loadna v html PRobvam sus -=> Ama ne staa Aide sia nekoi da mi kaje i kak da go loadna v htmla dolo :) i sha ste zlatni :))) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
RE: lug-bg: Pomosht malko za edna "glupost"
uptime.cgi si napravih taka ... Samoche sia ne moga da go loadna v html PRobvam sus -=> Ama ne staa Aide sia nekoi da mi kaje i kak da go loadna v htmla dolo :) i sha ste zlatni :))) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
rosen wrote: 001a01c221b6$7ba04260$bc01a8c0@escompiii"> #!/bin/shset -fecho Content-type: text/plainechoecho "border=0>"echo ""echo ""uname -rsmecho ","w | grep "users"echo " " Bravo be, obraz! :) MIME type text/PLAIN i HTML tags .. speechless! -- The Power to Serve! ... : Kliment Ognianov : : Network Administrator & Developer : : ISP Networks Department: : BulInfo Ltd. : :.: : Phone +359-2-9699165 : :.: : ICQ #16864572, #64866894 : :.: : http://www.bulinfo.net/: :.:
Re: lug-bg: Pomosht malko za edna "glupost"
abe pravish si cqlata stranica na cgi:- begin index.cgi #!/bin/sh echo Content-Type: text/html; charset=windows-1251 echo cat < This is my page running on my linux. And here is a little information about uptimes of the station `uptime` EOF - end index.cgi --- ProSyst Bulgaria Ltd.Valentin Valchev 48 Vladajska Str.Project Manager Sofia 1606, Bulgaria Dept: mBedded Server/Broadband http://www.prosyst.com/ Phone: +359 (2) 9523581-107 --- Leading Software Technology for Open Service Gateways - Original Message - From: [EMAIL PROTECTED] To: [EMAIL PROTECTED] Sent: Tuesday, July 02, 2002 3:42 PM Subject: RE: lug-bg: Pomosht malko za edna "glupost" uptime.cgi si napravih taka ... Samoche sia ne moga da go loadna v html PRobvam sus -=> Ama ne staa Aide sia nekoi da mi kaje i kak da go loadna v htmla dolo :) i sha ste zlatni :))) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers).http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara ZagoraTo unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
W JavaScript imash Date object, koito ima methodi da izkarwa wsqka informaciq... wiv nqkoi JS docs mai taka beshe : date = new Date(); alert(date.getTime()); alert(date.getMonth()) etc | | | |Az go pravia na html saita ... |Nekoi da mi dade edno redche da vmetna v nego sus koeto shte |stane tova ?:) | A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
Ako niakoi go e napravil tova to az shte mu izdam certificate za Lame SysAdmin for live. prosto v html-a si napishi i si prodylzi html koda. Ima hora deto tova CPU usage go niamat za nishto. Aide pozdravi Nick - Original Message - From: "Alexander Velin" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Tuesday, July 02, 2002 7:40 AM Subject: Re: lug-bg: Pomosht malko za edna "glupost" > On Tue, 2 Jul 2002 [EMAIL PROTECTED] wrote: > > > Az go pravia na html saita ... > > Nekoi da mi dade edno redche da vmetna v nego sus koeto shte > > stane tova ?:) > > [FLAME MODE ON] > > "Protiv glupostta i samite bogove sa bezsilni" > > http://www.albion.com/netiquette/book/index.html > > [FLAME MODE OFF] > > naprawi si shell script, koito da ti generira wyrposnoto html > s uptime i go runwai prez crona na wsiaka minuta... ! > > blah ! > > -- > Alexander 'fccf' Velin, > [EMAIL PROTECTED] > /* Don't meddle in the affairs of sysadmins, > * for they are subtle and quick to anger. > * # chown -R us:us yourbase > */ > > > A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). > http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora > To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html > A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
http://marla.ludost.net/ vednuzh na chas. chakam si sertifikata :) On Tue, 2 Jul 2002, Nick Bashev wrote: > Ako niakoi go e napravil tova to az shte mu izdam certificate za Lame > SysAdmin for live. > prosto v html-a si napishi beshe publikuval kato moze malko da si go pookrasish i posle zatvori s ?> i > si prodylzi html koda. > Ima hora deto tova CPU usage go niamat za nishto. > A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
RE: lug-bg: Pomosht malko za edna "glupost"
> Ima hora deto tova CPU usage go niamat za nishto. Pochwa da stawa flamewar ot towa. Tehnicheski poglednato ako stranicata ti se gleda po-chesto ot wremeto prez koeto q generirash e po-evtino ot gledna tochka na procesorni resursi na mashinata da q generirash na nqkakyv interval ot wreme. Ako li pyk e obratnoto - stranicata se gleda po rqdko e po-dobre da se generira dinamichno. Ne e redno chak tolkowa da se obryshta wnimanie na podrobnosti ot tozi wid - dali se generira on-demand stranicata sys statistikite ili na nqkakwo fixirano wreme. Po-wajnoto w sluchaq e wremeto koeto gubim za implementiraneto na neshto tolkowa neznachitelno. Ako mi e po-lesno i byrzo da naprawq generirane na statichna stranica, ot kolkoto da prawq SSI ili CGI stranica znachi shte e generirane. Tochka. BR, Boyan A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
Zdravey, predpolagam, che ti e yasno, che provider-at ti tryabva da poddarja nyakakav server-side scripting(php, cgi s perl/c, jsp etc ...asp dori i ne spomenavam:)) za da mojesh da go vkarash v stranitzata si(samo s HTML / JavaScript nyama da mojesh - v smisal, che parametrite, koito ti dava: date = new Date(); alert(date.getTime()); alert(date.getMonth()) sa parametri na client machine-ata, ne na server-a:)). Da ne bi da izpolzvash nyakoy free provider? Trudno mojesh da namerish podoben, koyto da ti predostavya server-side script-irane ... Dimitar W JavaScript imash Date object, koito ima methodi da izkarwa wsqka informaciq... wiv nqkoi JS docs mai taka beshe : date = new Date(); alert(date.getTime()); alert(date.getMonth()) etc | | | |Az go pravia na html saita ... |Nekoi da mi dade edno redche da vmetna v nego sus koeto shte |stane tova ?:) http://ns2.linuxbox.co.za/ Dolo izpisva Uptime na mashinata tova moje li niakoi da mi kaje dali e php,java ili html I kak da si go napravia i na moia sait ... vse pak ne sam pravil do sia takiva neshta i ne znam ta ako niakoi pomogne nema da e zle :) A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
On Tuesday 02 July 2002 15:42, [EMAIL PROTECTED] wrote: > uptime.cgi si napravih > taka ... > Samoche sia ne moga da go loadna v html > PRobvam sus -=> > > > Ama ne staa > Aide sia nekoi da mi kaje i kak da go loadna v htmla dolo :) > i sha ste zlatni :))) index.html some title --uptime.cgi #!/usr/bin/perl print "Content-type: text/html\n\n", `uname -mr ; echo " ; "; uptime`; -- Greets, fr33zb1 A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
ajde stiga s toq thread, prikachil sam nqkakav kod deto sam se upraznqval za obsd e taka che naglasi si komandite zapishi go primerno kato stats.php i cheti, cheti, cheti $sysname $release $version $machine $nodename $domainname \n"; if ($HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"] != ""){ $IP = $HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"]; $proxy = $HTTP_SERVER_VARS["REMOTE_ADDR"]; $host = @gethostbyaddr($HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"]); }else{ $IP = $HTTP_SERVER_VARS["REMOTE_ADDR"]; $host = @gethostbyaddr($HTTP_SERVER_VARS["REMOTE_ADDR"]); } echo "$HTTP_USER_AGENT Connected from: $host \n"; $today = getdate(); $month = $today['month']; $mday =$today['mday'];$year = $today['year']; $hours = $today['hours']; $minutes = $today['minutes']; $seconds = $today['seconds']; $weekday = $today['weekday']; echo " $mday $month $year $weekday $hours:$minutes:$seconds \n"; //uptime exec("uptime", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; //who -uH /var/log/wtmp exec("who -uH /var/log/wtmp", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; // df exec("df -h", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; // swapctl -lk exec("swapctl -lk", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; // vmstat exec("vmstat", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; exec("vmstat -i", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; //netstat -s -ib -r -q -d //netstat -f encap -r -q -d exec("netstat -s -ib -r -q -d ", $output); print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; exec("netstat -f encap -r -q -d ", $output); while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; // ps -axu -ww -S -m exec("ps -axu -ww -S ", $output); // format each line of output print ""; while (list(,$val) = each($output)) : print "$val"; endwhile; print ""; $STAT_PAGE = "$Output"; print $STAT_PAGE; ?> A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
Ako tolkowa ti trqbwa statistika... ima Apache::Vmonitor iztegli si go i si go instalirai... i gledai kwoto si iskash A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers). http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
Re: lug-bg: Pomosht malko za edna "glupost"
Iskam da kazha neshto, koeto osmislih predi da napisha i e po temata... Sybitieto, chiato davnost traibva da se opisva v HTML documenta e s grubo presmetnata otnositelna greshka +/- 1 den. Viarno, che se izpisvat chasovete i minutite, no te sa malka velichina na fona na goliamata (osven ako niakoi ne operira s MS server i go rebootva za shtialo i neshtilo) i mozhe da se izpisvat samo broia dni. Ima dva varianta, po koito mozhe da se trygne... Ako web-servera osbluizhva kym 1000-da zaiavki na den e napylno dopustimo da se vika instrumenta uptime i da se izvezhda directno ot nego statisticata za vremeto sled poslednoto restartirane na sistemata. Ako web-servera osbluzhva po 1000 zaiavki na minuta mozhe bi tova ne e nai-dobria podhod. V tozi sluchai mozhe da se izpulniava na vsiaka edna minuta script, izvikvash uptime i zapisvasht rezultatite v promenliva v pametta.. naprimer CURRENT_UPTIME. Tazi promenliva da se podava posle na generirashtia HTML documenta script i da se izpisva v izhodnia kod, koito se podava kato otgovor na zaiavkata Taka se pesti mashinno vreme, koeto za natovarenite web-serveri e kritichen factor za proizvoditelnostta. Vse pak e po-dobre neshtoto da se startira po vednyzh v minuta, otkolkoto da se startira po 1000 pyti v minuta... Kolkoto i proizvoditelni da se syvremennite serveri vinagi stoi factora svobodni resursi i razpredeliane na natovarvaneto. Fakticheski crond mozhe da izpylniava zadacha nai-malko na 1 minuta, a tova syvpada s minimalnata otnositelna greshka na sybitieto "vreme sled poslednoto restartirane na servera" (+/- 1 minuta). Tova e variant pri koito HTML documenta se generira pri vsiaka zaiavka na potrebitel... Ako traibva syvsem da se optimizira natovarvaneto e nuzhno da se reshi dali HTML documenta shte se generira pri vsiaka zaiavka ili vremeto mezhdu dve negovi generacii shte syvpadne s minimalnata otnositelna greshka na otchitanoto sybitie Po-udobno e na crond da se podade zadacha pri koiato na vsiaka edna minuta toi da generira HTML document, koito da ima vreme na zhivot 1 minuta i sled iztichane na vremeto na zhivot da se generira nov document. Po tozi nachin v prodylzhenie na 1 minuta natovarvaneto na web-servera shte e malko, zashtoto shte se izpylniavat statichni zaiavki, t.e. podavane na fail kato otgovor na zaiavkata bez dopylnitelno izpylnenie na generacionni procesi ot strana na scriptove i instrumenti. Razbira se, tova e edin elementaren podhod za po-nachinaeshti administratori. Po-pregmatichnia podhod pochiva na izpolzvaneto na Perl constructori na HTML documenti. Blagodaria na vsichki za vnimanieto;)) Vesselin On Tuesday 02 July 2002 18:18, you wrote: > ajde stiga s toq thread, > prikachil sam nqkakav kod deto sam se upraznqval > za obsd e taka che naglasi si komandite > zapishi go primerno kato stats.php > > i cheti, cheti, cheti > > > $posix_uname = posix_uname (); > $sysname = $posix_uname['sysname']; > $nodename= $posix_uname['nodename']; > $release = $posix_uname['release']; > $version = $posix_uname['version']; > $machine = $posix_uname['machine']; > $domainname = $posix_uname['domainname']; > > $posix_times = posix_times (); > $uptime = $posix_times ['ticks']; > > echo " $sysname $release $version $machine $nodename $domainname > \n"; > > > if ($HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"] != ""){ > $IP = $HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"]; > $proxy = $HTTP_SERVER_VARS["REMOTE_ADDR"]; > $host = > @gethostbyaddr($HTTP_SERVER_VARS["HTTP_X_FORWARDED_FOR"]); > }else{ > $IP = $HTTP_SERVER_VARS["REMOTE_ADDR"]; > $host = @gethostbyaddr($HTTP_SERVER_VARS["REMOTE_ADDR"]); > } > > echo "$HTTP_USER_AGENT Connected from: $host \n"; > > $today = getdate(); > $month = $today['month']; $mday =$today['mday'];$year = > $today['year']; > $hours = $today['hours']; $minutes = $today['minutes']; $seconds = > $today['seconds']; > $weekday = $today['weekday']; > > echo " $mday $month $year $weekday $hours:$minutes:$seconds \n"; > > > //uptime > exec("uptime", $output); > // format each line of output > print ""; > while (list(,$val) = each($output)) : > print "$val"; > endwhile; > print ""; > > > //who -uH /var/log/wtmp > exec("who -uH /var/log/wtmp", $output); > // format each line of output > print ""; > while (list(,$val) = each($output)) : > print "$val"; > endwhile; > print ""; > > > // df > exec("df -h", $output); > // format each line of output > print ""; > while (list(,$val) = each($output)) : > print "$val"; > endwhile; > print ""; > > // swapctl -lk > exec("swapctl -lk", $output); > // format each line of output > print ""; > while (list(,$val) = each($output)) : > print "$val"; > endwhile; > print ""; > > > // vmstat > exec("vmstat", $output); > // format each line of output > print ""; > while (list(,$val) = each($output)) : > > print "$val"; > endwhile; > print ""; > exec("vmstat -i", $output); > // format each li