(main): New commands --dump-keys, --dump-external-keys,
[gnupg.git] / g10 / exec.c
index 46990f2..a49fe15 100644 (file)
@@ -1,5 +1,5 @@
 /* exec.c - generic call-a-program code
- * Copyright (C) 2001, 2002 Free Software Foundation, Inc.
+ * Copyright (C) 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of GnuPG.
  *
@@ -46,12 +46,12 @@ int exec_write(struct exec_info **info,const char *program,
               const char *args_in,const char *name,int writeonly,int binary)
 {
   log_error(_("no remote program execution supported\n"));
-  return G10ERR_GENERAL;
+  return GPG_ERR_GENERAL;
 }
 
-int exec_read(struct exec_info *info) { return G10ERR_GENERAL; }
-int exec_finish(struct exec_info *info) { return G10ERR_GENERAL; }
-int set_exec_path(const char *path) { return G10ERR_GENERAL; }
+int exec_read(struct exec_info *info) { return GPG_ERR_GENERAL; }
+int exec_finish(struct exec_info *info) { return GPG_ERR_GENERAL; }
+int set_exec_path(const char *path,int method) { return GPG_ERR_GENERAL; }
 
 #else /* ! NO_EXEC */
 
@@ -59,7 +59,7 @@ int set_exec_path(const char *path) { return G10ERR_GENERAL; }
 char *mkdtemp(char *template);
 #endif
 
-#if defined (__MINGW32__) || defined (__CYGWIN32__)
+#if defined (_WIN32)
 /* This is a nicer system() for windows that waits for programs to
    return before returning control to the caller.  I hate helpful
    computers. */
@@ -71,7 +71,7 @@ static int win_system(const char *command)
 
   /* We must use a copy of the command as CreateProcess modifies this
      argument. */
-  string=m_strdup(command);
+  string=xstrdup (command);
 
   memset(&pi,0,sizeof(pi));
   memset(&si,0,sizeof(si));
@@ -85,21 +85,42 @@ static int win_system(const char *command)
 
   CloseHandle(pi.hProcess);
   CloseHandle(pi.hThread);
-  m_free(string);
+  xfree (string);
 
   return 0;
 }
 #endif
 
-int set_exec_path(const char *path)
+/* method==0 to replace current $PATH, and 1 to append to current
+   $PATH.  */
+int set_exec_path(const char *path,int method)
 {
-  /* Notice that path is never freed.  That is intentional due to the
-     way putenv() works. */
-  char *p=m_alloc(5+strlen(path)+1);
+  char *p,*curpath=NULL;
+  size_t curlen=0;
+
+  if(method==1 && (curpath=getenv("PATH")))
+    curlen=strlen(curpath)+1;
+
+  p=xmalloc (5+curlen+strlen(path)+1);
   strcpy(p,"PATH=");
+
+  if(curpath)
+    {
+      strcat(p,curpath);
+      strcat(p,":");
+    }
+
   strcat(p,path);
+
+  if(DBG_EXTPROG)
+    log_debug("set_exec_path method %d: %s\n",method,p);
+
+  /* Notice that path is never freed.  That is intentional due to the
+     way putenv() works.  This leaks a few bytes if we call
+     set_exec_path multiple times. */
+
   if(putenv(p)!=0)
-    return G10ERR_GENERAL;
+    return GPG_ERR_GENERAL;
   else
     return 0;
 }
@@ -118,8 +139,8 @@ static int make_tempdir(struct exec_info *info)
 
   if(tmp==NULL)
     {
-#if defined (__MINGW32__) || defined (__CYGWIN32__)
-      tmp=m_alloc(256);
+#if defined (_WIN32)
+      tmp=xmalloc (256);
       if(GetTempPath(256,tmp)==0)
        strcpy(tmp,"c:\\windows\\temp");
       else
@@ -151,34 +172,34 @@ static int make_tempdir(struct exec_info *info)
 #endif
     }
 
-  info->tempdir=m_alloc(strlen(tmp)+strlen(DIRSEP_S)+10+1);
+  info->tempdir=xmalloc (strlen(tmp)+strlen(DIRSEP_S)+10+1);
 
   sprintf(info->tempdir,"%s" DIRSEP_S "gpg-XXXXXX",tmp);
 
