Return to load.c CVS log

Up to [Research Unix] / researchv10no / cmd / worm / scsi

Annotation of researchv10no/cmd/worm/scsi/load.c, revision 1.1

1.1     ! root        1: #define        _POSIX_SOURCE
        !             2: #include       <stddef.h>
        !             3: #include       <stdlib.h>
        !             4: #include       <unistd.h>
        !             5: #include       <stdio.h>
        !             6: #include       <string.h>
        !             7: #include       <errno.h>
        !             8: #include       <time.h>
        !             9: #include       "jukeface.h"
        !            10: #include       "jukebox.h"
        !            11: 
        !            12: static j_empty_drive(Jukebox *, long tlimit, char *buf);
        !            13: 
        !            14: j_load(Jukebox *j, char *vol_id, char *buf, long tlimit)
        !            15: {
        !            16:        int side;
        !            17:        int n, sh, dr;
        !            18:        char disk_to_load[256];
        !            19:        struct lun *l;
        !            20: 
        !            21:        if(j_rdshelves(j, buf)) /* read in shelf names */
        !            22:                return(-1);
        !            23: /*
        !            24:        be careful. due to a prom change the shelf indicator
        !            25:        is now off when IN a drive. so do the drive status AFTER
        !            26:        the shelf status.
        !            27: */
        !            28:        if(j_shstatus(j, buf))  /* get the jukebox status */
        !            29:                return(-1);
        !            30:        if(j_drstatus(j, buf))  /* get the jukebox status */
        !            31:                return(-1);
        !            32:        /* now check which side we want */
        !            33:        n = strlen(vol_id);
        !            34:        strcpy(disk_to_load, vol_id);
        !            35:        if(disk_to_load[n-1] == 'a')
        !            36:                side = SIDEA;
        !            37:        else if(disk_to_load[n-1] == 'b')
        !            38:                side = SIDEB;
        !            39:        else {
        !            40:                sprintf(buf, "vol_id '%s' must end in a or b", vol_id);
        !            41:                return(-1);
        !            42:        }
        !            43:        disk_to_load[n-1] = 0;
        !            44:        /* which shelf is that? */
        !            45:        sh = j_shelfof(j, disk_to_load);
        !            46:        if(sh < 0){
        !            47:                sprintf(buf, "can't find vol_id %s", disk_to_load);
        !            48:                return(-1);
        !            49:        }
        !            50:        while(tlimit >= 0){
        !            51:                for(n = 0; n < j->nluns; n++){
        !            52:                        l = &j->luns[n];
        !            53:                        if(l->shelf == sh){
        !            54:                                if((l->side == side) && (n < j->nworms))
        !            55:                                        return(n);
        !            56:                                if(l->spunup)
        !            57:                                        goto await;
        !            58:                                if(j_dr_to_sh(n, -1, 0, buf))
        !            59:                                        return(-1);
        !            60:                                if(j_drstatus(j, buf))  /* get the jukebox status */
        !            61:                                        return(-1);
        !            62:                                break;
        !            63:                        }
        !            64:                }
        !            65:                /* disk is available */
        !            66:                dr = j_empty_drive(j, tlimit, buf);
        !            67:                if(dr < 0){
        !            68:                        sprintf(buf, "can't find a free drive");
        !            69:                        return(-1);
        !            70:                }
        !            71:                if(j_sh_to_dr(sh, side, dr, buf) < 0)
        !            72:                        return(-1);
        !            73:                return(dr);
        !            74: await:
        !            75:                sleep(10);
        !            76:                tlimit -= 10;
        !            77:                if(j_drstatus(j, buf))  /* get the jukebox status */
        !            78:                        return(-1);
        !            79:        }
        !            80:        sprintf(buf, "disk '%s' busy", disk_to_load);
        !            81:        return(-1);
        !            82: }
        !            83: 
        !            84: static
        !            85: j_empty_drive(Jukebox *j, long tlimit, char *buf)
        !            86: {      
        !            87:        int i, tstop;
        !            88:        
        !            89:        tstop = time((long *)0) + tlimit;
        !            90:        while(time((long *)0) <= tstop){
        !            91:                /* look for empty drives */
        !            92:                for(i = 0; i < j->nworms; i++)
        !            93:                        if(!j->luns[i].occupied)
        !            94:                                return(i);
        !            95:                /* look for spun down drives */
        !            96:                for(i = 0; i < j->nworms; i++){
        !            97:                        if(!j->luns[i].spunup){
        !            98:                                if(j_dr_to_sh(i, -1, SIDEA, buf))
        !            99:                                        return(-1);
        !           100:                                else
        !           101:                                        return(i);
        !           102:                        }
        !           103:                }
        !           104:                sleep(10);
        !           105:                if(j_drstatus(j, buf))  /* get the jukebox status */
        !           106:                        return(-1);
        !           107:        }
        !           108:        return(-1);
        !           109: }

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