1 " ********************************************
 2 " *                                          *
 3 " * Copyright, (C) Honeywell Bull Inc., 1987 *
 4 " *                                          *
 5 " ********************************************
 6 
 7 " network_accounting_gate_:  interface to network_accounting_ in ring 2
 8 
 9 "   This is an administrative gate into ring 2 network accounting.  Access
10 "   to the gate should be limited to the Initializer (and other SysDaemons),
11 "   and system administrators and maintainers.
12 
13 " HISTORY COMMENTS:
14 "  1) change(85-11-25,Herbst), approve(87-07-28,MCR7694),
15 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
16 "     New program.
17 "  2) change(86-02-10,Herbst), approve(87-07-28,MCR7694),
18 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
19 "     Replaced $get_total with $get_user_total
20 "  3) change(86-02-10,Herbst), approve(87-07-28,MCR7694),
21 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
22 "     Added $dump_table.
23 "  4) change(86-02-11,Herbst), approve(87-07-28,MCR7694),
24 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
25 "     Added $read_and_reset_table.
26 "  5) change(86-02-20,Herbst), approve(87-07-28,MCR7694),
27 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
28 "     Renamed $set_path to $test.
29 "  6) change(86-02-24,Herbst), approve(87-07-28,MCR7694),
30 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
31 "     Added argument (process_id) to $charge entries.
32 "  7) change(86-02-24,Herbst), approve(87-07-28,MCR7694),
33 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
34 "     Replaced get_user_total with get_process_total.
35 "  8) change(86-05-05,Herbst), approve(87-07-28,MCR7694),
36 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
37 "     Added $clear_table and $close_process_entries.
38 "  9) change(86-05-20,Herbst), approve(87-07-28,MCR7694),
39 "     audit(87-07-28,Brunelle), install(87-08-04,MR12.1-1055):
40 "     Added $disable_on and $disable_off.
41 " 10) change(87-03-24,Brunelle), approve(87-07-28,MCR7694),
42 "     audit(87-07-28,GDixon), install(87-08-04,MR12.1-1055):
43 "     Remove the charge_bytes, charge_packets and close_process_entries
44 "     entrypoints.  Added the charge_channel_use entrypoint.  Changed the
45 "     number of arguments for get_process_total from 7 to 4.
46 " 11) change(87-07-28,Brunelle), approve(87-07-28,MCR7694),
47 "     audit(87-07-28,GDixon), install(87-08-04,MR12.1-1055):
48 "     Replace disable_off/on entrypoints with debug entrypoint.
49 "                                                      END HISTORY COMMENTS
50 
51           include   gate_macros
52 
53 
54           gate_info network_accounting_gate_
55 
56           gate      clear_table,network_accounting_,clear_table,2
57           gate      dump_table,network_accounting_,dump_table,4
58           gate      get_path,network_accounting_,get_path,1
59           gate      get_process_total,network_accounting_,get_process_total,5
60           gate      read_and_reset_table,network_accounting_,read_and_reset_table,4
61           gate      test,network_accounting_,test,1
62 
63 " the following entry turns inner-ring debugging on/off
64           gate      debug,network_accounting_,debug,1
65 
66           end