From 2b675c80ce1eed9b28ed4a81abdb5da5d6c62f4f Mon Sep 17 00:00:00 2001
From: Quietust <quietust@gmail.com>
Date: Thu, 14 Mar 2013 12:00:16 -0500
Subject: [PATCH 1/2] Fix createitem to not leak memory

---
 plugins/createitem.cpp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/plugins/createitem.cpp b/plugins/createitem.cpp
index 8764f6ae2..ed301e482 100644
--- a/plugins/createitem.cpp
+++ b/plugins/createitem.cpp
@@ -248,7 +248,9 @@ command_result df_createitem (color_ostream &out, vector <string> & parameters)
         break;
     }
 
-    if (!makeItem(prod, unit))
+    bool result = makeItem(prod, unit);
+    delete prod;
+    if (!result)
     {
         out.printerr("Failed to create item!\n");
         return CR_FAILURE;

From 42e9d77e952890ea3aa34029e83d6e9e8d4d82ca Mon Sep 17 00:00:00 2001
From: jj <john-git@ofjj.net>
Date: Fri, 15 Mar 2013 14:21:01 +0100
Subject: [PATCH 2/2] scripts/create-items: spawn anvils too

---
 scripts/create-items.rb | 44 ++++++++++++++++++++++++++++-------------
 1 file changed, 30 insertions(+), 14 deletions(-)

diff --git a/scripts/create-items.rb b/scripts/create-items.rb
index a1f85cc4c..ad50c2e0d 100644
--- a/scripts/create-items.rb
+++ b/scripts/create-items.rb
@@ -1,31 +1,31 @@
-# create arbitrary items under cursor
+# create first necessity items under cursor
 
 category = $script_args[0] || 'help'
 mat_raw  = $script_args[1] || 'list'
 count    = $script_args[2]
 
 
-category = df.match_rawname(category, ['help', 'bars', 'boulders', 'plants', 'logs', 'webs']) || 'help'
+category = df.match_rawname(category, ['help', 'bars', 'boulders', 'plants', 'logs', 'webs', 'anvils']) || 'help'
 
 if category == 'help'
 	puts <<EOS
-Create items under the cursor.
+Create first necessity items under the cursor.
 Usage:
- create [category] [raws token] [number]
+ create-items [category] [raws token] [number]
 
 Item categories:
- bars, boulders, plants, logs, web
+ bars, boulders, plants, logs, webs, anvils
 
 Raw token:
- either a full token (PLANT_MAT:ADLER:WOOD) or the middle part only
+ Either a full token (PLANT_MAT:ADLER:WOOD) or the middle part only
  (the missing part is autocompleted depending on the item category)
- use 'list' to show all possibilities
+ Use 'list' to show all possibilities
 
 Exemples:
- create boulders hematite 30
- create bars CREATURE_MAT:CAT:SOAP 10
- create web cave_giant
- create plants list
+ create-items boulders hematite 30
+ create-items bars CREATURE_MAT:CAT:SOAP 10
+ create-items web cave_giant
+ create-items plants list
 
 EOS
 	throw :script_finished
@@ -129,6 +129,18 @@ when 'webs'
 		item.dimension = 15000	# XXX may depend on creature (this is for GCS)
 	}
 
+when 'anvils'
+	cls = DFHack::ItemAnvilst
+	if mat_raw !~ /:/ and !(df.decode_mat(mat_raw) rescue nil)
+		list = df.world.raws.inorganics.find_all { |ino|
+			ino.material.flags[:IS_METAL]
+		}.map { |ino| ino.id }
+		mat_raw = match_list(mat_raw, list)
+		mat_raw = "INORGANIC:#{mat_raw}"
+		puts mat_raw
+	end
+	count ||= 1
+
 end
 
 
@@ -156,6 +168,10 @@ count.to_i.times {
 
 
 # move game view, so that the ui menu updates
-df.curview.feed_keys(:CURSOR_UP_Z)
-df.curview.feed_keys(:CURSOR_DOWN_Z)
-
+if df.cursor.z > 5
+	df.curview.feed_keys(:CURSOR_DOWN_Z)
+	df.curview.feed_keys(:CURSOR_UP_Z)
+else
+	df.curview.feed_keys(:CURSOR_UP_Z)
+	df.curview.feed_keys(:CURSOR_DOWN_Z)
+end