From 8a4371fc8661f537e7dff8391c38f6f40bf04349 Mon Sep 17 00:00:00 2001
From: 02090095 <vmk-post@yandex.ru>
Date: Wed, 8 May 2024 01:56:17 +0300
Subject: [PATCH] =?UTF-8?q?=D1=80=D0=B5=D1=84=D0=B0=D0=BA=D1=82=D0=BE?=
 =?UTF-8?q?=D1=80=D0=B8=D0=BD=D0=B3=20=D1=81=D0=B1=D0=BE=D1=80=D0=BA=D0=B8?=
 =?UTF-8?q?=20=D0=A1=D0=B0=D0=BF=D1=84=D0=BE=D1=80=D0=B0.=20=D0=9F=D0=B5?=
 =?UTF-8?q?=D1=80=D0=B5=D0=B2=D0=B5=D0=BB=20=D0=B5=D0=B5=20=D0=B2=20=D0=BF?=
 =?UTF-8?q?=D0=BB=D0=B0=D0=BD=D0=B8=D1=80=D0=BE=D0=B2=D1=89=D0=B8=D0=BA=20?=
 =?UTF-8?q?=D0=B7=D0=B0=D0=B4=D0=B0=D1=87=20=D1=82=D0=B5=D1=81=D1=82=D0=B8?=
 =?UTF-8?q?=D1=80=D0=BE=D0=B2=D0=B0=D0=BD=D0=B8=D1=8F=20=D1=81=D0=B0=D0=BF?=
 =?UTF-8?q?=D1=84=D0=BE=D1=80=D0=B0.=20=D0=BE=D1=81=D1=82=D0=B0=D0=BB?=
 =?UTF-8?q?=D0=BE=D1=81=D1=8C=20=D0=BF=D1=80=D0=B8=20=D0=BF=D1=80=D0=BE?=
 =?UTF-8?q?=D0=B2=D0=B5=D1=80=D0=BA=D0=B5=20=D0=B1=D0=B4=20=D1=8D=D1=82?=
 =?UTF-8?q?=D0=BE=20=D0=BE=D1=82=D0=BE=D0=B1=D1=80=D0=B0=D0=B7=D0=B8=D1=82?=
 =?UTF-8?q?=D1=8C.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .idea/workspace.xml                           |  3 ++
 src/Repository/Server/ServerCode.java         |  4 +-
 src/TestingSystem/Common/TestingServer.java   |  8 +++
 src/TestingSystem/Common/TestsDatabase.java   | 16 ++++++
 .../SAPFOR/SapforTestingPlanner.java          | 50 +++++++++++++++++++
 5 files changed, 80 insertions(+), 1 deletion(-)

diff --git a/.idea/workspace.xml b/.idea/workspace.xml
index f9821583..86a57d51 100644
--- a/.idea/workspace.xml
+++ b/.idea/workspace.xml
@@ -8,6 +8,9 @@
   <component name="ChangeListManager">
     <list default="true" id="e42177c3-2328-4b27-8a01-35779b2beb99" name="Default Changelist" comment="">
       <change beforePath="$PROJECT_DIR$/.idea/workspace.xml" beforeDir="false" afterPath="$PROJECT_DIR$/.idea/workspace.xml" afterDir="false" />
+      <change beforePath="$PROJECT_DIR$/src/Repository/Server/ServerCode.java" beforeDir="false" afterPath="$PROJECT_DIR$/src/Repository/Server/ServerCode.java" afterDir="false" />
+      <change beforePath="$PROJECT_DIR$/src/TestingSystem/Common/TestingServer.java" beforeDir="false" afterPath="$PROJECT_DIR$/src/TestingSystem/Common/TestingServer.java" afterDir="false" />
+      <change beforePath="$PROJECT_DIR$/src/TestingSystem/Common/TestsDatabase.java" beforeDir="false" afterPath="$PROJECT_DIR$/src/TestingSystem/Common/TestsDatabase.java" afterDir="false" />
       <change beforePath="$PROJECT_DIR$/src/TestingSystem/SAPFOR/SapforTestingPlanner.java" beforeDir="false" afterPath="$PROJECT_DIR$/src/TestingSystem/SAPFOR/SapforTestingPlanner.java" afterDir="false" />
     </list>
     <option name="SHOW_DIALOG" value="false" />
