/*
 * CDE - Common Desktop Environment
 *
 * Copyright (c) 1993-2012, The Open Group. All rights reserved.
 *
 * These libraries and programs are free software; you can
 * redistribute them and/or modify them under the terms of the GNU
 * Lesser General Public License as published by the Free Software
 * Foundation; either version 2 of the License, or (at your option)
 * any later version.
 *
 * These libraries and programs are distributed in the hope that
 * they will be useful, but WITHOUT ANY WARRANTY; without even the
 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
 * PURPOSE. See the GNU Lesser General Public License for more
 * details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with these libraries and programs; if not, write
 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
 * Floor, Boston, MA 02110-1301 USA
 */
/* $XConsortium: CmdUtilityP.c /main/4 1995/10/26 15:02:50 rswiston $ */
/***************************************************************************
*
* File:         CmdUtilityP.c
* Description:  Private Utility routines for the command invocation system.
* Language:     C
*
** (c) Copyright 1993, 1994 Hewlett-Packard Company
** (c) Copyright 1993, 1994 International Business Machines Corp.
** (c) Copyright 1993, 1994 Sun Microsystems, Inc.
** (c) Copyright 1993, 1994 Novell, Inc.
***************************************************************************/

#include "CmdInvP.h"

#include <stdio.h>
#include <sys/param.h>
#include <unistd.h>
#include <limits.h>
#include <sys/stat.h>

#include <X11/Xlib.h>
#include <X11/Intrinsic.h>
#include <Dt/CommandM.h>

/*****************************************************************************
 * 
 * _DtCmdBuildPathList - this functions builds a list of the path names
 *   that are part of the $PATH environment variable.  This is done once
 *   during initialization and the list is then searched whenever
 *   a command is going to be executed.
 *
 * MODIFIED:
 *
 *   char **cmd_Globals.path_list; 	- Initialized or set to NULL if 
 *					  $PATH is undefined
 *
 *****************************************************************************/

void 
_DtCmdBuildPathList( void )
{
   int i=0;
   char *path;
   int indx;
   int  n=0, pathLen;
   char *pend, 		/* Points to the beginning of a directory */
	*pbeg;		/* Points to the end of a directory */

   /* Get the PATH */
   if ((path = (char *) (getenv ("PATH"))) == NULL) {
      cmd_Globals.path_list = (char **) NULL;
      return;
   }

   pathLen = strlen(path);
   pbeg = path;

   while (i < pathLen) {
      n++;
      cmd_Globals.path_list = (char **) XtRealloc ((char *)cmd_Globals.path_list, n * sizeof (char *)); 

      if ((indx = DtStrcspn (pbeg, ":")) >= pathLen) {
	 /* At the end of the path */
	 i = pathLen;
	 pend = (char *) pbeg + indx;
      }
      else {
	 /* Found a ":" */
	 pend = (char *) pbeg + indx;
	 i += (pend - pbeg) +1;
      }

      cmd_Globals.path_list[n-1] = (char *) XtMalloc (((pend - pbeg) + 1) * 
						       sizeof(char));
      (void) strncpy (cmd_Globals.path_list[n-1], pbeg, (pend - pbeg));
      /* Strncpy does not put a '\0' at the EOS if s2 >= s1 */
      cmd_Globals.path_list[n-1][pend-pbeg] = '\0';

      /* Move past the ":" */
      if (i < pathLen) 
	 pbeg = pend +1;
   }

   /* May need to NULL terminate cmd_Globals.path_list */
   if (n > 0) {
      n++;
      cmd_Globals.path_list = (char **) XtRealloc ((char *) cmd_Globals.path_list, n * sizeof (char *));
      cmd_Globals.path_list [n-1] = (char *) NULL;
   }
}