[BACK]Return to unix.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / vim

Diff for /src/usr.bin/vim/Attic/unix.c between version 1.1 and 1.2

version 1.1, 1996/09/07 21:40:24 version 1.2, 1996/09/21 06:23:24
Line 875 
Line 875 
         /*          /*
          * Note: if terminal is xterm, title is set with escape sequence rather           * Note: if terminal is xterm, title is set with escape sequence rather
          *               than x11 calls, because the x11 calls don't always work           *               than x11 calls, because the x11 calls don't always work
          * Check only if the start of the terminal name is "xterm", also catch  
          * "xterms".  
          */           */
         if (is_xterm(term_strings[KS_NAME]))          if (is_xterm(term_strings[KS_NAME]))
                 type = 2;                  type = 2;
Line 1310 
Line 1308 
         exiting = TRUE;          exiting = TRUE;
         mch_settitle(oldtitle, oldicon);        /* restore xterm title */          mch_settitle(oldtitle, oldicon);        /* restore xterm title */
         stoptermcap();          stoptermcap();
           outchar('\n');
         flushbuf();          flushbuf();
         ml_close_all(TRUE);                             /* remove all memfiles */          ml_close_all(TRUE);                             /* remove all memfiles */
         may_core_dump();          may_core_dump();
Line 1374 
Line 1373 
                                                                         /* but it breaks function keys on MINT */                                                                          /* but it breaks function keys on MINT */
 # endif  # endif
                                                                 );                                                                  );
   # ifdef ONLCR           /* don't map NL -> CR NL, we do it ourselves */
                   tnew.c_oflag &= ~ONLCR;
   # endif
                 tnew.c_cc[VMIN] = 1;                    /* return after 1 char */                  tnew.c_cc[VMIN] = 1;                    /* return after 1 char */
                 tnew.c_cc[VTIME] = 0;                   /* don't wait */                  tnew.c_cc[VTIME] = 0;                   /* don't wait */
 # if defined(HAVE_TERMIOS_H)  # if defined(HAVE_TERMIOS_H)
Line 1686 
Line 1688 
                 x = system(p_sh);                  x = system(p_sh);
         else          else
         {          {
                 sprintf(newcmd, "%s %s -c \"%s\"", p_sh,                  sprintf(newcmd, "%s %s %s \"%s\"", p_sh,
                                         extra_shell_arg == NULL ? "" : (char *)extra_shell_arg,                                          extra_shell_arg == NULL ? "" : (char *)extra_shell_arg,
                                           (char *)p_shcf,
                                         (char *)cmd);                                          (char *)cmd);
                 x = system(newcmd);                  x = system(newcmd);
         }          }
Line 1787 
Line 1790 
         {          {
                 if (extra_shell_arg != NULL)                  if (extra_shell_arg != NULL)
                         argv[argc++] = (char *)extra_shell_arg;                          argv[argc++] = (char *)extra_shell_arg;
                 argv[argc++] = "-c";                  argv[argc++] = (char *)p_shcf;
                 argv[argc++] = (char *)cmd;                  argv[argc++] = (char *)cmd;
         }          }
         argv[argc] = NULL;          argv[argc] = NULL;