diff --git a/src/Repository/Server/ServerCode.java b/src/Repository/Server/ServerCode.java
index 425083d0..a096c657 100644
--- a/src/Repository/Server/ServerCode.java
+++ b/src/Repository/Server/ServerCode.java
@@ -86,5 +86,7 @@ public enum ServerCode {
     GetFirstActiveDVMPackageForMachineURL,
     GetServerName,
     StartNecessaryMachines,
-    GetSapforForCompilation;
+    GetSapforForCompilation,
+    GetMaxSapforVersion
+    ;
 }
diff --git a/src/TestingSystem/Common/TestingServer.java b/src/TestingSystem/Common/TestingServer.java
index b6abad41..8d6e3538 100644
--- a/src/TestingSystem/Common/TestingServer.java
+++ b/src/TestingSystem/Common/TestingServer.java
@@ -244,6 +244,10 @@ public class TestingServer extends RepositoryServer<TestsDatabase> {
                 Print("Получить первую активную версию Sapfor для сборки");
                 GetSapforForCompilation();
                 break;
+            case GetMaxSapforVersion:
+                Print("Получить максимальную установленную версию Sapfor");
+                GetSapforMaxVersion();
+                break;
             default:
                 throw new RepositoryRefuseException("Неподдерживаемый код: " + code);
         }
@@ -333,6 +337,10 @@ public class TestingServer extends RepositoryServer<TestsDatabase> {
         response = new ServerExchangeUnit_2021(ServerCode.OK);
         response.object = db.getSapforCopyForCompilation();
     }
+    void GetSapforMaxVersion() throws Exception{
+        response = new ServerExchangeUnit_2021(ServerCode.OK);
+        response.object = db.getInstalledSapforMaxVersion();
+    }
     void UpdateActiveDVMPackages() throws Exception {
         response = new ServerExchangeUnit_2021(ServerCode.OK);
         Vector<Pair<Integer, Long>> keys_pairs = (Vector<Pair<Integer, Long>>) request.object;
diff --git a/src/TestingSystem/Common/TestsDatabase.java b/src/TestingSystem/Common/TestsDatabase.java
index 0e9554f0..6caeb011 100644
--- a/src/TestingSystem/Common/TestsDatabase.java
+++ b/src/TestingSystem/Common/TestsDatabase.java
@@ -284,4 +284,20 @@ public class TestsDatabase extends SQLiteDatabase {
         }
         return null;
     }
+    public Integer getInstalledSapforMaxVersion() {
+        int max_version=Constants.Nan;
+
+        for (ServerSapfor sapfor : serverSapfors.Data.values()) {
+            if (sapfor.state.equals(ServerSapforState.Done)) {
+                int version=Constants.Nan;
+                try {
+                    version = Integer.parseInt(sapfor.version);
+                } catch (Exception ex) {
+                    ex.printStackTrace();
+                }
+                if (version > max_version) max_version = version;
+            }
+        }
+        return max_version;
+    }
 }
diff --git a/src/TestingSystem/SAPFOR/SapforTestingPlanner.java b/src/TestingSystem/SAPFOR/SapforTestingPlanner.java
index a9e7e877..2494b46a 100644
--- a/src/TestingSystem/SAPFOR/SapforTestingPlanner.java
+++ b/src/TestingSystem/SAPFOR/SapforTestingPlanner.java
@@ -4,8 +4,11 @@ import Common.Current;
 import Common.Global;
 import Common.GlobalProperties;
 import Common.Utils.Utils;
+import ProjectData.LanguageName;
+import Repository.RepositoryRefuseException;
 import Repository.Server.ServerCode;
 import TestingSystem.Common.TasksPackageState;
