blob: 461221211a6a9acf4a63ad98ce96e1f661ecc4d1 [file] [log] [blame]
/**CFile****************************************************************
FileName [mioSop.c]
PackageName [MVSIS 1.3: Multi-valued logic synthesis system.]
Synopsis [Derives SOP from Boolean expression.]
Author [MVSIS Group]
Affiliation [UC Berkeley]
Date [Ver. 1.0. Started - September 8, 2003.]
Revision [$Id: mioSop.c,v 1.4 2004/06/28 14:20:25 alanmi Exp $]
***********************************************************************/
#include "mioInt.h"
#include "exp.h"
ABC_NAMESPACE_IMPL_START
////////////////////////////////////////////////////////////////////////
/// DECLARATIONS ///
////////////////////////////////////////////////////////////////////////
static inline unsigned Mio_CubeVar0( int v ) { return (1<< (v<<1) ); }
static inline unsigned Mio_CubeVar1( int v ) { return (1<<((v<<1)+1)); }
static inline int Mio_CubeHasVar0( unsigned x, int v ) { return (x & Mio_CubeVar0(v)) > 0; }
static inline int Mio_CubeHasVar1( unsigned x, int v ) { return (x & Mio_CubeVar1(v)) > 0; }
static inline int Mio_CubeEmpty( unsigned x ) { return (x & (x>>1) & 0x55555555) != 0; }
static inline unsigned Mio_CubeAnd( unsigned x, unsigned y ) { return x | y; }
static inline int Mio_CubeContains( unsigned x, unsigned y ) { return (x | y) == y; } // x contains y
////////////////////////////////////////////////////////////////////////
/// FUNCTION DEFINITIONS ///
////////////////////////////////////////////////////////////////////////
/**Function*************************************************************
Synopsis [Push while performing SCC.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
void Mio_SopPushSCC( Vec_Int_t * p, unsigned c )
{
unsigned Entry;
int i, k = 0;
Vec_IntForEachEntry( p, Entry, i )
{
if ( Mio_CubeContains( Entry, c ) ) // Entry contains c
{
assert( i == k );
return;
}
if ( Mio_CubeContains( c, Entry ) ) // c contains Entry
continue;
Vec_IntWriteEntry( p, k++, Entry );
}
Vec_IntShrink( p, k );
Vec_IntPush( p, c );
}
/**Function*************************************************************
Synopsis [Make the OR of two covers.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
Vec_Int_t * Mio_SopCoverOr( Vec_Int_t * p, Vec_Int_t * q )
{
Vec_Int_t * r;
unsigned Entry;
int i;
r = Vec_IntAlloc( Vec_IntSize(p) + Vec_IntSize(q) );
Vec_IntForEachEntry( p, Entry, i )
Vec_IntPush( r, Entry );
Vec_IntForEachEntry( q, Entry, i )
Mio_SopPushSCC( r, Entry );
return r;
}
/**Function*************************************************************
Synopsis [Make the AND of two covers.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
Vec_Int_t * Mio_SopCoverAnd( Vec_Int_t * p, Vec_Int_t * q )
{
Vec_Int_t * r;
unsigned EntryP, EntryQ;
int i, k;
r = Vec_IntAlloc( Vec_IntSize(p) * Vec_IntSize(q) );
Vec_IntForEachEntry( p, EntryP, i )
Vec_IntForEachEntry( q, EntryQ, k )
if ( !Mio_CubeEmpty( Mio_CubeAnd(EntryP, EntryQ) ) )
Mio_SopPushSCC( r, Mio_CubeAnd(EntryP, EntryQ) );
return r;
}
/**Function*************************************************************
Synopsis [Create negative literal.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
Vec_Int_t * Mio_SopVar0( int i )
{
Vec_Int_t * vSop;
vSop = Vec_IntAlloc( 1 );
Vec_IntPush( vSop, Mio_CubeVar0(i) );
return vSop;
}
/**Function*************************************************************
Synopsis [Create positive literal.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
Vec_Int_t * Mio_SopVar1( int i )
{
Vec_Int_t * vSop;
vSop = Vec_IntAlloc( 1 );
Vec_IntPush( vSop, Mio_CubeVar1(i) );
return vSop;
}
/**Function*************************************************************
Synopsis [Create constant 0 literal.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
Vec_Int_t * Mio_SopConst0()
{
Vec_Int_t * vSop;
vSop = Vec_IntAlloc( 1 );
return vSop;
}
/**Function*************************************************************
Synopsis [Create constant 1 literal.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
Vec_Int_t * Mio_SopConst1()
{
Vec_Int_t * vSop;
vSop = Vec_IntAlloc( 1 );
Vec_IntPush( vSop, 0 );
return vSop;
}
/**Function*************************************************************
Synopsis [Derives SOP representation as the char string.]
Description []
SideEffects []
SeeAlso []
***********************************************************************/
char * Mio_SopDeriveFromArray( Vec_Int_t * vSop, int nVars, Vec_Str_t * vStr, int fPolarity )
{
unsigned Entry;
int i, k;
Vec_StrClear( vStr );
if ( Vec_IntSize(vSop) == 0 )
{
Vec_StrPush( vStr, ' ' );
Vec_StrPush( vStr, (char)('1'-fPolarity) );
Vec_StrPush( vStr, '\n' );
Vec_StrPush( vStr, '\0' );
return Vec_StrArray( vStr );
}
if ( Vec_IntSize(vSop) == 1 && Vec_IntEntry(vSop, 0) == 0 )
{
Vec_StrPush( vStr, ' ' );
Vec_StrPush( vStr, (char)('0'+fPolarity) );
Vec_StrPush( vStr, '\n' );
Vec_StrPush( vStr, '\0' );
return Vec_StrArray( vStr );
}
// create cubes
Vec_IntForEachEntry( vSop, Entry, i )
{
for ( k = 0; k < nVars; k++ )
{
if ( Mio_CubeHasVar0( Entry, k ) )
Vec_StrPush( vStr, '0' );
else if ( Mio_CubeHasVar1( Entry, k ) )
Vec_StrPush( vStr, '1' );
else
Vec_StrPush( vStr, '-' );
}
Vec_StrPush( vStr, ' ' );
Vec_StrPush( vStr, (char)('0'+fPolarity) );
Vec_StrPush( vStr, '\n' );
}
Vec_StrPush( vStr, '\0' );
return Vec_StrArray( vStr );
}
/**Function*************************************************************
Synopsis [Derives SOP representation.]
Description [The SOP is guaranteed to be SCC-free but not minimal.]
SideEffects []
SeeAlso []
***********************************************************************/
char * Mio_LibDeriveSop( int nVars, Vec_Int_t * vExpr, Vec_Str_t * vStr )
{
Vec_Int_t * vSop;
Vec_Ptr_t * vSops0, * vSops1, * vTemp;
int i, Index0, Index1, fCompl0, fCompl1;
Vec_StrClear( vStr );
if ( Exp_IsConst0(vExpr) )
{
Vec_StrPrintStr( vStr, " 0\n" );
Vec_StrPush( vStr, '\0' );
return Vec_StrArray( vStr );
}
if ( Exp_IsConst1(vExpr) )
{
Vec_StrPrintStr( vStr, " 1\n" );
Vec_StrPush( vStr, '\0' );
return Vec_StrArray( vStr );
}
if ( Exp_IsLit(vExpr) )
{
for ( i = 0; i < nVars; i++ )
Vec_StrPush( vStr, '-' );
Vec_StrPrintStr( vStr, " 1\n" );
Vec_StrPush( vStr, '\0' );
assert( (Vec_IntEntry(vExpr,0) >> 1) < nVars );
Vec_StrWriteEntry( vStr, Vec_IntEntry(vExpr,0) >> 1, (char)('1' - (Vec_IntEntry(vExpr,0) & 1)) );
return Vec_StrArray( vStr );
}
vSops0 = Vec_PtrAlloc( nVars + Exp_NodeNum(vExpr) );
vSops1 = Vec_PtrAlloc( nVars + Exp_NodeNum(vExpr) );
for ( i = 0; i < nVars; i++ )
{
Vec_PtrPush( vSops0, Mio_SopVar0(i) );
Vec_PtrPush( vSops1, Mio_SopVar1(i) );
}
for ( i = 0; i < Exp_NodeNum(vExpr); i++ )
{
Index0 = Vec_IntEntry( vExpr, 2*i+0 ) >> 1;
Index1 = Vec_IntEntry( vExpr, 2*i+1 ) >> 1;
fCompl0 = Vec_IntEntry( vExpr, 2*i+0 ) & 1;
fCompl1 = Vec_IntEntry( vExpr, 2*i+1 ) & 1;
// positive polarity
vSop = Mio_SopCoverAnd( fCompl0 ? (Vec_Int_t *)Vec_PtrEntry(vSops0, Index0) : (Vec_Int_t *)Vec_PtrEntry(vSops1, Index0),
fCompl1 ? (Vec_Int_t *)Vec_PtrEntry(vSops0, Index1) : (Vec_Int_t *)Vec_PtrEntry(vSops1, Index1) );
Vec_PtrPush( vSops1, vSop );
// negative polarity
vSop = Mio_SopCoverOr( fCompl0 ? (Vec_Int_t *)Vec_PtrEntry(vSops1, Index0) : (Vec_Int_t *)Vec_PtrEntry(vSops0, Index0),
fCompl1 ? (Vec_Int_t *)Vec_PtrEntry(vSops1, Index1) : (Vec_Int_t *)Vec_PtrEntry(vSops0, Index1) );
Vec_PtrPush( vSops0, vSop );
}
// complement
if ( Vec_IntEntryLast(vExpr) & 1 )
{
vTemp = vSops0;
vSops0 = vSops1;
vSops1 = vTemp;
}
// select the best polarity
if ( Vec_IntSize( (Vec_Int_t *)Vec_PtrEntryLast(vSops0) ) < Vec_IntSize( (Vec_Int_t *)Vec_PtrEntryLast(vSops1) ) )
vSop = (Vec_Int_t *)Vec_PtrEntryLast(vSops0);
else
vSop = (Vec_Int_t *)Vec_PtrEntryLast(vSops1);
// convert positive polarity into SOP
Mio_SopDeriveFromArray( vSop, nVars, vStr, (vSop == Vec_PtrEntryLast(vSops1)) );
Vec_VecFree( (Vec_Vec_t *)vSops0 );
Vec_VecFree( (Vec_Vec_t *)vSops1 );
return Vec_StrArray( vStr );
}
////////////////////////////////////////////////////////////////////////
/// END OF FILE ///
////////////////////////////////////////////////////////////////////////
ABC_NAMESPACE_IMPL_END