Adding parsing of image parameters from PList

guillep · Jul 3, 2023 · 27255c9 · 27255c9
1 parent 3ba4268
commit 27255c9
Showing 1 changed file with 21 additions and 2 deletions.
diff --git a/src/parameters/parameters.m b/src/parameters/parameters.m
@@ -1,6 +1,7 @@
 #import <Foundation/Foundation.h>
 #include "pharovm/pharo.h"
 #include "pharovm/parameters/parameters.h"
+#include "pharovm/parameters/parameterVector.h"
 #include "pharovm/debug.h"
 #include "pharovm/pathUtilities.h"
 
@@ -28,7 +29,7 @@
 	CFNumberRef		maxOldSpaceSizeRef;
 	CFNumberRef		edenSizeRef;
 	CFNumberRef		codeSizeRef;
-
+	CFArrayRef		argumentsRef;
 
 
 	mainBundle = CFBundleGetMainBundle();
@@ -84,7 +85,6 @@
 		parameters->isWorker = !CFBooleanGetValue(workerRef);
 	}
 
-
 	maxFramesToLogRef = CFBundleGetValueForInfoDictionaryKey(mainBundle, CFSTR("PharoMaxFramesToLog"));
 
 	if(maxFramesToLogRef != NULL){
@@ -109,4 +109,23 @@
 		CFNumberGetValue(codeSizeRef, kCFNumberSInt64Type, &parameters->maxCodeSize);
 	}
 
+
+	argumentsRef = CFBundleGetValueForInfoDictionaryKey(mainBundle, CFSTR("PharoImageParameters"));
+
+	if(argumentsRef != NULL){
+		CFIndex count = CFArrayGetCount(argumentsRef);
+
+		for(CFIndex i=0; i < count; i++){
+			CFStringRef value = CFArrayGetValueAtIndex(argumentsRef, i);
+
+			if(value != NULL){
+				char* valueString = calloc(1, 255+1);
+
+				CFStringGetCString(value, valueString, 255 + 1, kCFStringEncodingUTF8);
+				vm_parameter_vector_insert_from(&parameters->imageParameters, 1, &valueString);
+			}
+
+		}
+	}
+
 }