From 021da0cde55debc94d347bf5e8cd274f15d7b0f3 Mon Sep 17 00:00:00 2001
From: Shohei YOSHIDA <syohex@gmail.com>
Date: Thu, 22 Dec 2022 14:32:56 +0900
Subject: [PATCH] Add set property completion

---
 src/_virtualbox | 22 ++++++++++++++++++++--
 1 file changed, 20 insertions(+), 2 deletions(-)

diff --git a/src/_virtualbox b/src/_virtualbox
index 035b9c9..971db43 100644
--- a/src/_virtualbox
+++ b/src/_virtualbox
@@ -285,7 +285,10 @@ _virtualbox() {
             # TODO
             ;;
           (setproperty)
-            # TODO
+            _arguments \
+              '1: :(autostartdbpath defaultfrontend hwvirtexclusive launguage logginglevel loghistorycount machinefolder proxymode proxyurl vrdeauthlibrary vrdeextpack websrvauthlibrary)' \
+              '2:value:_vboxmanage_setproperty_value' \
+              && ret=0
             ;;
           (usbfilter)
             # TODO
@@ -450,13 +453,28 @@ _vboxmachines() {
   _values 'machines' $machines
 }
 
-# List available os types
 (( $+functions[_vboxostypes] )) ||
 _vboxostypes() {
   local -a os=(${(@f)"$(vboxmanage list ostypes | awk '/^ID:/{ print $2 }')"})
   _values 'machines' $os
 }
 
+(( $+functions[_vboxmanage_setproperty_value] )) ||
+_vboxmanage_setproperty_value() {
+  case $words[2] in
+    (autostartdbpath)
+      _arguments '*: :_files'
+      ;;
+    (machinefolder)
+      _arguments '*: :_files -/'
+      ;;
+    (proxymode)
+      local -a mode=(manual noproxy system)
+      _values 'proxymode' $mode
+      ;;
+  esac
+}
+
 _virtualbox "$@"
 
 # Local Variables: