Geografic-Information-System/lib/gis/nme_in_mps.c

/*!
  \file gis/nme_in_mps.c

  \brief GIS Library - check map name

  (C) 2001-2009 by the GRASS Development Team

  This program is free software under the GNU General Public License
  (>=v2).  Read the file COPYING that comes with GRASS for details.

  \author Original author CERL
*/

#include <string.h>
#include <grass/gis.h>

/*!
  \brief Check if map name is fully qualified (map @ mapset)
  
  Returns a fully qualified name for the file <i>name</i> in
  <i>mapset</i>. Currently this string is in the form
  <i>name@mapset</i>, but the programmer should pretend not to know this
  and always call this routine to get the fully qualified name.

  Note:
   - <i>name</i> is char array of size GNAME_MAX
   - <i>mapset</i> is char array of size GMAPSET_MAX

  \param fullname full map name
  \param[out] name map name
  \param[out] mapset mapset name
  
  \return 1 if input map name is fully qualified
  \return 0 if input map name is not fully qualified
 */
int G_name_is_fully_qualified(const char *fullname, char *name, char *mapset)
{
    const char *p;
    char *q;

    /* search for name@mapset */

    *name = *mapset = 0;

    for (p = fullname; *p; p++)
	if (*p == '@')
	    break;

    if (*p == 0)
	return 0;

    /* copy the name part */
    q = name;
    while (fullname != p)
	*q++ = *fullname++;
    *q = 0;

    /* copy the mapset part */
    p++;			/* skip the @ */
    q = mapset;
    while ((*q++ = *p++)) ;

    return (*name && *mapset);
}


/*!
   \brief fully qualified file name

   Returns a fully qualified name for the file <b>name</b> in 
   <b>mapset.</b> Currently this string is in the form <i>name @ mapset</i>, 
   but the programmer should pretend not to know this and always call this 
   routine to get the fully qualified name.
   The following example shows how an interactive version of <i>d.rast</i>
   interfaces with the command-line version of <i>d.rast</i>:

   \code
   #include "gis.h"
   int main(char *argc, char **argv)
   {
   char name[GNAME_MAX], *mapset, *fqn;
   char command[1024];
   G_gisinit(argv[0]);
   mapset = G_ask_cell_old ("", name, "");
   if (mapset == NULL) exit(EXIT_SUCCESS);
   fqn = G_fully_qualified_name (name, mapset);
   sprintf (command, "d.rast map='%s'", fqn);
   system(command);
   }
   \endcode

   \param name map name
   \param mapset mapset name

   \return pointer to full map name (map @ mapset)
 */
char *G_fully_qualified_name(const char *name, const char *mapset)
{
    char fullname[GNAME_MAX + GMAPSET_MAX];

    if (strchr(name, '@'))
	sprintf(fullname, "%s", name);
    else
	sprintf(fullname, "%s@%s", name, mapset);

    return G_store(fullname);
}

/*!
  \brief Returns unqualified map name (without @ mapset)

  Returns an unqualified name for the file <i>name</i> in
  <i>mapset</i>.

  Note:
   - <i>name, xname</i> are char array of size GNAME_MAX
   - <i>mapset, xmapset</i> are char array of size GMAPSET_MAX

  \param fullname map name
  \param fullname map mapset
  \param[out] name map name
  \param[out] mapset mapset name

  \return  1 if input map name is fully qualified
  \return  0 if ...
  \return -1 if input mapset invalid
 */
int G_unqualified_name(const char *name, const char *mapset,
		       char *xname, char *xmapset)
{
    if (G_name_is_fully_qualified(name, xname, xmapset)) {
	if (mapset && *mapset && strcmp(mapset, xmapset) != 0)
	    return -1;
	return 1;
    }

    strcpy(xname, name);
    strcpy(xmapset, mapset);

    return 0;
}