[RFC: 1/2] patch for QEMU HPET periodic timer emulation to alleviate time drift (code part 1)

[RFC: 1/2] patch for QEMU HPET periodic timer emulation to alleviate time drift (code part 1)

[Ulrich Obergfell]

code part 1
-----------


Introduces the '-hpet [device=none|present][,driftfix=none|slew]' option.



diff -up ./qemu-config.c.orig1 ./qemu-config.c
--- ./qemu-config.c.orig1	2011-01-21 23:34:47.000000000 +0100
+++ ./qemu-config.c	2011-02-01 19:38:26.665250920 +0100
@@ -255,6 +255,21 @@ static QemuOptsList qemu_rtc_opts = {
     },
 };
 
+static QemuOptsList qemu_hpet_opts = {
+    .name = "hpet",
+    .head = QTAILQ_HEAD_INITIALIZER(qemu_hpet_opts.head),
+    .desc = {
+        {
+            .name = "device",
+            .type = QEMU_OPT_STRING,
+        },{
+            .name = "driftfix",
+            .type = QEMU_OPT_STRING,
+        },
+        { /* end of list */ }
+    },
+};
+
 static QemuOptsList qemu_global_opts = {
     .name = "global",
     .head = QTAILQ_HEAD_INITIALIZER(qemu_global_opts.head),
@@ -456,6 +471,7 @@ static QemuOptsList *vm_config_groups[32
     &qemu_netdev_opts,
     &qemu_net_opts,
     &qemu_rtc_opts,
+    &qemu_hpet_opts,
     &qemu_global_opts,
     &qemu_mon_opts,
     &qemu_cpudef_opts,
diff -up ./qemu-options.hx.orig1 ./qemu-options.hx
--- ./qemu-options.hx.orig1	2011-01-21 23:34:47.000000000 +0100
+++ ./qemu-options.hx	2011-02-01 16:01:26.063249119 +0100
@@ -972,6 +972,11 @@ STEXI
 Disable HPET support.
 ETEXI
 
+DEF("hpet", HAS_ARG, QEMU_OPTION_hpet, \
+    "-hpet [device=none|present][,driftfix=none|slew]\n" \
+    "                disable or enable HPET, disable or enable drift fix for periodic timers (x86 only)\n",
+    QEMU_ARCH_ALL)
+
 DEF("balloon", HAS_ARG, QEMU_OPTION_balloon,
     "-balloon none   disable balloon device\n"
     "-balloon virtio[,addr=str]\n"
diff -up ./vl.c.orig1 ./vl.c
--- ./vl.c.orig1	2011-01-21 23:34:47.000000000 +0100
+++ ./vl.c	2011-02-01 19:39:22.163249205 +0100
@@ -203,6 +203,7 @@ CharDriverState *parallel_hds[MAX_PARALL
 CharDriverState *virtcon_hds[MAX_VIRTIO_CONSOLES];
 int win2k_install_hack = 0;
 int rtc_td_hack = 0;
+int hpet_driftfix = 0;
 int usb_enabled = 0;
 int singlestep = 0;
 int smp_cpus = 1;
@@ -431,6 +432,39 @@ static void configure_rtc(QemuOpts *opts
     }
 }
 
+static void configure_hpet(QemuOpts *opts)
+{
+    const char *value, *opt;
+
+    opt = "device";
+    value = qemu_opt_get(opts, opt);
+    if (value) {
+        if (!strcmp(value, "present")) {
+            no_hpet = 0;
+        } else if (!strcmp(value, "none")) {
+            no_hpet = 1;
+        } else {
+            goto error_exit;
+        }
+    }
+    opt = "driftfix";
+    value = qemu_opt_get(opts, opt);
+    if (value) {
+        if (!strcmp(value, "slew")) {
+            hpet_driftfix = 1;
+        } else if (!strcmp(value, "none")) {
+            hpet_driftfix = 0;
+        } else {
+            goto error_exit;
+        }
+    }
+    return;
+
+error_exit:
+    fprintf(stderr, "qemu: -hpet option '%s': value missing or invalid\n", opt);
+    exit(1);
+}
+
 /***********************************************************/
 /* Bluetooth support */
 static int nb_hcis;
@@ -2608,6 +2642,13 @@ int main(int argc, char **argv, char **e
             case QEMU_OPTION_no_hpet:
                 no_hpet = 1;
                 break;
+            case QEMU_OPTION_hpet:
+                opts = qemu_opts_parse(qemu_find_opts("hpet"), optarg, 0);
+                if (!opts) {
+                    exit(1);
+                }
+                configure_hpet(opts);
+                break;
             case QEMU_OPTION_balloon:
                 if (balloon_parse(optarg) < 0) {
                     fprintf(stderr, "Unknown -balloon argument %s\n", optarg);