filename.txt 640 451 62 2251 6252112057 6424 Sys Admin 5.12 (December) v.01 Filename.txt
----------------------------------------------------------------------------------------
Managing Performance on SCO OpenServer
by Dan Reis and Bill Welch
includes:
reisl1.txt--Listing 1: Restart Netscape http server daemon
reisl2.txt--Listing 2: System administration notification
reisl3.txt--Listing 3: Parsing the log file
reisl4.txt--Listing 4: Alert code
reisl5.txt--Listing 5: Check for too much or too old mail
------------------------------------------------------------------------------------------
Performance Management in an RDBMS Environment
by Richard S. Smith
includes:
smithl1.txt--Listing 1: promon.exp
smithl2.txt--Listing 2: promon script
smithl3.txt--Listing 3: promon.pl
smithl4.txt--Listing 4: proaccess.exp
-------------------------------------------------------------------------------------------
Understanding syslog.conf
by Michael Hill
includes:
hilll1.txt--Listing 1: syslogconf
hilll2.txt--Listing 2: syslog.conf
hilll3.txt--Listing 3: Sample output from syslogconf
hilll4.txt--Listing 4: Sample output from syslogconf
hilll5.txt--Listing 5: Sample output from syslogconf
helpdesk.tar 640 451 62 240000 6256262736 6464 ./cgi-bin/ 0040755 0000000 0000001 00000000000 06213066377 0012716 5 ustar 00root other 0000040 0000372 ./cgi-bin/avgticket.pl 0100755 0000000 0000001 00000003170 06206405522 0015224 0 ustar 00root other 0000040 0000372 #!/nfs/public/bin/sybperl
# Program: avgticket.pl Description: Calc. avg. number of tickets opened
# per day by summing up tickets by
# week and dividing by 5.
#
# This is part of the Helpdesk Management System written by Mark Mellman.
#
# Date last revision: 07/07/96 Version: 2.00
require 'helpdesk.inc';
&helpdesk_login;
print "Content-type: text/html\n\n";
print "
\n";
print "Tickets Opened Per Week
\n";
print "
\n";
print "\n";
print "Week(s) Ago | Tickets Opened | Avg Tickets Per Day |
\n";
############################################################################
# Execute the query to get any tickets that where opened $cnt weeks ago.
# Stick it in a for loop incrementing $cnt each time for 10 weeks.
############################################################################
for($cnt=1; $cnt<11; ++$cnt) {
$str = "select count(ticketId) from OTicket ";
$str = $str . "where datepart(week, submitDate) = datepart(week, getdate()) - $cnt";
&dbcmd ( $dbproc, $str ) ;
if ( &dbsqlexec ($dbproc) != &SUCCEED )
{
print "Error executing command\n" ;
}
&dbresults($dbproc) ;
while ( @data = &dbnextrow($dbproc))
{
$tick = $data[0] ;
printf "%d | %d | %.2f |
\n",$cnt, $tick, $tick/5;
$tot=$tot+$tick;
}
}
printf "%s | %.2f | %.2f |
\n","10 Week Avg", $tot/10, ($tot/10)/5;
print "
\n";
27:1:Pat Post:/home/post:/bin/csh
ellis:x:129:400:Steve Ellis:/home/ellis:/bin/ksh
hawkins:x:130:400:Fiona Hawkins:/home/hawkins:/bin/csh
iris:x:131:400:Francois Iris:/home/iris:/bin/csh
pagliera:x:132:400:Paul Palierani:/home/pagliera:/bin/csh
revett:x:133:400:Tracey Revett:/home/revett:/bin/csh
selent:x:134:400:Cheryl Selent:/home/selent:/bin/csh
manager:x:100:1:System Admin Manager:/hom./cgi-bin/daysopen.pl 0100755 0000000 0000001 00000004621 06206405777 0015103 0 ustar 00root other 0000040 0000372 #!/nfs/public/bin/sybperl
#
# Program: daysopen.pl Description: Display all open tickets, starting
# with oldest first, and give links
# to get the status of each ticket.
#
# This is part of the Helpdesk Management System written by Mark Mellman.
#
# Date last revision: 07/07/96 Version: 2.00
require "helpdesk.inc";
#########################################################################
# Execute query and calculate number of days open for assigned tickets
#########################################################################
&helpdesk_login;
$totday=0;
$tabrow=0;
&startup;
$dbproc = &dblogin("$opt_u", $pw, $opt_s);
&dbuse($dbproc, $opt_d);
&dbuse ($opt_d);
$str="
select ticketId, days=datediff(day, submitDate, getdate()), assigned, submitLastName, priority
from OTicket where status = \"A\" or status = \"U\"";
&dbcmd($dbproc, $str);
&dbresults($dbproc);
&dbsqlexec ($dbproc);
if(&dbresults($dbproc)==&SUCCEED) {
while(@data=&dbnextrow($dbproc)) {
&do_point(@data);
}
}
print "\n";
printf "
Totals: Open/Unassigned Tickets: %d Average Days Open: %d", $tabrow, $totday/$tabrow;
print "