From c5ee5ec365e312caa357726aec85e466415770d1 Mon Sep 17 00:00:00 2001
From: patrik <patrik@e0a8ed71-7df4-0310-8962-fdc924857419>
Date: Tue, 18 Oct 2011 20:38:50 +0000
Subject: [PATCH] o [NSE] Applied patch that fixes a nil table index bug
 discovered in the   mongodb library. [Thomas Buchanan]

---
 CHANGELOG          | 3 +++
 nselib/mongodb.lua | 7 ++++---
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/CHANGELOG b/CHANGELOG
index 92ca0bfc4..381f2e2a5 100644
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,5 +1,8 @@
 # Nmap Changelog ($Id$); -*-text-*-
 
+o [NSE] Applied patch that fixes a nil table index bug discovered in the
+  mongodb library. [Thomas Buchanan]
+
 o [NSE] Added ms-sql-dump-hashes, a script that dumps the MS SQL hashes in a
   format suitable for offline cracking. [Patrik]
 
diff --git a/nselib/mongodb.lua b/nselib/mongodb.lua
index b867847b1..565ac8329 100644
--- a/nselib/mongodb.lua
+++ b/nselib/mongodb.lua
@@ -172,9 +172,10 @@ local function parse(code,data)
 		return obj_size+1, object
 	--6 = _get_null
 	--7 = _get_oid
-	elseif 8 ==code then -- Boolean
+	elseif 8 == code then -- Boolean
 		return 2, data:byte(1) == 1
-	--9 = _get_date
+	elseif 9 == code then -- int64, UTC datetime
+		return bin.unpack("<l", data)
 	elseif 10 == code then -- nullvalue
 		return 0,nil
 	--11= _get_regex
@@ -182,7 +183,7 @@ local function parse(code,data)
 	--13= _get_string, # code
 	--14= _get_string, # symbol
 	--15=  _get_code_w_scope
-	elseif 16== code then -- 4 byte integer
+	elseif 16 == code then -- 4 byte integer
 		return bin.unpack("<i", data)
 	--17= _get_timestamp
 	elseif 18 == code then -- long