Changeset 4463 for trunk/base


Ignore:
Timestamp:
Jan 5, 2004, 11:57:59 AM (20 years ago)
Author:
jkh
Message:

Be unconditionally verbose, now that I properly understand the function of
ui_info (thanks, Landon!)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/base/src/pextlib1.0/xinstall.c

    r4383 r4463  
    8585static const char *suffix = BACKUP_SUFFIX;
    8686static char *funcname;
    87 static int safecopy, docompare, dostrip, dobackup, dopreserve, nommap, verbose;
     87static int safecopy, docompare, dostrip, dobackup, dopreserve, nommap;
    8888static mode_t mode;
    8989
    … …  
    116116        suffix = BACKUP_SUFFIX;
    117117        mode = S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH;
    118         safecopy = docompare = dostrip = dobackup = dopreserve = nommap = verbose = 0;
     118        safecopy = docompare = dostrip = dobackup = dopreserve = nommap = 0;
    119119        iflags = 0;
    120120        group = owner = curdir = NULL;
    … …  
    216216                        break;
    217217                case 'v':
    218                         verbose = 1;
     218                        /* provided only for compatibility with install(1) */
    219219                        objv++, objc--;
    220220                        break;
    … …  
    253253                safecopy = 1;
    254254
    255         /* If overall ports verbosity is turned on, enable this too */
    256         cp = Tcl_GetVar2(interp, "ui_options", "ports_verbose", 0);
    257         if (cp && !strcmp(cp, "yes"))
    258                 verbose = 1;
    259 
    260255        /* Start out hoping for the best */
    261256        rval = TCL_OK;
    … …  
    270265                        return TCL_ERROR;
    271266                }
    272                 else if (verbose) {
     267                else {
    273268                        char msg[255];
    274269
    275                         snprintf(msg, sizeof msg, "%s: chdir(%s)\n",
    276                                  funcname, curdir);
     270                        snprintf(msg, sizeof msg, "%s: chdir(%s)\n", funcname, curdir);
    277271                        ui_info(interp, msg);
    278272                }
    … …  
    400394        int tempcopy, temp_fd, to_fd = 0;
    401395        char backup[MAXPATHLEN], *p, pathbuf[MAXPATHLEN], tempfile[MAXPATHLEN];
     396        char msg[256];
    402397
    403398        files_match = 0;
    … …  
    502497                                return TCL_ERROR;
    503498                        }
    504                         if (verbose) {
    505                                 char msg[255];
    506 
    507                                 snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, from_name, to_name);
    508                                 ui_info(interp, msg);
    509                         }
     499                        snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, from_name, to_name);
     500                        ui_info(interp, msg);
    510501                }
    511502                if (!devnull)
    … …  
    602593                                return TCL_ERROR;
    603594                        }
    604                         if (verbose) {
    605                                 char msg[255];
    606 
    607                                 snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, to_name, backup);
    608                                 ui_info(interp, msg);
    609                         }
     595                        snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, to_name, backup);
     596                        ui_info(interp, msg);
    610597                        if (rename(to_name, backup) < 0) {
    611598                                char errmsg[255];
    … …  
    620607                        }
    621608                }
    622                 if (verbose) {
    623                         char msg[255];
    624 
    625                         snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, from_name, to_name);
    626                         ui_info(interp, msg);
    627                 }
     609                snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, from_name, to_name);
     610                ui_info(interp, msg);
    628611                if (rename(tempfile, to_name) < 0) {
    629612                        char errmsg[255];
    … …  
    838821        int saved_errno = 0;
    839822        int newfd;
     823        char msg[256];
    840824
    841825        if (target) {
    … …  
    859843                        }
    860844                        (void)snprintf(backup, MAXPATHLEN, "%s%s", path, suffix);
    861                         if (verbose) {
    862                                 char msg[255];
    863 
    864                                 snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, path, backup);
    865                                 ui_info(interp, msg);
    866                         }
     845                        snprintf(msg, sizeof msg, "%s: %s -> %s\n", funcname, path, backup);
     846                        ui_info(interp, msg);
    867847                        if (rename(path, backup) < 0) {
    868848                                char errmsg[255];
    … …  
    1019999                                        Tcl_SetResult(interp, errmsg, TCL_VOLATILE);
    10201000                                        return TCL_ERROR;
    1021                                 } else if (verbose) {
     1001                                }
     1002                                else {
    10221003                                        char msg[255];
    10231004
Note: See TracChangeset for help on using the changeset viewer.