// src/editobject.c
// static void apply_objects_internal( int apply_scale, int apply_rot )
{
	Base *base, *basact;
	Object *ob;
	bArmature *arm;
	Mesh *me;
	MVert *mvert;
	float mat[3][3];
	int a, change = 0;
	
	float *fp;
	KeyBlock *block;
	
	if (!apply_scale && !apply_rot) {
		/* do nothing? */
		error("Nothing to do!");
		return;
	}
	/* first check if we can execute */
	for (base= FIRSTBASE; base; base= base->next) {
		if TESTBASELIB(base) {
ob= base->object;
if(ob->type==OB_MESH) {
	me= ob->data;
	
	if(me->id.us>1) {
		error("Can't apply to a multi user mesh, doing nothing.");
		return;
	}
	// by uimac
	//if(me->key) {
	//	error("Can't apply to a mesh with vertex keys, doing nothing.");
	//	return;
	//}
}
else if (ob->type==OB_ARMATURE) {
	arm= ob->data;
	
	if(arm->id.us>1) {
		error("Can't apply to a multi user armature, doing nothing.");
		return;
	}
}
		}
	}
	
	/* now execute */
	basact= BASACT;
	base= FIRSTBASE;
	for (base= FIRSTBASE; base; base= base->next) {
		if TESTBASELIB(base) {
ob= base->object;

if(ob->type==OB_MESH) {
	if (apply_scale && apply_rot)
		object_to_mat3(ob, mat);
	else if (apply_scale)
		object_scale_to_mat3(ob, mat);
	else
		object_rot_to_mat3(ob, mat);

	me= ob->data;
	
	// by uimac
	if(me->key) {
	 for (block = (KeyBlock*)me->key->block.first; block; block = block->next) {
	  fp = (float*)block->data;
	  for(a = 0; a < block->totelem; a++, fp+= 3) {
	   Mat3MulVecfl(mat, fp);
	  }
	 }
	}

	/* see checks above */
	
	mvert= me->mvert;
	for(a=0; a<me->totvert; a++, mvert++) {
		Mat3MulVecfl(mat, mvert->co); //　要はこれ
	}
	if (apply_scale)
		ob->size[0]= ob->size[1]= ob->size[2]= 1.0;
	if (apply_rot)
		ob->rot[0]= ob->rot[1]= ob->rot[2]= 0.0;
	/*QuatOne(ob->quat);*/ /* Quats arnt used yet */
	
	where_is_object(ob);
	
	/* texspace and normals */
	BASACT= base;
	enter_editmode(EM_WAITCURSOR);
	BIF_undo_push("Applied object");	/* editmode undo itself */
	exit_editmode(EM_FREEDATA|EM_WAITCURSOR); /* freedata, but no undo */
	BASACT= basact;
	
	change = 1;
}
else if (ob->type==OB_ARMATURE) {
	if (apply_scale && apply_rot)
		object_to_mat3(ob, mat);
	else if (apply_scale)
		object_scale_to_mat3(ob, mat);
	else
		object_rot_to_mat3(ob, mat);
	arm= ob->data;
	
	/* see checks above */
	apply_rot_armature(ob, mat); //他のファイルで定義されてますね。ググると出てきます
	
	/* Reset the object's transforms */
	if (apply_scale)
		ob->size[0]= ob->size[1]= ob->size[2]= 1.0;
	if (apply_rot)
		ob->rot[0]= ob->rot[1]= ob->rot[2]= 0.0;
	/*QuatOne(ob->quat); (not used anymore)*/
	
	where_is_object(ob);
	
	change = 1;
}

// 以下略