Return to flcopy.c CVS log

Up to [CSRG BSD Unix] / 42BSD / etc

Annotation of 42BSD/etc/flcopy.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char *sccsid ="@(#)flcopy.c     4.6 (Berkeley) 7/10/83";
                      3: #endif
                      4: 
                      5: #include <sys/file.h>
                      6: 
                      7: int    floppydes;
                      8: char   *flopname = "/dev/floppy";
                      9: long   dsize = 77 * 26 * 128;
                     10: int    hflag;
                     11: int    rflag;
                     12: 
                     13: main(argc, argv)
                     14:        register char **argv;
                     15: {
                     16:        static char buff[512];
                     17:        register long count;
                     18:        register startad = -26 * 128;
                     19:        register int n, file;
                     20:        register char *cp;
                     21: 
                     22:        while ((cp = *++argv), --argc > 0) {
                     23:                while (*cp) {
                     24:                        switch(*cp++) {
                     25: 
                     26:                        case '-':
                     27:                                continue;
                     28: 
                     29:                        case 'h':
                     30:                                hflag++;
                     31:                                printf("Halftime!\n");
                     32:                                if ((file = open("floppy", 0)) < 0) {
                     33:                                        printf("can't open \"floppy\"\n");
                     34:                                        exit(1);
                     35:                                }
                     36:                                continue;
                     37: 
                     38:                        case 'f':
                     39:                                if (argc < 1) {
                     40:                                        printf(
                     41:                                            "flcopy: -f: missing file name\n");
                     42:                                        exit(1);
                     43:                                }
                     44:                                flopname = *++argv;
                     45:                                argc--;
                     46:                                break;
                     47: 
                     48:                        case 't':
                     49:                                if (*cp >= '0' && *cp <= '9')
                     50:                                        dsize = atoi(cp);
                     51:                                else if (argc > 1) {
                     52:                                        dsize = atoi(*++argv);
                     53:                                        argc--;
                     54:                                } else
                     55:                                        dsize = 77;
                     56:                                if (dsize <= 0 || dsize > 77) {
                     57:                                        printf("Bad number of tracks\n");
                     58:                                        exit(2);
                     59:                                }
                     60:                                dsize *= 26 * 128;
                     61:                                continue;
                     62: 
                     63:                        case 'r':
                     64:                                rflag++;
                     65:                        }
                     66:                        break;
                     67:                }
                     68:        }
                     69:        if (!hflag) {
                     70:                file = open("floppy", O_RDWR|O_CREAT|O_TRUNC, 0666);
                     71:                if (file < 0) {
                     72:                        printf("can't open \"floppy\"\n");
                     73:                        exit(1);
                     74:                }
                     75:                for (count = dsize; count > 0 ; count -= 512) {
                     76:                        n = count > 512 ? 512 : count;
                     77:                        lread(startad, n, buff);
                     78:                        write(file, buff, n);
                     79:                        startad += 512;
                     80:                }
                     81:        }
                     82:        if (rflag)
                     83:                exit(0);
                     84:        printf("Change Floppy, Hit return when done.\n");
                     85:        gets(buff);
                     86:        lseek(file, 0, 0);
                     87:        count = dsize;
                     88:        startad = -26 * 128;
                     89:        for ( ; count > 0 ; count -= 512) {
                     90:                n = count > 512 ? 512 : count;
                     91:                read(file, buff, n);
                     92:                lwrite(startad, n, buff);
                     93:                startad += 512;
                     94:        }
                     95:        exit(0);
                     96: }
                     97: 
                     98: rt_init()
                     99: {
                    100:        static initized = 0;
                    101:        int mode = 2;
                    102: 
                    103:        if (initized)
                    104:                return;
                    105:        if (rflag)
                    106:                mode = 0;
                    107:        initized = 1;
                    108:        if ((floppydes = open(flopname, mode)) < 0) {
                    109:                printf("Floppy open failed\n");
                    110:                exit(1);
                    111:        }
                    112: }
                    113: 
                    114: /*
                    115:  * Logical to physical adress translation
                    116:  */
                    117: long
                    118: trans(logical)
                    119:        register int logical;
                    120: {
                    121:        register int sector, bytes, track;
                    122: 
                    123:        logical += 26 * 128;
                    124:        bytes = (logical & 127);
                    125:        logical >>= 7;
                    126:        sector = logical % 26;
                    127:        if (sector >= 13)
                    128:                sector = sector*2 +1;
                    129:        else
                    130:                sector *= 2;
                    131:        sector += 26 + ((track = (logical / 26)) - 1) * 6;
                    132:        sector %= 26;
                    133:        return ((((track *26) + sector) << 7) + bytes);
                    134: }
                    135: 
                    136: lread(startad, count, obuff)
                    137:        register startad, count;
                    138:        register char *obuff;
                    139: {
                    140:        long trans();
                    141:        extern floppydes;
                    142: 
                    143:        rt_init();
                    144:        while ((count -= 128) >= 0) {
                    145:                lseek(floppydes, trans(startad), 0);
                    146:                read(floppydes, obuff, 128);
                    147:                obuff += 128;
                    148:                startad += 128;
                    149:        }
                    150: }
                    151: 
                    152: lwrite(startad, count, obuff)
                    153:        register startad, count;
                    154:        register char *obuff;
                    155: {
                    156:        long trans();
                    157:        extern floppydes;
                    158: 
                    159:        rt_init();
                    160:        while ((count -= 128) >= 0) {
                    161:                lseek(floppydes, trans(startad), 0);
                    162:                write(floppydes, obuff, 128);
                    163:                obuff += 128;
                    164:                startad += 128;
                    165:        }
                    166: }

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