--- ../../../../mod_ssl-2.2.8-1.3.6/pkg.sslmod/ssl_engine_vars.c	Sun Mar 21 16:14:15 1999
+++ ./ssl_engine_vars.c	Thu Jun  3 10:55:10 1999
@@ -309,6 +309,21 @@
         if ((xs = SSL_get_certificate(ssl)) != NULL)
             result = ssl_var_lookup_ssl_cert(p, xs, var+7);
     }
+    /* Giacob: assign new env var for cert status */ 
+    else if (strlen(var) > 15 && strcEQn(var, "OCSP_LDAP_RESP_", 15)) {
+        char *resp_status = NULL;
+        ssl = ap_ctx_get(c->client->ctx, "ssl");
+        resp_status = (char *)ap_ctx_get(c->client->ctx, "ssl::ocsp::resp::status");
+        if (resp_status != NULL) result = ap_psprintf(p, "%s", resp_status);
+    }
+    else if (strlen(var) > 15 && strcEQn(var, "OCSP_LDAP_CERT_", 15)) {
+        char *cert_status = NULL;  
+        ssl = ap_ctx_get(c->client->ctx, "ssl"); 
+        cert_status = (char *)ap_ctx_get(c->client->ctx, "ssl::ocsp::cert::status");
+        if (cert_status != NULL) result = ap_psprintf(p, "%s", cert_status);  
+    }
+        
+        
     return result;
 }
 
