tag:blogger.com,1999:blog-368561082024-03-07T19:26:53.813-03:00PuertoSurComentarios sobre programación xBase y temas relacionadosGustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.comBlogger57125tag:blogger.com,1999:blog-36856108.post-3314797766682271592009-07-31T08:33:00.002-03:002009-07-31T08:48:19.961-03:00Estudio de mercadoSiendo que la mayoría de nosotros hace software de gestión les copio un interesante estudio sobre quien es quien como proveedor de software:<br /><br /><a href="http://www.evaluandoerp.com/nota-576-Quien-es-quien-como-proveedor-de-software.html">http://www.evaluandoerp.com/nota-576-Quien-es-quien-como-proveedor-de-software.html</a><br /><br />Fuente: <a href="http://www.evaluandoerp.com">Evaluando ERP</a>Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com1tag:blogger.com,1999:blog-36856108.post-17471117160938579872008-12-06T00:47:00.001-02:002008-12-06T01:37:49.234-02:00Multihilos en xHarbour - Parte VIIConsideraciones acerca del rendimiento en multihilos.<br /><br />Comentaba en una de las primeras entregas, que para acceder a recursos compartidos, había que usar un mutex. También comenté que el mutex genera una gran penalidad en la ejecución porque en algunos casos tiene un costo similar o superior al tiempo de ejecución del código que se quiere resguardar.<br />Por esta razón, lo mejor es trabajar sin mutex, claro, siempre que sea posible.<br />Pero teniendo en mente esto, en algunos casos podríamos idear un código que pueda no usar mutex.<br />Hay algunos casos en donde no es necesario poner un mutex para actualizar las variables, con la ventaja de ganar imporante cantidad de ciclos de reloj.<br /><br />Uno de estos casos es cuando una variable no compleja es modificada desde un solo thread y los demas threads solamente consultan.<br /><br /><code><br />--------<br />Static lSalir := .f.<br />Func Main()<br />? "Presione una tecla"<br />StartThread(@Hilo())<br />while !lSalir<br /> inkey(0)<br />enddo<br />lSalir := .t.<br />Return nil<br /><br />Proc Hilo()<br />Local nPaso:=1,cPasos:="-/|\"<br />while !lSalir // Sin mutex<br /> @1,70 say cPasos[nPaso]<br /> if ++nPaso > 4<br /> nPaso := 1<br /> endif<br /> HB_ThreadSleep(100)<br />enddo<br />Return<br />--------------<br /></code><br /><br />Otro de los casos es cuando las modificaciones no tienen dependencias entre si.<br /><br /><code><br />Func Main()<br />Local aArray[1000]<br />Afill(aArray,10)<br />StartThread(@Process(), aArray,;<br /> 1, Int(Len(aArray)/2))<br />StartThread(@Process(), aArray,;<br /> Int(Len(aArray)/2)+1, Len(aArray)-Int(Len(aArray)/2))<br /><br />Proc Process( aArray, nStart. nCount )<br />do while nCount > 0<br /> aArray[ nStart ] *= 1.10<br /> nStart ++<br /> nCount--<br />enddo<br />Return<br /></code><br /><br />Sin embargo, a pesar de que lógicamente la ejecución esta separada, internamente tienen puntos en comun. Esto es así porque los tipos de datos complejos tienen un contador de referencias que hace que los hilos deban turnarse para modificar el contador.<br />El siguiente código es mas óptimo porque cambia el contador menor cantidad de veces.<br /><br /><code><br />Proc Process( aArray, nStart, nCount )<br />Local n<br />For each n in aArray From nStart To nCount<br /> n *= 1.10<br />Next<br />Return n<br /></code><br /><br />Cuando un código que se ejecuta en 2 o mas hilos bloquean alternadamente un recurso, se dice que es un codigo ping-pong.<br />El bloqueo puede ser implicito (internos a nivel procesador) o explicito (usando funciones de bloqueo)<br />El problema del código ping-pong es que funciona tanto o mas lento que el mismo código en forma serial.<br /><br />Otras formas de código ping-pong.<br />Supongamos que necesitamos obtener un promedio de los valores guardados en un array.<br />La forma serial seria acumular la suma y mantener un contador.<br /><br /><code><br />Func Process( aArray, nStart, nCount )<br />Local n<br />For each n in aArray from nStart to nCount<br /> s_nSuma += n<br /> s_nCount ++<br />Next<br />Return <br /></code><br /><br />Para hacer la misma tarea en forma paralela podríamos proteger los acumuladores con un mutex.<br /><br /><code><br />Func Process( aArray, nStart, nCount )<br />Local n<br />For each n in aArray from nStart to nCount<br /> hb_mutexLock( mtx )<br /> s_nSuma += n<br /> s_nCount ++<br /> hb_mutexUnlock( mtx )<br />Next<br />Return <br /></code><br /><br />Sin embargo este es el tipico ejemplo de un codigo ping-pong. Para evitar este problema el mejor código es:<br /><br /><code><br />Func Process( aArray, nStart, nCount )<br />Local n, nSuma:=0, nCount:=0<br />For each n in aArray from nStart to nCount<br /> nSuma += n<br /> nCount ++<br /> Next<br />hb_mutexLock( mtx )<br />s_nSuma += nSuma<br />s_nCount += nCount<br />hb_mutexUnlock( mtx )<br />Return <br /></code><br /><br />De esta forma se bloquea el mutex una sola vez y se evita el efecto ping-pong.<br /><br />Efecto ping-pong relacionado con xHarbour.<br />Todos los datos complejos tienen un contador de referencias que se incrementa y decrementa con cada uso. Si el dato es compartido y usado simultáneamente por varios hilos, produce que los hilos deban turnarse para cambiar el contador y es eso lo que produce el efecto ping-pong. Por lo tanto, es conveniente minimizar los datos complejos compartidos. <br />Recordemos que los datos complejos son :<br />Array, objetos, codeblock, hash, punteros, strings.<br /><br />En lugar de hacer:<br /><code><br />Procedure Paralelo( aArray, nStart, nCount, bBlock )<br />Local nPos :=Ascan(aArray,bBlock,nStart,nCount)<br /></code><br /><br />Es mejor hacer:<br /><code><br />Procedure Paralelo( aArray, nStart, nCount, cBlock)<br />Local nPos, bBlock<br />bBlock:=&(cBlock)<br />nPos:=Ascan(aArray,bBlock,nStart,nCount)<br /></code><br /><br />En definitiva, le código para multihilos implica una cuidadosa planificación para no caer en códigos ineficientes que tengan la misma e incluso peor performance que la ejecución en serie, con el consiguiente desperdicio de recursos.Unknownnoreply@blogger.com1tag:blogger.com,1999:blog-36856108.post-10109648896006235412008-09-04T01:36:00.005-03:002008-09-07T23:21:26.606-03:00Multihilos en xHarbour - Parte VI<div style="text-align: justify;">En estas primeras entregas sobre los multihilos de xHarbour, he hablado de funciones para crear un nuevo hilo, para sincronizar ejecuciones y para sincronizar accesos a recursos.<br /><br />Sin embargo, puede suceder que tengamos un hilo al que necesitamos finalizar su ejecución porque no se comporta como esperábamos.<br />Para eso existen 2 funciones. <span style="font-weight: bold;">Stopthread</span> y <span style="font-weight: bold;">Killthread</span>.<br /></div><div style="text-align: justify;">Además, junto con Stopthread, existe una función para sincronizar la finalización del thread con el thread que lo está finalizando.<br /></div><br /><span style="font-weight: bold;font-size:130%;" >Stopthread</span><br /><br /><div style="text-align: justify;">Sirve para detener la ejecución de un thread de forma amigable, marcando al thread para que se cierre cuando llegue a uno de los puntos de control.<br /></div>Los puntos de interrupción son:<br /><ul><li>antes y después de un acceso a disco.</li><li>antes y después de acceso a TCP/IP.</li><li>antes y después de llamadas a bloqueos.</li><li>cada vez que finaliza la ejecución de una función PRG, codebloc o macro.</li><li>cada 5000 ejecuciones de PCODE dentro de un mismo PRG.<br /></li></ul>Un thread no puede ser detenido amigablemente cuando esta:<br /><ul><li>esperando por un mutex.</li><li>esperando por conexión o datos de TCP/IP.</li><li>mientras ejecuta funciones de C o de PRG compilado en C nativo, que quedan en un loop infinito o muy largo.<br /></li></ul><br /><span style="font-weight: bold;font-size:130%;" >Killthread</span><br /><br /><div style="text-align: justify;">En general hay que evitar el uso de esta función, siempre hay que tratar de finalizar los threads amigablemente.<br /></div><div style="text-align: justify;">Windows en su documentación indica que se evite su uso porque puede dejar incluso registros del kernel en estado incorrecto si al matar el thread el proceso esta ejecutando una función en modo kernel.<br />También la documentación dice que si el thread tiene un bloqueo, este podría no ser desbloqueado o no ser avisados otros threads de que el mutex esta disponible.<br /></div><br />Nos encontramos ante la disyuntiva de matar o no a un thread que no responde.<br />Si no lo matamos, no podremos finalizar la ejecución.<br />Si lo matamos, quizás tampoco podamos finalizarla.<br /><br /><div style="text-align: justify;">Por este motivo, la función Killthread inicialmente marca al thread que se le indica para que se cierre amigablemente, si ya esta marcado entonces sí se lo mata.<br /></div><br /><div style="text-align: justify;">En conclusión. Hay que tratar por todos los medios de detener los threads amigablemente, para esto es necesario diseñar el código pensando en incluir puntos de interrupción o de control, si fuera necesario, para ayudar a finalizar el/los threads por las buenas.<br /><br /><span style="font-size:130%;"><span style="font-weight: bold;">Jointhread</span></span><br /><br />Esta función se complementa con Stopthread permitiendo sincronizar la finalización del thread.<br />Se usa para esperar a que el thread indicado termine su ejecución.<br /><br />Ejemplo:<br /></div><br /><code><br />Procedure Main()<br />Local thThread<br /><br />cls<br />@8,10 say "Presione una tecla para parar el hilo"<br />thThread := StartThread( @Work() )<br />StartThread( @Join(), thThread )<br /><br />inkey(0)<br />StopThread( thThread )<br />WaitForThreads()<br />Return<br /><br />Procedure Work()<br />Local aStat := "\|/-", nStat := 1<br />do while .t.<br /> DevOut( "Trabajando ... "+aStat[nStat],,10,10)<br /> if ++nStat > 4<br /> nStat := 1<br /> endif<br />enddo<br />return<br /><br />Procedure Join( thThread )<br />DevOut("Esperando que finalize el thread de trabajo",,12,10)<br />JoinThread( thThread )<br />DevOut("El thread de trabajo ha finalizado correctamente",,12,10)<br />return<br /></code>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-25829517225726679382008-09-01T08:22:00.001-03:002008-09-01T08:32:50.857-03:00Sobre la Reunión del 30 de Agosto 2008En primer lugar agradecer el aliento y los comentarios recibidos. Tambien la presencia de todos los que se pudieron acercarce, en especial a aquellos que llegaron de lejos o de países vecinos.<br /> <br />Tuvimos un ambiente de total camaradería y literaltemte nos encerramos en la reunión, a tal punto que ni siquiera fuimos a almorzar (de 9 a 19). Es que había mucho interes.<br /><br />Respecto de los temas tratados, en orden de presentación fueron:<br /><ul><li>Paradigmas: una charla de Gustavo Valentin acerca de los paradigmas y como afectan la forma en que programamos.<br /></li><li>Objetos: Walter explicó los conceptos básicos de objetos partiendo de un mini programa que no los tenía y llevandolo en una serie de modificaciones a uno que sí los tenía.<br /></li><li>Impresoras Fiscales: Walter y Gustavo contaron que es y como funciona una impresora fiscal, la forma de comunicación y los programas que ellos utilizan. Luego se generó un debate entre los que estan necesitados de implementar impresora fiscal en sus programas y, con la donación de código por parte de softmagic quedaron en realizar una clase tanto para epson como para hasar.<br /></li><li>Hash: si bien no estaba en la agenda de la reunión surgió espontaneamente. Walter nos explicó como inicializar un hash y luego se generó un debate sobre los diferente lugares donde utilizarlo. Fué la frutilla del postre.<br /></li><li>Se habló de hacer la reunión mas seguido.</li></ul>Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com3tag:blogger.com,1999:blog-36856108.post-22076987313853621232008-08-08T00:34:00.001-03:002008-08-08T00:44:02.726-03:00Multihilos en xHarbour - Parte VFunciones CRITICAL<br />Una funcion marcada como critical tiene un mutex interno que automáticamente se activa y desactiva al ingresar y salir de dicha función.<br />La ventaja es que no hay que crear un mutex para hacer esta tarea, lo cual reduce y simplifica el código.<br />La desventaja es que bloquea a una sola función.<br /><br />Pueden existir muchas funciones CRITICAL ejecutandose en paralelo, pero un sólo thread por vez ejecutara cada una de ellas.<br /><br />Forma de uso:<br /><br />CRITICAL FUNCTION SoloUno()<br />CRITICAL PROCEDURE SoloUno()<br />CRITICAL STATIC FUNCTION SoloUno()<br />CRITICAL STATIC PROCEDURE SoloUno()<br /><br /><code><br /><br />// No superar 32768 porque HB_Random() solo genera<br />// hasta 32768 numeros diferentes<br /><br />#define MAXVALUE 30000<br /><br />//#define PARALELO<br /><br />Static nCount := 0, lWork := .t.<br />Static nTime, lEnd := .f.<br /><br />Function Main()<br />Local aValues := Array(MAXVALUE)<br />cls<br />StartThread(@generate(),aValues)<br />StartThread(@generate(),aValues)<br />StartThread(@process())<br />DevOut("Presione una tecla para finalizar...",,5,0)<br />do while lEnd .and. inkey(0.1) == 0<br /> lWork := .f.<br />enddo<br />WaitForThreads()<br />If lEnd<br /> Devout("Tiempo de trabajo="+str(nTime),,8,0)<br />Endif<br />Return nil<br /><br />Procedure Generate(aValues)<br />Local nValue, lRet<br />Do While lWork<br /> nValue := Int(HB_Random(0,MAXVALUE))+1<br />#ifdef PARALELO<br /> If aValues[nValue] == nil<br />#endif<br /> lRet := AddUnique(aValues,nValue)<br /> If lRet<br /> Exit<br /> Endif<br />#ifdef PARALELO<br /> ElseIf nCount == MAXVALUE<br /> Exit<br /> Endif<br />#endif<br />Enddo<br />Return<br /><br />Critical Function AddUnique(aValues,nValue)<br />If nCount == 0<br /> nTime := Seconds()<br />Endif<br />If aValues[nValue] == nil<br /> ++nCount<br /> aValues[nValue] := nCount<br />Endif<br />If nCount == MAXVALUE<br /> If !lEnd<br /> nTime := Seconds()-nTime<br /> Endif<br /> lEnd := .t.<br /> Return .t.<br />Endif<br />Return .f.<br /><br />Procedure Process(nThread)<br />Local cPaso := "\|/-", nPaso := 1<br />do while nCount < MAXVALUE .and. lWork<br /> DevOut(nCount,,7,0)<br /> DevOut(cPaso[nPaso],,7,15)<br /> If ++nPaso > 4<br /> nPaso := 1<br /> Endif<br /> ThreadSleep(100)<br />enddo<br />DevOut(nCount,,7,0)<br />Return<br /></code><br /><br />El código del ejemplo tiene 2 modos de funcionamiento.<br />El modo 1 es tal como está escrito.<br />El modo 2 es "des-comentando" la línea #define PARALELO<br /><br />En el modo 1, realiza lo siguiente:<br />Unos hilos en paralelo, generan unos números aleatorios y luego llaman a una función que controla si dicho número está cargado en un array.<br />Si no está, lo carga. Si ya existe, lo descarta.<br />Cuando el array está completo, cambia el estado de la bandera lEnd para que finalice el programa.<br /><br />En el modo 2, realiza lo siguiente:<br />El proceso es similar, solo que cada hilo controla por su lado, si el número generado ya existe. Si no existe, llama a la función para que lo cargue. Si ya existe, lo descarta y vuelve a calcular otro número.<br />Puede darse el caso que el hilo 1 calcula un número y detecta que el número no existe y llama a la función, pero el hilo 2 pudo haber calculado el mismo número y haberse anticipado en la llamada a la función AddUnique, pero esto no es problema ya que cuando el hilo 1 llame a la función, el número será descartado sin problemas como en el modo 1.<br /><br /><div style="text-align: left;"><br /><a onblur="try {parent.deselectBloggerImageGracefully();} catch(e) {}" href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiIHDvrXP9fFRrkIul-jumBcWFPkUCbeiPOMRvuEKHFQrSNp23eXYZKNtKX0rVMBZHL-GmeqD_mDabWbrLugJXFx38918O9AwTTZ7NAZ1SXT0HyW7qyn9mrj5YWER8bzjLqBEIpUQ/s1600-h/ScreenShot005.bmp"><img style="margin: 0pt 0px 10px 10px; clear: both; cursor: pointer; width: 355px; height: 342px;" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiIHDvrXP9fFRrkIul-jumBcWFPkUCbeiPOMRvuEKHFQrSNp23eXYZKNtKX0rVMBZHL-GmeqD_mDabWbrLugJXFx38918O9AwTTZ7NAZ1SXT0HyW7qyn9mrj5YWER8bzjLqBEIpUQ/s320/ScreenShot005.bmp" alt="" id="BLOGGER_PHOTO_ID_5231745140713531570" border="0" /></a><br /></div><br /><div style="text-align: left; clear: both;"><br />Muestra el uso del procesador en modo 1.<br /></div><br /><div style="text-align: left;"><br /><a onblur="try {parent.deselectBloggerImageGracefully();} catch(e) {}" href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhn6DgBh61hDrHFZDEQwKgdVYkYGNHGIXVylHfJGTkvmEDh6GTvcEpNN8gHzgHL8VeLUi5KeLReDa0Wv8pi6gpEhtdGqdFD27tOE66ui4Et8xN-O4iEc1VQZ6PKK0M1ok9u3sSdpQ/s1600-h/ScreenShot006.bmp"><img style="margin: 0pt 0pt 10px 10px; clear: both; cursor: pointer; width: 355px; height: 342px;" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhn6DgBh61hDrHFZDEQwKgdVYkYGNHGIXVylHfJGTkvmEDh6GTvcEpNN8gHzgHL8VeLUi5KeLReDa0Wv8pi6gpEhtdGqdFD27tOE66ui4Et8xN-O4iEc1VQZ6PKK0M1ok9u3sSdpQ/s320/ScreenShot006.bmp" alt="" id="BLOGGER_PHOTO_ID_5231745527131279874" border="0" /></a><br /></div><br /><div style="text-align: left; clear: both;"><br />Muestra el uso del procesador en modo 2.<br /></div><br /><br /><br />Si en un procesador multicore, se nota que el modo 2 se ejecuta más rápidamente, ya que los 2 hilos pueden estar en forma paralela averiguando si el número obtenido existe o no en el array, y solo en el caso de no existir llamará a la función AddUnique para que lo agregue.<br />Si bien la ejecución es bastante rápida, podemos concluir que en el modo 2, inicialmente el uso de los 2 cores (uno por cada hilo) es de un 60%, pero a medida que se va llenando el array, el uso tiende al 100%.<br />Cómo es esto?<br />El hilo 1, calcula un número, lo busca en el array y no existe, asi que llama a AddUnique. Por su parte, el hilo 2, calcula otro número, lo busca en el array y tampoco existe, asi que tambien llama a AddUnique.<br />El tema es que los hilos deben turnarse para ejecutar AddUnique, ya que es una función CRITICAL.<br />Pero a medida que crece la densidad de uso del array, los números aleatorios comienzan a duplicarse y la tasa de encontrados aumenta y por consiguiente, aumenta los reintentos (volver a calcular el número aleatorio). Cada hilo por su cuenta reintenta varias veces la búsqueda hasta encontrar un número que no existe.<br />Pero debido a que los hilos no se están turnando, hacen más trabajo en menos tiempo y permite terminar la tarea antes.<br /><br />En el modo 1, los hilos siempre se están turnando, con lo cual el uso del procesador permanece constante en un 60% durante todo el proceso. Al hacer menos trabajo en el mismo tiempo, la tarea demora más en terminarse.<br /><br />Con estas explicaciones me estoy adelantando a temas que voy a tocar en próximas entregas, pero bien viene la reseña.<br />Al trabajar con mutex es importante saber cuando y cuanto proteger para evitar ser "sobreprotectores" y tener un código que funcione lentamente.Unknownnoreply@blogger.com2tag:blogger.com,1999:blog-36856108.post-85961959345183818952008-07-09T17:26:00.000-03:002008-07-09T17:41:55.787-03:00LetoDB rdd cliente servidor para xHarbourDesde la soleada Mallorca leemos una muy interesante nota de BielSys (Gabriel Maimó "Biel") acerca de un proyecto Open Source de Alexander Kresin.<br /><br /><a href="http://bielsys.blogspot.com/2008/07/letodb-rdd-cliente-servidor-para.html">http://bielsys.blogspot.com/2008/07/letodb-rdd-cliente-servidor-para.html</a><br /><br />Gracias BielSys, muy interesante tu <a href="http://bielsys.blogspot.com/">blog</a>.Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-875355960895950292008-07-09T00:50:00.002-03:002008-07-09T01:18:33.738-03:00Multihilos en xHarbour - Parte IV<div style="text-align: justify;">En las entregas anteriores vimos como ejecutar varios hilos simultáneamente, lanzandolos uno a uno.<br />En esta oportunidad veremos un tema un poco más avanzado pero muy útil, los avisos o mensajes entre hilos.<br /><br />Supongamos que estamos lanzando hilos para ejecutar un juego de una carrera.<br />Creamos un código que irá mostrando el avance de cada participante y un mutex nos permitirá identificar el orden de llegada de cada uno de ellos.<br /><br />Lo primero que se nos ocurre es lanzarlos tal como vimos anteriormente y nos resulta un código como el del <span style="font-style: italic;">ejemplo 1</span>.<br /><br /><blockquote><span style="font-weight: bold;">NOTA:</span> Los ejemplos contienen código que permite mostrar una velocidad pareja de ejecución independiente del procesador donde se ejecute, con el fin de facilitar<br />la visualización de la explicación.<br />De todas formas, debido a que el tiempo de ejecución es considerablemente alto (del orden de algunos segundos) una cantidad de cores menor a la cantidad de hilos a ejecutar, puede hacer que el ejemplo no siempre muestre el resultado que busco mostrar a pesar de algunas compensaciones de tiempo para evitarlo.</blockquote><br /></div><br /><br /><code><br />Static mtxGano<br />Static nGanador := 0, nPuesto := 1<br /><br />Function Main()<br />Local nSec := Seconds() + 0.5, n<br />Local nCount := 0<br /><br />cls<br />mtxGano := HB_MutexCreate()<br />do while Seconds() < nSec<br /> nCount++<br />enddo<br /><br />For n := 1 To 5<br /> ThreadSleep(200) // Simula hacer otras tareas<br /> StartThread(@listos_ya(),n,int(nCount/50))<br />Next<br />WaitForThreads()<br /><br />Procedure listos_ya( nHilo, nCount )<br />Local nMax := nCount * 60, nPos := 1, n<br /><br />For n := 0 to nMax<br /> if n % nCount == 0<br /> DevOut(Replicate("-",nPos-1),,nHilo+5,1)<br /> DevOut(chr(2),,nHilo+5,nPos)<br /> nPos++<br /> endif<br />Next<br />DevOut(Replicate("-",nPos-1),,nHilo+5,1)<br />DevOut(chr(2),,nHilo+5,nPos)<br /><br />HB_MutexLock(mtxGano)<br />If nGanador == 0<br /> nGanador := nHilo<br /> DevOut("GANADOR",,nHilo+5,65)<br /> nPuesto ++<br />Else<br /> DevOut(str(nPuesto,1,0)+" lugar",,nHilo+5,65)<br /> nPuesto++<br />Endif<br />HB_MutexUnlock(mtxGano)<br />Return<br /></code><br /><br />Ejemplo 1<br /><br /><br /><div style="text-align: justify;">Este ejemplo nos muestra una clara tendencia a que el jugador 1 gane la carrera.<br />Lo cual no es muy conveniente si estamos diseñando un juego.<br /><br />Con lo cual necesitamos sincronizar el arranque.<br />Quizás lo visto en la entrega de Mutex nos sirva para mejorar el código, así que modificamos el código anterior para que cada hilo tenga un mutex y queden todos a la espera de la señal de arranque y nos queda algo como el <span style="font-style: italic;">ejemplo 2</span>.<br /></div><br /><br /><code><br />Static mtxGano<br />Static nGanador := 0, nPuesto := 1<br /><br />Function Main()<br />Local nSec := Seconds() + 0.5, n<br />Local nCount := 0, aMutex := {}<br /><br />cls<br />mtxGano := HB_MutexCreate()<br />do while Seconds() < nSec<br /> nCount++<br />enddo<br /><br />For n := 1 To 5<br /> aadd(aMutex,HB_MutexCreate())<br /> HB_MutexLock( aMutex[-1] )<br /> StartThread(@listos_ya(),n,int(nCount/50),aMutex[-1])<br />Next<br />For n := 1 To 5<br /> ThreadSleep(100) // Simula hacer otras tareas<br /> HB_MutexUnlock(aMutex[n])<br />Next<br />WaitForThreads()<br /><br />Procedure listos_ya( nHilo, nCount, mtxSincro )<br />Local nMax := nCount * 60, nPos := 1, n<br />HB_MutexLock(mtxSincro)<br />HB_MutexUnlock(mtxSincro)<br />For n := 0 to nMax<br /> if n % nCount == 0<br /> DevOut(Replicate("-",nPos-1),,nHilo+5,1)<br /> DevOut(chr(2),,nHilo+5,nPos)<br /> nPos++<br /> endif<br />Next<br />DevOut(Replicate("-",nPos-1),,nHilo+5,1)<br />DevOut(chr(2),,nHilo+5,nPos)<br /><br />HB_MutexLock(mtxGano)<br />If nGanador == 0<br /> nGanador := nHilo<br /> DevOut("GANADOR",,nHilo+5,65)<br /> nPuesto ++<br />Else<br /> DevOut(str(nPuesto,1,0)+" lugar",,nHilo+5,65)<br /> nPuesto++<br />Endif<br />HB_MutexUnlock(mtxGano)<br />Return<br /></code><br /><br />Ejemplo 2<br /><br /><br /><div style="text-align: justify;">Si bien nuestros sentidos nos muestran una carrera más pareja, la realidad es que si tenemos una cantidad de cores mayor a la cantidad de hilos de ejecución, pasaría lo mismo que en el <span style="font-style:italic;">ejemplo 1</span>.<br />Esto es así porque nuestro código es previsible y siempre pone en marcha los hilos en un orden prestablecido.<br />Cuanto mayor sea la cantidad de hilos, mayor será la diferencia entre la orden de arranque para el primer hilo y la orden de arranque para el último hilo.<br /><br />Para sincronizar el arranque de uno o varios hilos, tenemos otra utilidad de la entidad Mutex. La pareja suscripción/notificación.<br />La idea de funcionamiento es que uno o varios hilos se inscriben o suscriben para recibir la orden o notificación de arraque.<br />Esta orden o notificación puede ser global o individual.<br />En el <span style="font-style: italic;">ejemplo 3</span> tenemos el código de la carrera que pondrá a todos los hilos a disposición del sistema operativo para que este los ponga en funcionamiento cuando existan los recursos necesarios para hacerlo.<br /></div><br /><br /><code><br />Static mtxGano<br />Static nGanador := 0, nPuesto := 1<br /><br />Function Main()<br />Local nSec := Seconds() + 0.5, n<br />Local nCount := 0, mtxSincro := HB_MutexCreate()<br /><br />cls<br />mtxGano := HB_MutexCreate()<br />do while Seconds() < nSec<br /> nCount++<br />enddo<br /><br />For n := 1 To 5<br /> StartThread(@listos_ya(),n,int(nCount/50),mtxSincro)<br />Next<br />ThreadSleep(200) // Simula hacer otras tareas<br />NotifyAll(mtxSincro)<br />WaitForThreads()<br /><br />Procedure listos_ya( nHilo, nCount, mtxSincro )<br />Local nMax := nCount * 60, nPos := 1, n<br />Subscribe(mtxSincro)<br />For n := 0 to nMax<br /> if n % nCount == 0<br /> DevOut(Replicate("-",nPos-1),,nHilo+5,1)<br /> DevOut(chr(2),,nHilo+5,nPos)<br /> nPos++<br /> endif<br />Next<br />DevOut(Replicate("-",nPos-1),,nHilo+5,1)<br />DevOut(chr(2),,nHilo+5,nPos)<br /><br />HB_MutexLock(mtxGano)<br />If nGanador == 0<br /> nGanador := nHilo<br /> DevOut("GANADOR",,nHilo+5,65)<br /> nPuesto ++<br />Else<br /> DevOut(str(nPuesto,1,0)+" lugar",,nHilo+5,65)<br /> nPuesto++<br />Endif<br />HB_MutexUnlock(mtxGano)<br />Return<br /></code><br />Ejemplo 3<br /><br />Las funciones de notificación y suscripción son las siguientes:<br /><br /><span style="font-weight: bold;">Subscribe( mutex, [timeout], [@event] ) -> info</span><br /><blockquote>Inscribe al thread para ser avisado de una notificación.<br />Si hay notificaciones pendientes, sale inmediatamente, si no, queda bloqueado a la espera de una notificación.<br />Se puede indicar un tiempo de espera, luego del cual se desbloqueará a pesar de no recibir ninguna notificación.<br />El thread que notifica, puede enviar una información en el momento de notificar la cual será recibida como valor de retorno de la función de suscripción.<br />Cuando se especifica un timeout, para saber si hubo o no notificación, se puede especificar un tercer parámetro por referencia, que retornará un valor lógico verdadero si ocurrió la notificación y falso en caso de finalizar por timeout.</blockquote><br /><span style="font-weight: bold;">SubscribeNow( mutex, [timeout], [@event] ) -> info</span><br /><blockquote>El funcionamiento es similar a la función Subscribe(), la única diferencia es que antes de comenzar, borra cualquier notificación pendiente.</blockquote><br /><span style="font-weight: bold;">Notify( mutex, [info] )</span><br /><blockquote>Emite una notificación. Si hay uno o más threads esperando, alguno de ellos es notificado y sale del estado de espera. Los demás threads suscriptos siguen esperando. No hay relación entre el orden de suscripción y el orden de notificación.<br />Si no hubiera threads en espera, la suscripción queda pendiente en una cola y se van asignando por orden a los threads que se vayan suscribiendo.<br />Es posible enviar información al thread que espera la suscripción, usando el segundo parámetro de la función.</blockquote><br /><span style="font-weight: bold;">NotifyAll( mutex, [info] )</span><br /><div style="text-align: justify;"><blockquote>Emite una notificación a todos los threads que esten en espera.<br />Si no hay threads en espera es como si nunca se hubiera ejecutado la función, no se agregan ni quitan notificaciones que esten en cola.<br />Es posible enviar información al thread que espera la suscripción, usando el segundo parámetro de la función.</blockquote></div> <br /><div style="text-align: justify;">Las suscripciones y notificaciones evitan que un proceso tenga que quedar en un loop preguntando cada cierto tiempo por alguna condición.<br />Si el loop es muy rápido consumirá mucho procesador, si el loop es muy lento se estaría reaccionando tardíamente a un cambio de estado.<br />Cuando un thread entra en suscripción y no hay notificaciones pendientes, se queda en un estado de espera sin consumir procesador.<br /><br />Se les ocurren otras posibildades de uso de estas funciones ?<br />Espero sus comentarios.<br /></div>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-84888589872546580432008-06-30T23:23:00.000-03:002008-07-01T00:14:38.600-03:00Multihilos en xHarbour - Parte IIIEn la anterior entrega, vimos los problemas que ocurren cuando se incrementan o decrementan variables desde 2 o más hilos y no se protegen con un mutex.<br /><br />Si ejecutan el último ejemplo de la <a href="http://puertosur.blogspot.com/2008/06/multihilos-en-xharbour-parte-ii.html">entrega anterior</a>, pero sin ejecutar la función ThreadSleep(10), casi con seguridad tendrán el siguiente error interno: <span style="font-style:italic;">Premature Pointer Release detected</span><br />El error ocurre mucho más frecuentemente con procesadores multicore porque verdaderamente están ejecutando el código en paralelo.<br /><br />¿A qué se debe? Se debe justamente a que los contadores de referencia del puntero que mantiene al Mutex, se desincronizan porque no se actualizan correctamente, tal como se vió en el primer ejemplo de la última entrega.<br /><br />¿Cómo solucionar este problema? Desde el 28/6/08 el CVS de xHarbour tiene la corrección aplicada y también en la <a href="http://puertosur.blogspot.com/2008/06/xharbour-10-de-puertosur.html">distribución xHarbour 1.0 de PuertoSur</a> tiene el problema corregido en todos los casos.Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-72018061707230608882008-06-24T23:34:00.000-03:002008-06-24T23:41:46.996-03:00xHarbour 1.0 de PuertoSURMuchos lo han pedido y ya está disponible la distribución de xHarbour de PuertoSUR de la versión 1.0.<br />En estos momentos están disponibles para bajar las siguientes compilaciones:<br /><br /><a href="http://www.puertosur.org/descargas/xHarbourSetup-bcc32-fw24.exe">xHarbour 1.0 compatible con FWH 2.4 para Borland 5.5</a><br /><a href="http://www.puertosur.org/descargas/xHarbourSetup-bcc32-fw25.exe">xHarbour 1.0 compatible con FWH 2.5/2.6 para Borland 5.5</a><br /><a href="http://www.puertosur.org/descargas/xHarbourSetup-bcc32-fw27.exe">xHarbour 1.0 compatible con FWH 2.7 y sup para Borland 5.5</a><br /><br />Esta distribución como anteriores, se provee en forma de instalador que busca la ubicación del compilador de Borland, lo configura y configura los archivos para compilar y enlazar aplicaciones simples.<br /><br />La distribución incluye junto con las librerías de xHarbour, algunas librerías de contribuciones y algunas librerías extras, además de algunos arreglos posteriores a la liberación:<br /><br /><span style="font-style:italic;">rddads.lib</span> compatible con Advantage 8.x<br /><span style="font-style:italic;">mysql3.lib</span> compatible con MySql 3.x<br /><span style="font-style:italic;">mysql5.lib</span> compatible con MySql 5.x<br /><span style="font-style:italic;">hbcomm.lib</span> librería de comunicaciones serie con funciones compatibles en parámetros y funcionalidad a las de FW, para paliar la falta de esta funcionalidad en algunas versiones de FWH.Unknownnoreply@blogger.com3tag:blogger.com,1999:blog-36856108.post-47778926530410696022008-06-22T22:31:00.000-03:002008-06-23T01:44:33.402-03:00Multihilos en xHarbour - Parte II<span style="font-weight:bold;">El acceso a recursos compartidos</span><br /><br />En la entrega anterior vimos como poner en marcha un hilo paralelo de ejecución, dando lugar a la ejecución multihilo.<br /><br />En esta oportunidad, veremos una de las problemáticas más comunes de la programación multihilo. El acceso a recursos compartidos.<br /><br />¿Qué es un recurso? Cualquier cosa que se pueda leer, escribir y/o ejecutar. Una variable, un archivo, un alias, una función, un socket, etc.<br /><br />Cualquier programador de xBase que haya hecho programas multiusuario sabe que para poder modificar un registro, primero debe bloquearlo.<br />Supongo que la mayoría sabe por qué hay que bloquearlo y no me refiero <span style="font-style:italic;">"a que si no da error de registro no bloqueado"</span>.<br />La razón de bloquear el registro es para que dos o más usuarios no puedan modificar el mismo registro al mismo tiempo.<br /><br />Esta protección a nivel de recursos en general se realiza usando la entidad Mutex.<br /><br /><span style="font-weight:bold;">HB_MutexCreate()</span> es la función que permite crear una entidad Mutex.<br />El Valtype() de una variable que contiene un Mutex es P, o sea, un puntero.<br /><br />Un Mutex sirve para varias cosas, pero en esta entrega veremos el uso más común, que es como semáforo.<br /><br /><span style="font-weight:bold;">HB_MutexLock()</span> es la función que marca el Mutex como bloqueado por el thread que llamó a la función.<br />Esta función retorna solamente cuando obtuvo el bloqueo del Mutex.<br /><br />Mientras un hilo bloquee un Mutex y cualquier otro hilo que intente bloquear el mismo Mutex, quedará bloqueado y en estado de espera a que se desbloquee el Mutex.<br />Cuando el Mutex esté disponible, sólo uno de los hilos obtendrá acceso al Mutex, mientras que los demás seguirán esperando.<br /><br /><span style="font-weight:bold;">HB_MutexUnlock()</span> es la función que desbloquea el Mutex y lo deja disponible para que otro hilo lo pueda bloquear.<br /><br />Además de estas dos funciones, que son las más usadas, existen otras.<br /><br /><span style="font-weight:bold;">HB_MutextryLock()</span> es la función intenta bloquear el Mutex y si lo logra, retorna .T. o un .F. en caso contrario.<br /><br /><span style="font-weight:bold;">HB_MutexTimeOutLock()</span> es la función que intenta bloquear el Mutex durante un tiempo que se indica como segundo parámetro. Retorna .T. si logra el bloqueo y .F. en caso contrario.<br /><br />El ejemplo más trivial para usar un Mutex es como protección en la actualización de un contador. Más de uno se preguntará por qué hay que bloquear si solamente queremos incrementar?<br />El tema es que el proceso de incrementar requiere de 3 pasos. Leer, incrementar, grabar. Entonces, podría suceder que dos procesos leyeran simultaneamente y luego al grabar, el contador solamente se habría incrementado una vez en lugar de 2 veces.<br /><br />Veamos un ejemplo que podamos probar para ver más claramente el asunto:<br /><br /><code><br />Static lFinalizar := .f.<br />Static nGlobalCounter := 0<br />Static aResult[2]<br /><br />Function Main()<br />cls<br />StartThread(@mostrar())<br />StartThread(@enparalelo(),1)<br />StartThread(@enparalelo(),2)<br />DevOut("Presione una tecla para finalizar o espere 5 segundos",,1,0)<br />inkey(5)<br />lFinalizar := .t.<br />WaitForThreads()<br />cls<br />@2,0 say "Thread 1 - LocalCounter="+str(aResult[1])<br />@3,0 say "Thread 2 - LocalCounter="+str(aResult[2])<br />@4,0 say "Total "+str(aResult[1]+aResult[2])<br />@6,0 say " GlobalCounter="+str(nGlobalCounter)<br />@8,0 say "Diferencia "+str(aResult[1]+aResult[2]-nGlobalCounter)<br /><br /><br />Procedure enparalelo( nId )<br />Local nLocalCounter := 0<br />Local nLinea := GetThreadId()<br />do while !lFinalizar<br /> nLocalCounter++<br /> nGlobalCounter++<br /> ThreadSleep(10)<br />enddo<br />aResult[nId] := nLocalCounter<br />Return<br /><br />Procedure mostrar()<br />Local nStatus := 1, cStatus := "|/-\"<br />Local nLinea := GetThreadId()<br />do while !lFinalizar<br /> DevOut(nGlobalCounter,,nLinea,10)<br /> ThreadSleep(500)<br />enddo<br />Return<br /></code><br /><br />La diferencia debería ser 0 (cero), pero no siempre es así. Esto muestra por qué es necesario proteger la variable al modificar su valor.<br />El código correcto es:<br /><br /><code><br />Static lFinalizar := .f.<br />Static nGlobalCounter := 0<br />Static aResult[2]<br /><br />Function Main()<br />Local mtxCounter<br />cls<br /><br />mtxCounter := HB_MutexCreate()<br /><br />StartThread(@mostrar(),mtxCounter)<br />StartThread(@enparalelo(),1,mtxCounter)<br />StartThread(@enparalelo(),2,mtxCounter)<br />DevOut("Presione una tecla para finalizar o espere 5 segundos",,1,0)<br />inkey(5)<br />lFinalizar := .t.<br />WaitForThreads()<br />cls<br />@2,0 say "Thread 1 - LocalCounter="+str(aResult[1])<br />@3,0 say "Thread 2 - LocalCounter="+str(aResult[2])<br />@4,0 say "Total "+str(aResult[1]+aResult[2])<br />@6,0 say " GlobalCounter="+str(nGlobalCounter)<br />@8,0 say "Diferencia "+str(aResult[1]+aResult[2]-nGlobalCounter)<br /><br /><br />Procedure enparalelo( nId, mtxCounter )<br />Local nLocalCounter := 0<br />Local nLinea := GetThreadId()<br />do while !lFinalizar<br /> nLocalCounter++<br /> HB_MutexLock(mtxCounter)<br /> nGlobalCounter++<br /> HB_MutexUnlock(mtxCounter)<br /> ThreadSleep(10)<br />enddo<br />aResult[nId] := nLocalCounter<br />Return<br /><br />Procedure mostrar(mtxCounter)<br />Local nStatus := 1, cStatus := "|/-\"<br />Local nLinea := GetThreadId()<br />do while !lFinalizar<br /> DevOut(nGlobalCounter,,nLinea,10)<br /> ThreadSleep(500)<br />enddo<br />Return<br /></code><br /><br />Un ejemplo más complejo es el de una clase que implemente una pila o cola. Es totalmente necesario que mientras un hilo intenta agregar o quitar un elemento, otro hilo no pueda ni agregar ni quitar elementos. Por lo tanto la actualización del array que mantiene la pila o cola, debe estar protegido por un mutex.<br /><br />En la próxima entrega, más usos de la entidad Mutex.Unknownnoreply@blogger.com2tag:blogger.com,1999:blog-36856108.post-68368369473382245442008-06-11T23:37:00.000-03:002008-06-12T02:07:03.387-03:00Multihilos en xHarbour - como compilarComo compilar los ejemplos:<br /><br />Los ejemplos que encontrarán en estas notas son sencillos y se podrán compilar con el archivo \xharbour\tests\bldtest.bat de la siguiente forma:<br /><br />c:\xharbour\tests> bldtest.bat /mt test1.prg<br /><br />Por default el archivo .bat está preparado para usar el compilador de Borland.<br />Para usar otro compilador será necesario establecer algunas variables de entorno.<br /><br />También pueden crear un archivo xcomp.bat con las siguientes lineas y que permite compilar con el compilador de Borland.<br /><br /><code><br />//------------------------------------------------<br />@harbour %1 /n %2 %3 %4 %5 %6 %7 %8 %9<br />@bcc32 -tWM -I\xharbour\include -L\xharbour\lib -5 -O2 -d %1.c debug.lib vmmt.lib rtlmt.lib gtwin.lib lang.lib rddmt.lib macromt.lib ppmt.lib dbfntxmt.lib common.lib codepage.lib pcrepos.lib sixcdxmt.lib dbffptmt.lib hbsixmt.lib<br /><br />//------------------------------------------------<br /></code><br /><br />Hay que tener en cuenta que las líneas del archivo son solamente 2, las que comienzan con el caracter @.<br /><br />Luego de construir el archivo .bat, podrán compilar de la siguiente forma:<br /><br />x:\xharbour\tests> xcomp test1Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-83279872591278339102008-06-02T23:06:00.007-03:002008-06-03T15:26:20.993-03:00Multihilos en xHarbour - Parte IComo toda cosa nueva, como todo cambio, siempre cuesta y siempre genera incertidumbre.<br />Crear programas multihilos es un cambio respecto de la programación habitual, pero la verdad, es que la teoria de los multihilos es muy simple.<br /><br />Usar multihilos es tan simple de usar como el SQL.<br />El SQL tiene 7 comandos.<br />Para usar multihilos es suficiente con conocer cerca de 10 instrucciones.<br /><br />¿Tan simple es?<br />Bueno, la respuesta es un poco más compleja que un Si o un No.<br /><br />Si nos guiamos por la cantidad de instrucciones/funciones a usar, y por la sencilla explicación de lo que hace cada una de ellas, contestaría que Si.<br /><br />Pero. ¿Es posible medir la simplicidad de la programación por la cantidad de instrucciones que posee?<br /><br />Yo, como muchos, creo que la programación es un arte como lo es la pintura. Ahora, si es tan simple combinar colores, ¿por qué yo no soy un pintor? ¿Por qué no pagarían ni 10 centavos por una "obra" mía?<br /><br />Nuestra diseñadora gráfica me contestaría que no es suficiente con saber combinar. También hay que saber cómo combinar los colores (y tener buen gusto, algo que no es mi fuerte).<br /><br />Ahh, así que no es suficiente con conocer 5, 7 o 10 instrucciones, también es necesario saber cómo y cuándo usarlas y cada una de sus opciones.<br /><br />Al igual que los corredores profesionales de autos, no solo saben manejar muy bien, también conocen de mecánica y de aerodinámica, y además, horas y horas de prácticas para conocer los límites del auto.<br /><br />Un programador debe conocer las instrucciones, cuándo aplicarlas y cómo combinarlas, pero en la alta competencia no es suficiente.<br />Además debe conocer pormenores del motor de ejecución y pormenores del sistema operativo.<br />Eso se aplica tanto al SQL como a los multihilos.<br /><br />Quizás esta introducción no es muy amigable, pero es la realidad. La teoría es sencilla, pero la práctica algunas veces se complica, pero con práctica y buenas normas de programación para multihilos, se podrá salir adelante.<br /><br />Pero mejor, vayamos a los multihilos que es el tema.<br /><br /><span style="font-weight: bold;">Primera ejecución de una función en paralelo</span><br /><br />La ejecución de una rutina en paralelo con otra es muy sencilla. Sólo es suficiente con poner StartThread( @enparalelo() ) para que la función enparalelo() comience a ejecutarse.<br /><br /><code>//-----------------------------------------------<br />Static lFinalizar := .f.<br /><br />Function Main()<br />cls<br />StartThread(@enparalelo())<br />DevOut("Presione una tecla para finalizar",,1,0)<br />inkey(0)<br /><br />Procedure enparalelo()<br />Local nStatus := 1, cStatus := "|/-\"<br />Local nLinea := GetThreadId()<br />do while !lFinalizar<br /> DevOut(cStatus[nStatus],,nLinea,10)<br /> if ++nStatus > 3<br /> nStatus := 1<br /> endif<br /> ThreadSleep(500)<br />enddo<br />Return<br />//-----------------------------------------------<br /></code><br /><br />De la misma forma, si ejecutamos 2 veces StartThread(), estaremos haciendo que se ejecuten 2 hilos.<br /><br /><code><br />Function Main()<br />cls<br />StartThread(@enparalelo())<br />StartThread(@enparalelo())<br />DevOut("Presione una tecla para finalizar",,1,0)<br />inkey(0)<br /></code><br /><br />Es posible pasar parámetros al thread? Si.<br /><br />StartThread(@enparalelo(),xParam1,xParam2,...)<br /><br /><br />Resumiendo, estas son las opciones de ejecución para lanzar threads.<br /><br /><span style="font-style: italic;">// usando puntero a la funcion (puede ser publica o estatica)</span><br />StartThread(@funcion(),<parametros,...>)<br /><br /><span style="font-style: italic;">// usando el nombre de la funcion (debe ser publica)</span><br />StartThread("funcion",<parametros,...>)<br /><br /><span style="font-style: italic;">// usando el nombre del metodo</span><br />StartThread(objeto,"metodo",<parametros,...>)<br /><br /><span style="font-style: italic;">// usando el puntero al metodo</span><br />StartThread(objeto,__ObjPtr(objeto,"metodo"),<parametros,...>)<br /><br /><span style="font-style: italic;">// usando un codeblock</span><br />StartThread(codeblock,<parametros,...>)<br /><br />Antes de finalizar esta primera entrega, voy a dar una lista de las funciones que se usan en multihilos y de las cuales veremos sus usos, comportamientos, casos de uso y advertencias de uso.<br /><br />HB_MutexCreate<br />HB_MutexLock<br />HB_MutexUnlock<br />HB_MutexTryLock<br />HB_MutexTimeOutLock<br /><br />Subscribe<br />SubscribeNow<br />Notify<br />NotifyAll<br /><br />StopThread<br />JoinThread<br />KillThread<br />WaitForAllThreads<br />GetThreadId<br /><br />Hasta la próxima</parametros,...></parametros,...></parametros,...></parametros,...></parametros,...>Unknownnoreply@blogger.com7tag:blogger.com,1999:blog-36856108.post-28409466162744245432008-04-13T22:17:00.000-03:002008-04-14T00:00:02.348-03:00Monopolio o No-Monopolio, esa es la cuestiónComencé a pensar en este artículo hace un tiempo, pero ahora tengo la necesidad de terminar de escribirlo.<br /><br />El movimiento del software libre ya tiene unos cuantos años y una gran cantidad de adeptos y simpatizantes.<br /><br /><span style="font-weight: bold;">Software libre vs Software propietario, es la cuestión?</span><br />Hoy muchos artículos en revistas y blogs discuten acerca de dos supuestas posiciones antagónicas. Sofware libre vs Software propietario.<br />Los partidarios del software libre enarbolan fuertemente la bandera de la libertad, incluso a costa de coartar algunas libertades.<br />Por otra parte los creadores de software propietario defienden sus creaciones y sus empresas y detrás de ellas su esfuerzo (pocas veces las grandes empresas se meten en estas discusiones).<br /><br />Pero, llegan a alguna conclusión válida estas discusiones? o son peleas filosóficas?<br />Yo creo que son discusiones sin sentido, simplemente porque ambos bandos tienen una parte de la verdad y porque ambos pueden convivir.<br />Entonces, quién se beneficia? Los beneficiados son unos pocos y quizás hasta les interese estas discusiones, porque hace quitar la atención de la verdadera discusión.<br /><br />La verdadera discusión debería ser: hasta cuando los gobiernos permitirán y alimentarán los monopolios?<br />Hasta cuando nosotros mismos alimentaremos y permitiremos los monopolios?<br /><br />Sabemos que los monopolios son malos, pero como estamos siendo afectados?<br /><br /><span style="font-weight: bold;">Cómo nos afectan los monopolios ?</span><br />Los monopolios afectan todo lo que los rodea y cuando se trata de algo muy metido en la sociedad, afecta a toda la sociedad.<br />Hoy en día Microsoft está afectando a toda la sociedad, y si no se lo controla, Google podría llegar a hacer algo similar con internet, lo cual podría ser peor ya que internet es multiplataforma.<br /><br />Un monopolio es como un virus y muy comparable con el virus del HIV.<br />Lo primero que afecta un monopolio es la competencia y busca por todos los medios combatir cualquier intento de surgimiento de una competencia.<br /><br />Inicialmente no afecta a los consumidores y hasta parece bueno o tonto.<br />(los CD de Windows no tienen protección anticopia y hasta se consiguen los generadores de claves para instalar el producto)<br /><br />Un monopolio, puede no poner precios altos y hasta regalar productos, pero el fin es simplemente matar la competencia (Netscape vs Explorer)<br /><br />Cuando tiene a los consumidores totalmente dependientes y sin amenazas que combatir, comienza el proceso de ahogamiento de los mismos consumidores tal como una boa constrictora lo hace con su presa.<br /><br /><span style="font-weight: bold;">El proceso de ahogamiento de un monopolio</span><br />El proceso comienza con los canales de venta y los contratos abusivos que limitan la instalación de programas en computadoras nuevas.<br />O los contratos con otras empresas para impedir el desarrollo de productos.<br />(que pasó con Kylix y Corel Linux).<br /><br />Paralelamente comienza a verse el principio de tratar al usuario de inepto, incluido al administrador del sistema.<br />Claro, crearon un producto que hasta un dummy podría usar y ahora creen que todos son unos dummys a los que hay que decirles que pueden y que no pueden hacer con el sistema.<br />(Ej: Esta carpeta contiene archivos que mantienen el sistema en correcto funcionamiento.<br />No debería modificar su contenido)<br /><br />El siguiente nivel de estrangulamiento es dictaminar como deben crear sus productos las compañías de hardware para permitirles el soporte en la siguiente versión del sistema operativo. Incluyendo cláusulas de no publicación de cierta información técnica del producto y de no publicación de drivers para soporte de un sistema operativo vigente.<br />( Cómo puede ser que existan:<br /><ul><li>Notebooks con sistemas de disco no estándares sin drivers para Windows XP.</li></ul><ul><li>Placas de video de última generación con características que sólo pueden usarse bajo Windows Vista y si se quiere utilizar con otro sistema operativo, esas características no estarán disponibles. Un nuevo modelo de drivers hace necesario tener un driver para cada modelo de tarjeta lo cual aumenta el costo de desarrollo y testeo, y eso lo pagan tanto los usuarios de Windows Vista como los usuarios de otros sistemas operativos.<br />Las nuevas características sólo se podrán usar bajo Windows Vista y siempre y cuando éste se los permita.<br />Y para coartar aún más las libertades del usuario, al momento de utilizar ciertas características avanzadas, algunos dispositivos podrán ser desactivados bajo criterio y decisión del sistema operativo.<br />No era mejor que el hardware se comunicara con el hardware y el proceso de autorización y autenticación fuera independiente del sistema operativo? No claro, porque esto abriría la competencia.</li></ul>)<br /><br />A estas alturas tenemos:<br /><ul><li>usuarios dependientes de sus computadoras pero que no pueden utilizar muchas de sus características.</li></ul><ul><li>Tenemos usuarios que compran notebooks nuevas con el logo de Windows Vista Capable sin embargo no son capaces de mostrar nada mejor que un Windows XP y funcionar peor que con un Windows XP y sin posibilidad de instalar Windows XP bajo la amenaza de perder la garantía !!!!</li></ul>Como puede existir una cláusula de esta naturaleza? Como puede el fabricante del hardware decirme que tal programa no puedo instalarlo en esa computadora?<br />Alguien compraría un auto con la cláusula "Si bien este auto posee 4 asientos, el cargar más de 2 personas invalida la garantía sobre el motor".<br /><br /><span style="font-weight: bold;">Los afectados</span><br />En algunas notebooks modernas, no impiden que instale Linux, impiden que instale Windows XP al no proveer los drivers. (Al momento de escribir estas líneas Windows XP es un producto vigente y con soporte de la misma forma que Windows Vsita)<br />Y quién otra que la misma Microsoft puede estar interesada en que no puedas usar Windows XP?<br />Y quién es el único afectado? <span style="font-weight: bold;">el usuario</span>.<br /><br />Otros afectados son los desarrolladores.<br />Microsoft en su sed de abarcar todo, intenta establecer que el único lenguaje válido para hacer programas para Windows Vista y posteriores sea algún lenguaje podado-recortado-adaptado para funcionar bajo la plataforma .NET<br /><br />Y como los viejos desarrolladores son un poco reacios, hay que apuntar a los futuros desarrolladores.<br />Pero para que estos futuros desarrolladores no usen más que .NET, se instalan nuevos centros de cómputos con servers y máquinas de última generación en cada facultad en donde se enseñe programación, para que se use .NET, con profesores adeptos a .NET y nada de profesores que enseñen a pensar, solo profesores que enseñen .NET.<br />Pero TAN es malo .NET? no, .NET no es malo en si mismo, es mala la práctica monopólica de intentar imponer .NET como único sistema para utilizar las características de un sistema operativo.<br />Y esto sólo es posible gracias al monopolio.<br /><br /><span style="font-weight: bold;">Y esto no termina acá...</span><br />Y como si todo esto fuera poco y para seguir mostrando otra vuelta más de la boa constrictora.<br />En estos días, contra todo pronóstico coherente y con abrumadoras y nauseabundas prácticas de<br />corrupción y monopolio, Microsoft logró aprobar un estandar ISO para intercambio de documentos cuando ya existe un estandar ISO para esa función.<br /><span style="font-style: italic;">ATENCION: Los siguientes link pueden contener detalles de prácticas monopólicas no apto para cardíacos.<br /></span><a href="http://barrapunto.com/article.pl?sid=08/04/02/1047257">http://barrapunto.com/article.pl?sid=08/04/02/1047257</a><span style="font-style: italic;"><br /></span><a href="http://www.openxml.info/index.php?option=com_content&task=view&id=27&Itemid=7">http://www.openxml.info/index.php?option=com_content&task=view&id=27&Itemid=7</a><br /><br /><span style="font-weight: bold;">Moraleja</span><br />Las empresas están para ganar plata, pero cuando la forma de ganar plata se realiza por prácticas anticompetitivas los gobiernos y/o la justicia deberían poner coto a esas prácticas.<br />Cuando esto no ocurre, los afectados somos nosotros mismos.Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-31892028470976985692008-03-04T16:44:00.001-02:002008-03-04T17:07:41.586-02:00Advantage Database Server 9Texto de un mail recibido desde <a href="http://www.abox.com/buscar.asp?texto=advantage">Abox</a>:<br /><br /><b>SYBASE iANYWHERE Anuncia<p><center>ADVANTAGE DATABASE SERVER 9</center></b><br /><br />Advantage lanza al mercado su nueva versión 9. Esta marcará el final del ciclo de vida de las versiones antiguas de Advantage data Server. <b><u>A partir del 30 de marzo de 2008, las versiones 5,6, y 7.x no se les dará soporte técnico</b></u>. Para continuar con el apoyo los usuarios de la versión 7.x de Advantage pueden comprar las actualizaciones de las versiones más recientes (versiones admitidas, Advantage 8 o 9.)<br /><br />Por un período de transición de 6 meses después del lanzamiento de Advantage 9, los clientes pueden comprar nuevas licencias de Advantage 9 y también puede recibir un duplicado de Advantage 8 para ser utilizados de conformidad con los términos del acuerdo a la licencia de software. Este período de transición se ha diseñado para permitir que los usuarios actuales puedan integrar plenamente la versión 9 sin interrumpir los ciclos de liberación los cuales se hubieran planeado previamente. Después de este período de transición, los clientes todavía pueden comprar las versiones antiguas de Advantage, pero no tendrán derecho a nuevas versiones sin la compra de la actualización adecuada. Actualizaciones de estas licencias se pueden comprar en cualquier momento y en los precios vigentes.<br /><br /><b>Que hay de nuevo en la versión 9 de Advantage</b><br /><ul><li>Mejoras en el soporte de FoxPro: Advantage 9 soportara la versión de Visual FoxPro 9.<br /></li><li>64-bit en servidores Windows y Linux Advantage Database Server ha sido adaptado para funcionar como aplicación nativa de 64-bit en la versiones de x64 de Windows y Linux.<br /></li><li>SQL Debugger: Un SQL debugger ha sido añadido a la versión 9 de Advantage Data Architect, Permitiendo a los desarrolladores depurar scripts SQL, procedimientos almacenados, disparadores, y funciones definidas por el usuario..<br /></li><li>Notificaciones de Eventos : las notificaciones de eventos es un mecanismo que permite al servidor notificar proactivamente a los clientes de que un evento que les interesa se ha producido.<br /></li><li>New Default User Groups: admin, public, debug, backup<br /></li><li>TDataSet Descendant Version Switching Utility<br /></li><li>Dynamic Server Configuration<br /></li><li>Optimized Replication Functionality and Enhancements</li></ul><br /><br />Para ver información mas detallada de las novedades de la versión 9, pueden ir a la <a href="http://devzone.advantagedatabase.com/dz/content.aspx?key=15">zona de desarrolladores de Advantage</a>.<br /><br /><b>Download</b><br /><br />La versión de Advantage 9 esta disponible para <a href="http://devzone.advantagedatabase.com/dz/content.aspx?key=20&Release=11">descarga</a>.Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-64051702065756919502008-02-06T19:42:00.000-02:002008-02-06T20:06:34.850-02:00Comentarios sobre software de gestiónUn link de un blog con temas interesantes para los que estamos en el negocio de desarrollar software de gestión:<br /><br /><a href="http://www.evaluandoerp.blogspot.com/">http://www.evaluandoerp.blogspot.com/</a><br /><br />La definición en Wikipedia: <a href="http://es.wikipedia.org/wiki/Planificaci%C3%B3n_de_Recursos_Empresariales">http://es.wikipedia.org/wiki/Planificación_de_Recursos_Empresariales</a>.Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-77691528665265715002008-01-21T12:47:00.000-02:002008-01-21T13:06:49.837-02:00Sun compra MySQL y Oracle Bea SystemsLuego del primer impacto de la crisis inmobiliaria en EEUU (con sus ecos en todo el mundo) que dejó a todos estáticos parece que los capitales finalmente se van a inclinar por las inversiones tecnológicas.<br /><br />La semana pasada se conocieron dos <a href="http://www.cincodias.com/articulo/empresas/Oracle/Sun/retoman/compras/seguir/creciendo/cdssec/20080117cdscdiemp_30/Tes/">compras importantes</a> por parte de Sun, quien compró MySQL AB, la base de datos de código abierto mas difundida del planeta y Oracle quien compró Bea Systems, un fabricante de software middleware (programas que corren encima de la base de datos, principalmente relacionados con Java).Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-66596607740685017182007-11-10T19:35:00.001-03:002007-11-10T19:50:40.820-03:00Visto en el foro en ingles de FiveTechSoft<ul><br /><li>Fué anunciada la versión 7.11 de FiveWin para Harbour/xHarbour:<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8720">http://fivetechsoft.com/forums/viewtopic.php?t=8720</a><br /></li><br /><li>Sin respuesta el acceso a web services (cri cri cri):<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8650">http://fivetechsoft.com/forums/viewtopic.php?t=8650</a><br /></li><br /><li>Nuevo menu y button bar estilo Office 2007. Excelentes, muy vistosos:<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8496">http://fivetechsoft.com/forums/viewtopic.php?t=8496</a><br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8426">http://fivetechsoft.com/forums/viewtopic.php?t=8426</a><br /></li><br /><li>Tambien nueva clase tOutLook2003:<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8101">http://fivetechsoft.com/forums/viewtopic.php?t=8101</a><br /></li><br /><li>VRMM es un nuevo programa para diseñar formularios y generar programas fuente para Fivewin, miniGui y hwGui. Tienen una versión free y otra paga:<br /><a href="http://www.vrmm.com.br/">http://www.vrmm.com.br/</a><br /></li><br /><li><a href="http://www.viaopen.com/vcoral_us.html">ViaOpen</a> anunció un nuevo control Ribbon Bar:<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8500">http://fivetechsoft.com/forums/viewtopic.php?t=8500</a><br /></li><br /><li>Trick para usar metafile en el clipboard:<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=8020">http://fivetechsoft.com/forums/viewtopic.php?t=8020</a><br /></li><br /><li>En un thread sobre .net Rick Lipkin nos recuerda su interesante post sobre Ado:<br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=6691&highlight=ado">http://fivetechsoft.com/forums/viewtopic.php?t=6691&highlight=ado</a><br /></li><br /></ul>Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com1tag:blogger.com,1999:blog-36856108.post-32212952642406068132007-10-03T21:44:00.000-03:002007-10-03T21:45:29.990-03:00Eligen a las siete maravillas del mundo tecnológicoUna publicación especializada realizó la lista, en donde se encuentran inventos bien conocidos por el hombre y otros que vale la pena conocer. La nómina completa<br />La publicación CIO realizó una lista con las que, a su entender, son las siete maravillas del mundo tecnológico. Si bien no acudió a la votación para elaborarla, pide a sus lectores que den su opinión sobre cuál debería ser la octava maravilla.<br />La lista:<br />1-La computadora más cercana al Polo Norte, propiedad de la Marina de los EEUU, se llevó el primer lugar. La máquina ofrece imágenes en vivo entre los meses de abril y octubre y contribuye de sobremanera en investigaciones que se realizan allí. <br /><br />2-La computadora más alejada de la Tierra, en la sonda Voyager 1, tiene el segundo lugar. Actualmente a 4.000 millones de kilómetros, es el objeto de fabricación humana que más lejos viajó.<br /><br />3-Uno de los misterios mejor guardados por Google ocupa el tercer lugar: su centro de datos. En él trabajan entre 100 y 200 personas y se estima que ocupa unos 30 acres. Allí se almacenan 2 petabytes y sólo dos periodistas lograron ingresar. Su sistema de ventilación tiene el tamaño de un edificio de cuatro pisos.<br /><br />4-El cuarto lugar lo ocupa el más grande programa de colaboración científica: el E-SciencE II (EGEE-II). Se trata de cientos de computadoras al servicio de investigaciones que van desde la geología hasta la química. Allí analizan por ejemplo acontecimientos alrededor del Big Bang. Son 45 los países que participan del programa.<br /><br />5-IBM y la BlueGen/L están en el quinto lugar. La supercomputadora ayuda a científicos a resolver complicados problemas y consume la misma energía que un motor de 200 caballos de fuerza.<br /><br />6-La Ultra Mobile PC 02 de OQO tiene el sexto lugar. Esta mini computadora es capaz de utilizar el Windows Vista. Un desarrollo que lleva al extremo el concepto de portabilidad.<br /><br />7-El último lugar de la lista de CIO se lo llevó Linux, el sistema operativo gratuito que es sinónimo de Software Libre en nuestros días.Cristian Galinellihttp://www.blogger.com/profile/04427307135523155514noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-2939360666334730282007-09-29T06:49:00.000-03:002007-09-29T06:53:53.892-03:00Transacciones y operaciones atómicasEl capítulo del manual de MySQL dedicado a las transacciones y a las operaciones atómicas tiene una descripción muy interesante acerca de ambos métodos para grabar datos.<br /><br /><a href="http://dev.mysql.com/doc/refman/5.0/es/ansi-diff-transactions.html">Link al capítulo.</a><br /><a href="http://dev.mysql.com/doc/refman/5.0/es/">Link al manual.</a>Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-1911204951959700202007-08-13T19:58:00.000-03:002007-08-13T20:18:02.317-03:00SCO: ¿fin de una parodia?De acuerdo a una <a href="http://arstechnica.com/news.ars/post/20070812-sco-never-owned-unix-copyrights-owes-novell-95-percent-of-unix-royalties.html">nota publicada en el site arstechnica</a> el juez que sigue el caso de SCO determinó que nunca poseyó los derechos sobre Unix y en cambio si le pertenecen a Novel en un 95%<br />Recordemos que SCO le inició hace unos pocos años un juicio millonario a IBM por el uso que este le estaba dando a Linux alegando que poseia los derechos sobre Unix y que IBM estaba incrustando codigo Unix dentro de Linux. Esto desato una ola de temores en las grandes compañias ya que podían ser litigadas por utilizar Linux y por consiguiente siguieron comprando software cerrado (no open-source).<br />La medida del juez provoca la caida de la demanda de SCO y la probable presentación en bancarrota ya que desde que se inició la demanda nunca tuvo un ejercicio con ganancia salvo las 2 ventas que le hizo a Microsoft y a Sun (ganancias que no liquidó correctamente a Novel).Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-38011412573148094672007-07-10T12:14:00.001-03:002007-07-10T12:14:53.518-03:00SOAQuizas para algunos programadores esto suena a ciencia ficción, pero los sistemas orientados a servicios (<a href="http://es.wikipedia.org/wiki/SOA">http://es.wikipedia.org/wiki/SOA</a>) llegaron para quedarse y de alguna u otra manera tendremos que lidiar con ellos.<br /><br />El concepto es simple, cuando se necesita una información que se posee o un proceso que no se tiene, simplemente se lo pide a algún servidor que sea capaz de proveerlo y se gestiona la data obtenida como cualquier otra que ya se posea. Por ejemplo los datos del tiempo o chequear la sintaxis de un texto. La forma de intercambio es con archivos XML, que son muy parecidos a los html (los que se utilizan en las páginas web) pero con un formato mas estricto.<br /><br />Pero no todo es color de rosa, se requiere un correcto análisis antes de implementarlo o corremos el riesgo de fallar como lo comenta esta <a href="http://www.siliconnews.es/es/silicon/special-report/2007/06/27/implementar-soa-buenas-pr">nota de siliconnews</a>.Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-41610764338190179302007-05-19T18:09:00.000-03:002007-05-19T18:21:07.021-03:00OpenDocument: estándar internacional ISO 26300La medianoche del pasado día lunes 1 de mayo en Ginebra fue histórica, porque por primera vez para la humanidad se aprobó como estándar de derecho un formato electrónico ofimático y documental que cuenta con implementaciones en productivo y que además es abierto y libre.<br /><br />Significativo es que ningún país votó en contro (incluida España). Esa unanimidad acelerará 6 meses la publicación definitiva pase a que aún quedan un par de retoques burocráticos para que su publicación se oficialice. Pero lo importante es que ya está asegurado: Habemos Estandar. Y todo eso se ha logrado con gran esfuerzo por parte de los asociados a la Alianza ODF, a la Sociedad OpenDocument y a OASIS, y muy a pesar de las presiones en contra ejercidas por cierto monopolio informático que a toda costa pretende imponer su formato alternativo, "no tan abierto" y aún en desarrllo...<br /><br />Ahora, brindemos, démosle la máxima difusión... y todo el mundo a usar y exigir ISO 26300.<br /><br />Así, las implicaciones de este nuevo estándar oficial serán variadas y muy importantes:<br /><br />La principal de ellas es que a partir de su publicación definitiva, esperada para agosto de este año (aproximadamente), cualquier ciudadano podrá dirigirse oficialmente a sus administraciones públicas usando el formato especificado por es estándar oficial ISO/IEC 26300 (OASIS OpenDocument).<br /><br />Obviamente, esas administraciones estarán obligadas a poder leer ese formato para así responder adecuadamente a la comunicación oficial de su administración.<br /><br />Por otra parte, el hecho de que este formato sea oficial, internacional y de derecho, implica que ya nunca más se nos podrá obligar a los ciudadanos, en entornos públicos, a remitir nuestra documentación en formatos cerrados y propietarios. Porque claro, ahora, sí existe una alternativa estándar oficial y con implementación en productivo. Por otro lado, cualquier ciudadano podrá exigir que no se le obligue a adquirir un producto de una empresa concreta a la hora de poder leer un documento remitido por una administración pública. Se podrá exigir a esa administración que remita, o incluso que publique, dicho documento en formato ISO 19005 (PDF/A) o en formato ISO 26300 (OASIS OpenDocument).<br /><br />En resumen, se puede comprobar que la presión civil puede incluso obligar a las administraciones públicas a instalar en sus computadoras, o incluso a migrar para mayor practicidad, aplicaciones informáticas que soporten los dos estándares citados.<br /><br />En el caso de ISO 19005 las administraciones lo tienen relativamente fácil, pues la aplicación más extendida, Acrobad Reader, es capaz de leer el PDF/A. También lo hacen aplicaciones alternativas como Xpdf, Evince y otras.<br /><br />En el caso del nuevo ISO 26300 la cosa se complica algo más, pues el fabricante de la aplicación ofimática más difundida, Microsoft con su MS Office, se niega a soportar el estámdar oficial OpenDocument. Por suerte, como veremos, la capacidad de expandir su uso de OpenDocument no se ve tan cohartada por esto.<br /><br />Por otro lado, y ante la negativa del lider del mercado,la fundación OpenDocument norteamericana acaba de confirmar que ya dispone de un plug-in para instalar en MS Office y que permitirá leer, modificar y escribir documentos en formato OpenDocument desde la popular suite ofimática.<br /><br />Este plug-in, por supuesto, facilitará mucho la adopción del nuevo estándar por aquellas administraciones públicas que ya han decidido hacerlo como norma. También facilitará enormemente las migraciones a las aplicaciones que sí siguen la normativa estándar, pues este plugin permite exportar (traducir) los documentos de los formatos .doc .xls y .ppt de la popular suite Microsoft, al formato OpenDocument oficial.<br /><br />Para más información: <b>estandaresabiertos.org</b>Cristian Galinellihttp://www.blogger.com/profile/04427307135523155514noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-50325112818659234632007-05-05T14:58:00.000-03:002007-05-05T15:18:27.985-03:00Acceso de datos ADO a todo Vapor y LIBRE!La gente de <a href="http://www.fivetechsoft.com/spanish/index.html">Fivetech software</a> y <a href="http://www.viaopen.com">ViaOpen</a> anunciaron la disponibilidad de un RDD (replaceable database driver) que permite gestionar tablas a traves de <a href="http://es.wikipedia.org/wiki/ADO">ADO</a> con los tradicionales comandos de tablas dbf.<br /><br />Es opensource con disponibilidad tanto para Harbour como para xHarbour y si bien esta en estado de desarrollo ya es funcional.<br /><br /><a href="http://fivetechsoft.com/forums/viewtopic.php?t=6815&postdays=0&postorder=asc&start=0&sid=5a81cfa1adc8d3b8f1829633d5474c77">Mas info</a>.<br /><br />Excelente noticia!!.Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-75670592135199403092007-05-05T10:01:00.000-03:002007-05-05T10:12:33.386-03:00Promoción de Software - ArgentinaMario Gonzalez nos pasa un link de la "Agencia Nacional de Promoción Científica y Tecnológica" donde hablan del Fonsoft, un fondo fiduciario para el financiamiento de:<br /><ul><br /><li>proyectos de investigación y desarrollo<br /></li><br /><li>programas para la capacitación de recursos humanos<br /></li><br /><li>programas para la mejora en la calidad del software<br /></li><br /><li>programas de asistencia para nuevos emprendimientos<br /></li><br /></ul><br /><br />Link: <a href="http://www.agencia.secyt.gov.ar/fonsoft.php">http://www.agencia.secyt.gov.ar/fonsoft.php</a>Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0tag:blogger.com,1999:blog-36856108.post-33372879664684465352007-04-27T08:07:00.000-03:002007-04-27T08:17:52.194-03:00El glorioso ClipperEl magazine digital <a href="http://www.simplexit.com.ar/index-home.html">Simplex</a> en su número 2.19 publica una <a href="http://www.simplexit.com.ar/editorial/simplex/notas/numero19/6560781c-57c7-4c43-a8b7-17be4a8960d6.articulo-compuesto/index-detalle.html?produccion=editorial/simplex/notas/numero19/092f59cd-88b6-4afd-b631-d173a8a4b99b.produccion-contenidos">nota</a> de William Morris donde nos cuenta la historia de clipper y dbase.<br /><br />Desde este blog le enviamos un agradecimiento por la nota y comentarle que no nos den por muertos, que clipper hoy se hace llamar de varias formas pero que esta vivo y manteniendo el paso.Gustavo Valentinhttp://www.blogger.com/profile/01677653510781195786noreply@blogger.com0