X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=retrieval%2Fd1_map.c;h=9dc5e99690ea3e1eceee9857327773ad1e3075a1;hb=eaf27c9dc97e048dcd9a90dc05aa8133b3020c5b;hp=e1eaf853dc73917efcf2336c1613537ed8b51d00;hpb=db9513f9eca4ef13d3cea779a695bb822fd973a9;p=yaz-moved-to-github.git

diff --git a/retrieval/d1_map.c b/retrieval/d1_map.c
index e1eaf85..9dc5e99 100644
--- a/retrieval/d1_map.c
+++ b/retrieval/d1_map.c
@@ -1,10 +1,19 @@
 /*
- * Copyright (c) 1995-1997, Index Data.
+ * Copyright (c) 1995-1999, Index Data.
  * See the file LICENSE for details.
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: d1_map.c,v $
- * Revision 1.14  1998-10-13 16:09:50  adam
+ * Revision 1.17  1999-11-30 13:47:12  adam
+ * Improved installation. Moved header files to include/yaz.
+ *
+ * Revision 1.16  1999/10/21 12:06:29  adam
+ * Retrieval module no longer uses ctype.h - functions.
+ *
+ * Revision 1.15  1999/08/27 09:40:32  adam
+ * Renamed logf function to yaz_log. Removed VC++ project files.
+ *
+ * Revision 1.14  1998/10/13 16:09:50  adam
  * Added support for arbitrary OID's for tagsets, schemas and attribute sets.
  * Added support for multiple attribute set references and tagset references
  * from an abstract syntax file.
@@ -60,15 +69,13 @@
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
-#include <ctype.h>
-
-#include <oid.h>
-#include <log.h>
-#include <readconf.h>
 
-#include <tpath.h>
-#include <data1.h>
-#include <d1_map.h>
+#include <yaz/oid.h>
+#include <yaz/log.h>
+#include <yaz/readconf.h>
+#include <yaz/tpath.h>
+#include <yaz/data1.h>
+#include <yaz/d1_map.h>
 
 data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 {
@@ -83,7 +90,7 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 
     if (!(f = yaz_path_fopen(data1_get_tabpath(dh), file, "r")))
     {
-	logf(LOG_WARN|LOG_ERRNO, "%s", file);
+	yaz_log(LOG_WARN|LOG_ERRNO, "%s", file);
 	return 0;
     }
 
@@ -98,15 +105,15 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 	{
 	    if (argc != 2)
 	    {
-		logf(LOG_WARN, "%s:%d: Bad # args for targetref",
-		    file, lineno);
+		yaz_log(LOG_WARN, "%s:%d: Bad # args for targetref",
+			file, lineno);
 		continue;
 	    }
 	    if ((res->target_absyn_ref = oid_getvalbyname(argv[1]))
 		== VAL_NONE)
 	    {
-		logf(LOG_WARN, "%s:%d: Unknown reference '%s'",
-		     file, lineno, argv[1]);
+		yaz_log(LOG_WARN, "%s:%d: Unknown reference '%s'",
+			file, lineno, argv[1]);
 		continue;
 	    }
 	}
@@ -114,8 +121,8 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 	{
 	    if (argc != 2)
 	    {
-		logf(LOG_WARN, "%s:%d: Bad # args for targetname",
-		    file, lineno);
+		yaz_log(LOG_WARN, "%s:%d: Bad # args for targetname",
+			file, lineno);
 		continue;
 	    }
 	    res->target_absyn_name =
@@ -128,7 +135,7 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 	{
 	    if (argc != 2)
 	    {
-		logf(LOG_WARN, "%s:%d: Bad # args for name", file, lineno);
+		yaz_log(LOG_WARN, "%s:%d: Bad # args for name", file, lineno);
 		continue;
 	    }
 	    res->name = (char *)nmem_malloc(mem, strlen(argv[1])+1);
@@ -141,8 +148,8 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 
 	    if (argc < 3)
 	    {
-		logf(LOG_WARN, "%s:%d: Bad # of args for map",
-		    file, lineno);
+		yaz_log(LOG_WARN, "%s:%d: Bad # of args for map",
+			file, lineno);
 		continue;
 	    }
 	    *mapp = (data1_mapunit *)nmem_malloc(mem, sizeof(**mapp));
@@ -168,8 +175,8 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 		if ((np = sscanf(path, "(%d,%[^)]):%[^/]", &type, valstr,
 		    parm)) < 2)
 		{
-		    logf(LOG_WARN, "%s:%d: Syntax error in map directive: %s",
-		        file, lineno, argv[2]);
+		    yaz_log(LOG_WARN, "%s:%d: Syntax error in map "
+			    "directive: %s", file, lineno, argv[2]);
 		    fclose(f);
 		    return 0;
 		}
@@ -180,7 +187,7 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 		    (*mtp)->new_field = 1;
 		else
 		    (*mtp)->new_field = 0;
-		if ((type != 3 || local_numeric) && isdigit(*valstr))
+		if ((type != 3 || local_numeric) && d1_isdigit(*valstr))
                 {
 		    (*mtp)->which = D1_MAPTAG_numeric;
 		    (*mtp)->value.numeric = atoi(valstr);
@@ -197,8 +204,8 @@ data1_maptab *data1_read_maptab (data1_handle dh, const char *file)
 	    mapp = &(*mapp)->next;
 	}
 	else 
-	    logf(LOG_WARN, "%s:%d: Unknown directive '%s'",
-		 file, lineno, argv[0]);
+	    yaz_log(LOG_WARN, "%s:%d: Unknown directive '%s'",
+		    file, lineno, argv[0]);
 
     fclose(f);
     return res;
@@ -343,8 +350,8 @@ data1_node *data1_map_record (data1_handle dh, data1_node *n,
     res->u.root.type = map->target_absyn_name;
     if (!(res->u.root.absyn = data1_get_absyn(dh, map->target_absyn_name)))
     {
-	logf(LOG_WARN, "%s: Failed to load target absyn '%s'",
-	    map->name, map->target_absyn_name);
+	yaz_log(LOG_WARN, "%s: Failed to load target absyn '%s'",
+		map->name, map->target_absyn_name);
     }
     res->parent = 0;
     res->root = res;