Initial commit of ResInsight version 0.4.8

ApplicationCode/ProjectDataModel/RimCalcScript.cpp

@@ -0,0 +1,59 @@
+/////////////////////////////////////////////////////////////////////////////////
+//
+//  Copyright (C) 2011-2012 Statoil ASA, Ceetron AS
+// 
+//  ResInsight is free software: you can redistribute it and/or modify
+//  it under the terms of the GNU General Public License as published by
+//  the Free Software Foundation, either version 3 of the License, or
+//  (at your option) any later version.
+// 
+//  ResInsight is distributed in the hope that it will be useful, but WITHOUT ANY
+//  WARRANTY; without even the implied warranty of MERCHANTABILITY or
+//  FITNESS FOR A PARTICULAR PURPOSE.
+// 
+//  See the GNU General Public License at <http://www.gnu.org/licenses/gpl.html> 
+//  for more details.
+//
+/////////////////////////////////////////////////////////////////////////////////
+
+#include "RIStdInclude.h"
+
+
+#include "cafPdmField.h"
+#include "RimCalcScript.h"
+
+CAF_PDM_SOURCE_INIT(RimCalcScript, "CalcScript");
+
+//--------------------------------------------------------------------------------------------------
+/// 
+//--------------------------------------------------------------------------------------------------
+RimCalcScript::RimCalcScript()
+{
+    CAF_PDM_InitObject("CalcScript", ":/octave.png", "Calc Script", "");
+
+    CAF_PDM_InitField(&absolutePath, "AbsolutePath", QString(), "Location", "", "" ,"");
+    CAF_PDM_InitField(&content, "Content", QString(), "Directory", "", "" ,"");
+    content.setHidden(true);
+}
+
+//--------------------------------------------------------------------------------------------------
+/// 
+//--------------------------------------------------------------------------------------------------
+RimCalcScript::~RimCalcScript()
+{
+}
+
+//--------------------------------------------------------------------------------------------------
+/// 
+//--------------------------------------------------------------------------------------------------
+void RimCalcScript::readContentFromFile()
+{
+    QFile file(absolutePath);
+    if (file.open(QIODevice::ReadOnly | QIODevice::Text))
+    {
+        QString fileContent = file.readAll();
+
+        content = fileContent;
+    }
+}
+