Add debugging to session caching and restoring

diff --git a/src/process/tacacs/base.c b/src/process/tacacs/base.c
index a0dad31a29990bdb791d8e77d44a9fa7766e5269..0ec71964eecfa831fe3323ca177448d751af4f35 100644 (file)
--- a/src/process/tacacs/base.c
+++ b/src/process/tacacs/base.c
@@ -834,12 +834,16 @@ RESUME(auth_get)
        if (!vp) break; \
        MEM(copy = fr_pair_copy(session, vp));  \
        fr_pair_append(&session->list, copy); \
+       RDEBUG2("%pP", copy); \
 } while (0)
 
+               RDEBUG2("Caching session attributes:");
+               RINDENT();
                COPY(attr_user_name);
                COPY(attr_tacacs_client_port);
                COPY(attr_tacacs_remote_address);
                COPY(attr_tacacs_privilege_level);
+               REXDENT();
 
        } else {
                session->rounds++;
@@ -893,6 +897,14 @@ RECV(auth_cont)
                        return CALL_SEND_TYPE(FR_TACACS_CODE_AUTH_ERROR);
                }
 
+               if (fr_debug_lvl >= L_DBG_LVL_2) {
+                       RDEBUG2("Restoring session attributes:");
+                       RINDENT();
+                       while ((vp = fr_pair_list_next(&session->list, vp))) {
+                               RDEBUG2("%pP", vp);
+                       }
+                       REXDENT();
+               }
                if (fr_pair_list_copy(request->request_ctx, &request->request_pairs, &session->list) < 0) goto error;
 
                /*