+import TestingSystem.Common.TestingPackageToKill.TestingPackageToKill;
 import TestingSystem.Common.TestingPlanner;
 import TestingSystem.SAPFOR.Json.SapforConfiguration_json;
 import TestingSystem.SAPFOR.Json.SapforTest_json;
@@ -13,18 +16,23 @@ import TestingSystem.SAPFOR.Json.SapforTestingSet_json;
 import TestingSystem.SAPFOR.SapforPackage.SapforPackage;
 import TestingSystem.SAPFOR.ServerSapfor.ServerSapfor;
 import TestingSystem.SAPFOR.ServerSapfor.ServerSapforState;
+import javafx.util.Pair;
 import org.apache.commons.io.FileUtils;
 
 import java.io.File;
 import java.nio.charset.Charset;
 import java.nio.file.Paths;
 import java.util.Date;
+import java.util.List;
 public class SapforTestingPlanner extends TestingPlanner<SapforPackage> {
     File workspace;
     ServerSapfor sapfor;
     //--
     File repo;
     File repoSapforHome;
+    int max_version;
+    int current_version;
+    //--
     File repo_bin;
     File repo_out;
     File repo_err;
@@ -205,14 +213,51 @@ public class SapforTestingPlanner extends TestingPlanner<SapforPackage> {
                         Constants.err_file +
                         "\n").waitFor();
     }
+    int getSapforRepositoryVersion() throws Exception {
+        int res = Constants.Nan;
+        File versionFile = Paths.get(repo.getAbsolutePath(), "/sapfor/experts/Sapfor_2017/_src/Utils/version.h").toFile();
+        if (versionFile.exists()) {
+            List<String> data = FileUtils.readLines(versionFile);
+            for (String s : data) {
+                if (s.startsWith("#define VERSION_SPF ")) {
+                    String[] version_data = s.split("\"");
+                    if (version_data.length > 0) {
+                        String version_s = version_data[1];
+                        //-
+                        try {
+                            res = Integer.parseInt(version_s);
+                        } catch (Exception ex) {
+                            ex.printStackTrace();
+                        }
+                    }
+                }
+            }
+        }
+        return res;
+    }
     //--------------------
     public void checkServerSapforsForCompilation() throws Exception {
         sapfor = null;
         getServerSapforForCompilation();
         if (sapfor != null) {
+            //---
+            max_version = Constants.Nan;
+            current_version = Constants.Nan;
+            //--
             SyncronizeRepository();
+            max_version = (int) ServerCommand(ServerCode.GetMaxSapforVersion);
+            current_version = getSapforRepositoryVersion();
+            if (current_version==max_version){
+                System.out.println("Версия SAPFOR " + max_version + " уже собрана!");
+                ServerCommand(ServerCode.DeleteObjectByPK, new Pair(ServerSapfor.class,sapfor.id));
+                return;
+            }
             //-
             File sapforHome = new File(Global.SapforsDirectory, Utils.getDateName("sapfor"));
+            //--
+            sapfor.home_path = sapforHome.getAbsolutePath();
+            sapfor.languageName = LanguageName.fortran;
+            //--
             File sapforBin = new File(sapforHome, "Sapfor_F");
             File sapforOut = new File(sapforHome, Constants.out_file);
             File sapforErr = new File(sapforHome, Constants.err_file);
@@ -228,6 +273,11 @@ public class SapforTestingPlanner extends TestingPlanner<SapforPackage> {
                 System.out.println("Сборка SAPFOR успешно выполнена");
                 FileUtils.copyFile(repo_bin, sapforBin);
                 sapforBin.setExecutable(true, false);
+                //--
+                sapfor.version= String.valueOf(current_version);
+                sapfor.call_command = sapforBin.getAbsolutePath();
+                sapfor.buildDate = new Date().getTime();
+                //--
                 UpdateSapforState(ServerSapforState.Done);
             } else {
                 UpdateSapforState(ServerSapforState.DoneWithErrors);