1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
/*
* acct.c Accounting routines.
*
* Version: $Id: acct.c,v 1.30.2.2 2005/07/11 13:47:45 nbk Exp $
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* Copyright 2000 The FreeRADIUS server project
* Copyright 2000 Miquel van Smoorenburg <miquels@cistron.nl>
* Copyright 2000 Alan DeKok <aland@ox.org>
* Copyright 2000 Alan Curry <pacman@world.std.com>
*/
static const char rcsid[] = "$Id: acct.c,v 1.30.2.2 2005/07/11 13:47:45 nbk Exp $";
#include "autoconf.h"
#include "libradius.h"
#include <stdlib.h>
#include <string.h>
#include "radiusd.h"
#include "modules.h"
/*
* rad_accounting: call modules.
*
* The return value of this function isn't actually used right now, so
* it's not entirely clear if it is returning the right things. --Pac.
*/
int rad_accounting(REQUEST *request)
{
int reply = RLM_MODULE_OK;
if (!request->proxy) { /* Only need to do this once, before proxying */
char *exec_program;
int exec_wait;
VALUE_PAIR *vp;
int rcode;
int acct_type = 0;
reply = module_preacct(request);
if (reply != RLM_MODULE_NOOP &&
reply != RLM_MODULE_OK &&
reply != RLM_MODULE_UPDATED)
return reply;
/*
* Do accounting, ONLY the first time through.
* This is to ensure that we log the packet
* immediately, even if the proxy never does.
*/
vp = pairfind(request->config_items, PW_ACCT_TYPE);
if (vp)
acct_type = vp->lvalue;
reply = module_accounting(acct_type,request);
/*
* See if we need to execute a program.
* FIXME: somehow cache this info, and only execute the
* program when we receive an Accounting-START packet.
* Only at that time we know dynamic IP etc.
*/
exec_program = NULL;
exec_wait = 0;
if ((vp = pairfind(request->reply->vps, PW_EXEC_PROGRAM)) != NULL) {
exec_wait = 0;
exec_program = strdup((char *)vp->strvalue);
pairdelete(&request->reply->vps, PW_EXEC_PROGRAM);
}
if ((vp = pairfind(request->reply->vps, PW_EXEC_PROGRAM_WAIT)) != NULL) {
exec_wait = 1;
exec_program = strdup((char *)vp->strvalue);
pairdelete(&request->reply->vps, PW_EXEC_PROGRAM_WAIT);
}
/*
* If we want to exec a program, but wait for it,
* do it first before sending the reply, or
* proxying the packet.
*
* If we're NOT waiting, then also do this now, but
* don't check the return code.
*/
if (exec_program) {
/*
* Wait for the answer.
* Don't look for a user message.
* Do look for returned VP's.
*/
rcode = radius_exec_program(exec_program, request,
exec_wait, NULL, 0,
request->packet->vps, &vp);
free(exec_program);
/*
* Always add the value-pairs to the reply.
*
* If we're not waiting, then the pairs
* will be empty, so this won't matter.
*/
pairmove(&request->reply->vps, &vp);
pairfree(&vp);
if (exec_wait) {
if (rcode != 0) {
return reply;
}
}
}
/*
* Maybe one of the preacct modules has decided
* that a proxy should be used.
*/
if ((vp = pairfind(request->config_items, PW_PROXY_TO_REALM))) {
REALM *realm;
/*
* Check whether Proxy-To-Realm is
* a LOCAL realm.
*/
realm = realm_find(vp->strvalue, TRUE);
if (realm != NULL &&
realm->acct_ipaddr == htonl(INADDR_NONE)) {
DEBUG("rad_accounting: Cancelling proxy to realm %s, as it is a LOCAL realm.", realm->realm);
pairdelete(&request->config_items, PW_PROXY_TO_REALM);
} else {
/*
* Don't reply to the NAS now because
* we have to send the proxied packet.
*/
return reply;
}
}
}
/*
* We get here IF we're not proxying, OR if we've
* received the accounting reply from the end server,
* THEN we can reply to the NAS.
* If the accounting module returns NOOP, the data
* storage did not succeed, so radiusd should not send
* Accounting-Response.
*/
if (reply == RLM_MODULE_OK ||
reply == RLM_MODULE_UPDATED) {
/*
* Now send back an ACK to the NAS.
*/
request->reply->code = PW_ACCOUNTING_RESPONSE;
}
return reply;
}
|