From: Jon Ludlam <Jonathan.Ludlam@eu.citrix.com>
Date: Tue, 12 Oct 2010 11:12:22 +0000 (+0100)
Subject: Fix a problem with dummy mode in tapctl
X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=65f354bf2ba4c68829b4e799b6ebadcc3f8224a4;p=xcp%2Fxen-api-libs.git

Fix a problem with dummy mode in tapctl

Signed-off-by: Jon Ludlam <Jonathan.Ludlam@eu.citrix.com>
---

diff --git a/tapctl/tapctl.ml b/tapctl/tapctl.ml
index df63f33..845cfec 100644
--- a/tapctl/tapctl.ml
+++ b/tapctl/tapctl.ml
@@ -94,6 +94,10 @@ module Dummy = struct
 				d_state = None;
 				d_args = None;
 			} in
+			let stem = get_tapdevstem ctx in
+			let dummy_device = Printf.sprintf "%s%d" stem minor in
+			Unixext.unlink_safe dummy_device;
+			Unixext.touch_file dummy_device;
 			write_dummy_tapdisk_list ctx (entry::list);
 			minor
 		)