Line 2061 
Line 2064 
                                                 {                                                  {
 #ifdef SIGINT  #ifdef SIGINT
                                                         if (buffer[0] == Ctrl('C'))                                                          if (buffer[0] == Ctrl('C'))
                                                         {                                                                  /* send SIGINT to all processes in our group */
                                                                 /* Use both kill() and killpg(), in case one                                                                  kill(0, SIGINT);
                                                                  * of the two fails */  
                                                                 kill(pid, SIGINT);  
 # ifdef HAVE_KILLPG  
                                                                 killpg(0, SIGINT);  
 # endif  
                                                         }  
 #endif  #endif
                                                         if (pty_master_fd < 0 && toshell_fd >= 0 &&                                                          if (pty_master_fd < 0 && toshell_fd >= 0 &&
                                                                                                            buffer[0] == Ctrl('D'))                                                                                                             buffer[0] == Ctrl('D'))
Line 2445 
Line 2442 
  * list_notfound is ignored   * list_notfound is ignored
  */   */
   
 extern char *mktemp __ARGS((char *));  
 #ifndef SEEK_SET  #ifndef SEEK_SET
 # define SEEK_SET 0  # define SEEK_SET 0
 #endif  #endif
Line 2469 
Line 2465 
 # define EXPL_ALLOC_INC 16  # define EXPL_ALLOC_INC 16
         char_u  **expl_files;          char_u  **expl_files;
         size_t  files_alloced, files_free;          size_t  files_alloced, files_free;
           char_u  *buf;
           int             has_wildcard;
   
         *num_file = 0;          /* default: no files found */          *num_file = 0;          /* default: no files found */
         files_alloced = EXPL_ALLOC_INC; /* how much space is allocated */          files_alloced = EXPL_ALLOC_INC; /* how much space is allocated */
         files_free = EXPL_ALLOC_INC;    /* how much space is not used  */          files_free = EXPL_ALLOC_INC;    /* how much space is not used  */
         *file = (char_u **) alloc(sizeof(char_u **) * files_alloced);          *file = (char_u **) alloc(sizeof(char_u **) * files_alloced);
         if (!*file)          if (*file == NULL)
         {  
                 emsg(e_outofmem);  
                 return FAIL;                  return FAIL;
         }  
   
         for (; num_pat > 0; num_pat--, pat++)          for (; num_pat > 0; num_pat--, pat++)
         {          {
Line 2486 
Line 2481 
                 if (vim_strchr(*pat, '$') || vim_strchr(*pat, '~'))                  if (vim_strchr(*pat, '$') || vim_strchr(*pat, '~'))
                 {                  {
                         /* expand environment var or home dir */                          /* expand environment var or home dir */
                         char_u  *buf = alloc(1024);                          buf = alloc(MAXPATHL);
                         if (!buf)                          if (buf == NULL)
                         {  
                                 emsg(e_outofmem);  
                                 return FAIL;                                  return FAIL;
                         }                          expand_env(*pat, buf, MAXPATHL);
                         expand_env(*pat, buf, 1024);  
                         if (mch_has_wildcard(buf))      /* still wildcards in there? */  
                         {  
                                 expl_files = (char_u **)_fnexplode(buf);  
                         }  
                         if (expl_files == NULL)  
                         {  
                                 /*  
                                  * If no wildcard still remaining, simply add  
                                  * the pattern to the results.  
                                  * If wildcard did not match, add the pattern to  
                                  * the list of results anyway. This way, doing  
                                  * :n exist.c notexist*  
                                  * will at least edits exist.c and then say  
                                  * notexist* [new file]  
                                  */  
                                 expl_files = (char_u **)alloc(sizeof(char_u **) * 2);  
                                 expl_files[0] = strsave(buf);  
                                 expl_files[1] = NULL;  
                         }  
                         vim_free(buf);  
                 }                  }
                 else                  else
                 {                  {
                         expl_files = (char_u **)_fnexplode(*pat);                          buf = strsave(*pat);
                         if (expl_files == NULL)                  }
           expl_files = NULL;
                   has_wildcard = mch_has_wildcard(buf);  /* (still) wildcards in there? */
                   if (has_wildcard)   /* yes, so expand them */
                           expl_files = (char_u **)_fnexplode(buf);
           /*
            * return value of buf if no wildcards left,
            * OR if no match AND list_notfound is true.
            */
                   if (!has_wildcard || (expl_files == NULL && list_notfound))
                   {       /* simply save the current contents of *buf */
                           expl_files = (char_u **)alloc(sizeof(char_u **) * 2);
                           if (expl_files != NULL)
                         {                          {
                                 /* see above for explanation */                                  expl_files[0] = strsave(buf);
                                 expl_files = (char_u **)alloc(sizeof(char_u **) * 2);  
                                 expl_files[0] = strsave(*pat);  
                                 expl_files[1] = NULL;                                  expl_files[1] = NULL;
                         }                          }
                 }                  }
                 if (!expl_files)          vim_free(buf);
                 {  
                         /* Can't happen */  
                         char_u msg[128];  
                         sprintf(msg, "%s (unix.c:%d)", e_internal, __LINE__);  
                         emsg(msg);  
                         *file = (char_u **)"";  
                         *num_file = 0;  
                         return OK;  
                 }  
                 /*                  /*
                  * Count number of names resulting from expansion,                   * Count number of names resulting from expansion,
                  * At the same time add a backslash to the end of names that happen to be                   * At the same time add a backslash to the end of names that happen to
                  * directories, and replace slashes with backslashes.                   * be directories, and replace slashes with backslashes.
                  */                   */
                 for (i = 0; (p = expl_files[i]) != NULL; i++, (*num_file)++)                  if (expl_files)
                 {                  {
                         if (--files_free == 0)                          for (i = 0; (p = expl_files[i]) != NULL; i++, (*num_file)++)
                         {                          {
                                 /* need more room in table of pointers */                                  if (--files_free == 0)
                                 files_alloced += EXPL_ALLOC_INC;  
                                 *file = (char_u **) realloc(*file,  
                                                                                         sizeof(char_u **) * files_alloced);  
                                 files_free = EXPL_ALLOC_INC;  
                         }  
                         slash_adjust(p);  
                         if (mch_isdir(p))  
                         {  
                                 len = strlen(p);  
                                 p = realloc(p, len + 2);  
                                 if (!p)  
                                 {                                  {
                                         emsg(e_outofmem);                                          /* need more room in table of pointers */
                                         return FAIL;                                          files_alloced += EXPL_ALLOC_INC;
                                           *file = (char_u **) realloc(*file,
                                                                                                   sizeof(char_u **) * files_alloced);
                                           if (*file == NULL)
                                           {
                                                   emsg(e_outofmem);
                                                   *num_file = 0;
                                                   return FAIL;
                                           }
                                           files_free = EXPL_ALLOC_INC;
                                 }                                  }
                                 (*file)[*num_file] = p;                                  slash_adjust(p);
                                 p += len;                                  if (mch_isdir(p))
                                 *p++ = '\\';                                  {
                                 *p = 0;                                          len = strlen(p);
                                           if (((*file)[*num_file] = alloc(len + 2)) != NULL)
                                           {
                                                   strcpy((*file)[*num_file], p);
                                                   (*file)[*num_file][len] = '\\';
                                                   (*file)[*num_file][len+1] = 0;
                                           }
                                   }
                                   else
                                   {
                                           (*file)[*num_file] = strsave(p);
                                   }
   
                                   /*
                                    * Error message already given by either alloc or strsave.
                                    * Should return FAIL, but returning OK works also.
                                    */
                                   if ((*file)[*num_file] == NULL)
                                           break;
                         }                          }
                         else                  _fnexplodefree((char **)expl_files);
                         {  
                                 (*file)[*num_file] = strsave(p);  
                         }  
                 }                  }
                 _fnexplodefree(expl_files);  
         }          }
         return OK;          return OK;
   
 #else /* __EMX__ */  #else /* __EMX__ */
   
         int             dir;          int             dir;
         char_u  tmpname[TMPNAMELEN];          char_u  *tempname;
         char_u  *command;          char_u  *command;
         FILE    *fd;          FILE    *fd;
         char_u  *buffer;          char_u  *buffer;
Line 2607 
Line 2593 
 /*  /*
  * get a name for the temp file   * get a name for the temp file
  */   */
         STRCPY(tmpname, TMPNAME2);          if ((tempname = vim_tempname('o')) == NULL)
         if (*mktemp((char *)tmpname) == NUL)  
         {          {
                 emsg(e_notmp);                  emsg(e_notmp);
             return FAIL;              return FAIL;
Line 2621 
Line 2606 
         if ((len = STRLEN(p_sh)) >= 3 && STRCMP(p_sh + len - 3, "csh") == 0)          if ((len = STRLEN(p_sh)) >= 3 && STRCMP(p_sh + len - 3, "csh") == 0)
                 use_glob = TRUE;                  use_glob = TRUE;
   
         len = TMPNAMELEN + 11;          len = STRLEN(tempname) + 12;
         for (i = 0; i < num_pat; ++i)           /* count the length of the patterns */          for (i = 0; i < num_pat; ++i)           /* count the length of the patterns */
                 len += STRLEN(pat[i]) + 3;                  len += STRLEN(pat[i]) + 3;
         command = alloc(len);          command = alloc(len);
         if (command == NULL)          if (command == NULL)
           {
                   vim_free(tempname);
                 return FAIL;                  return FAIL;
           }
         if (use_glob)          if (use_glob)
                 STRCPY(command, "glob >");              /* build the shell command */                  STRCPY(command, "glob >");              /* build the shell command */
         else          else
                 STRCPY(command, "echo >");              /* build the shell command */                  STRCPY(command, "echo >");              /* build the shell command */
         STRCAT(command, tmpname);          STRCAT(command, tempname);
         for (i = 0; i < num_pat; ++i)          for (i = 0; i < num_pat; ++i)
         {          {
 #ifdef USE_SYSTEM  #ifdef USE_SYSTEM
Line 2658 
Line 2646 
         vim_free(command);          vim_free(command);
         if (i == FAIL)                                                  /* call_shell failed */          if (i == FAIL)                                                  /* call_shell failed */
         {          {
                 vim_remove(tmpname);                  vim_remove(tempname);
                   vim_free(tempname);
                 /*                  /*
                  * With interactive completion, the error message is not printed.                   * With interactive completion, the error message is not printed.
                  * However with USE_SYSTEM, I don't know how to turn off error messages                   * However with USE_SYSTEM, I don't know how to turn off error messages
Line 2678 
Line 2667 
 /*  /*
  * read the names from the file into memory   * read the names from the file into memory
  */   */
         fd = fopen((char *)tmpname, "r");          fd = fopen((char *)tempname, "r");
         if (fd == NULL)          if (fd == NULL)
         {          {
                 emsg2(e_notopen, tmpname);                  emsg2(e_notopen, tempname);
                   vim_free(tempname);
                 return FAIL;                  return FAIL;
         }          }
         fseek(fd, 0L, SEEK_END);          fseek(fd, 0L, SEEK_END);
Line 2690 
Line 2680 
         buffer = alloc(len + 1);          buffer = alloc(len + 1);
         if (buffer == NULL)          if (buffer == NULL)
         {          {
                 vim_remove(tmpname);                  vim_remove(tempname);
                   vim_free(tempname);
                 fclose(fd);                  fclose(fd);
                 return FAIL;                  return FAIL;
         }          }
         i = fread((char *)buffer, 1, len, fd);          i = fread((char *)buffer, 1, len, fd);
         fclose(fd);          fclose(fd);
         vim_remove(tmpname);          vim_remove(tempname);
         if (i != len)          if (i != len)
         {          {
                 emsg2(e_notread, tmpname);                  emsg2(e_notread, tempname);
                   vim_free(tempname);
                 vim_free(buffer);                  vim_free(buffer);
                 return FAIL;                  return FAIL;
         }          }
           vim_free(tempname);
   
         if (use_glob)           /* file names are separated with NUL */          if (use_glob)           /* file names are separated with NUL */
         {          {
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2