ParBegin en C++ .net (See related posts)

Codigo para crear la funcion ParBegin cuyo objetivo es obtener como parametros cualquier cantidad de funciones y ejecutarlas de forma paralela, cada una de ellas en un hilo independiente.

El objetivo de esta implementacion es realizar el mismo codigo en C++ manejado esto conlleva a algunas restricciones como la imposibilidad de usar ParBegin(...) debido a que segun el documento de Migration_guide de Microsoft dentro de Visual Studio .NET 2003, la utilizacion de los 3 puntos para implementar argumentos variables dentro de una funcion genera inmediatamente que esta funcion sea no manejada y presentan la solucion dentro del mismo documento, documentacion sobre esto tambien se encuentra en el documento managedextensionsspec.doc en la pagina 35.

El uso de punteros dentro de C++ manejado no es posible, por lo tanto para pasar como argumento de una funcion, otra funcion, lo que se debe hacer es generar un delegate, pero con estoy hay un pequeño impedimento, y es que las funciones deben hacer parte de una clase, osea que no se pueden crear delegates a funciones sino a metodos.

Con las 2 caracteristicas anteriores en mente mostramos el codigo para de ParBegin para Visual C++ Manejado

Este codigo pertenece a John Edgar Congote y puede ser modificado, copiado, distribuido, ejecutado, visualizado o manipulado por cualquier medio sin previa autorizacion del autor.

#include "stdafx.h"

#using <mscorlib.dll>

using namespace System;
using namespace System::Threading;

public __gc class MiHilo{
public:
	MiHilo(){
	
	};

	~MiHilo(){
	
	};

	static void funcionHilo(){
		Console::WriteLine(S"Este es un hilo....");
		Thread::Sleep(1000);	//Bloquea el hilo durante 1 segundo.
		Console::WriteLine(S"Saliendo del hilo...");
	}
};



void ParBegin([ParamArray] ThreadStart * args[]){
	int cont;
	for (cont=0;cont<args->Length;cont++){		
		Thread *oThread = new Thread(args[cont]);
		oThread->Start();
	}	
}


int _tmain(void)
{ 

	/*
	
	Los argumentos que se pasan a la funcion es el arreglo de delegados
	que los hilos van a ejecutar.

	Hay que recordar que ThreadStart es un delegate definido en .NET

	*/
	
	ThreadStart * args[] = {new ThreadStart(0,&MiHilo::funcionHilo),new ThreadStart(0,&MiHilo::funcionHilo),new ThreadStart(0,&MiHilo::funcionHilo)};

	Console::WriteLine(S"Entrando a ParBegin");
	ParBegin(args);
	Console::WriteLine(S"Saliendo de ParBegin");
	Thread::Sleep(2000); //Durmiendo 2 Segundos
	Console::WriteLine(S"Finalizando Programa");
	return 0;
}