~ubuntu-branches/debian/squeeze/erlang/squeeze

« back to all changes in this revision

Viewing changes to lib/megaco/src/engine/megaco_internal.hrl

  • Committer: Bazaar Package Importer
  • Author(s): Erlang Packagers, Sergei Golovan
  • Date: 2006-12-03 17:07:44 UTC
  • mfrom: (2.1.11 feisty)
  • Revision ID: james.westby@ubuntu.com-20061203170744-rghjwupacqlzs6kv
Tags: 1:11.b.2-4
[ Sergei Golovan ]
Fixed erlang-base and erlang-base-hipe prerm scripts.

Show diffs side-by-side

added added

removed removed

Lines of Context:
61
61
          trans_sender,         % The trans sender process ref, or undefined
62
62
 
63
63
          pending_timer, 
64
 
          orig_pending_limit,  % infinity | integer() > 0
 
64
          
 
65
          %% ------
 
66
          %% These counter's is used for the MGCOriginatedPendingLimit
 
67
          %% and MGOriginatedPendingLimit counters (of the root package).
 
68
          %% If the user is an MGC, the 
 
69
          %%   sent_pending_limit - represent MGCOriginatedPendingLimit
 
70
          %%   recv_pending_limit - represent MGOriginatedPendingLimit
 
71
          %% If the user is an MG, the 
 
72
          %%   sent_pending_limit - represent MGOriginatedPendingLimit
 
73
          %%   recv_pending_limit - represent MGCOriginatedPendingLimit
 
74
          sent_pending_limit,  % infinity | integer() > 0
 
75
          recv_pending_limit,  % infinity | integer() > 0
 
76
 
65
77
          reply_timer, 
66
78
          control_pid,
67
79
          monitor_ref,
73
85
          auth_data,
74
86
          user_mod,
75
87
          user_args,
76
 
          reply_action,       % call | cast
77
 
          reply_data,
78
 
          threaded
 
88
          reply_action,        % call | cast
 
89
          reply_data,          % term()
 
90
          threaded,            % boolean(), false
 
91
          strict_version,      % boolean(), true
 
92
          long_request_resend  % boolean(), false
79
93
         }).
80
94
 
81
95
%% N.B. Update megaco_config when a new field is added
84
98
         user_node,
85
99
         monitor_ref}).
86
100
 
 
101
 
 
102
%%%----------------------------------------------------------------------
 
103
%%% Error/warning/info message macro(s)
 
104
%%%----------------------------------------------------------------------
 
105
 
 
106
-define(megaco_info(F, A),
 
107
        (catch error_logger:info_msg("[ ~w : ~w : ~p ] ~n" ++ F ++ "~n", 
 
108
                                     [?APPLICATION, ?MODULE, self()|A]))).
 
109
 
 
110
-define(megaco_warning(F, A),
 
111
        (catch error_logger:warning_msg("[ ~w : ~w : ~p ] ~n" ++ F ++ "~n", 
 
112
                                        [?APPLICATION, ?MODULE, self()|A]))).
 
113
 
 
114
-define(megaco_error(F, A),
 
115
        (catch error_logger:error_msg("[ ~w : ~w : ~p ] ~n" ++ F ++ "~n", 
 
116
                                      [?APPLICATION, ?MODULE, self()|A]))).
 
117
 
 
118
 
87
119
%%%----------------------------------------------------------------------
88
120
%%% Event Trace
89
121
%%%----------------------------------------------------------------------
90
122
 
91
 
%% -define(report(Level, C, Label, Contents),
92
 
%%         if
93
 
%%             record(C, conn_data), list(Contents) ->
94
 
%%                 megaco:report_event(Level, C#conn_data.conn_handle,
95
 
%%                                     Label, [{line, ?MODULE, ?LINE}, C | Contents]);
96
 
%%             record(C, megaco_receive_handle) ->
97
 
%%                 megaco:report_event(Level, C#megaco_receive_handle.local_mid,
98
 
%%                                     Label, [{line, ?MODULE, ?LINE}, C | Contents]);
99
 
%%             record(C, megaco_conn_handle) ->
100
 
%%                 megaco:report_event(Level, C#megaco_conn_handle.local_mid,
101
 
%%                                     Label, [{line, ?MODULE, ?LINE}, C | Contents]);
102
 
%%             true ->
103
 
%%                 megaco:report_event(Level, ?APPLICATION,
104
 
%%                                     Label, [{line, ?MODULE, ?LINE}, C | Contents])
105
 
%%         end).
106
 
 
 
123
-ifdef(megaco_trace_io).
 
124
-define(report(Level, C, Label, Contents), 
 
125
        io:format("*** [~s] ~p ~p *** "
 
126
                  "~n   ~p[~p] " ++ Label ++ 
 
127
                  "~n   ~p"
 
128
                  "~n   ~p"
 
129
                  "~n", 
 
130
                  [megaco:format_timestamp(now()), 
 
131
                   self(), Level, ?MODULE, ?LINE, C, Contents])).
 
132
-else.
107
133
-define(report(Level, C, Label, Contents),
108
134
        megaco:report_event(Level, ?APPLICATION, Label,
109
135
                            [{line, ?MODULE, ?LINE}, C | Contents])).
 
136
-endif.
110
137
 
111
138
-define(report_important(C, Label, Contents), ?report(20, C, Label, Contents)).
112
139
-define(report_verbose(  C, Label, Contents), ?report(40, C, Label, Contents)).
113
140
-define(report_debug(    C, Label, Contents), ?report(60, C, Label, Contents)).
114
141
-define(report_trace(    C, Label, Contents), ?report(80, C, Label, Contents)).
 
142
 
 
143
 
 
144
%%%----------------------------------------------------------------------
 
145
%%% Debug
 
146
%%%----------------------------------------------------------------------
 
147
 
 
148
-ifdef(megaco_debug).
 
149
-define(d(F,A), io:format("~w: " ++ F ++ "~n",[?MODULE|A])).
 
150
-else.
 
151
-define(d(F,A), ok).
 
152
-endif.