/*
* Copyright (c) 2005-2006 Nokia Corporation and/or its subsidiary(-ies). 
* All rights reserved.
* This component and the accompanying materials are made available
* under the terms of "Eclipse Public License v1.0"
* which accompanies this distribution, and is available
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
*
* Initial Contributors:
* Nokia Corporation - initial contribution.
*
* Contributors:
*
* Description:  A wrapper of OpenSSL bio.c functions to Symbian.
*
*/


/** A wrapper of OpenSSL bio.c functions to Symbian **/

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <e32base.h>
#include "xmlsec_error_flag.h"
#include "xmlsecc_config.h"
#include "xmlsecc_bio.h"

BIO* BIO_new_buffer(const char *aData, unsigned int aSize, const char *aName)
    {
    BIO	*bio;
    char *tmpname = NULL;
    			
    char* buf = (char *)malloc(aSize + 1);
    if(!buf){	   
	    xmlSecSetErrorFlag( KErrNoMemory );
	    return(NULL);
	}
	memcpy(buf, aData, aSize);
	
    if (aName)
	{
		tmpname = (char *)malloc(sizeof(char)*(strlen(aName)+1));
		if (!tmpname)
		{
		    xmlSecSetErrorFlag( KErrNoMemory );
			free(buf);
			return (NULL);
		}		
		strcpy(tmpname, aName);
	}

	bio = (BIO *)malloc(sizeof(BIO));
	if (!bio)
	{
		xmlSecSetErrorFlag( KErrNoMemory );
	    free(buf);
	    free(tmpname);
	    return(NULL);
	}
	
	bio->mem = buf;
	bio->len = aSize;
	bio->name = tmpname;
	
	return bio;
    }

BIO* BIO_new_file(const char *aFilename, const char *aMode, const char *name)
{
    BIO *bio;
	FILE *fp;
    char *buf;
    long fileLen;
    int byteRead;
    char *tmpname = NULL;

    //Read file to memory
	fp = fopen(aFilename, aMode);
	if(!fp)
	    {
	    if ( errno == ENOMEM )
	        {
		    xmlSecSetErrorFlag( KErrNoMemory );
	        }
	    return(NULL);
	    }
	fseek(fp, 0, SEEK_END);
	fileLen = ftell(fp);
	if(fileLen < 0)
		{
			xmlSecSetErrorFlag( KErrGeneral );
			fclose(fp);
			return(NULL);
		}
	fseek ( fp , 0L , SEEK_SET );
	
	buf = (char *)malloc(sizeof(char)*(fileLen+1));
    if(!buf) {	   
		xmlSecSetErrorFlag( KErrNoMemory );
		fclose(fp);
	    return(NULL);
	}    
				
	byteRead = fread(buf, sizeof(char), fileLen, fp);
    if(byteRead != fileLen) {
	    free(buf);
	    fclose(fp);
	    return(NULL);
	}   
	
	if (name)
	{
		tmpname = (char *)malloc(sizeof(char)*(strlen(name)+1));
		if (!tmpname)
		{
		    xmlSecSetErrorFlag( KErrNoMemory );
			free(buf);
			fclose(fp);
			return (NULL);
		}		
		strcpy(tmpname, name);
	}

	bio = (BIO *)malloc(sizeof(BIO));
	if (!bio)
	{
		xmlSecSetErrorFlag( KErrNoMemory );
		if (tmpname)
		    {
		    free(tmpname);
		    }
	    free(buf);
	    fclose(fp);
	    return(NULL);
	}
	
	bio->mem = buf;
	bio->len = fileLen;
	bio->name = tmpname;
	fclose(fp);
	return bio; 	

}

void BIO_free(BIO *bio)
{
	if (bio)
	{
		if (bio->mem)
		{
			memset(bio->mem, 0, bio->len);
			free(bio->mem);			
		}
		if (bio->name)
		{
		    free(bio->name);        
		}
		free(bio);
	}
}

BIO* BIO_new()
{
	BIO *bio = (BIO *)malloc(sizeof(BIO));
	if ( !bio ) 
	    {
	    xmlSecSetErrorFlag( KErrNoMemory );
	    return NULL;
	    }
	bio->mem = NULL;
	bio->len = 0;
	bio->name = NULL;
	return bio;
}

int BIO_write(BIO *bio, const unsigned char *buf, unsigned int size)
{
	bio->mem = (char *)malloc(size *sizeof(char));
	if (!bio->mem)
	    {
	    xmlSecSetErrorFlag( KErrNoMemory );
	    return -1;    
	    }
	
	memcpy((unsigned char*)bio->mem, buf, size);
	bio->len = size;
	
	return 0;
}