{
int X509_REQ_print(bp,x)BIO *bp;X509_REQ *x;	{	unsigned long l;	int i,n;	char *s,*neg;	X509_REQ_INFO *ri;	EVP_PKEY *pkey;	STACK *sk;	char str[128];	ri=x->req_info;	sprintf(str,"Certificate Request:\n");	if (BIO_puts(bp,str) <= 0) goto err;	sprintf(str,"%4sData:\n","");	if (BIO_puts(bp,str) <= 0) goto err;	neg=(ri->version->type == V_ASN1_NEG_INTEGER)?"-":"";	l=0;	for (i=0; i<ri->version->length; i++)		{ l<<=8; l+=ri->version->data[i]; }	sprintf(str,"%8sVersion: %s%lu (%s0x%lx)\n","",neg,l,neg,l);	if (BIO_puts(bp,str) <= 0) goto err;	sprintf(str,"%8sSubject: ","");	if (BIO_puts(bp,str) <= 0) goto err;	X509_NAME_print(bp,ri->subject,16);	sprintf(str,"\n%8sSubject Public Key Info:\n","");	if (BIO_puts(bp,str) <= 0) goto err;	i=OBJ_obj2nid(ri->pubkey->algor->algorithm);	sprintf(str,"%12sPublic Key Algorithm: %s\n","",		(i == NID_undef)?"UNKNOWN":OBJ_nid2ln(i));	if (BIO_puts(bp,str) <= 0) goto err;	pkey=X509_REQ_get_pubkey(x);#ifndef NO_RSA	if (pkey->type == EVP_PKEY_RSA)		{		BIO_printf(bp,"%12sRSA Public Key: (%d bit)\n","",			BN_num_bits(pkey->pkey.rsa->n));		RSA_print(bp,pkey->pkey.rsa,16);		}	else #endif#ifndef NO_DSA		if (pkey->type == EVP_PKEY_DSA)		{		BIO_printf(bp,"%12sDSA Public Key:\n","");		DSA_print(bp,pkey->pkey.dsa,16);		}	else#endif		BIO_printf(bp,"%12sUnknown Public Key:\n","");	EVP_PKEY_free(pkey);	/* may not be */	sprintf(str,"%8sAttributes:\n","");	if (BIO_puts(bp,str) <= 0) goto err;	sk=x->req_info->attributes;	if ((sk == NULL) || (sk_num(sk) == 0))		{		if (!x->req_info->req_kludge)			{			sprintf(str,"%12sa0:00\n","");			if (BIO_puts(bp,str) <= 0) goto err;			}		}	else		{		for (i=0; i<sk_num(sk); i++)			{			ASN1_TYPE *at;			X509_ATTRIBUTE *a;			ASN1_BIT_STRING *bs=NULL;			ASN1_TYPE *t;			int j,type=0,count=1,ii=0;			a=(X509_ATTRIBUTE *)sk_value(sk,i);			sprintf(str,"%12s","");			if (BIO_puts(bp,str) <= 0) goto err;			if ((j=i2a_ASN1_OBJECT(bp,a->object)) > 0)			if (a->set)				{				ii=0;				count=sk_num(a->value.set);get_next:				at=(ASN1_TYPE *)sk_value(a->value.set,ii);				type=at->type;				bs=at->value.asn1_string;				}			else				{				t=a->value.single;				type=t->type;				bs=t->value.bit_string;				}			for (j=25-j; j>0; j--)				if (BIO_write(bp," ",1) != 1) goto err;			if (BIO_puts(bp,":") <= 0) goto err;			if (	(type == V_ASN1_PRINTABLESTRING) ||				(type == V_ASN1_T61STRING) ||				(type == V_ASN1_IA5STRING))				{				if (BIO_write(bp,(char *)bs->data,bs->length)					!= bs->length)					goto err;				BIO_puts(bp,"\n");				}			else				{				BIO_puts(bp,"unable to print attribute\n");				}			if (++ii < count) goto get_next;			}		}	i=OBJ_obj2nid(x->sig_alg->algorithm);	sprintf(str,"%4sSignature Algorithm: %s","",		(i == NID_undef)?"UNKNOWN":OBJ_nid2ln(i));	if (BIO_puts(bp,str) <= 0) goto err;	n=x->signature->length;	s=(char *)x->signature->data;	for (i=0; i<n; i++)		{		if ((i%18) == 0)			{			sprintf(str,"\n%8s","");			if (BIO_puts(bp,str) <= 0) goto err;			}		sprintf(str,"%02x%s",(unsigned char)s[i],((i+1) == n)?"":":");		if (BIO_puts(bp,str) <= 0) goto err;		}	if (BIO_puts(bp,"\n") <= 0) goto err;	return(1);err:	X509err(X509_F_X509_REQ_PRINT,ERR_R_BUF_LIB);	return(0);	}