gislib: add some extra debug messages

git-svn-id: https://svn.osgeo.org/grass/grass/trunk@55400 15284696-431f-4ddb-bdfa-cd5b030d7da7

lib/gis/file_name.c

@@ -56,6 +56,9 @@ char *G_file_name(char *path,
 
     G_free(location);
 
+    if (!element && !pname)
+        return path;
+    
     if (element && *element) {
 	strcat(path, "/");
 	strcat(path, element);
@@ -66,6 +69,8 @@ char *G_file_name(char *path,
 	strcat(path, pname);
     }
 
+    G_debug(2, "G_file_name(): path = %s", path);
+    
     return path;
 }
 

lib/gis/mapset_msc.c

@@ -42,7 +42,7 @@ int G__make_mapset_element(const char *p_element)
     if (*element == 0)
 	return 0;
 
-    G_file_name(p = path, "", "", G_mapset());
+    G_file_name(p = path, NULL, NULL, G_mapset());
     while (*p)
 	p++;
     /* add trailing slash if missing */

lib/gis/open.c

@@ -191,7 +191,7 @@ int G_open_update(const char *element, const char *name)
   \param name map file name
 
   \return open file descriptor (FILE *)
-  \return NULL could not open
+  \return NULL on error
  */
 
 FILE *G_fopen_new(const char *element, const char *name)
@@ -199,9 +199,13 @@ FILE *G_fopen_new(const char *element, const char *name)
     int fd;
 
     fd = G__open(element, name, G_mapset(), 1);
-    if (fd < 0)
+    if (fd < 0) {
+        G_debug(1, "G_fopen_new(): element = %s, name = %s : NULL",
+                element, name);
 	return (FILE *) 0;
+    }
 
+    G_debug(2, "\tfile open: new (mode = w)");
     return fdopen(fd, "w");
 }
 
@@ -221,7 +225,7 @@ FILE *G_fopen_new(const char *element, const char *name)
   \param mapset mapset name containing map <i>name</i>
 
   \return open file descriptor (FILE *)
-  \return NULL could not open
+  \return NULL on error
 */
 FILE *G_fopen_old(const char *element, const char *name, const char *mapset)
 {
@@ -231,6 +235,7 @@ FILE *G_fopen_old(const char *element, const char *name, const char *mapset)
     if (fd < 0)
 	return (FILE *) NULL;
 
+    G_debug(2, "\tfile open: read (mode = r)");
     return fdopen(fd, "r");
 }
 
@@ -247,7 +252,7 @@ FILE *G_fopen_old(const char *element, const char *name, const char *mapset)
   \param name map file name
 
   \return open file descriptor (FILE *)
-  \return NULL could not open
+  \return NULL on error
 */
 FILE *G_fopen_append(const char *element, const char *name)
 {
@@ -258,6 +263,7 @@ FILE *G_fopen_append(const char *element, const char *name)
 	return (FILE *) 0;
     lseek(fd, 0L, SEEK_END);
 
+    G_debug(2, "\tfile open: append (mode = a)");
     return fdopen(fd, "a");
 }
 
@@ -274,7 +280,7 @@ FILE *G_fopen_append(const char *element, const char *name)
   \param name map file name
 
   \return open file descriptor (FILE *)
-  \return NULL
+  \return NULL on error
 */
 FILE *G_fopen_modify(const char *element, const char *name)
 {
@@ -285,5 +291,6 @@ FILE *G_fopen_modify(const char *element, const char *name)
 	return (FILE *) 0;
     lseek(fd, 0L, SEEK_END);
 
+    G_debug(2, "\tfile open: modify (mode = r+)");
     return fdopen(fd, "r+");
 }

lib/gis/tempfile.c

@@ -1,5 +1,5 @@
 /*!
- * \file gis/tempfile.c
+ * \file lib/gis/tempfile.c
  *
  * \brief GIS Library - Temporary file functions.
  *