ASNMTAP
view release on metacpan or search on metacpan
<COMMON>
SMTPUNIXSYSTEM 1
SERVERLISTSMTP localhost
SERVERSMTP localhost
SENDMAILFROM asnmtap@localhost
HTTPSSERVER asnmtap.localhost
REMOTE_HOST localhost
REMOTE_ADDR 127.0.0.1
OPTIONS --bodyimage /opt/asnmtap/applications/htmlroot/img/logos/bodyimage.gif --charset iso-8859-1 --format pdf14 --size A4 --landscape --browserwidth 1280 --top 10mm --bottom 10mm --left 10mm --right 10mm --fontsize 10.0 --fontspacing ...
</COMMON>
...
<DATABASE_ACCOUNT>
...
</DATABASE_ACCOUNT>
...
SSH access for the 'Application Monitor'
----------------------------------------
applications/Applications.cnf view on Meta::CPAN
# ENABLED 1 # '0' or '1'
# </AWSTATS>
# <CHARTDIRECTOR>
# LIB /opt/ChartDirector/lib/.
# </CHARTDIRECTOR>
# <HTMLTOPDF>
# PRG htmldoc # '<nihil>' or 'htmldoc'
# HOW shell # '<nihil>', 'cgi' or 'shell'
# OPTIONS --bodyimage /opt/asnmtap/applications/htmlroot/img/logos/bodyimage.gif --charset iso-8859-1 --format pdf14 --size A4 --landscape --browserwidth 1280 --fontsize 8.0 --fontspacing 1.2 --headingfont Helvetica --bodyfont Helvetica --...
# OPTIONS --bodyimage /opt/asnmtap/applications/htmlroot/img/logos/bodyimage.gif --charset iso-8859-1 --format pdf14 --size A4 --landscape --browserwidth 1280 --top 10mm --bottom 10mm --left 10mm --right 10mm --fontsize 8.0 --fontspacing 1...
# </HTMLTOPDF>
# <PERFPARSE>
# BIN /opt/asnmtap/perfparse20/bin
# ETC /opt/asnmtap/perfparse20/etc
# LIB /opt/asnmtap/perfparse20/lib
# SHARE /opt/asnmtap/perfparse20/share
# CGI /perfparse20/perfparse.php
# ENABLED 1 # '0' or '1'
# VERSION 20 # '19' or '20'
applications/collector-test.pl view on Meta::CPAN
$title .= " - DBI_connect - Cannot connect to the database - alarm: $alarm - alarmMessage: $alarmMessage";
$logger->info(" DBI_connect - Cannot connect to the database - alarm: $alarm - alarmMessage: $alarmMessage") if ( defined $logger and $logger->is_info() );
}
# Create a XYChart object of size $width x $hight pixels, using 0xf0e090 as background color, with a black border, and 0 pixel 3D border effect
my $c = new XYChart($width, $hight, $background, 0x0, 0);
# Set the plotarea at (xOffset, yOffset) and of size $width - 95 x $hight - 78 pixels, with white background. Set border and grid line colors.
$c->setPlotArea($xOffset, $yOffset, $width - 95, $hight - 78, 0xffffff, -1, 0xa08040, $c->dashLineColor(0x0, 0x0101), $c->dashLineColor(0x0, 0x0101))->setGridWidth(1);
# Add a title box to the chart using 10 pts Arial Bold Italic font. The text is white (0x000000)
$c->addText($width/2, 14, "$title", "arialbi.ttf", 10, 0x000000, 5, 0);
# Set labels on the x axis
unless ( $xRealtime ) {
for ($counter = 0; $counter < $limitTest; $counter += $xLabelStep) {
$RRDlabels[int($limitTest - $counter - 1)] = substr(scalar(localtime(($lastTimeslot - ($step * ($counter))))), 11, 5);
}
}
$c->xAxis()->setLabels(\@RRDlabels);
applications/collector.pl view on Meta::CPAN
$title .= " - DBI_connect - Cannot connect to the database - alarm: $alarm - alarmMessage: $alarmMessage";
$logger->info(" DBI_connect - Cannot connect to the database - alarm: $alarm - alarmMessage: $alarmMessage") if ( defined $logger and $logger->is_info() );
}
# Create a XYChart object of size $width x $hight pixels, using 0xf0e090 as background color, with a black border, and 0 pixel 3D border effect
my $c = new XYChart($width, $hight, $background, 0x0, 0);
# Set the plotarea at (xOffset, yOffset) and of size $width - 95 x $hight - 78 pixels, with white background. Set border and grid line colors.
$c->setPlotArea($xOffset, $yOffset, $width - 95, $hight - 78, 0xffffff, -1, 0xa08040, $c->dashLineColor(0x0, 0x0101), $c->dashLineColor(0x0, 0x0101))->setGridWidth(1);
# Add a title box to the chart using 10 pts Arial Bold Italic font. The text is white (0x000000)
$c->addText($width/2, 14, "$title", "arialbi.ttf", 10, 0x000000, 5, 0);
# Set labels on the x axis
unless ( $xRealtime ) {
for ($counter = 0; $counter < $limitTest; $counter += $xLabelStep) {
$RRDlabels[int($limitTest - $counter - 1)] = substr(scalar(localtime(($lastTimeslot - ($step * ($counter))))), 11, 5);
}
}
$c->xAxis()->setLabels(\@RRDlabels);
applications/htmlroot/CalendarPopup.js view on Meta::CPAN
function CP_setDisabledWeekDays(){this.disabledWeekDays = new Object();for(var i=0;i<arguments.length;i++){this.disabledWeekDays[arguments[i]] = true;}}
function CP_addDisabledDates(start, end){if(arguments.length==1){end=start;}if(start==null && end==null){return;}if(this.disabledDatesExpression!=""){this.disabledDatesExpression+= "||";}if(start!=null){start = parseDate(start);start=""+start.getFull...
function CP_setTodayText(text){this.todayText = text;}
function CP_setCssPrefix(val){this.cssPrefix = val;}
function CP_showNavigationDropdowns(){this.isShowNavigationDropdowns =(arguments.length>0)?arguments[0]:true;}
function CP_showYearNavigationInput(){this.isShowYearNavigationInput =(arguments.length>0)?arguments[0]:true;}
function CP_hideCalendar(){if(arguments.length > 0){window.popupWindowObjects[arguments[0]].hidePopup();}else{this.hidePopup();}}
function CP_refreshCalendar(index){var calObject = window.popupWindowObjects[index];if(arguments.length>1){calObject.populate(calObject.getCalendar(arguments[1],arguments[2],arguments[3],arguments[4],arguments[5]));}else{calObject.populate(calObject....
function CP_showCalendar(anchorname){if(arguments.length>1){if(arguments[1]==null||arguments[1]==""){this.currentDate=new Date();}else{this.currentDate=new Date(parseDate(arguments[1]));}}this.populate(this.getCalendar());this.showPopup(anchorname);}
function CP_select(inputobj, linkname, format){var selectedDate=(arguments.length>3)?arguments[3]:null;if(!window.getDateFromFormat){alert("calendar.select: To use this method you must also include 'date.js' for date formatting");return;}if(this.disp...
function getCalendarStyles(){var result = "";var p = "";if(this!=null && typeof(this.cssPrefix)!="undefined" && this.cssPrefix!=null && this.cssPrefix!=""){p=this.cssPrefix;}result += "<STYLE>\n";result += "."+p+"cpYearNavigation,."+p+"cpMonthNavigat...
function CP_getCalendar(){var now = new Date();if(this.type == "WINDOW"){var windowref = "window.opener.";}else{var windowref = "";}var result = "";if(this.type == "WINDOW"){result += "<HTML><HEAD><TITLE>Calendar</TITLE>"+this.getStyles()+"</HEAD><BO...
applications/htmlroot/asnmtap-results.css view on Meta::CPAN
BODY {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
background-color: #000000;
color: #D8D8BF;
scrollbar-base-color: darkblue;
scrollbar-arrow-color: blue;
scrollbar-face-color: darkblue;
scrollbar-highlight-color: darkblue;
scrollbar-shadow-color: darkblue;
scrollbar-darkshadow-color: blue;
}
H1 {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
color: #D8D8BF;
}
H2 {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
color: blue;
}
H3 {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: yellow;
}
TH {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
color: #000000;
background-color: #787878;
}
TD {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: #D8D8BF;
}
.HeaderTitel {
font-family: "Comic Sans MS", sans-serif;
font-size: 16pt;
font-weight: bold;
text-align: center;
color: #3366FF;
border: none;
}
.HeaderSubTitel {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: right;
border: none;
}
.LegendCopyright {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #ffffff;
border: none;
}
.LegendIcons {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: center;
border: none;
}
.LegendLastUpdate {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: right;
color: #ffffff;
border: none;
}
.DataDirectory {
font-family: "Courier New", monospace;
font-size: 10pt;
font-weight: normal;
text-decoration: none;
color: Lime;
}
.HelpPluginFilename {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
color: yellow;
border: none;
}
.ReportItem {
font-family: Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: bold;
text-decoration: none;
text-align: center;
color: #D8D8BF;
}
.GroupHeader {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: left;
color: #3366FF;
border: none;
}
.GroupMessage {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: left;
color: #3366FF;
border: none;
}
.GroupFooter {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: left;
color: #3366FF;
border: none;
}
.ItemHeader {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #D8D8BF;
border: none;
}
.ItemHeaderTest {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #FFFFCC;
border: none;
}
.ItemStatus {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
}
.ItemFooter {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #D8D8BF;
border: none;
}
.StatusHeader {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 9pt;
font-weight: normal;
text-align: center;
color: #D8D8BF;
}
.StatusItem {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
color: #FFFF44;
vertical-align: top;
}
.StatusMessage {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
color: #FFFFCC;
vertical-align: top;
}
.StatusMessageError {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
color: #99CCFF;
vertical-align: top;
}
.RunCmdOnDemandHtmlTitle {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: blue;
}
.RunCmdOnDemandCommand {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: yellow;
}
.RunCmdOnDemandCaptureHeader {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
color: white;
}
.RunCmdOnDemandCaptureTrue {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: yellow;
}
.RunCmdOnDemandCaptureLong {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
background-color: #FFFFFF;
color: green;
}
.RunCmdOnDemandCaptureHtml {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: blue;
}
.RunCmdOnDemandCaptureDebug {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: green;
}
.RunStatusOnDemandHtmlTitle {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: blue;
}
.RunStatusOnDemandCommand {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: yellow;
}
.RunStatusOnDemandCaptureHeader {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
text-align: center;
background-color: #665555;
color: white;
}
.RunStatusOnDemandCaptureRunning {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
text-align: left;
color: green;
}
.RunStatusOnDemandCaptureNotRunning {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
text-align: left;
color: red;
}
.RunStatusOnDemandCaptureParent {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #D8D8BF;
color: blue;
}
.RunStatusOnDemandCaptureParentAction {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
background-color: #F0F0F0;
color: blue;
}
.RunStatusOnDemandCaptureChild {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #F0F0F0;
color: blue;
}
.RunStatusOnDemandCaptureChildAction {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
background-color: #D8D8BF;
color: blue;
}
.RunStatusOnDemandCaptureSubChild {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #FFFFFF;
color: blue;
}
.RunStatusOnDemandCaptureDebug {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #335566;
color: white;
}
applications/htmlroot/asnmtap.css view on Meta::CPAN
BODY {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
background-color: #000000;
color: #D8D8BF;
scrollbar-base-color: darkblue;
scrollbar-arrow-color: blue;
scrollbar-face-color: darkblue;
scrollbar-highlight-color: darkblue;
scrollbar-shadow-color: darkblue;
scrollbar-darkshadow-color: blue;
}
A:active {
font-family: Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-decoration: none;
text-align: left;
color: #D8D8BF;
}
A:link {
font-family: Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-decoration: none;
text-align: left;
color: #00FFAA;
}
A:visited {
font-family: Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-decoration: none;
text-align: left;
color: #FFFF44;
}
H1 {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
color: #D8D8BF;
}
H2 {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
color: blue;
}
H3 {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: yellow;
}
TH {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
color: #000000;
background-color: #787878;
}
TD {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: #D8D8BF;
}
.HeaderTitel {
font-family: "Comic Sans MS", sans-serif;
font-size: 16pt;
font-weight: bold;
text-align: center;
color: #3366FF;
border: none;
}
.HeaderSubTitel {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: right;
border: none;
}
.LegendCopyright {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #ffffff;
border: none;
}
.LegendIcons {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: center;
border: none;
}
.LegendLastUpdate {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: right;
color: #ffffff;
border: none;
}
.DataDirectory {
font-family: "Courier New", monospace;
font-size: 10pt;
font-weight: normal;
text-decoration: none;
color: Lime;
}
.HelpPluginFilename {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
color: yellow;
border: none;
}
.ReportItem {
font-family: Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: bold;
text-decoration: none;
text-align: center;
color: #D8D8BF;
}
.GroupHeader {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: left;
color: #3366FF;
border: none;
}
.GroupMessage {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: left;
color: #3366FF;
border: none;
}
.GroupFooter {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: 12pt;
font-weight: normal;
text-align: left;
color: #3366FF;
border: none;
}
.ItemHeader {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #D8D8BF;
border: none;
}
.ItemHeaderTest {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #FFFFCC;
border: none;
}
.ItemStatus {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
}
.ItemFooter {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
color: #D8D8BF;
border: none;
}
.StatusHeader {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 9pt;
font-weight: normal;
text-align: center;
color: #D8D8BF;
}
.StatusItem {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
color: #FFFF44;
vertical-align: top;
}
.StatusMessage {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
color: #FFFFCC;
vertical-align: top;
}
.StatusMessageError {
font-family: Tahoma, Arial, Helvetica, sans-serif;
font-size: -1pt;
font-weight: normal;
text-align: left;
border: none;
color: #99CCFF;
vertical-align: top;
}
.RunCmdOnDemandHtmlTitle {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: blue;
}
.RunCmdOnDemandCommand {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: yellow;
}
.RunCmdOnDemandCaptureHeader {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
color: white;
}
.RunCmdOnDemandCaptureTrue {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: yellow;
}
.RunCmdOnDemandCaptureLong {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
background-color: #FFFFFF;
color: green;
}
.RunCmdOnDemandCaptureHtml {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: blue;
}
.RunCmdOnDemandCaptureTime {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: blue;
}
.RunCmdOnDemandCaptureDebug {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
color: green;
}
.RunStatusOnDemandHtmlTitle {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: blue;
}
.RunStatusOnDemandCommand {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 11pt;
font-weight: normal;
text-align: left;
color: yellow;
}
.RunStatusOnDemandCaptureHeader {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
text-align: center;
background-color: #665555;
color: white;
}
.RunStatusOnDemandCaptureRunning {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
text-align: left;
color: green;
}
.RunStatusOnDemandCaptureNotRunning {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: bold;
text-align: left;
color: red;
}
.RunStatusOnDemandCaptureParent {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #D8D8BF;
color: blue;
}
.RunStatusOnDemandCaptureParentAction {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
background-color: #D8D8BF;
color: blue;
}
.RunStatusOnDemandCaptureChild {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #F0F0F0;
color: blue;
}
.RunStatusOnDemandCaptureChildAction {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
background-color: #F0F0F0;
color: blue;
}
.RunStatusOnDemandCaptureSubChild {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #FFFFFF;
color: blue;
}
.RunStatusOnDemandCaptureSubChildAction {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
background-color: #FFFFFF;
color: blue;
}
.RunStatusOnDemandCaptureDebug {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: left;
background-color: #335566;
color: white;
}
.RunStatusOnDemandCaptureDebugAction {
font-family: Verdana, Geneva, Arial, Helvetica, sans-serif;
font-size: 10pt;
font-weight: normal;
text-align: center;
background-color: #335566;
color: white;
}
applications/htmlroot/cgi-bin/admin/index.pl view on Meta::CPAN
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>URL ... : $urlAccessParameters</pre>" if ( $debug eq 'T' );
if ( defined $sessionID and ! defined $errorUserAccessControl ) {
# HTML - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print <<HTML;
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr align="center"><td>
<table border="0" cellspacing="0" cellpadding="0">
<tr><td class="StatusItem"><font size="+1">Moderator</font></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/sessions.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Session Console (for the Display)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/runStatusOnDemand.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Status Console (for the Collector/Display/Import Data Through Catalog)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/trendlineCorrectionReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Trendline Correction Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/pluginCrontabSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Plugin Crontab Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/collectorCrontabSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Crontab Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/collectorDaemonSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Daemon Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/comments.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Comments (to set the comments for a group of related tests)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/downtimes.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Downtimes (to set the downtime for a group of related tests)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/plugins.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Plugins (to edit short description, trendline, holiday bundle and uploading plugindoc)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><font size="+1">Administrator</font></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="languages.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Languages</a></td></tr>
<tr><td class="StatusItem"><a href="countries.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Countries</a></td></tr>
<tr><td class="StatusItem"><a href="timeperiods.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Timeperiods</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="holidays.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Holidays</a></td></tr>
<tr><td class="StatusItem"><a href="holidaysBundle.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Holidays Bundle</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="users.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Users</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
applications/htmlroot/cgi-bin/admin/users.pl view on Meta::CPAN
<input type="text" name="remoteUser" value="$CremoteUser" size="15" maxlength="15" $formDisabledRemoteUser>
</td></tr>
<tr><td>Remote Address: </td><td>
<input type="text" name="remoteAddr" value="$CremoteAddr" size="15" maxlength="15" $formDisabledAll> format: x.[x.[x.[x]]]
</td></tr>
<tr><td>Remote Netmask: </td><td>
<input type="text" name="remoteNetmask" value="$CremoteNetmask" size="2" maxlength="2" $formDisabledAll> format: 01-32
</td></tr>
<tr><td> </td><td>
<table width="100%">
<tr><td><font color="#0000FF">32</font> 255.255.255.255</td><td><font color="#0000FF">31</font> 255.255.255.254</td><td><font color="#0000FF">30</font> 255.255.255.252</td><td><font color="#0000FF">29</font> 255.255.255.248</td><td><font ...
<tr><td><font color="#0000FF">24</font> 255.255.255.0</td><td><font color="#0000FF">23</font> 255.255.254.0</td><td><font color="#0000FF">22</font> 255.255.252.0</td><td><font color="#0000FF">21</font> 255.255.248.0</td><td><font color="#...
<tr><td><font color="#0000FF">16</font> 255.255.0.0</td><td><font color="#0000FF">15</font> 255.254.0.0</td><td><font color="#0000FF">14</font> 255.252.0.0</td><td><font color="#0000FF">13</font> 255.248.0.0</td><td><font color="#0000FF">...
<tr><td><font color="#0000FF">08</font> 255.0.0.0</td><td><font color="#0000FF">07</font> 254.0.0.0</td><td><font color="#0000FF">06</font> 252.0.0.0</td><td><font color="#0000FF">05</font> 248.0.0.0</td><td><font color="#0000FF">04</font...
</table>
</td></tr>
<tr><td><b>Given Name: </b></td><td>
<input type="text" name="givenName" value="$CgivenName" size="50" maxlength="50" $formDisabledAll>
</td></tr>
<tr><td><b>Surname: </b></td><td>
<input type="text" name="familyName" value="$CfamilyName" size="50" maxlength="50" $formDisabledAll>
</td></tr>
<tr><td><b>Email: </b></td><td>
<input type="text" name="email" value="$Cemail" size="64" maxlength="64" $formDisabledAll>
applications/htmlroot/cgi-bin/comments.pl view on Meta::CPAN
$environment = 'P' unless (defined $environment);
my $htmlTitle = $APPLICATION .' - '. $ENVIRONMENT{$environment};
# User Session and Access Control
my ($sessionID, $iconAdd, $iconDelete, $iconDetails, $iconEdit, $iconQuery, $iconTable, $errorUserAccessControl, $remoteUserLoggedOn, undef, undef, $givenNameLoggedOn, $familyNameLoggedOn, undef, undef, $userType, undef, undef, undef, $subTitle) = us...
unless ( defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
$action = "listView" if ( $userType == 0 and ($action eq 'insertView' or $action eq 'insert' or $action eq 'createView' or $action eq 'create' or $action eq 'deleteView' or $action eq 'delete' or $action eq 'editView' or $action eq 'edit' or $act...
my $urlWithAccessParameters = $ENV{SCRIPT_NAME} ."?pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID";
my ($CactivationTimeslot, $CsuspentionTimeslot, $tsec, $tmin, $thour, $tday, $tmonth, $tyear);
if ($CactivationDate ne '' and $CactivationTime ne '') {
($tyear, $tmonth, $tday) = split(/\-/, $CactivationDate);
$tyear -= 1900; $tmonth--;
($thour, $tmin, $tsec) = split(/:/, $CactivationTime);
applications/htmlroot/cgi-bin/detailedStatisticsReportGenerationAndCompareResponsetimeTrends.pl view on Meta::CPAN
$dummy = ($pf eq 'on') ? ' checked' : '';
$printerFriendlyOutputBox = "<input type=\"checkbox\" name=\"pf\"$dummy> Printer friendly output\n";
my $comboboxSelectKeysAndValuesPairs = 'html=>HTML';
$comboboxSelectKeysAndValuesPairs .= '|pdf=>PDF' if ( $HTMLTOPDFPRG ne '<nihil>' and $HTMLTOPDFHOW ne '<nihil>' );
$formatOutputSelect = create_combobox_from_keys_and_values_pairs ($comboboxSelectKeysAndValuesPairs, 'V', 0, $formatOutput, 'formatOutput', '', '', '', '', $debug);
my ($numberOfDays, $sqlStartDate, $sqlEndDate, $yearFrom, $monthFrom, $dayFrom, $yearTo, $monthTo, $dayTo);
($goodDate, $sqlStartDate, $sqlEndDate, $numberOfDays) = get_sql_startDate_sqlEndDate_numberOfDays_test ($STRICTDATE, $FIRSTSTARTDATE, $inputType, $selYear, $selQuarter, $selMonth, $selWeek, $startDate, $endDate, $currentYear, $currentMonth, $c...
$errorMessage .= "<br><font color=\"Red\">Wrong Startdate and/or Enddate</font><br>" unless ( $goodDate );
if ( $selDetailed eq 'on' ) {
if ($details eq 'on') {
$dummy = " checked";
$chartOrTableChecked = 1;
} else {
$dummy = '';
}
$tables .= " <input type=\"checkbox\" name=\"details\"$dummy> Show Details\n";
applications/htmlroot/cgi-bin/detailedStatisticsReportGenerationAndCompareResponsetimeTrends.pl view on Meta::CPAN
}
if ($firstrun) {
$firstrun = 0;
} else {
($oneblock, $block, $rrest, $dummy) = setBlockBGcolor ($oneblock, $status, $step, $startDateQ, $startTime, $nyear, $nmonth, $nday, $nhours, $nminuts, $nseconds, $nstatus, $nrest);
if ($rrest =~ /^Response/) {
$wtel++;
$responseTable .= "<table width=\"100%\" border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><th width=\"40\"> # </th><th>Start</th><th>Stop</th><th>Duration</th><th>Status</th><th>Status Message</th...
$responseTable .= "<tr $block><td>$dummy$wtel</td><td> $nstartDateQ \@ $nstartTime</td><td>$nendDateQ \@ $nendTime</td><td align=\"center\">".$nseconden."s</td><td><font color=\"".$COLORS {$nstatus}."\"> ".encode_html_entities('S', ...
} else {
$tel++;
$errorDetailList .= "<table width=\"100%\" border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><th width=\"40\"> # </th><th>Start</th><th>Stop</th><th>Duration</th><th>Status</th><th>Status Message</...
$errorDetailList .= "<tr $block><td>$dummy$tel</td><td> $nstartDateQ \@ $nstartTime</td><td>$nendDateQ \@ $nendTime</td><td align=\"center\">".$nseconden."s</td><td><font color=\"".$COLORS{$nstatus}."\"> ".encode_html_entities('S', ...
}
}
($nyear, $nmonth, $nday, $nhours, $nminuts, $nseconds, $nstartDateQ, $nstartTime, $nendDateQ, $nendTime, $nseconden, $nstatus, $nrest) = setPreviousValues ($startDateQ, $startTime, $endDateQ, $endTime, $seconden, $status, $rest);
}
if ($tel || $wtel) {
($oneblock, $block, $rrest, $dummy) = setBlockBGcolor ($oneblock, $status, 0, $startDateQ, $startTime, $nyear, $nmonth, $nday, $nhours, $nminuts, $nseconds, $nstatus, $nrest);
if ($rrest =~ /^Response/) {
$wtel++;
$responseTable .= "<tr $block><td>$dummy$wtel</td><td> $nstartDateQ \@ $nstartTime</td><td>$nendDateQ \@ $nendTime</td><td align=\"center\">".$nseconden."s</td><td><font color=\"".$COLORS {$nstatus}."\"> ".encode_html_entities('S', $n...
} else {
$tel++;
$errorDetailList .= "<tr $block><td>$dummy$tel</td><td> $nstartDateQ \@ $nstartTime</td><td>$nendDateQ \@ $nendTime</td><td align=\"center\">".$nseconden."s</td><td><font color=\"".$COLORS {$nstatus}."\"> ".encode_html_entities('S', $...
}
}
$responseTable .= "</table>\n<br>\n<table border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><td>Legende:</td><td> </td><td bgcolor=\"$COLORSTABLE{NOBLOCK}\"> Single item...
if ($tel) {
$errorDetailList .= "</table>\n<br>\n<table border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><td>Legende:</td><td> </td><td bgcolor=\"$COLORSTABLE{NOBLOCK}\"> Single ...
} else {
$errorDetailList .= "<table border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><td width=\"400\">No problems for this period!</td></tr></table>\n";
}
applications/htmlroot/cgi-bin/detailedStatisticsReportGenerationAndCompareResponsetimeTrends.pl view on Meta::CPAN
# ($rest, undef) = split(/\|/, $rest, 2) if (defined $rest); # remove performance data
if (defined $rest) {
my $_rest = reverse $rest;
my ($_rest, undef) = reverse split(/\|/, $_rest, 2);
my $rest = reverse $_rest;
}
if ($wtel) {
($oneblock, $block, $rrest, $dummy) = setBlockBGcolor ($oneblock, $status, $step, $startDateQ, $startTime, $nyear, $nmonth, $nday, $nhours, $nminuts, $nseconds, $nstatus, $nrest);
$responseTable .= "<tr $block><td>$dummy$wtel</td><td> $nstartDateQ \@ $nstartTime</td><td>$nendDateQ \@ $nendTime</td><td align=\"center\">".$nseconden."s</td><td><font color=\"".$COLORS {$nstatus}."\"> " .encode_html_entities('S', $...
} else {
$responseTable .= "<table width=\"100%\" border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><th width=\"40\"> # </th><th>Start</th><th>Stop</th><th>Duration</th><th>Status</th><th>Status Message</th><...
}
$wtel++;
($nyear, $nmonth, $nday, $nhours, $nminuts, $nseconds, $nstartDateQ, $nstartTime, $nendDateQ, $nendTime, $nseconden, $nstatus, $nrest) = setPreviousValues ($startDateQ, $startTime, $endDateQ, $endTime, $seconden, $status, $rest);
}
if ($wtel) {
($oneblock, $block, $rrest, $dummy) = setBlockBGcolor ($oneblock, $status, 0, $startDateQ, $startTime, $nyear, $nmonth, $nday, $nhours, $nminuts, $nseconds, $nstatus, $nrest);
$responseTable .= "<tr $block><td>$dummy$wtel</td><td> $nstartDateQ \@ $nstartTime</td><td>$nendDateQ \@ $nendTime</td><td align=\"center\">".$nseconden."s</td><td><font color=\"".$COLORS {$nstatus}."\"> " .encode_html_entities('S', $ns...
$responseTable .= "</table>\n<br>\n<table border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><td>Legende:</td><td> </td><td bgcolor=\"$COLORSTABLE{NOBLOCK}\"> Single it...
} else {
$responseTable .= "<table border=\"0\" cellpadding=\"1\" cellspacing=\"1\" bgcolor=\"$COLORSTABLE{TABLE}\"><tr><td width=\"400\">No response time warnings for this period!</td></tr></table>\n";
}
$sth->finish() or $rv = error_trap_DBI("", "Cannot sth->finish", $debug, '', "", '', "", -1, '', $sessionID);
}
# Problem Summary - - - - - - - - - - - - - - - - - - - - - - -
$sqlQuery = create_sql_query_events_from_range_year_month ($inputType, $sqlStartDate, $sqlEndDate, $sqlErrors, $forceIndex, $sqlWhere, $sqlPeriode, "AND status ='CRITICAL'", "GROUP BY statusmessage", '', "order by aantal desc, statusmessage...
applications/htmlroot/cgi-bin/detailedStatisticsReportGenerationAndCompareResponsetimeTrends.pl.book view on Meta::CPAN
--bodyimage /opt/asnmtap-oop/applications/htmlroot/img/logos/bodyimage.gif --charset iso-8859-1 --format pdf14 --size A4 --landscape --browserwidth 1280 --top 10mm --bottom 10mm --left 10mm --right 10mm --fontsize 10.0 --fontspacing 1.2 --headingfont...
applications/htmlroot/cgi-bin/generateChart.pl view on Meta::CPAN
$c->yAxis()->setColors($axisColor);
# Add a title on the the y axis
my $yAxisTitle = ($selChart eq 'Bar') ? 'Response time' : 'Average response time';
$c->yAxis()->setTitle($yAxisTitle, "arial.ttf", 9, $forGround);
# Add a title on the the x axis
$c->xAxis()->setTitle("<*block,valign=absmiddle*>Date/Time<*/*>")->setFontColor($forGround);
}
# Add a title box to the chart using 10 pts Arial Bold Italic font.
$chartTitle = "Error for '$prgtext'" unless ( defined $chartTitle and $rv );
$c->addText($width/2, 14, $chartTitle, "arialbi.ttf", 10, $forGround, 5, 0);
# Add debugMessage and errorMessage
$c->addText($width - 18, $hight - 33, $debugMessage, "arial.ttf", 8, $forGround, 6, 0) if ( defined $debugMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 16, $errorMessage, "arial.ttf", 12, 0xFF0000, 5, 0) if ( defined $errorMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset - 16, $dbiErrorCode, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorCode );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 48, $dbiErrorString, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorString );
# Add a custom CDML text at the bottom right of the plot area as the logo
applications/htmlroot/cgi-bin/generateChart.pl view on Meta::CPAN
# Set the border color of the sector the same color as the fill color. Set the line color of the join line to forgroundcolor
$c->setLineColor($perlchartdir::SameAsMainColor, $forGround);
# Set the start angle to 135 degrees
$c->setStartAngle(135);
# Set the pie data and the pie labels
$c->setData(\@data, \@labels);
} else {
# Set the labels on the x & y axis
my $fontAngel = ( $selChart eq "HourlyAverage" ) ? 0 : 45;
$c->xAxis()->setLabelStyle("Arial.ttf", 8, $forGround)->setFontAngle($fontAngel);
$c->xAxis()->setLabels(\@labels);
$c->yAxis()->setLabelStyle("Arial.ttf", 8, $forGround)->setFontAngle(0);
$c->yAxis()->setLabelFormat("{value|2,.}");
# Set the margins at the two ends of the axis during auto-scaling, and whether to start the axis from zero.
$c->yAxis()->setAutoScale(5, 10, 0);
# Add a mark line ore zone to the chart and add the first two data sets to the chart as a stacked bar group
if ( $uKey2 eq 'none' and $uKey3 eq 'none' ) {
$trendvalue = 3600 if ($trendvalue == 0);
applications/htmlroot/cgi-bin/getArchivedDebug.pl view on Meta::CPAN
# Serialize the URL Access Parameters into a string
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID&catalogID=$CcatalogID&catalogIDreload=$CcatalogIDreload&uKey=$uKey&ascending=$ascending";
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>catalog ID: $CcatalogID<br>catalog ID reload : $CcatalogIDreload<br>uKey : $uKey<br>ascending : $ascending<br>URL ... : $urlAccessParam...
unless ( defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
my ($rv, $dbh, $sth, $sql, $title, $resultsdir, $catalogIDSelect, $uKeySelect, $debugsSelect);
# open connection to database and query data
$rv = 1;
$dbh = DBI->connect("dbi:mysql:$DATABASE:$SERVERNAMEREADONLY:$SERVERPORTREADONLY", "$SERVERUSERREADONLY", "$SERVERPASSREADONLY", ) or $rv = error_trap_DBI(*STDOUT, "Cannot connect to the database", $debug, $pagedir, $pageset, $htmlTitle, $subTitl...
if ( $dbh and $rv ) {
$uKey = '<NIHIL>' if ( $CcatalogIDreload );
applications/htmlroot/cgi-bin/getArchivedDisplays.pl view on Meta::CPAN
# Serialize the URL Access Parameters into a string
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID&catalogID=$CcatalogID&CcreationDate=$CcreationDate&CcreationTime=$CcreationTime";
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>catalog ID: $CcatalogID<br>date : $CcreationDate<br>time : $CcreationTime<br>URL ... : $urlAccessParameters</pre>" if ( $debug eq ...
unless ( defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
my ($rv, $dbh, $sth, $sql, $displayDaemon, $creationTime);
# open connection to database and query data
$rv = 1;
$creationTime = $CcreationDate .' '. $CcreationTime if ($CcreationDate ne '' and $CcreationTime ne '');
if ( defined $creationTime ) {
$dbh = DBI->connect("dbi:mysql:$DATABASE:$SERVERNAMEREADONLY:$SERVERPORTREADONLY", "$SERVERUSERREADONLY", "$SERVERPASSREADONLY", ) or $rv = error_trap_DBI(*STDOUT, "Cannot connect to the database", $debug, $pagedir, $pageset, $htmlTitle, $subTi...
applications/htmlroot/cgi-bin/getArchivedDisplays.pl view on Meta::CPAN
<b><input type="text" name="creationTime" value="$CcreationTime" size="8" maxlength="8" onChange="ReadISO8601time(document.forms['getArchivedDisplays'].creationTime.value);"></b> format: hh:mm:ss, 00:00:00 to 23:59:59
</tr><tr align="left"><td align="right"><br><input type="submit" value="Go"></td><td><br><input type="reset" value="Reset"></td></tr>
</table>
</form>
<HR>
EndOfHtml
}
if ( defined $creationTime and defined $displayDaemon ) {
my $command = "archive cd $APPLICATIONPATH; $PERLCOMMAND ./display.pl --loop=F --creationTime=\"$creationTime\" --displayTime=T --lockMySQL=F --debug=F --hostname=$SERVERNAMEREADONLY --checklist=DisplayCT-$displayDaemon --pagedir=_loop_${remote...
print "<P class=\"RunStatusOnDemandHtmlTitle\">$htmlTitle: <font class=\"RunStatusOnDemandCommand\">$command</font></P><IMG SRC=\"".$IMAGESURL."/gears.gif\" HSPACE=\"0\" VSPACE=\"0\" BORDER=\"0\" NAME=\"Progress\" title=\"Please Wait ...\" alt=...
my ($rStatus, $rStdout, $rStderr) = call_system ("$SSHCOMMAND -o 'StrictHostKeyChecking=no' -o 'UserKnownHostsFile=$WWWKEYPATH/.ssh/known_hosts' -i '$WWWKEYPATH/.ssh/ssh' $SSHLOGONNAME\@localhost '$command'", ($debug eq 'T') ? 1 : 0);
$rStderr =~ s/^stdin: is not a tty//;
chomp ($rStderr);
if ( $rStderr ) {
print "<tr><td><pre>Status : '$rStatus'\n\nCommand: '$command'\n\nMessage: $rStderr\n\nSTDOUT : '$rStdout'\n\nSTDERR : '$rStderr'></pre></tr></td></table>\n";
} else {
print "<tr><td><a href=\"$HTTPSURL/nav/_loop_${remoteUser}_${pageDir}/$pageset.html\" target=\"_blank\">$htmlTitle for $creationTime</a></tr></td></table>\n";
}
applications/htmlroot/cgi-bin/getArchivedReport.pl view on Meta::CPAN
# Serialize the URL Access Parameters into a string
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID&catalogID=$CcatalogID&catalogIDreload=$CcatalogIDreload&uKey=$uKey&ascending=$ascending&day=$day&week=$week&month=$month&quarter=$quarter&year=$year";
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>catalog ID: $CcatalogID<br>catalog ID reload : $CcatalogIDreload<br>uKey : $uKey<br>ascending : $ascending<br>day : $day<br>week ...
unless ( defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
my ($rv, $dbh, $sth, $sql, $title, $resultsdir, $catalogIDSelect, $uKeySelect, $reportsSelect, %timeperiods);
# open connection to database and query data
$rv = 1;
$dbh = DBI->connect("dbi:mysql:$DATABASE:$SERVERNAMEREADONLY:$SERVERPORTREADONLY", "$SERVERUSERREADONLY", "$SERVERPASSREADONLY", ) or $rv = error_trap_DBI(*STDOUT, "Cannot connect to the database", $debug, $pagedir, $pageset, $htmlTitle, $subTitl...
if ( $dbh and $rv ) {
$uKey = '<NIHIL>' if ( $CcatalogIDreload );
applications/htmlroot/cgi-bin/getArchivedResults.pl view on Meta::CPAN
# Serialize the URL Access Parameters into a string
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID&catalogID=$CcatalogID&catalogIDreload=$CcatalogIDreload&uKey=$uKey&ascending=$ascending&csvDaily=$csvDaily&csvWeekly=$csvWeekly&sqlData=$sqlData&sqlError=$...
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>catalog ID: $CcatalogID<br>catalog ID reload : $CcatalogIDreload<br>uKey : $uKey<br>csvDaily : $csvDaily<br>csvWeekly : $csvWeekly<br>sq...
unless ( defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
my ($rv, $dbh, $sth, $sql, $title, $resultsdir, $catalogIDSelect, $uKeySelect, $resultsSelect);
# open connection to database and query data
$rv = 1;
$dbh = DBI->connect("dbi:mysql:$DATABASE:$SERVERNAMEREADONLY:$SERVERPORTREADONLY", "$SERVERUSERREADONLY", "$SERVERPASSREADONLY", ) or $rv = error_trap_DBI(*STDOUT, "Cannot connect to the database", $debug, $pagedir, $pageset, $htmlTitle, $subTitl...
if ( $dbh and $rv ) {
$uKey = '<NIHIL>' if ( $CcatalogIDreload );
applications/htmlroot/cgi-bin/htmldoc.sh view on Meta::CPAN
# ---------------------------------------------------------------------------------------------------------
# 2011/mm/dd, v3.002.003, htmldoc.sh for ASNMTAP
# ---------------------------------------------------------------------------------------------------------
# Compatible with HTMLDOC v1.8.27 from http://www.htmldoc.org/ or http://www.easysw.com/htmldoc
#
# http://${SERVER_NAME}/asnmtap/cgi-bin/htmldoc.sh/asnmtap/cgi-bin/detailedStatisticsReportGenerationAndCompareResponsetimeTrends.pl?$QUERY_STRING
# <--------------------------------------- ${PATH_INFO} -------------------------------------->
# ----------------------------------------------------------------------------------------------------------
# The "options" variable contains any options you want to pass to HTMLDOC.
options='--bodyimage /opt/asnmtap/applications/htmlroot/img/logos/bodyimage.gif --charset iso-8859-1 --format pdf14 --size A4 --landscape --browserwidth 1280 --top 10mm --bottom 10mm --left 10mm --right 10mm --fontsize 10.0 --fontspacing 1.2 --headin...
HTMLDOC_NOCGI=1; export HTMLDOC_NOCGI
# Tell the browser to expect a PDF file ...
echo "Content-Type: application/pdf"
echo ""
echo "Content-disposition: attachment; filename=GeneratedReport.pdf"
echo ""
echo ""
applications/htmlroot/cgi-bin/moderator/comments.pl view on Meta::CPAN
# Serialize the URL Access Parameters into a string
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID&pageNo=$pageNo&pageOffset=$pageOffset&action=$action&catalogID=$CcatalogID&catalogIDreload=$CcatalogIDreload&environment=$Cenvironment&environIDreload=$Cen...
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>page no : $pageNo<br>page offset : $pageOffset<br>action : $action<br>catalog ID : $CcatalogID<br>cat.ID rel...
if ( defined $sessionID and ! defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
$action = 'insertView' if ( $CcatalogIDreload or $CenvironIDreload );
my $urlWithAccessParameters = $ENV{SCRIPT_NAME} ."?pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID";
my $localYear = sprintf ("%04d", (localtime)[5] );
my $localMonth = sprintf ("%02d", (localtime)[4] );
my $currentYear = sprintf ("%04d", (localtime)[5] + 1900 );
my $currentMonth = sprintf ("%02d", (localtime)[4] + 1 );
my $currentDay = sprintf ("%02d", (localtime)[3] );
applications/htmlroot/cgi-bin/moderator/downtimes.pl view on Meta::CPAN
# Serialize the URL Access Parameters into a string
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID&pageNo=$pageNo&pageOffset=$pageOffset&action=$action&id=$Cid&uploadFilename=$CuploadFilename&title=$Ctitle&activationDate=$CactivationDate&activationTime=$...
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>page no : $pageNo<br>page offset : $pageOffset<br>action : $action<br>id : $Cid<br>uploadFilename: $...
if ( defined $sessionID and ! defined $errorUserAccessControl ) {
unless ( defined $userType ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print "<br>\n<table WIDTH=\"100%\" border=0><tr><td class=\"HelpPluginFilename\">\n<font size=\"+1\">$errorUserAccessControl</font>\n</td></tr></table>\n<br>\n";
} else {
if ( $action eq 'insert' ) {
if ( $CuploadFilename eq '' or $CuploadFilename eq '<NIHIL>' ) {
$CatalogIDuKeyListStatus = 'ERROR: No applications CatalogID & uKey list selected!';
} else {
if ( $cgi->param('uploadFilename') eq '' ) {
$CatalogIDuKeyListStatus = 'ERROR: No applications CatalogID & uKey list uploaded!';
} else {
$CuploadFilename =~ s/^.*(?:\/|\\)//;
$Ctitle = 'Applications CatalogID & uKey List: '. $CuploadFilename;
applications/htmlroot/cgi-bin/moderator/generateCollectorCrontabSchedulingReport.pl view on Meta::CPAN
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# calculatie hight
$hight += ($labelOffset * $numberOfLabels) if (defined $numberOfLabels);
$hight = $hightMin if ($hight < $hightMin);
# Create XYChart object with: width, hight, backgroundcolor, bordercolor, pxp-3d borden
my $c = new XYChart($width, $hight, $background, $background, 1);
# Add a title box to the chart using 10 pts Arial Bold Italic font.
$chartTitle = "Error for '$chartTitle'" unless ( defined $chartTitle and $rv );
$c->addText($width/2, 14, $chartTitle, "arialbi.ttf", 10, $forGround, 5, 0);
# Add debugMessage and errorMessage
$c->addText($width - 18, $hight - 33, $debugMessage, "arial.ttf", 8, $forGround, 6, 0) if ( defined $debugMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 16, $errorMessage, "arial.ttf", 12, 0xFF0000, 5, 0) if ( defined $errorMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset - 16, $dbiErrorCode, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorCode );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 48, $dbiErrorString, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorString );
# Add a custom CDML text at the bottom right of the plot area as the logo
applications/htmlroot/cgi-bin/moderator/generateCollectorDaemonSchedulingReport.pl view on Meta::CPAN
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# calculatie hight
$hight += ($labelOffset * $numberOfLabels) if (defined $numberOfLabels);
$hight = $hightMin if ($hight < $hightMin);
# Create XYChart object with: width, hight, backgroundcolor, bordercolor, pxp-3d borden
my $c = new XYChart($width, $hight, $background, $background, 1);
# Add a title box to the chart using 10 pts Arial Bold Italic font.
$chartTitle = "Error for '$chartTitle'" unless ( defined $chartTitle and $rv );
$c->addText($width/2, 14, $chartTitle, "arialbi.ttf", 10, $forGround, 5, 0);
# Add debugMessage and errorMessage
$c->addText($width - 18, $hight - 33, $debugMessage, "arial.ttf", 8, $forGround, 6, 0) if ( defined $debugMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 16, $errorMessage, "arial.ttf", 12, 0xFF0000, 5, 0) if ( defined $errorMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset - 16, $dbiErrorCode, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorCode );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 48, $dbiErrorString, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorString );
# Add a custom CDML text at the bottom right of the plot area as the logo
applications/htmlroot/cgi-bin/moderator/generatePluginCrontabSchedulingReport.pl view on Meta::CPAN
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# calculatie hight
$hight += ($labelOffset * 24 * 7);
$hight = $hightMin if ($hight < $hightMin);
# Create XYChart object with: width, hight, backgroundcolor, bordercolor, pxp-3d borden
my $c = new XYChart($width, $hight, $background, $background, 1);
# Add a title box to the chart using 10 pts Arial Bold Italic font.
$chartTitle = "Error for '$chartTitle'" unless ( defined $chartTitle and $rv );
$c->addText($width/2, 14, $chartTitle, "arialbi.ttf", 10, $forGround, 5, 0);
# Add debugMessage and errorMessage
$c->addText($width - 18, $hight - 33, $debugMessage, "arial.ttf", 8, $forGround, 6, 0) if ( defined $debugMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 16, $errorMessage, "arial.ttf", 12, 0xFF0000, 5, 0) if ( defined $errorMessage );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset - 16, $dbiErrorCode, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorCode );
$c->addText($width/2, (($hight - $yOffset - $AreaBOffset)/2) + $yOffset + 48, $dbiErrorString, "arial.ttf", 10, 0xFF0000, 5, 0) if ( defined $dbiErrorString );
# Add a custom CDML text at the bottom right of the plot area as the logo
applications/htmlroot/cgi-bin/moderator/index.pl view on Meta::CPAN
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>URL ... : $urlAccessParameters</pre>" if ( $debug eq 'T' );
if ( defined $sessionID and ! defined $errorUserAccessControl ) {
# HTML - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print <<HTML;
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr align="center"><td>
<table border="0" cellspacing="0" cellpadding="0">
<tr><td class="StatusItem"><font size="+1">Moderator</font></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="sessions.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Session Console (for the Display)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="runStatusOnDemand.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Status Console (for the Collector/Display/Import Data Through Catalog)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="trendlineCorrectionReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Trendline Correction Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="pluginCrontabSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Plugin Crontab Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"><a href="collectorCrontabSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Crontab Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"><a href="collectorDaemonSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Daemon Scheduling Reports (for the Collector)</a></td></tr>
applications/htmlroot/cgi-bin/moderator/runStatusOnDemand.pl view on Meta::CPAN
} elsif (-s "$APPLICATIONPATH/bin/asnmtap-$status.sh") {
$binMasterOrSlave = 'bin';
}
if ($binMasterOrSlave ne '<NIHIL>') {
my ($capture_array, $daemonCaptureHeader, $daemonCaptureStatus, $daemonCaptureParent);
my (%daemonCaptureArrayName, %daemonCaptureArrayPid, %daemonCaptureArrayParent) = ();
my (%daemonProcessTableParent, %daemonProcessTableChild, %daemonProcessTableSubChild) = ();
$command = "asnmtap-$status.sh status";
print "<P class=\"RunStatusOnDemandHtmlTitle\">$htmlTitle: <font class=\"RunStatusOnDemandCommand\">$APPLICATIONPATH/$binMasterOrSlave/$command</font></P><IMG SRC=\"".$IMAGESURL."/gears.gif\" HSPACE=\"0\" VSPACE=\"0\" BORDER=\"0\" NAME=\"Progre...
my $_ppid = 1;
if (-e '/usr/bin/zonename') { # Solaris 10 root into an non global zone where pid != 1 & pid == ppid
my $zonename = `/usr/bin/zonename`;
if ( $zonename ne 'global' ) {
$_ppid = `ps -e -o 'pid ppid zone fname' | grep zsched | awk '{print \$1}'`;
}
}
applications/htmlroot/cgi-bin/moderator/runStatusOnDemand.pl view on Meta::CPAN
}
}
}
}
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
sub doRequestedActions {
my ($htmlTitle, $title, $command, $statusOK, $statusNOK, $debug) = @_;
print "<P class=\"RunStatusOnDemandHtmlTitle\">$htmlTitle: <font class=\"RunStatusOnDemandCommand\">$title</font></P><IMG SRC=\"".$IMAGESURL."/gears.gif\" HSPACE=\"0\" VSPACE=\"0\" BORDER=\"0\" NAME=\"Progress\" title=\"Please Wait ...\" alt=\"Plea...
my ($rStatus, $rStdout, $rStderr) = call_system ("$SSHCOMMAND -o 'StrictHostKeyChecking=no' -o 'UserKnownHostsFile=$WWWKEYPATH/.ssh/known_hosts' -i '$WWWKEYPATH/.ssh/ssh' $SSHLOGONNAME\@localhost '$command'", ($debug eq 'T') ? 1 : 0);
$rStderr =~ s/^stdin: is not a tty//;
chomp ($rStderr);
# my $message = ($rStderr) ? $rStderr : (($rStatus) ? $statusOK : $statusNOK);
my $message = ($rStderr) ? $rStderr : $statusOK;
print "<tr><td><pre>Status : '$rStatus'\n\nCommand: '$command'\n\nMessage: $message\n\nSTDOUT : '$rStdout'\n\nSTDERR : '$rStderr'></pre></tr></td></table>\n";
}
applications/htmlroot/cgi-bin/perfparse.pl view on Meta::CPAN
my $urlAccessParameters = "pagedir=$pagedir&pageset=$pageset&debug=$debug&CGISESSID=$sessionID";
# Debug information
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>URL ... : $urlAccessParameters</pre>" if ( $debug eq 'T' );
unless ( defined $errorUserAccessControl ) {
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print '<br>', "\n", '<table WIDTH="100%" border=0><tr><td class="HelpPluginFilename">', "\n";
if ( ! defined $userType or $userType == 0 ) {
print '<font size="+1">You don\'t have enough permissions!</font>', "\n";
} else {
print '<iframe src="'. ${HTTPSURL} . $PERFPARSECGI .'" width="100%" height="640" more="" ATTRIBUTES=""></iframe>', "\n";
}
print '</td></tr></table>', "\n";
print '<BR>', "\n";
}
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
applications/htmlroot/cgi-bin/runCmdOnDemand.pl view on Meta::CPAN
</select>
</td></tr>
<tr align="left"><td align="right"><br><input type="submit" value="Launch"></td><td><br><input type="reset" value="Reset"></td></tr>
</table>
</form>
<HR>
EndOfHtml
if (!$CcatalogIDreload and $uKey ne '<NIHIL>') {
my $commandMaskedPassword = maskPassword ($command);
print "<P class=\"RunCmdOnDemandHtmlTitle\">$htmlTitle:<br> <font class=\"RunCmdOnDemandCommand\">$commandMaskedPassword --onDemand=Y --debug=$debug --asnmtapEnv='F|F|F'</font></P><IMG SRC=\"".$IMAGESURL."/gears.gif\" HSPACE=\"0\" VSPACE=\"0\" ...
my ($capture_long, $capture_html, $capture_text, $capture_debug, $capture_array, @WebTransactResponses, @capture_array);
$capture_long = $capture_html = $capture_text = $capture_debug = $capture_array = 0;
# my $capture_exec = ( $RUNCMDONDEMAND eq 'probe' ) ? "$SSHCOMMAND -i '$SSHKEYPATH/$SSHLOGONNAME/.ssh/asnmtap.id' -o 'StrictHostKeyChecking=no' $SSHLOGONNAME\@$FQDN \"if [ -d /opt/monitoring/asnmtap/plugins/ ]; then cd /opt/monitoring/asnmtap/plu...
my $capture_exec = ( $RUNCMDONDEMAND eq 'probe' ) ? "$SSHCOMMAND -i '$SSHKEYPATH/$SSHLOGONNAME/asnmtap.id' -o 'StrictHostKeyChecking=no' $SSHLOGONNAME\@$FQDN \"if [ -d /opt/monitoring/asnmtap/plugins/ ]; then cd /opt/monitoring/asnmtap/plugins/...
if ( 1 == 1 ) {
@capture_array = `$capture_exec`;
} else {
my ($stdout, $stderr, $exit_value, $signal_num, $dumped_core);
applications/htmlroot/cgi-bin/sadmin/index.pl view on Meta::CPAN
print "<pre>pagedir : $pagedir<br>pageset : $pageset<br>debug : $debug<br>CGISESSID : $sessionID<br>URL ... : $urlAccessParameters</pre>" if ( $debug eq 'T' );
if ( defined $sessionID and ! defined $errorUserAccessControl ) {
# HTML - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
print_header (*STDOUT, $pagedir, $pageset, $htmlTitle, $subTitle, 3600, '', 'F', '', $sessionID);
print <<HTML;
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr align="center"><td>
<table border="0" cellspacing="0" cellpadding="0">
<tr><td class="StatusItem"><font size="+1">Moderator</font></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/sessions.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Session Console (for the Display)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/runStatusOnDemand.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Status Console (for the Collector/Display/Import Data Through Catalog)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/trendlineCorrectionReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Trendline Correction Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/pluginCrontabSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Plugin Crontab Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/collectorCrontabSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Crontab Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/collectorDaemonSchedulingReports.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Daemon Scheduling Reports (for the Collector)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../moderator/comments.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Comments (to set the comments for a group of related tests)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/downtimes.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Downtimes (to set the downtime for a group of related tests)</a></td></tr>
<tr><td class="StatusItem"><a href="../moderator/plugins.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Plugins (to edit short description, trendline, holiday bundle and uploading plugindoc)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><font size="+1">Administrator</font></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../admin/languages.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Languages</a></td></tr>
<tr><td class="StatusItem"><a href="../admin/countries.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Countries</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../admin/holidays.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Holidays</a></td></tr>
<tr><td class="StatusItem"><a href="../admin/holidaysBundle.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Holidays Bundle</a></td></tr>
<tr><td class="StatusItem"><a href="../admin/timeperiods.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Timeperiods</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../admin/users.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Users</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
applications/htmlroot/cgi-bin/sadmin/index.pl view on Meta::CPAN
<tr><td class="StatusItem"><a href="../admin/resultsdirs.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Resultdirs (where the Collector writes the returned data from a plugin)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../admin/plugins.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Plugins (to define the plugins that are executed by the Collector)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../admin/views.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Views (to define the different views used by the Display daemons)</a></td></tr>
<tr><td class="StatusItem"><a href="../admin/crontabs.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Crontabs (to define the different crontabs used by the Collector daemons)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="../admin/generateConfig.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Configurations (for the Archiver, Display, Collector and Rsync Mirroring)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><font size="+1">Server Administrator</font></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="catalog.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Catalog (to define the application monitoring catalog)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="servers.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Servers (to define the different application monitoring servers)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="pagedirs.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Pagedirs (where the Display writes the different views)</a></td></tr>
<tr><td class="StatusItem"><a href="displayGroups.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Display Groups (to define the group titles that are used by the Display)</a></td></tr>
<tr><td class="StatusItem"> </td></tr>
<tr><td class="StatusItem"><a href="displayDaemons.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Display Daemons (to define the different daemons used for the Display)</a></td></tr>
<tr><td class="StatusItem"><a href="collectorDaemons.pl?pagedir=$pagedir&pageset=$pageset&debug=F&CGISESSID=$sessionID">Collector Daemons (to define the different daemons used for the Collector)</a></td></tr>
applications/htmlroot/cgi-bin/users.pl view on Meta::CPAN
<input type="text" name="catalogID" value="$CcatalogID" size="5" maxlength="5" disabled>
</td></tr>
<tr><td><b>Remote User: </b></td><td>
<input type="text" name="remoteUser" value="$CremoteUser" size="15" maxlength="15" disabled>
</td></tr><tr><td>Remote Address: </td><td>
<input type="text" name="remoteAddr" value="$CremoteAddr" size="15" maxlength="15" disabled> format: x.[x.[x.[x]]]
</td></tr><tr><td>Remote Netmask: </td><td>
<input type="text" name="remoteNetmask" value="$CremoteNetmask" size="2" maxlength="2" disabled> format: 01-32
</td></tr><tr><td> </td><td>
<table width="100%">
<tr><td><font color="#0000FF">32</font> 255.255.255.255</td><td><font color="#0000FF">31</font> 255.255.255.254</td><td><font color="#0000FF">30</font> 255.255.255.252</td><td><font color="#0000FF">29</font> 255.255.255.248</td><td><font colo...
<tr><td><font color="#0000FF">24</font> 255.255.255.0</td><td><font color="#0000FF">23</font> 255.255.254.0</td><td><font color="#0000FF">22</font> 255.255.252.0</td><td><font color="#0000FF">21</font> 255.255.248.0</td><td><font color="#0000...
<tr><td><font color="#0000FF">16</font> 255.255.0.0</td><td><font color="#0000FF">15</font> 255.254.0.0</td><td><font color="#0000FF">14</font> 255.252.0.0</td><td><font color="#0000FF">13</font> 255.248.0.0</td><td><font color="#0000FF">12</...
<tr><td><font color="#0000FF">08</font> 255.0.0.0</td><td><font color="#0000FF">07</font> 254.0.0.0</td><td><font color="#0000FF">06</font> 252.0.0.0</td><td><font color="#0000FF">05</font> 248.0.0.0</td><td><font color="#0000FF">04</font> 22...
</table>
</td></tr><tr><td><b>Given Name: </b></td><td>
<input type="text" name="givenName" value="$CgivenName" size="50" maxlength="50">
</td></tr><tr><td><b>Surname: </b></td><td>
<input type="text" name="familyName" value="$CfamilyName" size="50" maxlength="50">
</td></tr><tr><td><b>Email: </b></td><td>
<input type="text" name="email" value="$Cemail" size="64" maxlength="64">
</td></tr><tr><td><b>New password: </b></td><td>
<input type="password" name="password1" value="$Cpassword" size="15" maxlength="15"> The password must contain at least 1 number, at least 1 lower case letter, and at least 1 upper case letter.
</td></tr><tr><td><b>Confirm password: </b></td><td>
applications/htmlroot/overlib.js view on Meta::CPAN
// PRE-INIT
// Ignore these lines, configuration is below.
////////
var olLoaded = 0;var pmStart = 10000000; var pmUpper = 10001000; var pmCount = pmStart+1; var pmt=''; var pms = new Array(); var olInfo = new Info('4.21', 1);
var FREPLACE = 0; var FBEFORE = 1; var FAFTER = 2; var FALTERNATE = 3; var FCHAIN=4;
var olHideForm=0; // parameter for hiding SELECT and ActiveX elements in IE5.5+
var olHautoFlag = 0; // flags for over-riding VAUTO and HAUTO if corresponding
var olVautoFlag = 0; // positioning commands are used on the command line
var hookPts = new Array(), postParse = new Array(), cmdLine = new Array(), runTime = new Array();
// for plugins
registerCommands('donothing,inarray,caparray,sticky,background,noclose,caption,left,right,center,offsetx,offsety,fgcolor,bgcolor,textcolor,capcolor,closecolor,width,border,cellpad,status,autostatus,autostatuscap,height,closetext,snapx,snapy,fixx,fixy...
////////
// DEFAULT CONFIGURATION
// Settings you want everywhere are set here. All of this can also be
// changed on your html page or through an overLIB call.
////////
if (typeof ol_fgcolor=='undefined') var ol_fgcolor="#CCCCFF";
if (typeof ol_bgcolor=='undefined') var ol_bgcolor="#333399";
if (typeof ol_textcolor=='undefined') var ol_textcolor="#000000";
if (typeof ol_capcolor=='undefined') var ol_capcolor="#FFFFFF";
if (typeof ol_closecolor=='undefined') var ol_closecolor="#9999FF";
if (typeof ol_textfont=='undefined') var ol_textfont="Verdana,Arial,Helvetica";
if (typeof ol_captionfont=='undefined') var ol_captionfont="Verdana,Arial,Helvetica";
if (typeof ol_closefont=='undefined') var ol_closefont="Verdana,Arial,Helvetica";
if (typeof ol_textsize=='undefined') var ol_textsize="1";
if (typeof ol_captionsize=='undefined') var ol_captionsize="1";
if (typeof ol_closesize=='undefined') var ol_closesize="1";
if (typeof ol_width=='undefined') var ol_width="200";
if (typeof ol_border=='undefined') var ol_border="1";
if (typeof ol_cellpad=='undefined') var ol_cellpad=2;
if (typeof ol_offsetx=='undefined') var ol_offsetx=10;
if (typeof ol_offsety=='undefined') var ol_offsety=10;
if (typeof ol_text=='undefined') var ol_text="Default Text";
if (typeof ol_cap=='undefined') var ol_cap="";
applications/htmlroot/overlib.js view on Meta::CPAN
if (typeof ol_vauto=='undefined') var ol_vauto=0;
if (typeof ol_closeclick=='undefined') var ol_closeclick=0;
if (typeof ol_wrap=='undefined') var ol_wrap=0;
if (typeof ol_followmouse=='undefined') var ol_followmouse=1;
if (typeof ol_mouseoff=='undefined') var ol_mouseoff=0;
if (typeof ol_closetitle=='undefined') var ol_closetitle='Close';
if (typeof ol_compatmode=='undefined') var ol_compatmode=0;
if (typeof ol_css=='undefined') var ol_css=CSSOFF;
if (typeof ol_fgclass=='undefined') var ol_fgclass="";
if (typeof ol_bgclass=='undefined') var ol_bgclass="";
if (typeof ol_textfontclass=='undefined') var ol_textfontclass="";
if (typeof ol_captionfontclass=='undefined') var ol_captionfontclass="";
if (typeof ol_closefontclass=='undefined') var ol_closefontclass="";
////////
// ARRAY CONFIGURATION
////////
// You can use these arrays to store popup text here instead of in the html.
if (typeof ol_texts=='undefined') var ol_texts = new Array("Text 0", "Text 1");
if (typeof ol_caps=='undefined') var ol_caps = new Array("Caption 0", "Caption 1");
////////
applications/htmlroot/overlib.js view on Meta::CPAN
var o3_fgbackground="";
var o3_bgbackground="";
var o3_padxl=0;
var o3_padxr=0;
var o3_padyt=0;
var o3_padyb=0;
var o3_fullhtml=0;
var o3_vpos=BELOW;
var o3_aboveheight=0;
var o3_capicon="";
var o3_textfont="Verdana,Arial,Helvetica";
var o3_captionfont="Verdana,Arial,Helvetica";
var o3_closefont="Verdana,Arial,Helvetica";
var o3_textsize="1";
var o3_captionsize="1";
var o3_closesize="1";
var o3_frame=self;
var o3_timeout=0;
var o3_timerid=0;
var o3_allowmove=0;
var o3_function=null;
var o3_delay=0;
var o3_delayid=0;
applications/htmlroot/overlib.js view on Meta::CPAN
var o3_vauto=0;
var o3_closeclick=0;
var o3_wrap=0;
var o3_followmouse=1;
var o3_mouseoff=0;
var o3_closetitle='';
var o3_compatmode=0;
var o3_css=CSSOFF;
var o3_fgclass="";
var o3_bgclass="";
var o3_textfontclass="";
var o3_captionfontclass="";
var o3_closefontclass="";
// Display state variables
var o3_x = 0;
var o3_y = 0;
var o3_showingsticky = 0;
var o3_removecounter = 0;
// Our layer
var over = null;
var fnRef, hoveringSwitch = false;
applications/htmlroot/overlib.js view on Meta::CPAN
o3_fgbackground=ol_fgbackground;
o3_bgbackground=ol_bgbackground;
o3_padxl=ol_padxl;
o3_padxr=ol_padxr;
o3_padyt=ol_padyt;
o3_padyb=ol_padyb;
o3_fullhtml=ol_fullhtml;
o3_vpos=ol_vpos;
o3_aboveheight=ol_aboveheight;
o3_capicon=ol_capicon;
o3_textfont=ol_textfont;
o3_captionfont=ol_captionfont;
o3_closefont=ol_closefont;
o3_textsize=ol_textsize;
o3_captionsize=ol_captionsize;
o3_closesize=ol_closesize;
o3_timeout=ol_timeout;
o3_function=ol_function;
o3_delay=ol_delay;
o3_hauto=ol_hauto;
o3_vauto=ol_vauto;
o3_closeclick=ol_closeclick;
o3_wrap=ol_wrap;
o3_followmouse=ol_followmouse;
o3_mouseoff=ol_mouseoff;
o3_closetitle=ol_closetitle;
o3_css=ol_css;
o3_compatmode=ol_compatmode;
o3_fgclass=ol_fgclass;
o3_bgclass=ol_bgclass;
o3_textfontclass=ol_textfontclass;
o3_captionfontclass=ol_captionfontclass;
o3_closefontclass=ol_closefontclass;
setRunTimeVariables();
fnRef = '';
// Special for frame support, over must be reset...
o3_frame = ol_frame;
if(!(over=createDivContainer())) return false;
applications/htmlroot/overlib.js view on Meta::CPAN
}
////////
// LAYER GENERATION FUNCTIONS
////////
// These functions just handle popup content with tags that should adhere to the W3C standards specification.
// Makes simple table without caption
function ol_content_simple(text) {
var cpIsMultiple = /,/.test(o3_cellpad);
var txt = '<table width="'+o3_width+ '" border="0" cellpadding="'+o3_border+'" cellspacing="0" '+(o3_bgclass ? 'class="'+o3_bgclass+'"' : o3_bgcolor+' '+o3_height)+'><tr><td><table width="100%" border="0" '+((olNs4||!cpIsMultiple) ? 'cellpadding="'+...
set_background("");
return txt;
}
// Makes table with caption and optional close link
function ol_content_caption(text,title,close) {
var nameId, txt, cpIsMultiple = /,/.test(o3_cellpad);
var closing, closeevent;
closing = "";
closeevent = "onmouseover";
if (o3_closeclick == 1) closeevent = (o3_closetitle ? "title='" + o3_closetitle +"'" : "") + " onclick";
if (o3_capicon != "") {
nameId = ' hspace = \"5\"'+' align = \"middle\" alt = \"\"';
if (typeof o3_dragimg != 'undefined' && o3_dragimg) nameId =' hspace=\"5\"'+' name=\"'+o3_dragimg+'\" id=\"'+o3_dragimg+'\" align=\"middle\" alt=\"Drag Enabled\" title=\"Drag Enabled\"';
o3_capicon = '<img src=\"'+o3_capicon+'\"'+nameId+' />';
}
if (close != "")
closing = '<td '+(!o3_compatmode && o3_closefontclass ? 'class="'+o3_closefontclass : 'align="RIGHT')+'"><a href="javascript:return '+fnRef+'cClick();"'+((o3_compatmode && o3_closefontclass) ? ' class="' + o3_closefontclass + '" ' : ' ')+closeevent...
txt = '<table width="'+o3_width+ '" border="0" cellpadding="'+o3_border+'" cellspacing="0" '+(o3_bgclass ? 'class="'+o3_bgclass+'"' : o3_bgcolor+' '+o3_bgbackground+' '+o3_height)+'><tr><td><table width="100%" border="0" cellpadding="2" cellspacing=...
set_background("");
return txt;
}
// Sets the background picture,padding and lots more. :)
function ol_content_background(text,picture,hasfullhtml) {
if (hasfullhtml) {
txt=text;
} else {
txt='<table width="'+o3_width+'" border="0" cellpadding="0" cellspacing="0" height="'+o3_height+'"><tr><td colspan="3" height="'+o3_padyt+'"></td></tr><tr><td width="'+o3_padxl+'"></td><td valign="TOP" width="'+(o3_width-o3_padxl-o3_padxr)+(o3_text...
}
set_background(picture);
return txt;
}
// Loads a picture into the div.
function set_background(pic) {
if (pic == "") {
if (olNs4) {
applications/htmlroot/overlib.js view on Meta::CPAN
if (ar[i]==FIXY) { eval(pf+'fixy='+ar[++i]); continue; }
if (ar[i]==RELX) { eval(pf+'relx='+ar[++i]); continue; }
if (ar[i]==RELY) { eval(pf+'rely='+ar[++i]); continue; }
if (ar[i]==FGBACKGROUND) { eval(pf+'fgbackground="'+ar[++i]+'"'); continue; }
if (ar[i]==BGBACKGROUND) { eval(pf+'bgbackground="'+ar[++i]+'"'); continue; }
if (ar[i]==PADX) { eval(pf+'padxl='+ar[++i]); eval(pf+'padxr='+ar[++i]); continue; }
if (ar[i]==PADY) { eval(pf+'padyt='+ar[++i]); eval(pf+'padyb='+ar[++i]); continue; }
if (ar[i]==FULLHTML) { if (pf!='ol_') eval(pf+'fullhtml=1'); continue; }
if (ar[i]==BELOW || ar[i]==ABOVE) { eval(pf+'vpos='+ar[i]); if (pf!='ol_') olVautoFlag=1; continue; }
if (ar[i]==CAPICON) { eval(pf+'capicon="'+ar[++i]+'"'); continue; }
if (ar[i]==TEXTFONT) { eval(pf+"textfont='"+escSglQuote(ar[++i])+"'"); continue; }
if (ar[i]==CAPTIONFONT) { eval(pf+"captionfont='"+escSglQuote(ar[++i])+"'"); continue; }
if (ar[i]==CLOSEFONT) { eval(pf+"closefont='"+escSglQuote(ar[++i])+"'"); continue; }
if (ar[i]==TEXTSIZE) { eval(pf+'textsize="'+ar[++i]+'"'); continue; }
if (ar[i]==CAPTIONSIZE) { eval(pf+'captionsize="'+ar[++i]+'"'); continue; }
if (ar[i]==CLOSESIZE) { eval(pf+'closesize="'+ar[++i]+'"'); continue; }
if (ar[i]==TIMEOUT) { eval(pf+'timeout='+ar[++i]); continue; }
if (ar[i]==FUNCTION) { if (pf=='ol_') { if (typeof ar[i+1]!='number') { v=ar[++i]; ol_function=(typeof v=='function' ? v : null); }} else {fnMark = 0; v = null; if (typeof ar[i+1]!='number') v = ar[++i]; opt_FUNCTION(v); } continue; }
if (ar[i]==DELAY) { eval(pf+'delay='+ar[++i]); continue; }
if (ar[i]==HAUTO) { eval(pf+'hauto=('+pf+'hauto == 0) ? 1 : 0'); continue; }
if (ar[i]==VAUTO) { eval(pf+'vauto=('+pf+'vauto == 0) ? 1 : 0'); continue; }
if (ar[i]==CLOSECLICK) { eval(pf +'closeclick=('+pf+'closeclick == 0) ? 1 : 0'); continue; }
if (ar[i]==WRAP) { eval(pf +'wrap=('+pf+'wrap == 0) ? 1 : 0'); continue; }
if (ar[i]==FOLLOWMOUSE) { eval(pf +'followmouse=('+pf+'followmouse == 1) ? 0 : 1'); continue; }
if (ar[i]==MOUSEOFF) { eval(pf +'mouseoff=('+pf+'mouseoff==0) ? 1 : 0'); v=ar[i+1]; if (pf != 'ol_' && eval(pf+'mouseoff') && typeof v == 'number' && (v < pmStart || v > pmUpper)) olHideDelay=ar[++i]; continue; }
if (ar[i]==CLOSETITLE) { eval(pf+"closetitle='"+escSglQuote(ar[++i])+"'"); continue; }
if (ar[i]==CSSOFF||ar[i]==CSSCLASS) { eval(pf+'css='+ar[i]); continue; }
if (ar[i]==COMPATMODE) { eval(pf+'compatmode=('+pf+'compatmode==0) ? 1 : 0'); continue; }
if (ar[i]==FGCLASS) { eval(pf+'fgclass="'+ar[++i]+'"'); continue; }
if (ar[i]==BGCLASS) { eval(pf+'bgclass="'+ar[++i]+'"'); continue; }
if (ar[i]==TEXTFONTCLASS) { eval(pf+'textfontclass="'+ar[++i]+'"'); continue; }
if (ar[i]==CAPTIONFONTCLASS) { eval(pf+'captionfontclass="'+ar[++i]+'"'); continue; }
if (ar[i]==CLOSEFONTCLASS) { eval(pf+'closefontclass="'+ar[++i]+'"'); continue; }
i = parseCmdLine(pf, i, ar);
}
}
if (fnMark && o3_function) o3_text = o3_function();
if ((pf == 'o3_') && o3_wrap) {
o3_width = 0;
var tReg=/<.*\n*>/ig;
applications/htmlroot/overlib.js view on Meta::CPAN
if (olre.test(fn)) eval(fn);
}
}
}
}
}
}
// Wraps strings in Layer Generation Functions with the correct tags
// endWrap true(if end tag) or false if start tag
// fontSizeStr - font size string such as '1' or '10px'
// whichString is being wrapped -- 'text', 'caption', or 'close'
function wrapStr(endWrap,fontSizeStr,whichString) {
var fontStr, fontColor, isClose=((whichString=='close') ? 1 : 0), hasDims=/[%\-a-z]+$/.test(fontSizeStr);
fontSizeStr = (olNs4) ? (!hasDims ? fontSizeStr : '1') : fontSizeStr;
if (endWrap) return (hasDims&&!olNs4) ? (isClose ? '</span>' : '</div>') : '</font>';
else {
fontStr='o3_'+whichString+'font';
fontColor='o3_'+((whichString=='caption')? 'cap' : whichString)+'color';
return (hasDims&&!olNs4) ? (isClose ? '<span style="font-family: '+quoteMultiNameFonts(eval(fontStr))+'; color: '+eval(fontColor)+'; font-size: '+fontSizeStr+';">' : '<div style="font-family: '+quoteMultiNameFonts(eval(fontStr))+'; color: '+eval(fo...
}
}
// Quotes Multi word font names; needed for CSS Standards adherence in font-family
function quoteMultiNameFonts(theFont) {
var v, pM=theFont.split(',');
for (var i=0; i<pM.length; i++) {
v=pM[i];
v=v.replace(/^\s+/,'').replace(/\s+$/,'');
if(/\s/.test(v) && !/['"]/.test(v)) {
v="\'"+v+"\'";
pM[i]=v;
}
}
( run in 2.740 seconds using v1.01-cache-2.11-cpan-98e64b0badf )