Implement describe-instance-attribute

* etc/describe-instance-attribute.fln: New file.
* etc/Makefile.am: Add new file.
* src/dscrinstattr.c: New file.
* src/Makefile.am: Add new file.
* src/eclat.c: New command describe-instance-attribute.
* src/eclat.h: New proto.
* tests/describe-instance-attribute.at: New test case.
* tests/Makefile.am: Add new file.
* tests/testsuite.at: Likewise.

3 files changed, 93 insertions, 0 deletions

diff --git a/tests/Makefile.am b/tests/Makefile.am
index 56a4b99..c03730f 100644
--- a/tests/Makefile.am
+++ b/tests/Makefile.am
@@ -43,6 +43,7 @@ TESTSUITE_AT = \
   associate-address.at\
   decode.at\
   describe-addresses.at\
+  describe-instance-attribute.at\
   describe-instance-status.at\
   describe-instances.at\
   describe-tags.at\
diff --git a/tests/describe-instance-attribute.at b/tests/describe-instance-attribute.at
new file mode 100644
index 0000000..17aa368
--- /dev/null
+++ b/tests/describe-instance-attribute.at
@@ -0,0 +1,91 @@
+# This file is part of Eclat -*- Autotest -*-
+# Copyright (C) 2012 Sergey Poznyakoff
+#
+# Eclat is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3, or (at your option)
+# any later version.
+#
+# Eclat is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Eclat.  If not, see <http://www.gnu.org/licenses/>.
+
+ECLAT_TEST_FORMAT([DescribeInstanceAttribute instanceType],
+[DescribeInstanceAttribute DescribeInstanceAttribute-instanceType],
+[describe-instance-attribute.fln],
+[<DescribeInstanceAttributeResponse xmlns="http://ec2.amazonaws.com/doc/2012-08-15/">
+    <requestId>07bdd73d-d1d0-4c07-b8d8-a50a24e737ad</requestId>
+    <instanceId>i-12345678</instanceId>
+    <instanceType>
+        <value>m1.medium</value>
+    </instanceType>
+</DescribeInstanceAttributeResponse>
+],
+[m1.medium
+])
+
+ECLAT_TEST_FORMAT([DescribeInstanceAttribute kernel],
+[DescribeInstanceAttribute DescribeInstanceAttribute-kernel],
+[describe-instance-attribute.fln],
+[<DescribeInstanceAttributeResponse xmlns="http://ec2.amazonaws.com/doc/2012-08-15/">
+  <requestId>59dbff89-35bd-4eac-99ed-be587EXAMPLE</requestId> 
+  <instanceId>i-10a64379</instanceId>
+  <kernel>
+    <value>aki-f70657b2</value>
+  </kernel>
+</DescribeInstanceAttributeResponse>
+],
+[aki-f70657b2
+])
+
+ECLAT_TEST_FORMAT([DescribeInstanceAttribute blockDeviceMapping],
+[DescribeInstanceAttribute DescribeInstanceAttribute-blockDeviceMapping],
+[describe-instance-attribute.fln],
+[<DescribeInstanceAttributeResponse xmlns="http://ec2.amazonaws.com/doc/2012-08-15/">
+    <requestId>dba8e015-a520-43f2-a7f9-63bd337f83bf</requestId>
+    <instanceId>i-12345678</instanceId>
+    <blockDeviceMapping>
+        <item>
+            <deviceName>/dev/sda1</deviceName>
+            <ebs>
+                <volumeId>vol-deadbeef</volumeId>
+                <status>attached</status>
+                <attachTime>2012-03-30T14:04:26.000Z</attachTime>
+                <deleteOnTermination>true</deleteOnTermination>
+            </ebs>
+        </item>
+        <item>
+            <deviceName>/dev/sdf</deviceName>
+            <ebs>
+                <volumeId>vol-beefdead</volumeId>
+                <status>attached</status>
+                <attachTime>2012-03-30T16:11:14.000Z</attachTime>
+                <deleteOnTermination>false</deleteOnTermination>
+            </ebs>
+        </item>
+    </blockDeviceMapping>
+</DescribeInstanceAttributeResponse>
+],
+[/dev/sda1	vol-deadbeef	attached	true	2012-03-30T14:04:26.000Z
+/dev/sdf	vol-beefdead	attached	false	2012-03-30T16:11:14.000Z
+])
+
+ECLAT_TEST_FORMAT([DescribeInstanceAttribute groupSet],
+[DescribeInstanceAttribute DescribeInstanceAttribute-groupSet],
+[describe-instance-attribute.fln],
+[<DescribeInstanceAttributeResponse xmlns="http://ec2.amazonaws.com/doc/2012-08-15/">
+    <requestId>42507af2-227a-4f76-b8c4-55bb0c2f1384</requestId>
+    <instanceId>i-12345678</instanceId>
+    <groupSet>
+        <item>
+            <groupId>sg-deadbeef</groupId>
+        </item>
+    </groupSet>
+</DescribeInstanceAttributeResponse>
+],
+[sg-deadbeef
+])
diff --git a/tests/testsuite.at b/tests/testsuite.at
index ccb5868..b47591f 100644
--- a/tests/testsuite.at
+++ b/tests/testsuite.at
@@ -57,6 +57,7 @@ m4_include([tagshairy.at])
 AT_BANNER([Default formats])
 m4_include([associate-address.at])
 m4_include([describe-addresses.at])
+m4_include([describe-instance-attribute.at])
 m4_include([describe-instance-status.at])
 m4_include([describe-instances.at])
 m4_include([describe-tags.at])