[OpenBIOS] [PATCH 1/2] Implement copy-resolutions-property

[Programmingkid]

The copy-resolutions-property copies all the resolutions from the resolutions
property of the options node to the resolutions property of the QEMU,VGA node.
This is used to support specifying resolutions via the command-line.

Signed-off-by: John Arbuckle <programmingkidx at gmail.com>
---
 arch/ppc/qemu/qemu.fs | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/arch/ppc/qemu/qemu.fs b/arch/ppc/qemu/qemu.fs
index 3d99a34..2a83fe7 100644
--- a/arch/ppc/qemu/qemu.fs
+++ b/arch/ppc/qemu/qemu.fs
@@ -138,3 +138,27 @@ variable keyboard-phandle 0 keyboard-phandle !
     3drop 0
   then
 ;
+
+\ Copies the resolutions property from the /options node to QEMU,VGA node
+
+: copy-resolutions-property  ( -- )
+    " /options" find-package 
+    if 
+        active-package!
+        " resolutions" active-package get-package-property false =
+        if 
+            " /pci/QEMU,VGA" find-package 
+            if
+                active-package!
+                " resolutions"
+                property
+            else
+                cr ." copy-resolutions-property: Failed to find QEMU,VGA package!" cr
+            then
+        else
+            cr ." copy-resolutions-property: Failed to find resolutions property!" cr
+        then
+    else
+        cr ." copy-resolutions-property: Failed to find options node!" cr
+    then
+;
-- 
2.7.2