$FiStat: Difference between revisions

From m204wiki
Jump to navigation Jump to search
m (→‎Usage notes: remove item)
m (clarify return value)
Line 2: Line 2:
<span class="pageSubtitle">Retrieve file's statistics into string</span>
<span class="pageSubtitle">Retrieve file's statistics into string</span>


<p class="warn"><b>Note: </b>Most Sirius $functions have been deprecated in favor of Object Oriented methods. There is no OO equivalent for the $FiStat function.</p>
<p class="warn"><b>Note: </b>Many $functions have been deprecated in favor of Object Oriented methods. There is no OO equivalent for the <var>$FiStat</var> function.</p>


This function allows retrieval of a specific file's statistics into a string.  
This function allows retrieval of a specific file's statistics into a string.  
The <var>$FiStat</var> function accepts two arguments and returns a string made up of an error code and returned statistics.


==Syntax==
==Syntax==
Line 15: Line 13:
<table>
<table>
<tr><th>%string</th>  
<tr><th>%string</th>  
<td>Binary data, the first 4 bytes of which is an error code. If the error code is negative, %string is only 4 bytes long.</td></tr>
<td>A string containing binary data. If the string is exactly four bytes, it contains an [[#Return codes|error code]].
<p>
Otherwise, the first four bytes contain the number of milliseconds that the Online has been up. This provides a convenient number for calculating rates for the statistics. </p>
<p>
The next ten bytes contain the blank-padded file name, then follows two bytes containing the binary file number. This means that the actual data starts at offset 16 (byte number 17) in the result string.</p></td></tr>


<tr><th>stat_list</th>  
<tr><th>stat_list</th>  
<td>a string of blank-delimited words indicating the statistics to be returned. The length of each returned statistic is always a multiple of 4 bytes. This facilitates the use of <var>[[$StatD]]</var> with the returned string. For more information about available statistics, see <var class="product">[[File statistics displayed in SirMon]]</var>. </td></tr>
<td>a string of blank-delimited words indicating the statistics to be returned. The length of each returned statistic is always a multiple of four bytes. This facilitates the use of <var>[[$StatD]]</var> with the returned string. For more information about available statistics, see <var class="product">[[File statistics displayed in SirMon]]</var>. </td></tr>


<tr><th>file_num</th>  
<tr><th>file_num</th>  
<td>The file number of the file for which data is to be returned.</td></tr>
<td>The file number of the file for which data is to be returned.</td></tr>
</table>
</table>
==Usage notes==
<ul>
<li>The data returned by <var>$FiStat</var> is binary, the first 4 bytes of which contain a return code. If the return code is negative, only 4 bytes are returned. If the return code is positive, it contains a number of milliseconds that the online has been up. This provides a convenient number for calculating rates for the statistics.
<p>
With a positive return code, the next 10 bytes contain the blank-padded file name, followed by 2 bytes that contain the binary file number. This means that the actual data starts at offset 16 (byte number 17) in the result string.</p></li>
</ul>


===Return codes===
===Return codes===
Line 41: Line 36:
==Example==
==Example==
The following program displays some totals for file 0 (always CCATEMP).
The following program displays some totals for file 0 (always CCATEMP).
<p class="code">B
<p class="code">Begin
%data IS STRING LEN 255
   
   
%DATA IS STRING LEN 255
%data = $FiStat('DKIO CFRCONF CFRQUEU', 0)
IF $Len(%data) = 4 THEN
%DATA = $FiStat('DKIO CFRCONF CFRQUEU', 0)
PRINT '$FISTAT ERROR... RC = ' WITH $Unbin(%data)
IF $LEN(%DATA) = 4 THEN
PRINT '$FISTAT ERROR... RC = ' WITH -
$UNBIN(%DATA)
STOP
STOP
END IF
END IF
   
   
PRINT 'FILENAME = ' WITH $SUBSTR(%DATA, 5, 10)
PRINT 'FILENAME = ' WITH $Substr(%data, 5, 10)
PRINT 'DKIO = ' WITH -
PRINT 'DKIO = ' WITH $Unbin( $Substr(%data, 17, 4) )
$UNBIN( $SUBSTR(%DATA, 17, 4) )
PRINT 'CFRCONF = ' WITH $Unbin( $Substr(%data, 21, 4) )
PRINT 'CFRCONF = ' WITH -
PRINT 'CFRQUEU = ' WITH $Unbin( $Substr(%data, 25, 4) )
$UNBIN( $SUBSTR(%DATA, 21, 4) )
End
PRINT 'CFRQUEU = ' WITH -
$UNBIN( $SUBSTR(%DATA, 25, 4) )
END
</p>
</p>



Revision as of 21:01, 3 October 2016

Retrieve file's statistics into string

Note: Many $functions have been deprecated in favor of Object Oriented methods. There is no OO equivalent for the $FiStat function.

This function allows retrieval of a specific file's statistics into a string.

Syntax

%string = $FiStat(stat_list, file_num)

Syntax terms

%string A string containing binary data. If the string is exactly four bytes, it contains an error code.

Otherwise, the first four bytes contain the number of milliseconds that the Online has been up. This provides a convenient number for calculating rates for the statistics.

The next ten bytes contain the blank-padded file name, then follows two bytes containing the binary file number. This means that the actual data starts at offset 16 (byte number 17) in the result string.

stat_list a string of blank-delimited words indicating the statistics to be returned. The length of each returned statistic is always a multiple of four bytes. This facilitates the use of $StatD with the returned string. For more information about available statistics, see File statistics displayed in SirMon.
file_num The file number of the file for which data is to be returned.

Return codes

-5 - Required parameter not specified -12 - Invalid parameter (argument 2 > NUSERS, or invalid name in stat_list) -13 - STAT not linked in -14 - Result string would be longer than 255 bytes -15 - File no longer open

Example

The following program displays some totals for file 0 (always CCATEMP).

Begin %data IS STRING LEN 255 %data = $FiStat('DKIO CFRCONF CFRQUEU', 0) IF $Len(%data) = 4 THEN PRINT '$FISTAT ERROR... RC = ' WITH $Unbin(%data) STOP END IF PRINT 'FILENAME = ' WITH $Substr(%data, 5, 10) PRINT 'DKIO = ' WITH $Unbin( $Substr(%data, 17, 4) ) PRINT 'CFRCONF = ' WITH $Unbin( $Substr(%data, 21, 4) ) PRINT 'CFRQUEU = ' WITH $Unbin( $Substr(%data, 25, 4) ) End

Products authorizing $FiStat