Return to windows.c CVS log

Up to [Research Unix] / researchv10no / cmd / pico

Annotation of researchv10no/cmd/pico/windows.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: #include "pico.h"
                      3: 
                      4: extern struct  SRC src[MANY];
                      5: extern short   CUROLD;
                      6: extern int     DEF_LL, DEF_NL;
                      7: 
                      8: getwindow(into, dest)
                      9:        struct SRC *into;
                     10:        char *dest;
                     11: {
                     12:        register char *z = dest + (into->sy)*DEF_LL + (into->sx);
                     13:        register int i;
                     14:        register int w = into->ex - into->sx;
                     15:        register int d = into->ey - into->sy;
                     16:        int ll = into->ll, nl = into->nl;
                     17:        int  x = into->ox,  y = into->oy;
                     18:        int fd = into->fd;
                     19: 
                     20:        lseek(fd, (y*ll + x), 1);
                     21:        for(i = 0; i < d; i++, z += DEF_LL)
                     22:        {       if (!eread(fd, z, w))
                     23:                        break;
                     24:                lseek(fd, ll-w, 1);
                     25:        }
                     26:        lseek(fd, ll-x, 1);
                     27:        lseek(fd, (nl-d-y-1)*ll, 1);
                     28: 
                     29: }
                     30: 
                     31: putwindow(fd, source, x, y, width, depth)
                     32:        char *source;
                     33: {
                     34:   register char *z = source + y*DEF_LL + x;
                     35:   register int i;
                     36: 
                     37:        for (i = 0; i < depth; i++, z += DEF_LL)
                     38:                if (!ewrite(fd, z, width))
                     39:                        break;
                     40: }
                     41: 
                     42: eopen(infile)
                     43:        char *infile;
                     44: { int from;
                     45:        if ((from = open(infile, 0)) <= 0)
                     46:        {       fprintf(stderr, "pico: cannot open %s\n", infile);
                     47:                return 0;
                     48:        }
                     49:        return from;
                     50: }
                     51: 
                     52: eread(n, m, p)
                     53:        char *m;
                     54: { int k;
                     55:        if ((k=read(n, m, p)) != p)
                     56:        {       fprintf(stderr, "pico: read error..wanted %d got %d\n", p, k);
                     57:                return 0;
                     58:        }
                     59:        return 1;
                     60: }
                     61: 
                     62: ewrite(n, m, p)
                     63:        char *m;
                     64: { int k;
                     65:        if ((k=write(n, m, p)) != p)
                     66:        {       fprintf(stderr, "pico: write error..wrote %d iso %d\n", k, p);
                     67:                return 0;
                     68:        }
                     69:        return 1;
                     70: }
                     71: 
                     72: getpix(into, infile)
                     73:        struct SRC *into;
                     74:        char *infile;
                     75: {
                     76:        fprintf(stderr, "reading %s...", into->fname);
                     77:        if (into->incore == 0)
                     78:        {       into->pixred = (unsigned char *) Emalloc(DEF_LL*DEF_NL);
                     79:                if (into->nchan >= 3)
                     80:                {       into->pixgrn = (unsigned char *) Emalloc(DEF_LL*DEF_NL);
                     81:                        into->pixblu = (unsigned char *) Emalloc(DEF_LL*DEF_NL);
                     82:                }
                     83:                into->incore = 1;
                     84:        }
                     85:        if (into->type == PICO || (into->type == DUMP && into->nchan == 1))
                     86:                getfile(into);
                     87:        else {
                     88:                fprintf(stderr, "sorry, unsupported picture format\n");
                     89:                return;
                     90:        }
                     91:        into->incore = 2;
                     92:        fprintf(stderr, "\n");
                     93: }
                     94: 
                     95: getfile(into)
                     96:        struct SRC *into;
                     97: {
                     98:        getwindow(into, into->pixred);
                     99:        if (into->nchan == 1)
                    100:                into->pixgrn = into->pixblu = into->pixred;
                    101:        else
                    102:        {       getwindow(into, into->pixgrn);
                    103:                getwindow(into, into->pixblu);
                    104:        }
                    105: }

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