]> git.ipfire.org Git - thirdparty/bind9.git/commitdiff
2565. [func] Add support for HIP record. Includes new functions
authorMark Andrews <marka@isc.org>
Fri, 26 Apr 2013 11:48:43 +0000 (21:48 +1000)
committerMark Andrews <marka@isc.org>
Fri, 26 Apr 2013 11:48:43 +0000 (21:48 +1000)
                        dns_rdata_hip_first(), dns_rdata_hip_next()
                        and dns_rdata_hip_current().  [RT #19384]

Conflicts:
CHANGES
bin/tests/system/genzone.sh

CHANGES
bin/tests/system/genzone.sh
bin/tests/system/xfer/dig1.good
bin/tests/system/xfer/dig2.good
lib/dns/rdata/generic/hip_55.c [new file with mode: 0644]
lib/dns/rdata/generic/hip_55.h [new file with mode: 0644]

diff --git a/CHANGES b/CHANGES
index 0b86c0b10ba5f5808c46f71e89c441a4f2489b5d..72e6a2ac96cec15ae6ef58f232cbc6b00fe65534 100644 (file)
--- a/CHANGES
+++ b/CHANGES
 
 3056.  [func]          Added support for URI resource record. [RT #23386]
 
+2565.  [func]          Add support for HIP record.  Includes new functions
+                       dns_rdata_hip_first(), dns_rdata_hip_next()
+                       and dns_rdata_hip_current().  [RT #19384]
+
        --- 9.6-ESV-R9rc1 released ---
 
 3546.  [func]          Add EUI48 and EUI64 types. [RT #33082]
index 893dd4a52c049638a235e059ba5cb4e6599e057c..ab3a05d961d79b849c430067bb88f5454e5f70fb 100644 (file)
@@ -277,6 +277,14 @@ eui48                      EUI48   01-23-45-67-89-ab
 
 eui64                  EUI64   01-23-45-67-89-ab-cd-ef
 
+hip1                   HIP     ( 2 200100107B1A74DF365639CC39F1D578
+                               AwEAAbdxyhNuSutc5EMzxTs9LBPCIkOFH8cIvM4p9+LrV4e19WzK00+CI6zBCQTdtWsuxKbWIy87UOoJTwkUs7lBu+Upr1gsNrut79ryra+bSRGQb1slImA8YVJyuIDsj7kwzG7jnERNqnWxZ48AWkskmdHaVDP4BcelrTI3rMXdXF5D )
+
+
+hip2                   HIP     ( 2 200100107B1A74DF365639CC39F1D578
+                                AwEAAbdxyhNuSutc5EMzxTs9LBPCIkOFH8cIvM4p9+LrV4e19WzK00+CI6zBCQTdtWsuxKbWIy87UOoJTwkUs7lBu+Upr1gsNrut79ryra+bSRGQb1slImA8YVJyuIDsj7kwzG7jnERNqnWxZ48AWkskmdHaVDP4BcelrTI3rMXdXF5D
+                               rvs.example.com. )
+
 ; type 255
 ; TSIG is a meta-type and should never occur in master files.
 
index 96b22a588d197da10d148c597f42ee8f544f09ca..fb2d0538ab50c22869094cc9af6325ac8e6b54e5 100644 (file)
@@ -22,6 +22,8 @@ gpos01.example.               3600    IN      GPOS    "-22.6882" "116.8652" "250.0"
 gpos02.example.                3600    IN      GPOS    "" "" ""
 hinfo01.example.       3600    IN      HINFO   "Generic PC clone" "NetBSD-1.4"
 hinfo02.example.       3600    IN      HINFO   "PC" "NetBSD"
+hip1.example.          3600    IN      HIP     2 200100107B1A74DF365639CC39F1D578 AwEAAbdxyhNuSutc5EMzxTs9LBPCIkOFH8cIvM4p9+LrV4e19WzK00+CI6zBCQTdtWsuxKbWIy87UOoJTwkUs7lBu+Upr1gsNrut79ryra+bSRGQb1slImA8YVJyuIDsj7kwzG7jnERNqnWxZ48AWkskmdHaVDP4BcelrTI3rMXdXF5D 
+hip2.example.          3600    IN      HIP     2 200100107B1A74DF365639CC39F1D578 AwEAAbdxyhNuSutc5EMzxTs9LBPCIkOFH8cIvM4p9+LrV4e19WzK00+CI6zBCQTdtWsuxKbWIy87UOoJTwkUs7lBu+Upr1gsNrut79ryra+bSRGQb1slImA8YVJyuIDsj7kwzG7jnERNqnWxZ48AWkskmdHaVDP4BcelrTI3rMXdXF5D rvs.example.com.
 isdn01.example.                3600    IN      ISDN    "isdn-address"
 isdn02.example.                3600    IN      ISDN    "isdn-address" "subaddress"
 isdn03.example.                3600    IN      ISDN    "isdn-address"
index ec9cd5d43e3d194f14dce2934553037b794aebae..c07eb50855a7d319a74ba018e14966e26fdfe3f0 100644 (file)
@@ -26,6 +26,8 @@ isdn01.example.               3600    IN      ISDN    "isdn-address"
 isdn02.example.                3600    IN      ISDN    "isdn-address" "subaddress"
 isdn03.example.                3600    IN      ISDN    "isdn-address"
 isdn04.example.                3600    IN      ISDN    "isdn-address" "subaddress"
+hip1.example.          3600    IN      HIP     2 200100107B1A74DF365639CC39F1D578 AwEAAbdxyhNuSutc5EMzxTs9LBPCIkOFH8cIvM4p9+LrV4e19WzK00+CI6zBCQTdtWsuxKbWIy87UOoJTwkUs7lBu+Upr1gsNrut79ryra+bSRGQb1slImA8YVJyuIDsj7kwzG7jnERNqnWxZ48AWkskmdHaVDP4BcelrTI3rMXdXF5D 
+hip2.example.          3600    IN      HIP     2 200100107B1A74DF365639CC39F1D578 AwEAAbdxyhNuSutc5EMzxTs9LBPCIkOFH8cIvM4p9+LrV4e19WzK00+CI6zBCQTdtWsuxKbWIy87UOoJTwkUs7lBu+Upr1gsNrut79ryra+bSRGQb1slImA8YVJyuIDsj7kwzG7jnERNqnWxZ48AWkskmdHaVDP4BcelrTI3rMXdXF5D rvs.example.com.
 dnskey01.example.      3600    IN      DNSKEY  512 255 1 AQMFD5raczCJHViKtLYhWGz8hMY9UGRuniJDBzC7w0aRyzWZriO6i2od GWWQVucZqKVsENW91IOW4vqudngPZsY3GvQ/xVA8/7pyFj6b7Esga60z yGW6LFe9r8n6paHrlG5ojqf0BaqHT+8=
 kx01.example.          3600    IN      KX      10 kdc.example.
 kx02.example.          3600    IN      KX      10 .
diff --git a/lib/dns/rdata/generic/hip_55.c b/lib/dns/rdata/generic/hip_55.c
new file mode 100644 (file)
index 0000000..0b4a1e7
--- /dev/null
@@ -0,0 +1,452 @@
+/*
+ * Copyright (C) 2009  Internet Systems Consortium, Inc. ("ISC")
+ *
+ * Permission to use, copy, modify, and/or distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
+ * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
+ * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
+ * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
+ * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
+/* $Id: hip_55.c,v 1.2 2009/02/26 06:09:19 marka Exp $ */
+
+/* reviewed: TBC */
+
+/* RFC 5205 */
+
+#ifndef RDATA_GENERIC_HIP_5_C
+#define RDATA_GENERIC_HIP_5_C
+
+#define RRTYPE_HIP_ATTRIBUTES (0)
+
+static inline isc_result_t
+fromtext_hip(ARGS_FROMTEXT) {
+       isc_token_t token;
+       dns_name_t name;
+       isc_buffer_t buffer;
+       isc_buffer_t hit_len;
+       isc_buffer_t key_len;
+       unsigned char *start;
+       size_t len;
+
+       REQUIRE(type == 55);
+
+       UNUSED(type);
+       UNUSED(rdclass);
+       UNUSED(callbacks);
+
+       /*
+        * Dummy HIT len.
+        */
+       hit_len = *target;
+       RETERR(uint8_tobuffer(0, target));
+
+       /*
+        * Algorithm.
+        */
+       RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_number,
+                                     ISC_FALSE));
+       if (token.value.as_ulong > 0xffU)
+               RETTOK(ISC_R_RANGE);
+       RETERR(uint8_tobuffer(token.value.as_ulong, target));
+
+       /*
+        * Dummy KEY len.
+        */
+       key_len = *target;
+       RETERR(uint16_tobuffer(0, target));
+
+       /*
+        * HIT (base16).
+        */
+       start = isc_buffer_used(target);
+       RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
+                                     ISC_FALSE));
+       RETTOK(isc_hex_decodestring(DNS_AS_STR(token), target));
+
+       /*
+        * Fill in HIT len.
+        */
+       len = (unsigned char *)isc_buffer_used(target) - start;
+       if (len > 0xffU)
+               RETTOK(ISC_R_RANGE);
+       RETERR(uint8_tobuffer(len, &hit_len));
+
+       /*
+        * Public key (base64).
+        */
+       start = isc_buffer_used(target);
+       RETERR(isc_lex_getmastertoken(lexer, &token, isc_tokentype_string,
+                                     ISC_FALSE));
+       RETTOK(isc_base64_decodestring(DNS_AS_STR(token), target));
+
+       /*
+        * Fill in KEY len.
+        */
+       len = (unsigned char *)isc_buffer_used(target) - start;
+       if (len > 0xffffU)
+               RETTOK(ISC_R_RANGE);
+       RETERR(uint16_tobuffer(len, &key_len));
+
+       /*
+        * Rendezvous Servers.
+        */
+       dns_name_init(&name, NULL);
+       do {
+               RETERR(isc_lex_getmastertoken(lexer, &token,
+                                             isc_tokentype_string,
+                                             ISC_TRUE));
+               if (token.type != isc_tokentype_string)
+                       break;
+               buffer_fromregion(&buffer, &token.value.as_region);
+               origin = (origin != NULL) ? origin : dns_rootname;
+               RETTOK(dns_name_fromtext(&name, &buffer, origin, options,
+                                        target));
+       } while (1);
+
+       /*
+        * Let upper layer handle eol/eof.
+        */
+       isc_lex_ungettoken(lexer, &token);
+
+       return (ISC_R_SUCCESS);
+}
+
+static inline isc_result_t
+totext_hip(ARGS_TOTEXT) {
+       isc_region_t region;
+       dns_name_t name;
+       dns_name_t prefix;
+       isc_boolean_t sub;
+       size_t length, key_len, hit_len;
+       unsigned char algorithm;
+       char buf[sizeof("225 ")];
+
+       REQUIRE(rdata->type == 55);
+       REQUIRE(rdata->length != 0);
+
+       dns_rdata_toregion(rdata, &region);
+
+       hit_len = uint8_fromregion(&region);
+       isc_region_consume(&region, 1);
+       
+       algorithm = uint8_fromregion(&region);
+       isc_region_consume(&region, 1);
+
+       key_len = uint16_fromregion(&region);
+       isc_region_consume(&region, 2);
+
+       if ((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0)
+               RETERR(str_totext("( ", target));
+               
+       /*
+        * Algorithm
+        */
+       sprintf(buf, "%u ", algorithm);
+       RETERR(str_totext(buf, target));
+
+       /*
+        * HIT.
+        */
+       INSIST(hit_len < region.length);
+       length = region.length;
+       region.length = hit_len;
+       RETERR(isc_hex_totext(&region, 1, "", target));
+       region.length = length - hit_len;
+       RETERR(str_totext(tctx->linebreak, target));
+
+       /*
+        * Public KEY.
+        */
+       INSIST(key_len <= region.length);
+       length = region.length;
+       region.length = key_len;
+       RETERR(isc_base64_totext(&region, 1, "", target));
+       region.length = length - key_len;
+       RETERR(str_totext(tctx->linebreak, target));
+
+       /*
+        * Rendezvous Servers.
+        */
+       dns_name_init(&name, NULL);
+       dns_name_init(&prefix, NULL);
+       while (region.length > 0) {
+               dns_name_fromregion(&name, &region);
+
+               sub = name_prefix(&name, tctx->origin, &prefix);
+               RETERR(dns_name_totext(&prefix, sub, target));
+               isc_region_consume(&region, name.length);
+               if (region.length > 0)
+                       RETERR(str_totext(tctx->linebreak, target));
+       }
+       if ((tctx->flags & DNS_STYLEFLAG_MULTILINE) != 0)
+               RETERR(str_totext(" )", target));
+       return (ISC_R_SUCCESS);
+}
+
+static inline isc_result_t
+fromwire_hip(ARGS_FROMWIRE) {
+       isc_region_t region, rr;
+       dns_name_t name;
+       isc_uint8_t hit_len;
+       isc_uint16_t key_len;
+
+       REQUIRE(type == 55);
+
+       UNUSED(type);
+       UNUSED(rdclass);
+
+       isc_buffer_activeregion(source, &region);
+       if (region.length < 4U)
+               RETERR(DNS_R_FORMERR);
+
+       rr = region;
+       hit_len = uint8_fromregion(&region);
+       if (hit_len == 0)
+               RETERR(DNS_R_FORMERR);
+       isc_region_consume(&region, 2);         /* hit length + algorithm */
+       key_len = uint16_fromregion(&region);
+       if (key_len == 0)
+               RETERR(DNS_R_FORMERR);
+       isc_region_consume(&region, 2);
+       if (region.length < hit_len + key_len)
+               RETERR(DNS_R_FORMERR);
+
+       RETERR(mem_tobuffer(target, rr.base, 4 + hit_len + key_len));
+       isc_buffer_forward(source, 4 + hit_len + key_len);
+
+       dns_decompress_setmethods(dctx, DNS_COMPRESS_NONE);
+       while (isc_buffer_activelength(source) > 0) {
+               dns_name_init(&name, NULL);
+               RETERR(dns_name_fromwire(&name, source, dctx, options, target));
+       }
+       return (ISC_R_SUCCESS);
+}
+
+static inline isc_result_t
+towire_hip(ARGS_TOWIRE) {
+       isc_region_t region;
+
+       REQUIRE(rdata->type == 55);
+       REQUIRE(rdata->length != 0);
+
+       UNUSED(cctx);
+
+       dns_rdata_toregion(rdata, &region);
+       return (mem_tobuffer(target, region.base, region.length));
+}
+
+static inline int
+compare_hip(ARGS_COMPARE) {
+       isc_region_t region1;
+       isc_region_t region2;
+
+       REQUIRE(rdata1->type == rdata2->type);
+       REQUIRE(rdata1->rdclass == rdata2->rdclass);
+       REQUIRE(rdata1->type == 55);
+       REQUIRE(rdata1->length != 0);
+       REQUIRE(rdata2->length != 0);
+
+       dns_rdata_toregion(rdata1, &region1);
+       dns_rdata_toregion(rdata2, &region2);
+       return (isc_region_compare(&region1, &region2));
+}
+
+static inline isc_result_t
+fromstruct_hip(ARGS_FROMSTRUCT) {
+       dns_rdata_hip_t *hip = source;
+       dns_rdata_hip_t myhip;
+       isc_result_t result;
+
+       REQUIRE(type == 55);
+       REQUIRE(source != NULL);
+       REQUIRE(hip->common.rdtype == type);
+       REQUIRE(hip->common.rdclass == rdclass);
+       REQUIRE(hip->hit_len > 0 && hip->hit != NULL);
+       REQUIRE(hip->key_len > 0 && hip->key != NULL);
+       REQUIRE((hip->servers == NULL && hip->servers_len == 0) ||
+                (hip->servers != NULL && hip->servers_len != 0));
+
+       UNUSED(type);
+       UNUSED(rdclass);
+
+       RETERR(uint8_tobuffer(hip->hit_len, target));
+       RETERR(uint8_tobuffer(hip->algorithm, target));
+       RETERR(uint16_tobuffer(hip->key_len, target));
+       RETERR(mem_tobuffer(target, hip->hit, hip->hit_len));
+       RETERR(mem_tobuffer(target, hip->key, hip->key_len));
+       
+       myhip = *hip;
+       for (result = dns_rdata_hip_first(&myhip);
+            result == ISC_R_SUCCESS;
+            result = dns_rdata_hip_next(&myhip))
+               /* empty */;
+
+       return(mem_tobuffer(target, hip->servers, hip->servers_len));
+}
+
+static inline isc_result_t
+tostruct_hip(ARGS_TOSTRUCT) {
+       isc_region_t region;
+       dns_rdata_hip_t *hip = target;
+
+       REQUIRE(rdata->type == 55);
+       REQUIRE(target != NULL);
+       REQUIRE(rdata->length != 0);
+
+       hip->common.rdclass = rdata->rdclass;
+       hip->common.rdtype = rdata->type;
+       ISC_LINK_INIT(&hip->common, link);
+
+       dns_rdata_toregion(rdata, &region);
+
+       hip->hit_len = uint8_fromregion(&region);
+       isc_region_consume(&region, 1);
+
+       hip->algorithm = uint8_fromregion(&region);
+       isc_region_consume(&region, 1);
+
+       hip->key_len = uint16_fromregion(&region);
+       isc_region_consume(&region, 2);
+
+       hip->hit = hip->key = hip->servers = NULL;
+
+       hip->hit = mem_maybedup(mctx, region.base, hip->hit_len);
+       if (hip->hit == NULL)
+               goto cleanup;
+       isc_region_consume(&region, hip->hit_len);
+
+       hip->key = mem_maybedup(mctx, region.base, hip->key_len);
+       if (hip->key == NULL)
+               goto cleanup;
+       isc_region_consume(&region, hip->key_len);
+
+       hip->servers_len = region.length;
+       if (hip->servers_len != 0) {
+               hip->servers = mem_maybedup(mctx, region.base, region.length);
+               if (hip->servers == NULL)
+                       goto cleanup;
+       }
+
+       hip->offset = hip->servers_len;
+       hip->mctx = mctx;
+       return (ISC_R_SUCCESS);
+
+ cleanup:
+       if (hip->hit != NULL)
+               isc_mem_free(mctx, hip->hit);   
+       if (hip->key != NULL)
+               isc_mem_free(mctx, hip->key);   
+       if (hip->servers != NULL)
+               isc_mem_free(mctx, hip->servers);       
+       return (ISC_R_NOMEMORY);
+
+}
+
+static inline void
+freestruct_hip(ARGS_FREESTRUCT) {
+       dns_rdata_hip_t *hip = source;
+
+       REQUIRE(source != NULL);
+
+       if (hip->mctx == NULL)
+               return;
+
+       isc_mem_free(hip->mctx, hip->hit);      
+       isc_mem_free(hip->mctx, hip->key);      
+       if (hip->servers != NULL)
+               isc_mem_free(hip->mctx, hip->servers);  
+       hip->mctx = NULL;
+}
+
+static inline isc_result_t
+additionaldata_hip(ARGS_ADDLDATA) {
+       UNUSED(rdata);
+       UNUSED(add);
+       UNUSED(arg);
+
+       REQUIRE(rdata->type == 55);
+
+       return (ISC_R_SUCCESS);
+}
+
+static inline isc_result_t
+digest_hip(ARGS_DIGEST) {
+       isc_region_t r;
+
+       REQUIRE(rdata->type == 55);
+
+       dns_rdata_toregion(rdata, &r);
+       return ((digest)(arg, &r));
+}
+
+static inline isc_boolean_t
+checkowner_hip(ARGS_CHECKOWNER) {
+
+       REQUIRE(type == 55);
+
+       UNUSED(name);
+       UNUSED(type);
+       UNUSED(rdclass);
+       UNUSED(wildcard);
+
+       return (ISC_TRUE);
+}
+
+static inline isc_boolean_t
+checknames_hip(ARGS_CHECKNAMES) {
+
+       REQUIRE(rdata->type == 55);
+
+       UNUSED(rdata);
+       UNUSED(owner);
+       UNUSED(bad);
+
+       return (ISC_TRUE);
+}
+
+isc_result_t
+dns_rdata_hip_first(dns_rdata_hip_t *hip) {
+       if (hip->servers_len == 0)
+               return (ISC_R_NOMORE);
+       hip->offset = 0;
+       return (ISC_R_SUCCESS);
+}
+
+isc_result_t
+dns_rdata_hip_next(dns_rdata_hip_t *hip) {
+       isc_region_t region;
+       dns_name_t name;
+
+       if (hip->offset >= hip->servers_len)
+               return (ISC_R_NOMORE);
+
+       region.base = hip->servers + hip->offset;
+       region.length = hip->servers_len - hip->offset;
+       dns_name_init(&name, NULL);
+       dns_name_fromregion(&name, &region);
+       hip->offset += name.length;
+       INSIST(hip->offset <= hip->servers_len);
+       return (ISC_R_SUCCESS);
+}
+
+void
+dns_rdata_hip_current(dns_rdata_hip_t *hip, dns_name_t *name) {
+       isc_region_t region;
+
+       REQUIRE(hip->offset < hip->servers_len);
+
+       region.base = hip->servers + hip->offset;
+       region.length = hip->servers_len - hip->offset;
+       dns_name_fromregion(name, &region);
+
+       INSIST(name->length + hip->offset <= hip->servers_len);
+}
+
+#endif /* RDATA_GENERIC_HIP_5_C */
diff --git a/lib/dns/rdata/generic/hip_55.h b/lib/dns/rdata/generic/hip_55.h
new file mode 100644 (file)
index 0000000..69f2eba
--- /dev/null
@@ -0,0 +1,47 @@
+/*
+ * Copyright (C) 2009  Internet Systems Consortium, Inc. ("ISC")
+ *
+ * Permission to use, copy, modify, and/or distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
+ * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
+ * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
+ * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
+ * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
+/* $Id: hip_55.h,v 1.2 2009/02/26 06:09:19 marka Exp $ */
+
+#ifndef GENERIC_HIP_5_H
+#define GENERIC_HIP_5_H 1
+
+/* RFC 5205 */
+
+typedef struct dns_rdata_hip {
+       dns_rdatacommon_t       common;
+       isc_mem_t *             mctx;
+       unsigned char *         hit;
+       unsigned char *         key;
+       unsigned char *         servers;
+       isc_uint8_t             algorithm;
+       isc_uint8_t             hit_len;
+       isc_uint16_t            key_len;
+       isc_uint16_t            servers_len;
+       /* Private */
+       isc_uint16_t            offset;
+} dns_rdata_hip_t;
+
+isc_result_t
+dns_rdata_hip_first(dns_rdata_hip_t *);
+
+isc_result_t
+dns_rdata_hip_next(dns_rdata_hip_t *);
+
+void
+dns_rdata_hip_current(dns_rdata_hip_t *, dns_name_t *);
+
+#endif /* GENERIC_HIP_5_H */