1 /* BEGIN INCLUDE FILE...login_service_entries.incl.pl1 */ 2 3 /****^ HISTORY COMMENTS: 4 1) change(85-03-01,Coren), approve(87-07-13,MCR7679), audit(87-03-18,GDixon), 5 install(87-08-04,MR12.1-1056): 6 Initial coding. 7 2) change(87-04-16,Brunelle), approve(87-07-13,MCR7679), 8 audit(87-07-13,Parisek), install(87-08-04,MR12.1-1056): 9 Add group_id parameter to the assign_connection entry. 10 3) change(87-05-18,GDixon), approve(87-07-13,MCR7679), 11 audit(87-07-13,Parisek), install(87-08-04,MR12.1-1056): 12 A) Update calling sequence for .listen to add minimum_ring parameter. 13 B) Update calling sequence for .validate_user to remove 14 access_class_range parameter. 15 END HISTORY COMMENTS */ 16 17 /* This include file defines the entries to be returned by a call */ 18 /* net_info_$get_service_entries with a service type of "login_service". */ 19 20 /* format: style3,dclind5,idind25,insnl,ll79,comcol7 */ 21 22 dcl login_service_entries_ptr 23 pointer; 24 25 dcl 1 login_service_entries aligned based (login_service_entries_ptr), 26 /**/ 27 /* version: "lsveNNNN" */ 28 2 version char (8), 29 /**/ 30 /* listen (generic_connection_name, area_ptr, disconnect_event_channel */ 31 /* , connection_name, connection_handle, connection_info_ptr, */ 32 /* connection_info_length, attach_description, */ 33 /* access_class_range, minimum_ring, code) */ 34 2 listen variable 35 entry (char (*), ptr, fixed bin (71), char (*), 36 fixed bin (35), ptr, fixed bin (18) unsigned, 37 char (*) varying, (2) bit (72) aligned, 38 fixed bin, fixed bin (35)), 39 /**/ 40 /* stop_listen (endpoint_name, code) */ 41 2 stop_listen variable entry (char (*), fixed bin (35)), 42 /**/ 43 /* assign_connection (connection_name, connection_handle, process_id, */ 44 /* group_id, */ 45 /* initializer_handle, disconnect_event_channel, */ 46 /* terminate_event_channel, usage_type, code) */ 47 2 assign_connection variable 48 entry (char (*), fixed bin (35), 49 bit (36) aligned, char (32), bit (72) aligned, 50 fixed bin (71), fixed bin (71), fixed bin, 51 fixed bin (35)), 52 /**/ 53 /* unassign_connection (connection_name, connection_handle, */ 54 /* wakeup_message, code) */ 55 2 unassign_connection variable 56 entry (char (*), fixed bin (35), bit (72), 57 fixed bin (35)), 58 /**/ 59 /* disconnect (connection_name, connection_handle, wakeup_message, */ 60 /* code) */ 61 2 disconnect variable 62 entry (char (*), fixed bin (35), bit (72), 63 fixed bin (35)), 64 /**/ 65 /* force_disconnect (connection_name, connection_handle, code) */ 66 2 force_disconnect variable 67 entry (char (*), fixed bin (35), fixed bin (35)), 68 /**/ 69 /* validate_user (lscp_info_ptr, option_structure_ptr, */ 70 /* ls_process_info_ptr, code) */ 71 2 validate_user variable 72 entry (ptr, ptr, ptr, fixed bin (35)); 73 74 75 dcl LS_ENTRIES_V1 char (8) internal static 76 options (constant) initial ("lsve0001"); 77 78 /* END INCLUDE FILE...login_service_entries.incl.pl1 */