Rename VAL_XMLUPDATE to XML_XMLES bacuase this is an XML extended

[yaz-moved-to-github.git] / src / charneg.c

diff --git a/src/charneg.c b/src/charneg.c
index ebd10fc..8d6774e 100644 (file)
--- a/src/charneg.c
+++ b/src/charneg.c
@@ -1,8 +1,16 @@
-/* 
- $ $Id: charneg.c,v 1.1 2003-10-27 12:21:30 adam Exp $
- * Helper functions for Character Set and Language Negotiation - 3
+/*
+ * Copyright (C) 1995-2005, Index Data ApS
+ * See the file LICENSE for details.
+ *
+ * $Id: charneg.c,v 1.4 2005-05-18 12:38:40 adam Exp $
  */
 
+/** 
+ * \file charneg.c
+ * \brief Implements Z39.50 Charset negotiation utilities
+ *
+ * Helper functions for Character Set and Language Negotiation - 3
+ */
 #include <stdio.h>
 #include <yaz/otherinfo.h>
 #include <yaz/z-charneg.h>
@@ -252,22 +260,22 @@ Z_External *yaz_set_response_charneg(ODR o, const char *charset,
 /* Get negotiation from OtherInformation. Client&Server side */
 Z_CharSetandLanguageNegotiation *yaz_get_charneg_record(Z_OtherInformation *p)
 {
-    Z_External *pext;
     int i;
        
-    if(!p)
+    if (!p)
         return 0;
        
-    for (i=0; i<p->num_elements; i++) {
-       
+    for (i = 0; i < p->num_elements; i++) {
+       Z_External *pext;
         if ((p->list[i]->which == Z_OtherInfo_externallyDefinedInfo) &&
             (pext = p->list[i]->information.externallyDefinedInfo)) {
-                                       
+           
             oident *ent = oid_getentbyoid(pext->direct_reference);
-                       
-            if (ent && ent->value == VAL_CHARNEG3 && ent->oclass == CLASS_NEGOT &&
-                pext->which == Z_External_charSetandLanguageNegotiation) {
-                               
+           
+            if (ent && ent->value == VAL_CHARNEG3 
+               && ent->oclass == CLASS_NEGOT
+               &&  pext->which == Z_External_charSetandLanguageNegotiation)
+           {
                 return pext->u.charNeg3;
             }
         }
@@ -275,6 +283,41 @@ Z_CharSetandLanguageNegotiation *yaz_get_charneg_record(Z_OtherInformation *p)
     return 0;
 }
 
+/* Delete negotiation from OtherInformation. Client&Server side */
+int yaz_del_charneg_record(Z_OtherInformation **p)
+{
+    int i;
+       
+    if (!*p)
+        return 0;
+       
+    for (i = 0; i < (*p)->num_elements; i++) {
+       Z_External *pext;
+        if (((*p)->list[i]->which == Z_OtherInfo_externallyDefinedInfo) &&
+            (pext = (*p)->list[i]->information.externallyDefinedInfo)) {
+           
+            oident *ent = oid_getentbyoid(pext->direct_reference);
+           
+            if (ent && ent->value == VAL_CHARNEG3 
+               && ent->oclass == CLASS_NEGOT
+               && pext->which == Z_External_charSetandLanguageNegotiation)
+           {
+               --((*p)->num_elements);
+               if ((*p)->num_elements == 0)
+                   *p = 0;
+               else
+               {
+                   for(; i < (*p)->num_elements; i++)
+                       (*p)->list[i] = (*p)->list[i+1];
+               }
+               return 1;
+            }
+        }
+    }
+    return 0;
+}
+
+
 /* Get charsets, langs, selected from negotiation.. Server side */
 void yaz_get_proposal_charneg(NMEM mem, Z_CharSetandLanguageNegotiation *p,
                               char ***charsets, int *num_charsets,