| \
| \n",
PageScheme[PS_BUTTONBGCOLOR], PathPtr, ButtonLabel[idx]);
else
fprintf (stdout,
"\
| \n",
PageScheme[PS_BUTTONBGCOLOR], ButtonLabel[idx]);
}
fprintf (stdout, "
\n", CgiServerSoftwarePtr, ContentTypeCharset, SoftwareID, CgiTypePtr, DiskName, PageScheme[PS_BODYTAG], PageScheme[PS_HEADBORDER], PageScheme[PS_HEADPADDING], PageScheme[PS_HEADBGCOLOR], PageScheme[PS_HEADTEXT], DayDateTime, PageScheme[PS_HEADTEXT], PageScheme[PS_HEADLOCAL]); HttpHasBeenOutput = true; cptr = DiskName; while (*cptr) { sptr = cptr; while (*cptr && isspace(*cptr)) cptr++; while (*cptr && *cptr != ':' && *cptr != ',' && *cptr != '/') cptr++; if (*cptr) *cptr++ = '\0'; if (!*sptr) continue; OneDiskInfo (sptr); } fprintf (stdout, "\n\
\n"); ButtonBar (2); fprintf (stdout, "\n\ \n"); } /*****************************************************************************/ /* */ OneDiskInfo (char *DiskName) { int status, ErrorCount, VolumeCount; unsigned long TotalMaxBlock, TotalFreeBlocks, TotalUsedBlocks; double dGBytesFree, dGBytesMax, dGBytesUsed, dPercentUsed, dPercentFree; struct DiskInfoStruct *DiskInfoPtr, *FirstDiskInfoPtr, *NextDiskInfoPtr; /*********/ /* begin */ /*********/ if (Debug) fprintf (stdout, "OneDiskInfo()\n"); if ((FirstDiskInfoPtr = calloc (sizeof(struct DiskInfoStruct), 1)) == NULL) exit (ErrorVmsStatus (vaxc$errno, "allocating memory", "", __FILE__, __LINE__)); if (VMSnok (status = GetDiskInfo (DiskName, FirstDiskInfoPtr))) { free (FirstDiskInfoPtr); if (status == SS$_NOSUCHDEV) { if (DoGraphicOnly) GiftUsageBar (0, 100, "NO SUCH DEVICE!"); else fprintf (stdout, "
%s ... NO SUCH DEVICE!
\n", DiskName); return; } exit (ErrorVmsStatus (status, DiskName, "", __FILE__, __LINE__)); } if (!(FirstDiskInfoPtr->DevClass & DC$_DISK)) { free (FirstDiskInfoPtr); if (DoGraphicOnly) GiftUsageBar (0, 100, "NOT A DISK DEVICE!"); else fprintf (stdout, "%s ... NOT A DISK DEVICE!
\n", DiskName); return; } if (!(FirstDiskInfoPtr->DevChar & DEV$M_MNT)) { free (FirstDiskInfoPtr); if (DoGraphicOnly) GiftUsageBar (0, 100, "NOT MOUNTED!"); else fprintf (stdout, "%s ... NOT MOUNTED!
\n", DiskName); return; } /* on-line bit should normally be 1 */ if (!(FirstDiskInfoPtr->UcbStatus.lo32 & UCB$V_ONLINE)) { free (FirstDiskInfoPtr); if (DoGraphicOnly) GiftUsageBar (0, 100, "NOT ONLINE!"); else fprintf (stdout, "%s ... NOT ONLINE!
\n", DiskName); return; } /* unit timeout bit should normally be 0 */ if (FirstDiskInfoPtr->UcbStatus.lo32 & UCB$V_TIMOUT) { free (FirstDiskInfoPtr); if (DoGraphicOnly) GiftUsageBar (0, 100, "MOUNT VERIFY TIMEOUT!"); else fprintf (stdout, "%s ... MOUNT VERIFY HAS TIMED-OUT!
\n\This device was in a mount verify state, but that has now \ timed-out. It could have been off-line, had the wrong volume on-line, \ had excessive errors or a corrupted file system. In short ... \ there is a major problem that should investigated ASAP.\n", DiskName); return; } /* mount verify bit should normally be 0 */ if (FirstDiskInfoPtr->UcbStatus.lo32 & UCB$V_MNTVERIP) { free (FirstDiskInfoPtr); if (DoGraphicOnly) GiftUsageBar (0, 100, "IN MOUNT VERIFY!"); else fprintf (stdout, "
%s ... IN MOUNT VERIFY!
\n\This device is in a mount verify state. It could be off-line, \ have the wrong volume on-line, have excessive errors or a corrupted \ file system. In short ... there is a major problem that should \ investigated ASAP.\n", DiskName); return; } if (FirstDiskInfoPtr->VolSetMem && FirstDiskInfoPtr->VolNumber > 1) { free (FirstDiskInfoPtr); if (DoGraphicOnly) GiftUsageBar (0, 100, "NOT PRIMARY VOLUME SET MEMBER!"); else fprintf (stdout, "
%s ... NOT PRIMARY MEMBER!
\n\This device is part of a volume set, but is not the primary member \ of that set. Specify only the primary member!\n", DiskName); return; } /***************************************/ /* additional devices for a volume set */ /***************************************/ DiskInfoPtr = FirstDiskInfoPtr; while (DiskInfoPtr->NextDevName[0]) { if ((DiskInfoPtr->NextPtr = calloc (sizeof(struct DiskInfoStruct), 1)) == NULL) exit (ErrorVmsStatus (vaxc$errno, "allocating memory", "", __FILE__, __LINE__)); GetDiskInfo (DiskInfoPtr->NextDevName, DiskInfoPtr->NextPtr); DiskInfoPtr = DiskInfoPtr->NextPtr; } /********************/ /* calculate totals */ /********************/ dGBytesFree = dGBytesMax = dGBytesUsed = 0.0; ErrorCount = TotalMaxBlock = TotalFreeBlocks = TotalUsedBlocks = VolumeCount = 0; DiskInfoPtr = FirstDiskInfoPtr; while (DiskInfoPtr != NULL) { VolumeCount++; ErrorCount += DiskInfoPtr->ErrCnt; dGBytesMax += (double)DiskInfoPtr->MaxBlock * 512.0 / 1000000000.0; TotalMaxBlock += DiskInfoPtr->MaxBlock; dGBytesFree += (double)DiskInfoPtr->FreeBlocks * 512.0 / 1000000000.0; TotalFreeBlocks += DiskInfoPtr->FreeBlocks; dGBytesUsed += (double)DiskInfoPtr->UsedBlocks * 512.0 / 1000000000.0; TotalUsedBlocks += DiskInfoPtr->UsedBlocks; DiskInfoPtr = DiskInfoPtr->NextPtr; } dPercentUsed = dGBytesUsed * 100.0 / dGBytesMax; dPercentFree = dGBytesFree * 100.0 / dGBytesMax; /****************/ /* graphic only */ /****************/ if (DoGraphicOnly) { /* local storage */ char String [256]; if (dPercentUsed == 100.0) sprintf (String, "%s %.*fGB %.0f%% used", DiskName, GBytesPrecision(dGBytesMax), dGBytesMax, dPercentUsed); else if (dPercentUsed > 0.1) sprintf (String, "%s %.*fGB %.0f%% used %.0f%% free", DiskName, GBytesPrecision(dGBytesMax), dGBytesMax, dPercentUsed, dPercentFree); else sprintf (String, "%s %.*fGB %.0f%% free", DiskName, GBytesPrecision(dGBytesMax), dGBytesMax, dPercentFree); GiftUsageBar ((int)dPercentUsed, 85, String); /* no need to deallocate memory, will be exit()ing shortly */ return; } /*********************/ /* graphic image tag */ /*********************/ fprintf (stdout, "
%s ... used: %.0f%% free: %.0f%%", DiskName, dPercentUsed, dPercentFree); if (ErrorCount >= ExcessiveErrorCount) fprintf (stdout, " ERRORS!"); fprintf (stdout, "
\n\\n"); else fprintf (stdout, "
Volume set comprising %d devices.\n
\n",
VolumeCount);
fprintf (stdout,
"\n\
\n\
| ||||||||||||||||||||||||||||||||||||||||||||||||||
\n\
ERROR!
\n\ \n\Reported by server.\n\
%s\n\ \n\ \n", SoftwareID, cptr, SourceLineNumber, Text); } else { fprintf (stdout, "HTTP/1.0 404 Error\r\n\ Server: %s\r\n\ Content-Type: text/html%s\r\n\ \r\n\ \n\
\n\ \n\ \n\ \n\ERROR!
\n\Reported by server.\n\
%s\n\ \n\ \n", CgiServerSoftwarePtr, ContentTypeCharset, SoftwareID, cptr, SourceLineNumber, Text); } return (SS$_NORMAL); } /*****************************************************************************/ /* */ ErrorVmsStatus ( int StatusValue, char *Text, char *HiddenText, char *SourceFileName, int SourceLineNumber ) { static char Message [256]; static $DESCRIPTOR (MessageDsc, Message); register char *cptr; int status; short int Length; /*********/ /* begin */ /*********/ if (VMSok (status = sys$getmsg (StatusValue, &Length, &MessageDsc, 1, 0))) { Message[Length] = '\0'; Message[0] = toupper(Message[0]); } else strcpy (Message, ""sys$getmsg() failed""); /* The source file format provided by the "__FILE__" macro will be "device:[directory]name.type;ver". Reduce that to "name.type". */ for (cptr = SourceFileName; *cptr && *cptr != ';'; cptr++); if (*cptr) { while (*cptr != '.') cptr--; *cptr-- = '\0'; } while (*cptr != ']') cptr--; cptr++; if (HttpHasBeenOutput) { fprintf (stdout, "
\n\
ERROR!
\n\ \n\Reported by server.\n\
%s ... %s\n\ \n\ \n\ \n", SoftwareID, cptr, SourceLineNumber, Message, Text, StatusValue, HiddenText); } else { fprintf (stdout, "HTTP/1.0 404 Error\r\n\ Server: %s\r\n\ Content-Type: text/html%s\r\n\ \r\n\ \n\
\n\ \n\ \n\ \n\ERROR!
\n\Reported by server.\n\
%s ... %s\n\ \n\ \n\ \n", CgiServerSoftwarePtr, ContentTypeCharset, SoftwareID, cptr, SourceLineNumber, Message, Text, StatusValue, HiddenText); } return (SS$_NORMAL); } /****************************************************************************/ /* Does a case-insensitive, character-by-character string compare and returns true if two strings are the same, or false if not. If a maximum number of characters are specified only those will be compared, if the entire strings should be compared then specify the number of characters as 0. */ boolean strsame ( register char *sptr1, register char *sptr2, register int count ) { while (*sptr1 && *sptr2) { if (toupper (*sptr1++) != toupper (*sptr2++)) return (false); if (count) if (!--count) return (true); } if (*sptr1 || *sptr2) return (false); else return (true); } /*****************************************************************************/