define( 'ALTSYS_CORE_TYPE_X20' , 1 ) ; // 2.0.0-2.0.13 and 2.0.x-JP
define( 'ALTSYS_CORE_TYPE_X20S' , 2 ) ; // 2.0.14- and 2.3.0- from xoops.org
define( 'ALTSYS_CORE_TYPE_ORE' , 4 ) ; // ORETEKI by marijuana
define( 'ALTSYS_CORE_TYPE_X22' , 8 ) ; // 2.2 from xoops.org
define( 'ALTSYS_CORE_TYPE_ICMS' , 12 ) ; // ImpressCMS
define( 'ALTSYS_CORE_TYPE_XC21L' , 16 ) ; // XOOPS Cube 2.1 Legacy

function altsys_get_core_type()
{
	if( defined( 'XOOPS_ORETEKI' ) ) return ALTSYS_CORE_TYPE_ORE ;
	else if( defined( 'XOOPS_CUBE_LEGACY' ) ) return ALTSYS_CORE_TYPE_XC21L ;
	else if( defined( 'ICMS_VERSION_NAME' ) ) return ALTSYS_CORE_TYPE_ICMS ;
	else if( strstr( XOOPS_VERSION , 'JP' ) ) return ALTSYS_CORE_TYPE_X20 ;
	else {
		$versions = array_map( 'intval' , explode( '.' , preg_replace( '/[^0-9.]/' , '' , XOOPS_VERSION ) ) ) ;
		if( $versions[0] == 2 && $versions[1] == 2 ) {
			return ALTSYS_CORE_TYPE_X22 ;
		} else if( $versions[0] == 2 && $versions[1] == 0 && $versions[2] > 13 ) {
			return ALTSYS_CORE_TYPE_X20S ;
		} else if( $versions[0] == 2 && $versions[1] > 2 ) {
			return ALTSYS_CORE_TYPE_X20S ;
		} else {
			return ALTSYS_CORE_TYPE_X20 ;
		}
	}
}