int readAseData( char* aseFile )
{

	FILE* fp = fopen(aseFile , "rb" );
	if( fp == NULL )
	{
		printf( "Needs ase file in!\n" );
		exit( 1 );
	}
	
	// 获取ASE文件路径 
	char materPath[MAX_PATH];
	materPath[0] = 0; //初始化为空字符串 
	char* p = strrchr(aseFile, '\\');
	if(p != NULL)
	{
		*(p + 1) = '\0';
		strcpy(materPath, aseFile);
	}
	// 计算ASE文件后缀路径添加位置 
	char* addSuffixPathPos = (char*)materPath + strlen(materPath);

	char line[LINE_SIZE + 1];
	line[0] = 0;  //初始化为空字符串 
	
	int flag[5] = {0};

	int preADD = 0;
	int _tpreADD = 0;
	int materIndex = 0;
	
	while( !feof( fp ) )
	{
		fgets( line, 1024, fp );

		if( strstr( line, "*MATERIAL" ) != NULL )
		{
				int n;
				if(sscanf( line, " *MATERIAL %d", &n) != 0 )
				{
					materCount ++;
					materIndex = abs(n) % MAX_MESH;
					readMaterCount[materIndex] = materCount; 
					
					// 先初默认纹理编号为白色纹理编号 
					materials[materCount].texture = 0;
					continue;
				}
		}
		if( strstr( line, "*MATERIAL_AMBIENT" ) != NULL )
		{
				float f1 = 0.0f, f2 = 0.0f, f3 = 0.0f;
				if(sscanf( line, " *MATERIAL_AMBIENT %f %f %f", &f1, &f2, &f3) != 0 )
				{
					((materials[materCount]).ambient)[0] = f1;
					((materials[materCount]).ambient)[1] = f2;
					((materials[materCount]).ambient)[2] = f3;
					continue;
				}
		}
		if( strstr( line, "*MATERIAL_DIFFUSE" ) != NULL )
		{
				float f1 = 0.0f, f2 = 0.0f, f3 = 0.0f;
				if(sscanf( line, " *MATERIAL_DIFFUSE %f %f %f", &f1, &f2, &f3) != 0 )
				{
					((materials[materCount]).diffuse)[0] = f1;
					((materials[materCount]).diffuse)[1] = f2;
					((materials[materCount]).diffuse)[2] = f3;
					continue;
				}
		}
		if( strstr( line, "*MATERIAL_SPECULAR" ) != NULL )
		{
				float f1 = 0.0f, f2 = 0.0f, f3 = 0.0f;
				if(sscanf( line, " *MATERIAL_SPECULAR %f %f %f", &f1, &f2, &f3) != 0 )
				{
					((materials[materCount]).specular)[0] = f1;
					((materials[materCount]).specular)[1] = f2;
					((materials[materCount]).specular)[2] = f3;
					continue;
				}
		}
		if( strstr( line, "*MATERIAL_EMISSION" ) != NULL )
		{
				float f1 = 0.0f, f2 = 0.0f, f3 = 0.0f;
				if(sscanf( line, " *MATERIAL_AMBIENT %f %f %f", &f1, &f2, &f3) != 0 )
				{
					((materials[materCount]).emission)[0] = f1;
					((materials[materCount]).emission)[1] = f2;
					((materials[materCount]).emission)[2] = f3;
					continue;
				}
		}
		if( strstr( line, "*MATERIAL_SHINE" ) != NULL )
		{
				float f1;
				if(sscanf( line, " *MATERIAL_SHINE %f", &f1) != 0 )
				{
					(materials[materCount]).shine = f1;
				}
		}
		if( strstr( line, "*MATERIAL_TRANSPARENCY" ) != NULL )
		{
				float f1;
				if(sscanf( line, " *MATERIAL_TRANSPARENCY %f", &f1) != 0 )
				{
					(materials[materCount]).alpha = f1;
				}
		}

		if( strstr( line, "*MESH_NUMVERTEX" ) != NULL )
		{
			continue;
		}

		if( strstr( line, "*MESH_NUMFACES" ) != NULL )
		{
			continue;
		}

		if( strstr( line, "*MATERIAL_REF" ) != NULL )
		{
			int ni = -1;
			if( sscanf( line, " *MATERIAL_REF %d", &ni ) != 0 )
			{
				materIndex = abs(ni) % MAX_MESH;
				meshIndex[meshIncount ++ ] = readMaterCount[materIndex];
				continue;
			}
		}

		if( strstr( line, "*MAP_DIFFUSE" ) != NULL )
		{
			flag[4] = 1;
			continue;
		}

		if( flag[4] == 1 )
		{
			if( strstr( line, "*BITMAP" ) != NULL )
			{
				char pStr[MAX_PATH];
				if( sscanf( line, " *BITMAP \"%[^\"]\"", &pStr ) != 0 )
				{
					//检查材质路径是否为绝对路径 
					p = strrchr(pStr, ':');
					//如果是相对路径，
					if(p == NULL)
					{
						// 则附在ASE文件的路径后边附加上材质相对路径 
						strcpy(addSuffixPathPos , pStr);
						// 将拼接的材质总路径复制回 pStr容器中 
						strcpy(pStr, materPath);
					}

					flag[4] = 0;
					continue;
				}
			}
		}

		if( strstr( line, "*MESH_VERTEX_LIST" ) != NULL )
		{
			flag[0] = 1;
			continue;
		}

		if( flag[0] == 1 )
		{
			char* keyPos = strstr( line, "*MESH_VERTEX" );
			if( keyPos != NULL )
			{
				int a;
				float f1, f2, f3;

				sscanf( line, " *MESH_VERTEX %d %f %f %f", &a, &f1, &f2, &f3 );
				pointData[pointCount][0] = f1;
				pointData[pointCount][1] = f2;
				pointData[pointCount][2] = f3;
				pointCount ++;
			}
			else
			{
				flag[0] = 0;
			}
		}

		if( strstr( line, "*MESH_FACE_LIST" ) != NULL )
		{
			flag[1] = 1;
			continue;
		}

		if( flag[1] == 1 )
		{
			char* keyPos = strstr( line, "*MESH_FACE" );
			if( keyPos != NULL )
			{
				int a;
				int f1, f2, f3;
				sscanf( line, " *MESH_FACE %d: A: %d B: %d C: %d", &a, &f1, &f2, &f3 );
				faceData[faceCount][0] = (abs(f1) + preADD) % pointCount;
				faceData[faceCount][1] = (abs(f2) + preADD) % pointCount;
				faceData[faceCount][2] = (abs(f3) + preADD) % pointCount;
				faceCount ++;
			}
			else
			{
				flag[1] = 0;
				preADD = pointCount;

			}
		}

		if( strstr( line, "*MESH_TVERTLIST" ) != NULL )
		{
			flag[2] = 1;
			continue;
		}

		if( flag[2] == 1 )
		{
			char* keyPos = strstr( line, "*MESH_TVERT" );
			if( keyPos != NULL )
			{
				int a;
				float f1, f2, f3;
				sscanf( line, " *MESH_TVERT %d %f %f %f", &a, &f1, &f2, &f3 );
				_tpointData[_tpointCount][0] = f1;
				_tpointData[_tpointCount][1] = f2;
				_tpointData[_tpointCount][2] = f3;
				_tpointCount ++;
			}
			else
			{
				flag[2] = 0;
			}
		}

		if( strstr( line, "*MESH_TFACELIST" ) != NULL )
		{
			flag[3] = 1;
			continue;
		}

		if( flag[3] == 1 )
		{
			char* keyPos = strstr( line, "*MESH_TFACE" );
			if( keyPos != NULL )
			{
				int a;
				int f1, f2, f3;
				sscanf( line, " *MESH_TFACE %d %d %d %d", &a, &f1, &f2, &f3 );
				_tfaceData[_tfaceCount][0] = (abs(f1) + _tpreADD) % _tpointCount;
				_tfaceData[_tfaceCount][1] = (abs(f2) + _tpreADD) % _tpointCount;
				_tfaceData[_tfaceCount][2] = (abs(f3) + _tpreADD) % _tpointCount;
				_tfaceCount ++;
			}
			else
			{
				flag[3] = 0;
				_tpreADD = _tpointCount;
				meshDelimsIndex[++ meshDelimsCount] = _tfaceCount;

			}
		}

	}
	fclose( fp );
	return 0;
}
复制代码