! ********************************************************************************************************************************
!  Created:  8-Apr-2010 11:27:49 by OpenVMS SDL EV2-3      
!  Source:  01-APR-2010 18:43:52 $1$DGA712:[LAISHEV.WORK.RETRACKER]BTDEF.SDL;22 
! ********************************************************************************************************************************
 
!*** MODULE BTDEF IDENT BTDEF-1-X ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
 ! ++
 ! 
 !  Facility:
 !       biTorrent Retracker data structures and definitions.
 ! 
 !  Abstract:
 !       This is an interface module contains data structures definitions,
 !       constants, functions/procedures prototypes.
 ! 
 !  Author:
 !       Ruslan R. Laishev
 ! 
 !  Creation Date: 31-MAR-2010
 ! 
 !  Modification History:
 ! 
 ! --
	PARAMETER bt$k_pos0 = '00000000'X
	PARAMETER bt$k_ksz0 = '0000001B'X
	PARAMETER bt$k_pos1 = '0000001B'X
	PARAMETER bt$k_ksz1 = '00000008'X
	PARAMETER bt$k_rsz = '00000023'X
	STRUCTURE /bt_rec/
	    BYTE      bt$b_hash(1:20)
	    BYTE      bt$b_lim
	        INTEGER*4 bt$l_ip
	        INTEGER*2 bt$w_port
	    INTEGER*4 bt$q_updtm(2)
	END STRUCTURE	! bt_rec
!DEC$ END OPTIONS