Mercurial > hg > freeDiameter
annotate extensions/test_ccload/test_ccload.c @ 1374:e99e8f20b346
Rename loadtest_cc to test_ccload to match naming convention.
author | Thomas Klausner <tk@giga.or.at> |
---|---|
date | Thu, 13 Jun 2019 11:26:42 +0200 |
parents | extensions/loadtest_cc/loadtest_cc.c@6b1a2405cebb |
children | 2bd83cd4d2b2 |
rev | line source |
---|---|
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
1 /********************************************************************************************************** |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
2 * Software License Agreement(BSD License) * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
3 * Author: Thomas Klausner <tk@giga.or.at> * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
4 * * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
5 * Copyright(c) 2019, Thomas Klausner * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
6 * All rights reserved. * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
7 * * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
8 * Written under contract by nfotex IT GmbH, http://nfotex.com/ * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
9 * * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
10 * Redistribution and use of this software in source and binary forms, with or without modification, are * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
11 * permitted provided that the following conditions are met: * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
12 * * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
13 * * Redistributions of source code must retain the above * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
14 * copyright notice, this list of conditions and the * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
15 * following disclaimer. * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
16 * * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
17 * * Redistributions in binary form must reproduce the above * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
18 * copyright notice, this list of conditions and the * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
19 * following disclaimer in the documentation and/or other * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
20 * materials provided with the distribution. * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
21 * * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
22 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
23 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
24 * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
25 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES(INCLUDING, BUT NOT * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
26 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
28 * TORT(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
29 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
30 **********************************************************************************************************/ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
31 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
32 /* This extension waits for a signal (SIGUSR2). When it gets it, it |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
33 * generates messages as quickly as possible to the configured target |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
34 * host; a second SIGUSR2 signal will stop this */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
35 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
36 #include <freeDiameter/extension.h> |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
37 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
38 #include <pthread.h> |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
39 #include <signal.h> |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
40 |
1374
e99e8f20b346
Rename loadtest_cc to test_ccload to match naming convention.
Thomas Klausner <tk@giga.or.at>
parents:
1372
diff
changeset
|
41 #define MODULE_NAME "test_ccload" |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
42 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
43 static pthread_t gen_thr = (pthread_t)NULL; |
1366 | 44 struct disp_hdl *ccr_local_hdl; |
45 struct fd_rt_fwd_hdl *ccr_fwd_hdl; | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
46 volatile int do_generate = 0; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
47 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
48 const char *target = NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
49 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
50 struct dict_object * aai_avp_do; /* cache the Auth-Application-Id dictionary object */ |
1366 | 51 struct dict_object * crn_avp_do; /* cache the CC-Request-Number dictionary object */ |
52 struct dict_object * crt_avp_do; /* cache the CC-Request-Type dictionary object */ | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
53 struct dict_object * dh_avp_do; /* cache the Destination-Host dictionary object */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
54 struct dict_object * dr_avp_do; /* cache the Destination-Realm dictionary object */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
55 struct dict_object * rc_avp_do; /* cache the Result-Code dictionary object */ |
1366 | 56 struct dict_object * sci_avp_do; /* cache the Service-Context-Id dictionary object */ |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
57 struct dict_object * si_avp_do; /* cache the Session-Id dictionary object */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
58 struct dict_object * pi_avp_do; /* cache the Proxy-Info dictionary object */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
59 struct dict_object * ph_avp_do; /* cache the Proxy-Host dictionary object */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
60 struct dict_object * ps_avp_do; /* cache the Proxy-State dictionary object */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
61 |
1366 | 62 struct statistics { |
63 uint64_t sent; | |
64 uint64_t success; | |
65 uint64_t error; | |
66 time_t first; | |
67 time_t last; | |
68 } statistics; | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
69 |
1372
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
70 void print_statistics(void) { |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
71 uint64_t missing; |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
72 |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
73 if (statistics.first == 0 || statistics.last == 0 || statistics.last == statistics.first) { |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
74 return; |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
75 } |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
76 |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
77 missing = statistics.sent - statistics.error - statistics.success; |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
78 |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
79 fd_log_error("%s: %lld CCR messages sent in %llds (%.2f messages/second), %lld success (%.2f%%), %lld errors (%.2f%%), %lld missing (%.2f%%)", |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
80 fd_g_config->cnf_diamid, |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
81 (long long)statistics.sent, (long long)(statistics.last-statistics.first), (float)statistics.sent / (statistics.last-statistics.first), |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
82 (long long)statistics.success, |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
83 100*(float)statistics.success/statistics.sent, (long long)statistics.error, 100*(float)statistics.error/statistics.sent, |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
84 missing, 100*(float)missing/statistics.sent); |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
85 } |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
86 |
1366 | 87 static int handle_message(struct msg **msg) { |
88 struct msg_hdr *hdr = NULL; | |
89 struct avp_hdr *ahdr = NULL; | |
90 struct avp *rc; | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
91 |
1366 | 92 if (msg == NULL) { |
93 fd_log_error("[%s] NULL CCA message", MODULE_NAME); | |
94 return -1; | |
95 } | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
96 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
97 CHECK_FCT(fd_msg_hdr(*msg, &hdr)); |
1366 | 98 /* handle CCAs only */ |
99 if ((hdr->msg_code != 272) || (hdr->msg_flags & CMD_FLAG_REQUEST)) { | |
100 fd_log_error("[%s] invalid message type (type %d, flags 0x%x)", MODULE_NAME, hdr->msg_code, hdr->msg_flags); | |
101 return -1; | |
102 } | |
103 | |
104 /* Answer received, check it */ | |
105 if (fd_msg_search_avp(*msg, rc_avp_do, &rc) < 0 || rc == NULL) { | |
106 fd_log_error("[%s] Result-Code not found in CCA", MODULE_NAME); | |
107 return -1; | |
108 } | |
109 | |
110 if (fd_msg_avp_hdr(rc, &ahdr) < 0) { | |
111 fd_log_error("[%s] error parsing Result-Code in CCA", MODULE_NAME); | |
112 return -1; | |
113 } | |
114 fd_log_debug("Credit-Control-Answer with Result-Code %d received", ahdr->avp_value->i32); | |
115 switch (ahdr->avp_value->i32/1000) { | |
116 case 2: | |
117 statistics.success++; | |
118 break; | |
119 default: | |
120 statistics.error++; | |
121 break; | |
122 } | |
123 | |
124 return 0; | |
125 } | |
126 | |
127 static int ccr_local_handler(struct msg ** msg, struct avp * avp, struct session * sess, void * data, enum disp_action * act) | |
128 { | |
129 fd_log_debug("[%s] CCR local handler called", MODULE_NAME); | |
130 | |
131 if (handle_message(msg) < 0) { | |
132 fd_log_error("dropping message"); | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
133 CHECK_FCT(fd_msg_free(*msg)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
134 *msg = NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
135 return 0; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
136 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
137 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
138 CHECK_FCT(fd_msg_free(*msg)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
139 *msg = NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
140 return 0; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
141 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
142 |
1366 | 143 static int ccr_fwd_handler(void *cb_data, struct msg **msg) |
144 { | |
145 fd_log_debug("[%s] CCR FWD handler called", MODULE_NAME); | |
146 | |
147 if (handle_message(msg) < 0) { | |
148 return 0; | |
149 } | |
150 | |
151 return 0; | |
152 } | |
153 | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
154 /* create message to send */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
155 struct msg *create_message(const char *destination) |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
156 { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
157 struct dict_object *command; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
158 struct msg *msg; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
159 struct avp *avp, *avp1; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
160 union avp_value val; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
161 struct msg_hdr *msg_hdr; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
162 const char *realm; |
1371
d1c40627673c
loadtest_cc: randomize session ids
Thomas Klausner <tk@giga.or.at>
parents:
1366
diff
changeset
|
163 char session_id[800]; |
1366 | 164 const char *service_context_id = "version2.clci.ipc@vodafone.com"; |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
165 const char *proxy_host = "Dummy-Proxy-Host-to-Increase-Package-Size"; |
1371
d1c40627673c
loadtest_cc: randomize session ids
Thomas Klausner <tk@giga.or.at>
parents:
1366
diff
changeset
|
166 const char *proxy_state = "This is just data to increase the package size\nXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"; |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
167 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
168 if (fd_dict_search(fd_g_config->cnf_dict, DICT_COMMAND, CMD_BY_NAME, "Credit-Control-Request", &command, ENOENT) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
169 fd_log_error("can't find template for 'Credit-Control-Request'"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
170 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
171 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
172 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
173 if (fd_msg_new(command, MSGFL_ALLOC_ETEID, &msg) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
174 fd_log_error("can't create new 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
175 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
176 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
177 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
178 /* Application Id in header needs to be set to for since this Credit-Control-Request is for Diameter Credit Control */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
179 if (fd_msg_hdr(msg, &msg_hdr) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
180 fd_log_error("can't get message header for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
181 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
182 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
183 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
184 msg_hdr->msg_appl = 4; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
185 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
186 if (fd_msg_add_origin(msg, 0) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
187 fd_log_error("can't set Origin for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
188 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
189 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
190 } |
1366 | 191 |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
192 /* Destination-Host */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
193 fd_msg_avp_new(dh_avp_do, 0, &avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
194 memset(&val, 0, sizeof(val)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
195 val.os.data = (uint8_t *)target; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
196 val.os.len = strlen(target); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
197 if (fd_msg_avp_setvalue(avp, &val) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
198 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
199 fd_log_error("can't set value for 'Destination-Host' for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
200 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
201 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
202 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
203 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
204 if ((realm = strchr(target, '.')) == NULL) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
205 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
206 fd_log_error("can't extract realm from host '%s'", target); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
207 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
208 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
209 /* skip dot */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
210 realm++; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
211 /* Destination-Realm */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
212 fd_msg_avp_new(dr_avp_do, 0, &avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
213 memset(&val, 0, sizeof(val)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
214 val.os.data = (uint8_t *)realm; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
215 val.os.len = strlen(realm); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
216 if (fd_msg_avp_setvalue(avp, &val) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
217 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
218 fd_log_error("can't set value for 'Destination-Realm' for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
219 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
220 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
221 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); |
1366 | 222 |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
223 /* Session-Id */ |
1371
d1c40627673c
loadtest_cc: randomize session ids
Thomas Klausner <tk@giga.or.at>
parents:
1366
diff
changeset
|
224 snprintf(session_id, sizeof(session_id), "session %ld", random()); |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
225 fd_msg_avp_new(si_avp_do, 0, &avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
226 memset(&val, 0, sizeof(val)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
227 val.os.data = (uint8_t *)session_id; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
228 val.os.len = strlen(session_id); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
229 if (fd_msg_avp_setvalue(avp, &val) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
230 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
231 fd_log_error("can't set value for 'Session-Id' for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
232 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
233 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
234 fd_msg_avp_add(msg, MSG_BRW_FIRST_CHILD, avp); |
1366 | 235 |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
236 /* Auth-Application-Id */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
237 fd_msg_avp_new(aai_avp_do, 0, &avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
238 memset(&val, 0, sizeof(val)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
239 val.i32 = 4; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
240 if (fd_msg_avp_setvalue(avp, &val) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
241 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
242 fd_log_error("can't set value for 'Auth-Application-Id' for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
243 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
244 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
245 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
246 |
1366 | 247 /* Service-Context-Id */ |
248 fd_msg_avp_new(sci_avp_do, 0, &avp); | |
249 memset(&val, 0, sizeof(val)); | |
250 val.os.data = (uint8_t *)service_context_id; | |
251 val.os.len = strlen(service_context_id); | |
252 if (fd_msg_avp_setvalue(avp, &val) != 0) { | |
253 fd_msg_free(msg); | |
254 fd_log_error("can't set value for 'Service-Context-Id' for 'Credit-Control-Request' message"); | |
255 return NULL; | |
256 } | |
257 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); | |
258 | |
259 /* CC-Request-Type */ | |
260 fd_msg_avp_new(crt_avp_do, 0, &avp); | |
261 memset(&val, 0, sizeof(val)); | |
262 val.i32 = 1; /* Initial */ | |
263 if (fd_msg_avp_setvalue(avp, &val) != 0) { | |
264 fd_msg_free(msg); | |
265 fd_log_error("can't set value for 'CC-Request-Type' for 'Credit-Control-Request' message"); | |
266 return NULL; | |
267 } | |
268 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); | |
269 | |
270 /* CC-Request-Number */ | |
271 fd_msg_avp_new(crn_avp_do, 0, &avp); | |
272 memset(&val, 0, sizeof(val)); | |
273 val.i32 = 1; | |
274 if (fd_msg_avp_setvalue(avp, &val) != 0) { | |
275 fd_msg_free(msg); | |
276 fd_log_error("can't set value for 'CC-Request-Number' for 'Credit-Control-Request' message"); | |
277 return NULL; | |
278 } | |
279 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); | |
280 | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
281 /* Proxy-Info */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
282 fd_msg_avp_new(pi_avp_do, 0, &avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
283 /* Proxy-Host */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
284 fd_msg_avp_new(ph_avp_do, 0, &avp1); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
285 memset(&val, 0, sizeof(val)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
286 val.os.data = (uint8_t *)proxy_host; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
287 val.os.len = strlen(proxy_host); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
288 if (fd_msg_avp_setvalue(avp1, &val) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
289 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
290 fd_log_error("can't set value for 'Proxy-Host' for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
291 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
292 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
293 fd_msg_avp_add(avp, MSG_BRW_LAST_CHILD, avp1); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
294 /* Proxy-State */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
295 fd_msg_avp_new(ps_avp_do, 0, &avp1); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
296 memset(&val, 0, sizeof(val)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
297 val.os.data = (uint8_t *)proxy_state; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
298 val.os.len = strlen(proxy_state); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
299 if (fd_msg_avp_setvalue(avp1, &val) != 0) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
300 fd_msg_free(msg); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
301 fd_log_error("can't set value for 'Proxy-State' for 'Credit-Control-Request' message"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
302 return NULL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
303 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
304 fd_msg_avp_add(avp, MSG_BRW_LAST_CHILD, avp1); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
305 fd_msg_avp_add(msg, MSG_BRW_LAST_CHILD, avp); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
306 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
307 return msg; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
308 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
309 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
310 /* The thread that handles expired entries cleanup. */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
311 void * gen_thr_fct(void * arg) |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
312 { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
313 struct msg *msg; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
314 fd_log_threadname ( "Loadtest/Generator" ); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
315 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
316 do { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
317 if (do_generate) { |
1372
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
318 time_t now; |
1366 | 319 if (statistics.first == 0) { |
320 statistics.first = time(NULL); | |
321 } | |
322 msg = create_message(target); | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
323 fd_msg_send(&msg, NULL, NULL); |
1366 | 324 fd_log_debug("[%s] sent message", MODULE_NAME); |
1372
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
325 now = time(NULL); |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
326 if (statistics.last != now) { |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
327 print_statistics(); |
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
328 } |
1366 | 329 statistics.last = time(NULL); |
330 statistics.sent++; | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
331 } else { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
332 sleep(1); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
333 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
334 } while (1); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
335 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
336 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
337 /* signal handler */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
338 static void sig_hdlr(void) |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
339 { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
340 if (do_generate) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
341 do_generate = 0; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
342 } else { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
343 do_generate = 1; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
344 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
345 fd_log_notice("%s: switched generation of CCRs %s", MODULE_NAME, do_generate ? "on" : "off"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
346 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
347 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
348 /* entry hook: register callback */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
349 static int cc_entry(char * conffile) |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
350 { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
351 struct disp_when data; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
352 |
1371
d1c40627673c
loadtest_cc: randomize session ids
Thomas Klausner <tk@giga.or.at>
parents:
1366
diff
changeset
|
353 /* initialize random number generator for session IDs */ |
d1c40627673c
loadtest_cc: randomize session ids
Thomas Klausner <tk@giga.or.at>
parents:
1366
diff
changeset
|
354 srandom(time(NULL) | (unsigned int)getpid()); |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
355 if ((target = conffile) == NULL) { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
356 fd_log_error("invalid conffile"); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
357 return EINVAL; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
358 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
359 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
360 memset(&data, 0, sizeof(data)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
361 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
362 /* Advertise the support for the Diameter Credit Control application in the peer */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
363 CHECK_FCT( fd_dict_search( fd_g_config->cnf_dict, DICT_APPLICATION, APPLICATION_BY_NAME, "Diameter Credit Control Application", &data.app, ENOENT) ); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
364 CHECK_FCT( fd_disp_app_support ( data.app, NULL, 1, 0 ) ); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
365 |
1366 | 366 /* the handling of requests is different if it might be locally handled or not */ |
367 /* for possibly locally handled requests, fd_rt_fwd_register is not called, so we need to add handlers for both cases */ | |
368 /* register forward handler for CCR -- needs to look at all requests */ | |
369 CHECK_FCT(fd_rt_fwd_register(ccr_fwd_handler, NULL, RT_FWD_REQ, &ccr_fwd_hdl)); | |
370 /* register local handler for CCR - if not Destination-Host is set, or the local host is used */ | |
371 memset(&data, 0, sizeof(data)); | |
372 CHECK_FCT(fd_dict_search(fd_g_config->cnf_dict, DICT_COMMAND, CMD_BY_NAME, "Credit-Control-Answer", &data.command, ENOENT)); | |
373 CHECK_FCT(fd_disp_register(ccr_local_handler, DISP_HOW_CC, &data, NULL, &ccr_local_hdl)); | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
374 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
375 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Auth-Application-Id", &aai_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
376 { LOG_E("Unable to find 'Auth-Application-Id' AVP in the loaded dictionaries."); }); |
1366 | 377 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "CC-Request-Number", &crn_avp_do, ENOENT), |
378 { LOG_E("Unable to find 'CC-Request-Number' AVP in the loaded dictionaries."); }); | |
379 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "CC-Request-Type", &crt_avp_do, ENOENT), | |
380 | |
381 { LOG_E("Unable to find 'CC-Request-Type' AVP in the loaded dictionaries."); }); | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
382 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Destination-Host", &dh_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
383 { LOG_E("Unable to find 'Destination-Host' AVP in the loaded dictionaries."); }); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
384 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Destination-Realm", &dr_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
385 { LOG_E("Unable to find 'Destination-Realm' AVP in the loaded dictionaries."); }); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
386 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Result-Code", &rc_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
387 { LOG_E("Unable to find 'Result-Code' AVP in the loaded dictionaries."); }); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
388 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Session-Id", &si_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
389 { LOG_E("Unable to find 'Session-Id' AVP in the loaded dictionaries."); }); |
1366 | 390 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Service-Context-Id", &sci_avp_do, ENOENT), |
391 { LOG_E("Unable to find 'Service-Context-Id' AVP in the loaded dictionaries."); }); | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
392 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Proxy-Info", &pi_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
393 { LOG_E("Unable to find 'Proxy-Info' AVP in the loaded dictionaries."); }); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
394 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Proxy-Host", &ph_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
395 { LOG_E("Unable to find 'Proxy-Host' AVP in the loaded dictionaries."); }); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
396 CHECK_FCT_DO(fd_dict_search(fd_g_config->cnf_dict, DICT_AVP, AVP_BY_NAME, "Proxy-State", &ps_avp_do, ENOENT), |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
397 { LOG_E("Unable to find 'Proxy-State' AVP in the loaded dictionaries."); }); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
398 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
399 /* Start the generator thread */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
400 CHECK_POSIX( pthread_create( &gen_thr, NULL, gen_thr_fct, NULL ) ); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
401 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
402 /* Register generator callback */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
403 CHECK_FCT(fd_event_trig_regcb(SIGUSR2, MODULE_NAME, sig_hdlr)); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
404 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
405 return 0; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
406 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
407 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
408 /* And terminate it */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
409 void fd_ext_fini(void) |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
410 { |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
411 /* stop sending */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
412 do_generate = 0; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
413 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
414 /* Stop the expiry thread */ |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
415 CHECK_FCT_DO( fd_thr_term(&gen_thr), ); |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
416 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
417 /* Unregister the callbacks */ |
1366 | 418 if (ccr_local_hdl) { |
419 CHECK_FCT_DO( fd_disp_unregister(&ccr_local_hdl, NULL), ); | |
420 ccr_local_hdl = NULL; | |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
421 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
422 |
1372
6b1a2405cebb
test_cc, loadtest_cc: write current statistics every second
Thomas Klausner <tk@giga.or.at>
parents:
1371
diff
changeset
|
423 print_statistics(); |
1366 | 424 |
1364
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
425 return; |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
426 } |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
427 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
428 |
a37692441c4d
Snapshot commit of loadtest_cc extension, does not work.
Thomas Klausner <tk@giga.or.at>
parents:
diff
changeset
|
429 EXTENSION_ENTRY(MODULE_NAME, cc_entry); |