An adaptive heat source model for friction stir welding integrating a fractal contact theory and a viscoplastic flow mechanism