diff options
author | Richard Levitte <levitte@openssl.org> | 2000-03-17 10:02:16 +0000 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2000-03-17 10:02:16 +0000 |
commit | 158ef04857137709fbcedb8dcfd9c698f29f772d (patch) | |
tree | 38d33b94778ea65bf1e877e08e30f8a4b4b818f6 /crypto/bio/bss_log.c | |
parent | 511e596b8ac2132bd0a40fd4dcce64f72cb2e42a (diff) |
Bugs corrected
Diffstat (limited to 'crypto/bio/bss_log.c')
-rw-r--r-- | crypto/bio/bss_log.c | 26 |
1 files changed, 19 insertions, 7 deletions
diff --git a/crypto/bio/bss_log.c b/crypto/bio/bss_log.c index 4faa3d1a66..497eb1af72 100644 --- a/crypto/bio/bss_log.c +++ b/crypto/bio/bss_log.c @@ -257,7 +257,7 @@ static void xcloselog(BIO* bp) #elif defined(VMS) -static int VMS_OPC_target = OPC$M_NM_NTWORK; +static int VMS_OPC_target = LOG_DAEMON; static void xopenlog(BIO* bp, const char* name, int level) { @@ -271,20 +271,32 @@ static void xsyslog(BIO *bp, int priority, const char *string) char buf[10240]; unsigned int len; struct dsc$descriptor_s buf_dsc; - $DESCRIPTOR(fao_cmd, "!AZ"); + $DESCRIPTOR(fao_cmd, "!AZ: !AZ"); + char *priority_tag; + + switch (priority) + { + case LOG_EMERG: priority_tag = "Emergency"; break; + case LOG_ALERT: priority_tag = "Alert"; break; + case LOG_CRIT: priority_tag = "Critical"; break; + case LOG_ERR: priority_tag = "Error"; break; + case LOG_WARNING: priority_tag = "Warning"; break; + case LOG_NOTICE: priority_tag = "Notice"; break; + case LOG_INFO: priority_tag = "Info"; break; + case LOG_DEBUG: priority_tag = "DEBUG"; break; + } buf_dsc.dsc$b_dtype = DSC$K_DTYPE_T; buf_dsc.dsc$b_class = DSC$K_CLASS_S; buf_dsc.dsc$a_pointer = buf; buf_dsc.dsc$w_length = sizeof(buf) - 1; - lib$sys_fao(&fao_cmd, &len, &buf_dsc, string); + lib$sys_fao(&fao_cmd, &len, &buf_dsc, priority_tag, string); - /* we knoe there's an 8 byte header. That's documented */ - opcdef_p = (struct opcdef *) Malloc(8 + strlen(string)); + /* we know there's an 8 byte header. That's documented */ + opcdef_p = (struct opcdef *) Malloc(8 + len); opcdef_p->opc$b_ms_type = OPC$_RQ_RQST; - opcdef_p->opc$b_ms_target = VMS_OPC_target; - memcpy(opcdef_p->opc$b_ms_target, &priority, 3); + memcpy(opcdef_p->opc$z_ms_target_classes, &VMS_OPC_target, 3); opcdef_p->opc$l_ms_rqstid = 0; memcpy(&opcdef_p->opc$l_ms_text, buf, len); |