Changeset 0783660 in tol for windows/build_tools

Timestamp:

Dec 7, 2015, 11:08:24 AM (11 years ago)

Author:

Pedro Gea <pgea@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

93d69e0

Parents:

06328fd

Message:

Refs #1899, #1880, #1827
Se revisa ActiveTOL_Base.exe y se incorpora ActiveTOL_Patch.exe en él.
Se modifica _uptol.bat para permitir las opciones: /dist /no_tests.
Se modifica el mecanismo de comprobación de que se está usando la consola del SDK.
Se tiene en cuenta en _uptol.bat el nombre del nuevo instalador.
Se revisa build_tol_sdk/build_tol_sdk.tol para evitar las carpetas usadas en la compilación con GNU GCC
Se utiliza una ubicación limpia de TOLHOME para la compilación de TOL y de su instalador con MSVC.

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@7083 be4846ae-f051-483a-831f-b64e7d08527f

Location:

windows/build_tools

Files:

• _uptol.bat (modified) (10 diffs)
• build_tol_sdk/build_tol_sdk.tol (modified) (1 diff)
• uptol.bat (modified) (3 diffs)

windows/build_tools/_uptol.bat

@@ -53 +53 @@
   Goto NEXT_OPTS
 )
+If "%1"=="/dist" (
+  Set _dodist=1
+  Set _dotests=1
+  Goto NEXT_OPTS
+)
 If "%1"=="/tests" (
   Set _dotests=1
@@ -61 +66 @@
   Goto NEXT_OPTS
 )
-If "%1"=="/dist" (
-  Set _dodist=1
-  Goto NEXT_OPTS
-)
+
 Set _msg_error=Opcion invalida %1
 Goto ERROR
@@ -129 +131 @@
 :COMPILE
 Rem Verifico que ejecutemos desde el SDK