-#if defined (__MINGW32__) || defined (__CYGWIN32__)
-  m_free(tmp);
+#if defined (_WIN32)
+  xfree (tmp);
 #endif
 
   if(mkdtemp(info->tempdir)==NULL)
-    log_error(_("%s: can't create directory: %s\n"),
+    log_error(_("can't create directory `%s': %s\n"),
              info->tempdir,strerror(errno));
   else
     {
       info->madedir=1;
 
-      info->tempfile_in=m_alloc(strlen(info->tempdir)+
+      info->tempfile_in=xmalloc (strlen(info->tempdir)+
                                strlen(DIRSEP_S)+strlen(namein)+1);
       sprintf(info->tempfile_in,"%s" DIRSEP_S "%s",info->tempdir,namein);
 
       if(!info->writeonly)
        {
-         info->tempfile_out=m_alloc(strlen(info->tempdir)+
+         info->tempfile_out=xmalloc (strlen(info->tempdir)+
                                     strlen(DIRSEP_S)+strlen(nameout)+1);
          sprintf(info->tempfile_out,"%s" DIRSEP_S "%s",info->tempdir,nameout);
        }
     }
 
-  return info->madedir?0:G10ERR_GENERAL;
+  return info->madedir?0:GPG_ERR_GENERAL;
 }
 
 /* Expands %i and %o in the args to the full temp files within the
@@ -195,7 +216,7 @@ static int expand_args(struct exec_info *info,const char *args_in)
     log_debug("expanding string \"%s\"\n",args_in);
 
   size=100;
-  info->command=m_alloc(size);
+  info->command=xmalloc (size);
   len=0;
   info->command[0]='\0';
 
@@ -244,10 +265,15 @@ static int expand_args(struct exec_info *info,const char *args_in)
 
          if(append)
            {
-             while(strlen(append)+len>size-1)
+             size_t applen=strlen(append);
+
+             if(applen+len>size-1)
                {
-                 size+=100;
-                 info->command=m_realloc(info->command,size);
+                 if(applen<100)
+                   applen=100;
+
+                 size+=applen;
+                 info->command=xrealloc(info->command,size);
                }
 
              strcat(info->command,append);
@@ -259,7 +285,7 @@ static int expand_args(struct exec_info *info,const char *args_in)
          if(len==size-1) /* leave room for the \0 */
            {
              size+=100;
-             info->command=m_realloc(info->command,size);
+             info->command=xrealloc(info->command,size);
            }
 
          info->command[len++]=*ch;
@@ -277,10 +303,10 @@ static int expand_args(struct exec_info *info,const char *args_in)
 
  fail:
 
-  m_free(info->command);
+  xfree (info->command);
   info->command=NULL;
 
-  return G10ERR_GENERAL;
+  return GPG_ERR_GENERAL;
 }
 
 /* Either handles the tempfile creation, or the fork/exec.  If it
@@ -292,7 +318,7 @@ static int expand_args(struct exec_info *info,const char *args_in)
 int exec_write(struct exec_info **info,const char *program,
               const char *args_in,const char *name,int writeonly,int binary)
 {
-  int ret=G10ERR_GENERAL;
+  int ret=GPG_ERR_GENERAL;
 
   if(opt.exec_disable && !opt.no_perm_warn)
     {
@@ -312,14 +338,10 @@ int exec_write(struct exec_info **info,const char *program,
   if(program==NULL && args_in==NULL)
     BUG();
 
-#ifdef FIXED_EXEC_PATH
-  set_exec_path(FIXED_EXEC_PATH);
-#endif
-
-  *info=m_alloc_clear(sizeof(struct exec_info));
+  *info=xcalloc (1,sizeof(struct exec_info));
 
   if(name)
-    (*info)->name=m_strdup(name);
+    (*info)->name=xstrdup (name);
   (*info)->binary=binary;
   (*info)->writeonly=writeonly;
 
@@ -395,14 +417,14 @@ int exec_write(struct exec_info **info,const char *program,
              if(DBG_EXTPROG)
                log_debug("execlp: %s\n",program);
 
-             execlp(program,program,NULL);
+             execlp(program,program,(void *)NULL);
            }
          else
            {
              if(DBG_EXTPROG)
                log_debug("execlp: %s -c %s\n",shell,(*info)->command);
 
-             execlp(shell,shell,"-c",(*info)->command,NULL);
+             execlp(shell,shell,"-c",(*info)->command,(void *)NULL);
            }
 
          /* If we get this far the exec failed.  Clean up and return. */
@@ -427,8 +449,8 @@ int exec_write(struct exec_info **info,const char *program,
       (*info)->tochild=fdopen(to[1],binary?"wb":"w");
       if((*info)->tochild==NULL)
        {
+          ret = gpg_error_from_errno (errno);
          close(to[1]);
-         ret=G10ERR_WRITE_FILE;
          goto fail;
        }
 
@@ -437,8 +459,8 @@ int exec_write(struct exec_info **info,const char *program,
       (*info)->fromchild=iobuf_fdopen(from[0],"r");
       if((*info)->fromchild==NULL)
        {
+          ret = gpg_error_from_errno (errno);
          close(from[0]);
-         ret=G10ERR_READ_FILE;
          goto fail;
        }
 
@@ -450,15 +472,15 @@ int exec_write(struct exec_info **info,const char *program,
 #endif /* !EXEC_TEMPFILE_ONLY */
 
   if(DBG_EXTPROG)
-    log_debug("using temp file \"%s\"\n",(*info)->tempfile_in);
+    log_debug("using temp file `%s'\n",(*info)->tempfile_in);
 
   /* It's not fork/exec/pipe, so create a temp file */
   (*info)->tochild=fopen((*info)->tempfile_in,binary?"wb":"w");
   if((*info)->tochild==NULL)
     {
-      log_error(_("%s: can't create: %s\n"),
+      ret = gpg_error_from_errno (errno);
+      log_error(_("can't create `%s': %s\n"),
                (*info)->tempfile_in,strerror(errno));
-      ret=G10ERR_WRITE_FILE;
       goto fail;
     }
 
@@ -470,7 +492,7 @@ int exec_write(struct exec_info **info,const char *program,
 
 int exec_read(struct exec_info *info)
 {
-  int ret=G10ERR_GENERAL;
+  int ret=GPG_ERR_GENERAL;
 
   fclose(info->tochild);
   info->tochild=NULL;
@@ -480,7 +502,7 @@ int exec_read(struct exec_info *info)
       if(DBG_EXTPROG)
        log_debug("system() command is %s\n",info->command);
 
-#if defined (__MINGW32__) || defined (__CYGWIN32__)
+#if defined (_WIN32)
       info->progreturn=win_system(info->command);
 #else
       info->progreturn=system(info->command);
@@ -523,9 +545,9 @@ int exec_read(struct exec_info *info)
          info->fromchild=iobuf_open(info->tempfile_out);
          if(info->fromchild==NULL)
            {
+              ret = gpg_error_from_errno (errno);
              log_error(_("unable to read external program response: %s\n"),
                        strerror(errno));
-             ret=G10ERR_READ_FILE;
              goto fail;
            }
 
@@ -569,28 +591,28 @@ int exec_finish(struct exec_info *info)
       if(info->tempfile_in)
        {
          if(unlink(info->tempfile_in)==-1)
-           log_info(_("Warning: unable to remove tempfile (%s) \"%s\": %s\n"),
+           log_info(_("WARNING: unable to remove tempfile (%s) `%s': %s\n"),
                     "in",info->tempfile_in,strerror(errno));
        }
   
       if(info->tempfile_out)
        {
          if(unlink(info->tempfile_out)==-1)
-           log_info(_("Warning: unable to remove tempfile (%s) \"%s\": %s\n"),
+           log_info(_("WARNING: unable to remove tempfile (%s) `%s': %s\n"),
                     "out",info->tempfile_out,strerror(errno));
        }
 
       if(rmdir(info->tempdir)==-1)
-       log_info(_("Warning: unable to remove temp directory \"%s\": %s\n"),
+       log_info(_("WARNING: unable to remove temp directory `%s': %s\n"),
                 info->tempdir,strerror(errno));
     }
 
-  m_free(info->command);
-  m_free(info->name);
-  m_free(info->tempdir);
-  m_free(info->tempfile_in);
-  m_free(info->tempfile_out);
-  m_free(info);
+  xfree (info->command);
+  xfree (info->name);
+  xfree (info->tempdir);
+  xfree (info->tempfile_in);
+  xfree (info->tempfile_out);
+  xfree (info);
 
   return ret;
 }