← Back to branch summary

~jdpipe/ascend/trunk-old

« back to all changes in this revision

Viewing changes to base/generic/utilities/ascEnvVar.c

  • Committer: johnpye
  • Date: 2006-10-26 10:18:53 UTC
  • Revision ID: svn-v4:f15cd148-d149-4907-926e-73cf92b3ee03:trunk:908
first attempt at merging with Ben's changes on the trunk

Show diffs side-by-side

added added

removed removed

Lines of Context:
base/generic/utilities/ascEnvVar.c
58
58
 * each contains a list with pointers to strings.
59
59
 */
60
60
struct asc_env_t {
61
 
  char *name;
 
61
  const char *name;
62
62
  struct gl_list_t *data;
63
63
};
64
64
 
101
101
  if (ev==NULL) {
102
102
    return;
103
103
  }
104
 
  ascfree(ev->name);
 
104
  ascfree((char *)ev->name);
105
105
  gl_free_and_destroy(ev->data);
106
106
  ascfree(ev);
107
107
}
136
136
  dummy.name = name;
137
137
  pos = gl_search(g_env_list,&dummy,(CmpFunc)CmpEV);
138
138
  if (pos==0) {
139
 
        //FPRINTF(ASCERR,"ENV VAR '%s' NOT FOUND\n",name);
 
139
#if 0
 
140
        FPRINTF(ASCERR,"ENV VAR '%s' NOT FOUND\n",name);
 
141
#endif
140
142
    return NULL;
141
143
  }
142
144
  return (struct asc_env_t *)gl_fetch(g_env_list,pos);
433
435
}
434
436
 
435
437
 
436
 
char **Asc_GetPathList(char *envvar, int *argc)
 
438
CONST char **Asc_GetPathList(CONST char *envvar, int *argc)
437
439
{
438
440
  struct asc_env_t *ev;
439
 
  char **argv;
 
441
  CONST char **argv;
440
442
  char *tmppos, *val;
441
443
  unsigned long len, c, slen;
442
444
 
466
468
    /* space for the values */
467
469
    slen += (strlen((char *)gl_fetch(ev->data,(unsigned long)c)) +1 );
468
470
  }
469
 
  argv = ASC_NEW_ARRAY(char *,slen);
 
471
  argv = ASC_NEW_ARRAY(CONST char *,slen);
470
472
  if ( argv == NULL ) {
471
473
    *argc = -1;
472
474
    return NULL;
524
526
}
525
527
 
526
528
 
527
 
char **Asc_EnvNames(int *argc)
 
529
const char **Asc_EnvNames(int *argc)
528
530
{
529
 
  char **argv;
 
531
  const char **argv;
530
532
  unsigned long c, len;
531
533
 
532
534
  if (g_env_list == NULL) {
535
537
  }
536
538
  len = gl_length(g_env_list);
537
539
  *argc =  (int)len;
538
 
  argv = ASC_NEW_ARRAY(char *,*argc + 1);
 
540
  argv = ASC_NEW_ARRAY(CONST char *,*argc + 1);
539
541
  if (argv==NULL) {
540
542
    *argc = -1;
541
543
    return NULL;