-If Not Defined MSSdk (
+clrver 1> nul 2> nul
+If Not "%ERRORLEVEL%"=="0" (
   Set _msg_error=Solo se puede compilar desde una consola Microsoft Platform SDK
   Goto ERROR
 )
+
 If Not Defined _mod (
   Set _msg_error=Error interno! variable _mod no definida en COMPILE
@@ -311 +315 @@
 If "%_dodist%"=="1" (
   If "%_dotests%"=="0" (
-    Echo "Forzando los test de tol debido a que se ha solicitado /dist"
-    Set _dotests=1
+    Echo "NO se estan forzando los test a pesar de haber solicitado /dist"
   )
 )
@@ -371 +374 @@
 Rem empaco la distribucion de tolbase si me lo han pedido
 If "%_dodist%"=="1" (
-  If Not Exist ..\NSIS\Tolbase*.exe (
-    Echo ..\NSIS\Tolbase*.exe no existe
+  If Not Exist ..\NSIS\tol*.exe (
+    Echo ..\NSIS\tol*.exe no existe
     If Not "%_pnsis%"=="1" (
       Echo Habilitando /pnsis para poder hacer /dist
@@ -382 +385 @@
 If "%_pnsis%"=="1" (
 
-  Echo Generando el archivo de creación del instalador de tolbase ...
+  Echo Generando el archivo de creación del instalador de TOL ...
   ..\ActiveTOL\bin\tol -v ..\NSIS\Tolbase.nsi.generate.tol
   If Not Exist ..\NSIS\Tolbase.nsi (
@@ -388 +391 @@
     Goto ERROR
   )
-  If Exist ..\NSIS\Tolbase*.exe (
-    Del /Q ..\NSIS\Tolbase*.exe
-  )
-  Echo Creando instalador de tolbase ...
+  If Exist ..\NSIS\tol*.exe (
+    Del /Q ..\NSIS\tol*.exe
+  )
+  Echo Creando instalador de TOL ...
   makensis /V2 /X"SetCompressor /FINAL /SOLID lzma" ..\NSIS\Tolbase.nsi
-  If Exist ..\NSIS\Tolbase*.exe (
-    Echo El instalador de Tolbase ha sido creado en "%_cwd%\..\NSIS"
+  If Exist ..\NSIS\tol*.exe (
+    Echo El instalador de TOL ha sido creado en "%_cwd%\..\NSIS"
   ) Else (
     Set _msg_error=No se ha encontrado el resultado de ejecutar makensis
@@ -405 +408 @@
 Echo status es %test_status%
 If "%_dodist%"=="1" (
-  If Exist ..\NSIS\Tolbase*.exe (
-    For %%f In (..\NSIS\Tolbase*.exe) Do (
+  If Exist ..\NSIS\tol*.exe (
+    For %%f In (..\NSIS\tol-msvc-v*-win32.exe) Do (
       Echo encontrado %%~nxf
       Set _fbin=%%~nxf
@@ -417 +420 @@
     REM ..\ActiveTOL\bin\tol -v -c"Text WriteFile(\"last_official_tol_release_win.txt\",Version);"
     REM pscp last_official_tol_release_win.txt toldevel@tolp.localbayes.es:.
-    Echo copiando Tolbase hacia www.tol-project.org
-    pscp Tolbase*.exe toldevel@tolp.localbayes.es:/var/www/packages/win32/.
+    Echo copiando el instalador hacia www.tol-project.org
+    pscp tol*.exe toldevel@tolp.localbayes.es:/var/www/packages/win32/.
     If "%_branchid%"=="REMtrunkREM" (
-      Echo copiando tolbase-%_versionNumber%-setup.exe como tolbase-cvstrunk-setup.exe en www.tol-project.org 
-      plink tdt@cvs.tol-project.org "cp /home/bayes/pub/bin/win/tolbase-%_versionNumber%-setup.exe /home/bayes/pub/bin/win/tolbase-cvstrunk-setup.exe"
+      Echo copiando tol-msvc-v%_versionNumber%-win32.exe como tolbase-cvstrunk-setup.exe en www.tol-project.org 
+      plink tdt@cvs.tol-project.org "cp /home/bayes/pub/bin/win/tol-msvc-v%_versionNumber%-win32.exe /home/bayes/pub/bin/win/tolbase-cvstrunk-setup.exe"
     )
     REM Echo Moviendo el empaquetado a la carpeta de almacenamiento historico
@@ -432 +435 @@
     Echo.>>%_fbody%
   ) Else (
-    Echo No se puede enviar Tolbase hacia www.tol-project.exe pues no existe en NSIS
+    Echo No se puede enviar el instalador hacia www.tol-project.exe pues no existe en NSIS
     Set _msg_error=Utilice /pnsis para construirlo
     Goto ERROR

windows/build_tools/build_tol_sdk/build_tol_sdk.tol

@@ -21 +21 @@
 Real PlainHeader(Text sourcePath, Text sdkIncPath)
 {
-  WriteLn("PlainHeader "+sourcePath);
-  Set dir = GetDir(sourcePath);
-  Set head = Select(dir[1],Real(Text s)
-  {
-    Or(TextEndAt(s,".h"),TextEndAt(s,".hpp"))
-  });
-  Set EvalSet(head,Real(Text file)
-  {
-    OSFilCopy(sourcePath+"/"+file,sdkIncPath+"/"+file)
-  });
-  Set sub = Select(dir[2],Real(Text s)
-  {
-    And(!TextBeginWith(s,"."),!TextBeginWith(s,"win"))
-  });
-  Set EvalSet(sub,Real(Text s)
-  {
-    PlainHeader(sourcePath+"/"+s, sdkIncPath)
-  });
-  True
+  Case(TextMatch(sourcePath, "*CodeLite*"), {
+    False
+  }, TextMatch(sourcePath, "*BUILD_CMAKE*"), {
+    False
+  }, True, {
+    WriteLn("PlainHeader "+sourcePath);
+    Set dir = GetDir(sourcePath);
+    Set head = Select(dir[1],Real(Text s)
+    {
+      Or(TextEndAt(s,".h"),TextEndAt(s,".hpp"))
+    });
+    Set EvalSet(head,Real(Text file)
+    {
+      OSFilCopy(sourcePath+"/"+file,sdkIncPath+"/"+file)
+    });
+    Set sub = Select(dir[2],Real(Text s)
+    {
+      And(!TextBeginWith(s,"."),!TextBeginWith(s,"win"))
+    });
+    Set EvalSet(sub,Real(Text s)
+    {
+      PlainHeader(sourcePath+"/"+s, sdkIncPath)
+    });
+    True
+  })
 };
   

windows/build_tools/uptol.bat

@@ -9 +9 @@
 
 SetLocal enableextensions enabledelayedexpansion
-
 
 If not "%1"=="/no_update" (
@@ -39 +38 @@
 If Defined VS90COMNTOOLS (
   Echo Reconocido el entorno de desarrollo VS90
-  Set VSCOMNTOOLS=%VS90COMNTOOLS%
+  Set VSCOMNTOOLS=!VS90COMNTOOLS!
   Set winSrc=win-VC9
 ) Else If Defined VS80COMNTOOLS (
   Echo Reconocido el entorno de desarrollo VS80
-  Set VSCOMNTOOLS=%VS80COMNTOOLS%
+  Set VSCOMNTOOLS=!VS80COMNTOOLS!
   Set winSrc=win-VC8
 ) Else (
@@ -50 +49 @@
 )
 
+Rem Se utiliza una ubicación 'limpia' de TOLHOME
+Set TOLHOME=!CD!\..\building_tolhome\
+
 CALL _uptol.bat %*
 
-..\ActiveTOL_Patch.exe -y
-
 :END