Annotation of 3BSD/cmd/ln.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * ln [ -f ] target [ new name ]
                      3:  */
                      4: 
                      5: #include <sys/types.h>
                      6: #include <sys/stat.h>
                      7: #include "stdio.h"
                      8: char   *rindex();
                      9: 
                     10: main(argc, argv)
                     11: char **argv;
                     12: {
                     13:        struct stat statb;
                     14:        register char *np;
                     15:        int fflag = 0;
                     16:        char nb[100], *name=nb, *arg2;
                     17:        int statres;
                     18: 
                     19:        if (argc >1 && strcmp(argv[1], "-f")==0) {
                     20:                argc--;
                     21:                argv++;
                     22:                fflag++;
                     23:        }
                     24:        if (argc<2 || argc>3) {
                     25:                printf("Usage: ln target [ newname ]\n");
                     26:                exit(1);
                     27:        }
                     28:        np = rindex(argv[1], '/');
                     29:        if (np==0)
                     30:                np = argv[1];
                     31:        else
                     32:                np++;
                     33:        if (argc==2)
                     34:                arg2 = np;
                     35:        else
                     36:                arg2 = argv[2];
                     37:        statres = stat(argv[1], &statb);
                     38:        if (statres<0) {
                     39:                printf ("ln: %s does not exist\n", argv[1]);
                     40:                exit(1);
                     41:        }
                     42:        if (fflag==0 && (statb.st_mode&S_IFMT) == S_IFDIR) {
                     43:                printf("ln: %s is a directory\n", argv[1]);
                     44:                exit(1);
                     45:        }
                     46:        statres = stat(arg2, &statb);
                     47:        if (statres>=0 && (statb.st_mode&S_IFMT) == S_IFDIR)
                     48:                sprintf(name, "%s/%s", arg2, np);
                     49:        else
                     50:                name = arg2;
                     51:        if (link(argv[1], name)<0) {
                     52:                perror("ln");
                     53:                exit(1);
                     54:        }
                     55:        exit(0);
                     56: }

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.