The FreeRADIUS server  $Id: 15bac2a4c627c01d1aa2047687b3418955ac7f00 $
base.c
Go to the documentation of this file.
1 /*
2  * This program is free software; you can redistribute it and/or modify
3  * it under the terms of the GNU General Public License as published by
4  * the Free Software Foundation; either version 2 of the License, or
5  * (at your option) any later version.
6  *
7  * This program is distributed in the hope that it will be useful,
8  * but WITHOUT ANY WARRANTY; without even the implied warranty of
9  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
10  * GNU General Public License for more details.
11  *
12  * You should have received a copy of the GNU General Public License
13  * along with this program; if not, write to the Free Software
14  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
15  */
16 
17 /**
18  * $Id: a36e06ae7b56befa3306d7ba7f1633bfaa6cc641 $
19  * @file src/process/ldap_sync/base.c
20  * @brief LDAP sync process module
21  *
22  * @copyright 2022 NetworkRADIUS SARL (legal@networkradius.com)
23  */
24 #define LOG_PREFIX "process_ldap_sync"
25 
26 #include <freeradius-devel/server/protocol.h>
27 #include <freeradius-devel/util/debug.h>
28 #include <freeradius-devel/ldap/sync.h>
29 
30 static fr_dict_t const *dict_ldap_sync;
31 
34  { .out = &dict_ldap_sync, .proto = "ldap" },
35  { NULL }
36 };
37 
39 
42  { .out = &attr_packet_type, .name = "Packet-Type", .type= FR_TYPE_UINT32, .dict = &dict_ldap_sync },
43 
44  { NULL }
45 };
46 
48  "", //!< 0
49  "Present",
50  "Add",
51  "Modify",
52  "Delete",
53  "Entry-Response",
54  "Cookie-Load",
55  "Cookie-Load-Response",
56  "Cookie-Store",
57  "Cookie-Store-Response",
58 };
59 
60 static void ldap_sync_packet_debug(request_t *request, fr_packet_t *packet, fr_pair_list_t *list, bool received)
61 {
62 
63  if (!packet) return;
64  if (!RDEBUG_ENABLED) return;
65 
66  log_request(L_DBG, L_DBG_LVL_1, request, __FILE__, __LINE__, "%s %s",
67  received ? "Received" : "Sending",
69  );
70 
71  if (received) {
72  log_request_pair_list(L_DBG_LVL_1, request, NULL, list, NULL);
73  } else {
74  /*
75  * At higher debug levels, log returned data as well.
76  */
77  log_request_pair_list(L_DBG_LVL_2, request, NULL, list, NULL);
78  }
79 
80 }
81 
82 typedef struct {
83  uint64_t nothing; // so that the next field isn't at offset 0
84 
92 
93 typedef struct {
96 
97 #define PROCESS_PACKET_TYPE fr_ldap_sync_packet_code_t
98 #define PROCESS_CODE_MAX FR_LDAP_SYNC_CODE_MAX
99 #define PROCESS_PACKET_CODE_VALID FR_LDAP_SYNC_PACKET_CODE_VALID
100 #define PROCESS_INST process_ldap_sync_t
101 #include <freeradius-devel/server/process.h>
102 
103 
104 static unlang_action_t mod_process(rlm_rcode_t *p_result, module_ctx_t const *mctx, request_t *request)
105 {
106  fr_process_state_t const *state;
107 
109 
111 
112  fr_assert(FR_LDAP_SYNC_PACKET_CODE_VALID(request->packet->code));
113 
114  request->component = "ldap_sync";
115  request->module = NULL;
116  fr_assert(request->dict == dict_ldap_sync);
117 
118  UPDATE_STATE(packet);
119 
120  ldap_sync_packet_debug(request, request->packet, &request->request_pairs, true);
121 
122  return state->recv(p_result, mctx, request);
123 }
124 
125 static fr_process_state_t const process_state[] = {
127  .default_reply = FR_LDAP_SYNC_CODE_ENTRY_RESPONSE,
128  .rcode = RLM_MODULE_NOOP,
129  .recv = recv_generic,
130  .resume = resume_recv_generic,
131  .section_offset = offsetof(process_ldap_sync_sections_t, recv_present),
132  },
133  [ FR_LDAP_SYNC_CODE_ADD ] = {
134  .default_reply = FR_LDAP_SYNC_CODE_ENTRY_RESPONSE,
135  .rcode = RLM_MODULE_NOOP,
136  .recv = recv_generic,
137  .resume = resume_recv_generic,
138  .section_offset = offsetof(process_ldap_sync_sections_t, recv_add)
139  },
141  .default_reply = FR_LDAP_SYNC_CODE_ENTRY_RESPONSE,
142  .rcode = RLM_MODULE_NOOP,
143  .recv = recv_generic,
144  .resume = resume_recv_generic,
145  .section_offset = offsetof(process_ldap_sync_sections_t, recv_delete),
146  },
148  .default_reply = FR_LDAP_SYNC_CODE_ENTRY_RESPONSE,
149  .rcode = RLM_MODULE_NOOP,
150  .recv = recv_generic,
151  .resume = resume_recv_generic,
152  .section_offset = offsetof(process_ldap_sync_sections_t, recv_modify),
153  },
155  .rcode = RLM_MODULE_NOOP,
156  .send = send_generic,
157  .resume = resume_send_generic,
158  },
160  .packet_type = {
165  },
167  .rcode = RLM_MODULE_NOOP,
168  .recv = recv_generic,
169  .resume = resume_recv_generic,
170  .section_offset = offsetof(process_ldap_sync_sections_t, load_cookie),
171  },
173  .rcode = RLM_MODULE_NOOP,
174  .send = send_generic,
175  .resume = resume_send_generic,
176  },
178  .rcode = RLM_MODULE_NOOP,
179  .send = send_generic,
180  .resume = resume_send_generic
181  },
184  .rcode = RLM_MODULE_NOOP,
185  .recv = recv_generic,
186  .resume = resume_recv_generic,
187  .section_offset = offsetof(process_ldap_sync_sections_t, store_cookie),
188  },
190  .rcode = RLM_MODULE_NOOP,
191  .send = send_generic,
192  .resume = resume_send_generic,
193  }
194 };
195 
197  {
198  .name = "load",
199  .name2 = "Cookie",
200  .component = MOD_AUTHORIZE,
201  .offset = PROCESS_CONF_OFFSET(load_cookie)
202  },
203  {
204  .name = "store",
205  .name2 = "Cookie",
206  .component = MOD_AUTHORIZE,
207  .offset = PROCESS_CONF_OFFSET(store_cookie)
208  },
209  {
210  .name = "recv",
211  .name2 = "Add",
212  .component = MOD_AUTHORIZE,
213  .offset = PROCESS_CONF_OFFSET(recv_add)
214  },
215  {
216  .name = "recv",
217  .name2 = "Present",
218  .component = MOD_AUTHORIZE,
219  .offset = PROCESS_CONF_OFFSET(recv_present)
220  },
221  {
222  .name = "recv",
223  .name2 = "Delete",
224  .component = MOD_AUTHORIZE,
225  .offset = PROCESS_CONF_OFFSET(recv_delete)
226  },
227  {
228  .name = "recv",
229  .name2 = "Modify",
230  .component = MOD_AUTHORIZE,
231  .offset = PROCESS_CONF_OFFSET(recv_modify)
232  },
233 
235 };
236 
239  .common = {
240  .magic = MODULE_MAGIC_INIT,
241  .name = "process_ldap_sync",
242  .inst_size = sizeof(process_ldap_sync_t),
243  },
244 
245  .process = mod_process,
246  .compile_list = compile_list,
247  .dict = &dict_ldap_sync,
248 };
unlang_action_t
Returned by unlang_op_t calls, determine the next action of the interpreter.
Definition: action.h:35
A section grouping multiple CONF_PAIR.
Definition: cf_priv.h:89
@ MOD_AUTHORIZE
1 methods index for authorize section.
Definition: components.h:34
fr_dict_attr_t const ** out
Where to write a pointer to the resolved fr_dict_attr_t.
Definition: dict.h:250
fr_dict_t const ** out
Where to write a pointer to the loaded/resolved fr_dict_t.
Definition: dict.h:263
Specifies an attribute which must be present for the module to function.
Definition: dict.h:249
Specifies a dictionary which must be loaded/loadable for the module to function.
Definition: dict.h:262
void *_CONST data
Module instance's parsed configuration.
Definition: dl_module.h:165
#define MODULE_MAGIC_INIT
Stop people using different module/library/server versions together.
Definition: dl_module.h:65
void log_request(fr_log_type_t type, fr_log_lvl_t lvl, request_t *request, char const *file, int line, char const *fmt,...)
Marshal variadic log arguments into a va_list and pass to normal logging functions.
Definition: log.c:603
void log_request_pair_list(fr_log_lvl_t lvl, request_t *request, fr_pair_t const *parent, fr_pair_list_t const *vps, char const *prefix)
Print a fr_pair_list_t.
Definition: log.c:821
@ L_DBG_LVL_1
Highest priority debug messages (-x).
Definition: log.h:70
@ L_DBG_LVL_2
2nd highest priority debug messages (-xx | -X).
Definition: log.h:71
@ L_DBG
Only displayed when debugging is enabled.
Definition: log.h:59
@ FR_TYPE_UINT32
32 Bit unsigned integer.
Definition: merged_model.c:99
dl_module_inst_t const * inst
Dynamic loader API handle for the module.
Definition: module_ctx.h:42
Temporary structure to hold arguments for module calls.
Definition: module_ctx.h:41
CONF_SECTION * recv_delete
Definition: base.c:89
static fr_dict_attr_t const * attr_packet_type
Definition: base.c:38
static unlang_action_t mod_process(rlm_rcode_t *p_result, module_ctx_t const *mctx, request_t *request)
Definition: base.c:104
static virtual_server_compile_t const compile_list[]
Definition: base.c:196
fr_dict_autoload_t process_ldap_sync_dict[]
Definition: base.c:33
static fr_dict_t const * dict_ldap_sync
Definition: base.c:30
CONF_SECTION * recv_modify
Definition: base.c:90
process_ldap_sync_sections_t sections
Definition: base.c:94
fr_dict_attr_autoload_t process_ldap_sync_dict_attr[]
Definition: base.c:41
static fr_process_state_t const process_state[]
Definition: base.c:125
static char const * ldap_sync_message_types[FR_LDAP_SYNC_CODE_MAX]
Definition: base.c:47
CONF_SECTION * recv_add
Definition: base.c:87
static void ldap_sync_packet_debug(request_t *request, fr_packet_t *packet, fr_pair_list_t *list, bool received)
Definition: base.c:60
CONF_SECTION * store_cookie
Definition: base.c:86
fr_process_module_t process_ldap_sync
Definition: base.c:238
CONF_SECTION * recv_present
Definition: base.c:88
CONF_SECTION * load_cookie
Definition: base.c:85
#define PROCESS_TRACE
Trace each state function as it's entered.
Definition: process.h:65
module_t common
Common fields for all loadable modules.
Definition: process.h:55
Common public symbol definition for all process modules.
Definition: process.h:54
#define RDEBUG_ENABLED()
Definition: radclient.h:49
rlm_rcode_t
Return codes indicating the result of the module call.
Definition: rcode.h:40
@ RLM_MODULE_INVALID
The module considers the request invalid.
Definition: rcode.h:45
@ RLM_MODULE_FAIL
Module failed, don't reply.
Definition: rcode.h:42
@ RLM_MODULE_DISALLOW
Reject the request (user is locked out).
Definition: rcode.h:46
@ RLM_MODULE_REJECT
Immediately reject the request.
Definition: rcode.h:41
@ RLM_MODULE_NOOP
Module succeeded without doing anything.
Definition: rcode.h:48
fr_assert(0)
#define FR_LDAP_SYNC_PACKET_CODE_VALID(_code)
Definition: sync.h:58
@ FR_LDAP_SYNC_CODE_PRESENT
LDAP server indicates a particular object is present and unchanged.
Definition: sync.h:33
@ FR_LDAP_SYNC_CODE_COOKIE_STORE_RESPONSE
Response to storing the new cookie.
Definition: sync.h:52
@ FR_LDAP_SYNC_CODE_ENTRY_RESPONSE
Response packet to present / add / modify / delete.
Definition: sync.h:42
@ FR_LDAP_SYNC_CODE_COOKIE_LOAD_FAIL
Response when coolie load fails.
Definition: sync.h:48
@ FR_LDAP_SYNC_CODE_ADD
Object has been added to the LDAP directory.
Definition: sync.h:36
@ FR_LDAP_SYNC_CODE_COOKIE_STORE
The server has sent a new cookie.
Definition: sync.h:50
@ FR_LDAP_SYNC_CODE_COOKIE_LOAD_RESPONSE
Response with the returned cookie.
Definition: sync.h:46
@ FR_LDAP_SYNC_CODE_DELETE
Object has been deleted.
Definition: sync.h:40
@ FR_LDAP_SYNC_CODE_COOKIE_LOAD
Before the sync starts, request any previously stored cookie.
Definition: sync.h:44
@ FR_LDAP_SYNC_CODE_MAX
Definition: sync.h:54
@ FR_LDAP_SYNC_CODE_MODIFY
Object has been modified.
Definition: sync.h:38
#define talloc_get_type_abort_const
Definition: talloc.h:270
unsigned int code
Packet code (type).
Definition: packet.h:61
#define COMPILE_TERMINATOR
char const * name
Name of the processing section, such as "recv" or "send".
Processing sections which are allowed in this virtual server.