wbrawner/openssl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Bugs corrected

Browse source
This commit is contained in:
Richard Levitte 2000-03-17 10:02:16 +00:00
parent 511e596b8a
commit 158ef04857
1 changed files with 19 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
crypto/bio/bss_log.c
View file

@ -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);