![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to impv.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / new / X / ximpv|
Return to impv.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / new / X / ximpv |
1.1 ! root 1: /* ! 2: * Copyright (c) 1985 University of Alberta * ! 3: * ! 4: * 'impv' impress (i.e. canon) previewer for a SUN workstation. ! 5: * impv [-p##] [-s] [job# | -n name] ! 6: * where job# is the job number of the troff/dimp processed output suitable ! 7: * for the canon imagen printer. This can be found by executing 'ipq'. The ! 8: * -p## argument sets the number of pages the user will be allowed to ! 9: * backup. The -n name option will cause the users most recent job to ! 10: * be displayed.The human interface for this proram leaves something to be ! 11: * desired ( skip pages, print page number 'n', etc.). ! 12: * The algorithm for crunching glyphs could be improved from the straight ! 13: * forward method used. ! 14: #ifdef COLOR ! 15: * The -s option will cause the output to be sent to the color monitor. Troff ! 16: * Macros .CC and .BG set the background and current color. This option is ! 17: * intended for slide production. ! 18: #endif COLOR ! 19: * ! 20: * This program requires that a 'file server' (used very loosely) ! 21: * exist on the remote host UNIX system. See the code for impvserv. ! 22: * ! 23: * history: ! 24: * ! 25: * The program was written in desparation by: ! 26: * Steven Sutphen ! 27: * University of Alberta ! 28: * Department of Computing Science ! 29: * Edmonton, Alberta T6G 2H1 ! 30: * ihnp4!alberta!steve ! 31: * November 20, 1982 ! 32: * ! 33: * Revised for Sun Work Station: ! 34: * January 1, 1984 Ted Bentley ! 35: * Revised for Color SUN displays: ! 36: * January 1985 Martin Dubetz ! 37: */ ! 38: #ifndef lint ! 39: static char *rcsid_impv_c = "$Header: impv.c,v 10.7 86/11/19 19:27:39 jg Rel $"; ! 40: #endif ! 41: ! 42: #ifdef XWIND ! 43: #include <X/Xlib.h> ! 44: #include <X/Xkeyboard.h> ! 45: #include <sys/types.h> ! 46: #include <strings.h> ! 47: #define min(a,b) ((a) < (b) ? (a) : (b)) ! 48: #define CHUNKSIZE 2048 ! 49: #else XWIND ! 50: #include <pixrect/pixrect_hs.h> ! 51: /* pixrect_hs.h includes sys/types.h */ ! 52: #include <sys/socket.h> ! 53: #endif XWIND ! 54: #include <sys/stat.h> ! 55: #include <sys/file.h> ! 56: #include <stdio.h> ! 57: #include <signal.h> ! 58: #include <netdb.h> ! 59: #include <netinet/in.h> ! 60: #include <sgtty.h> ! 61: ! 62: #include "site.h" ! 63: #include "imPdefs.h" ! 64: #include "imPcodes.h" ! 65: #include "impv.h" ! 66: ! 67: ! 68: char map8_4[256] = { /* map 8 bits to 4bits for pixel compression */ ! 69: 00, 01, 01, 01, 02, 03, 03, 03, 02, 03, 03, 03, 02, 03, 03, 03, ! 70: 04, 05, 05, 05, 06, 07, 07, 07, 06, 07, 07, 07, 06, 07, 07, 07, ! 71: 04, 05, 05, 05, 06, 07, 07, 07, 06, 07, 07, 07, 06, 07, 07, 07, ! 72: 04, 05, 05, 05, 06, 07, 07, 07, 06, 07, 07, 07, 06, 07, 07, 07, ! 73: 010, 011, 011, 011, 012, 013, 013, 013, 012, 013, 013, 013, 012, 013, 013, 013, ! 74: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 75: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 76: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 77: 010, 011, 011, 011, 012, 013, 013, 013, 012, 013, 013, 013, 012, 013, 013, 013, ! 78: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 79: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 80: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 81: 010, 011, 011, 011, 012, 013, 013, 013, 012, 013, 013, 013, 012, 013, 013, 013, ! 82: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 83: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 84: 014, 015, 015, 015, 016, 017, 017, 017, 016, 017, 017, 017, 016, 017, 017, 017, ! 85: }; ! 86: ! 87: #ifdef XWIND ! 88: int Select_mask, maxplus1; ! 89: int forepix, backpix; ! 90: OpaqueFrame win; ! 91: Window Win; /* our window */ ! 92: #define impv_width 15 ! 93: #define impv_height 15 ! 94: static short impv_bits[] = { ! 95: 0x0080, 0x01c0, 0x03e0, 0x06b0, ! 96: 0x0c98, 0x188c, 0x3086, 0x7fff, ! 97: 0x3086, 0x188c, 0x0c98, 0x06b0, ! 98: 0x03e0, 0x01c0, 0x0080}; ! 99: #else XWIND ! 100: struct pixrect *picon, *ptube, *side; ! 101: #endif XWIND ! 102: ! 103: int diameter = 1; ! 104: short pages = SAVE_PAGES; ! 105: char screen_file[32]; ! 106: unsigned char in_buf[512], *in_bufp; ! 107: int ptubew, ptubeh; /* screen window dimensions */ ! 108: struct sgttyb cbreak; /* tty mode bits */ ! 109: int s = 0; /* socket or input file descriptor */ ! 110: int tty; /* tty file descriptor */ ! 111: int screens; /* screen store file descriptor */ ! 112: ! 113: main(argc, argv) ! 114: char **argv; ! 115: { ! 116: struct sockaddr_in sin; ! 117: #ifdef XWIND ! 118: char *display = NULL; ! 119: char *option; ! 120: int reverse = 0; ! 121: int bwidth = 2; ! 122: char *fore_color; ! 123: char *back_color; ! 124: char *brdr_color; ! 125: char *mous_color; ! 126: char *geometry = NULL, def[32]; ! 127: int backmap, bdrmap, mouspix; ! 128: Color cdef; ! 129: #else XWIND ! 130: #ifdef COLOR ! 131: unsigned char r[216],b[216],g[216],tmp[6]; ! 132: register short i,j,k; ! 133: int l; ! 134: register unsigned char *z; ! 135: unsigned char setcolor(); ! 136: #endif COLOR ! 137: extern struct pixrect *pr_open(); ! 138: #endif XWIND ! 139: int pipes[2], id_num = 0, rq; ! 140: char string[100], buf[28]; ! 141: struct hostent *hp; ! 142: struct servent *sp; ! 143: struct stat stat1; ! 144: char *prog = argv[0]; ! 145: ! 146: extern get_out(); ! 147: ! 148: #ifdef XWIND ! 149: if ((option = XGetDefault(argv[0], "ReverseVideo")) && ! 150: strcmp(option, "on") == 0) ! 151: reverse = 1; ! 152: if (option = XGetDefault(argv[0], "BorderWidth")) ! 153: bwidth = atoi(option); ! 154: fore_color = XGetDefault(argv[0], "ForeGround"); ! 155: back_color = XGetDefault(argv[0], "BackGround"); ! 156: brdr_color = XGetDefault(argv[0], "Border"); ! 157: mous_color = XGetDefault(argv[0], "Mouse"); ! 158: #else XWIND ! 159: /* set up the keyboard input */ ! 160: (void)gtty(0, &cbreak); ! 161: cbreak.sg_flags &= ~ECHO; ! 162: cbreak.sg_flags |= CBREAK; ! 163: (void)stty(0, &cbreak); ! 164: cbreak.sg_flags &= ~CBREAK; ! 165: cbreak.sg_flags |= ECHO; ! 166: #endif XWIND ! 167: signal(SIGINT, get_out); ! 168: signal(SIGQUIT, get_out); ! 169: signal(SIGHUP, get_out); ! 170: signal(SIGIOT, get_out); ! 171: ! 172: scr_x = MAXx / 2; /* number of dots on a screen page */ ! 173: wide = (7 + MAXx/2) / 8; /* rounded up to byte for pixrect */ ! 174: scr_y = MAXy / 2; ! 175: scr_d = 1; ! 176: /* calculate the screen size in bytes 2::1 compression */ ! 177: scr_size = (((scr_x + 7) / 8) * scr_y); ! 178: ! 179: for (argv++; --argc; argv++) { ! 180: if (**argv == '-'){ ! 181: switch (argv[0][1]){ ! 182: #ifndef NOSPOOL ! 183: case 'n': ! 184: if (pipe(pipes)) { ! 185: fprintf(stderr, "pipe mistake\n"); ! 186: get_out(); ! 187: } ! 188: if (fork() == 0){ ! 189: /*child*/ ! 190: (void)close(1); ! 191: (void)dup(pipes[1]); ! 192: (void)sprintf(string, "echo `ipq | grep %s | awk ' {print $3}'| sort -rn | head -1 `", *++argv); ! 193: (void)system(string); ! 194: exit(0); ! 195: } ! 196: /* parent */ ! 197: while (read(pipes[0], buf, 20) <= 0); ! 198: id_num = atoi(buf); ! 199: argv++; ! 200: argc--; ! 201: break; ! 202: case 'r': ! 203: rq = 1; ! 204: break; ! 205: #endif NOSPOOL ! 206: case 'p': ! 207: pages = atoi( &argv[0][2] ); ! 208: if (pages < 0) pages = 0; ! 209: break; ! 210: #ifdef COLOR ! 211: case 's': ! 212: slide = 1; ! 213: scr_x = MAXx / 3; ! 214: scr_y = MAXy / 3; ! 215: scr_d = 8; ! 216: scr_size = scr_x * scr_y; ! 217: bc.red = 0; ! 218: bc.blue = 255; ! 219: bc.green = 0; ! 220: cc.red = 255; ! 221: cc.blue = 255; ! 222: cc.green = 255; ! 223: break; ! 224: #endif COLOR ! 225: default: ! 226: #ifdef XWIND ! 227: if (strcmp(*argv, "-rv") == 0) { ! 228: reverse = 1; ! 229: break; ! 230: } else if (strcmp(*argv, "-fg") == 0 && argc) { ! 231: argv++; ! 232: argc--; ! 233: fore_color = *argv; ! 234: break; ! 235: } else if (strcmp(*argv, "-bg") == 0 && argc) { ! 236: argv++; ! 237: argc--; ! 238: back_color = *argv; ! 239: break; ! 240: } else if (strcmp(*argv, "-bd") == 0 && argc) { ! 241: argv++; ! 242: argc--; ! 243: brdr_color = *argv; ! 244: break; ! 245: } else if (strcmp(*argv, "-ms") == 0 && argc) { ! 246: argv++; ! 247: argc--; ! 248: mous_color = *argv; ! 249: break; ! 250: } ! 251: #endif XWIND ! 252: (void)usage(); ! 253: get_out(); ! 254: } ! 255: } ! 256: else { ! 257: #ifdef XWIND ! 258: if (index(*argv, ':') != NULL) ! 259: display = *argv; ! 260: else if (argv[0][0] == '=') { ! 261: geometry = argv[0]; ! 262: } ! 263: ! 264: else ! 265: #endif XWIND ! 266: #ifdef NOSPOOL ! 267: if((s = open(*argv, O_RDONLY)) <= 0){ ! 268: fprintf(stderr,"can't open file\n"); ! 269: exit(0); ! 270: } ! 271: #else NOSPOOL ! 272: id_num = atoi(*argv); ! 273: #endif NOSPOOL ! 274: } ! 275: } ! 276: #ifdef NOSPOOL ! 277: /* set up tty for piped input situation*/ ! 278: if(s == 0) { ! 279: s = dup(0); ! 280: close(0); ! 281: tty = open("/dev/tty",O_RDONLY); ! 282: fstat(s, &stat1); ! 283: if( (stat1.st_mode>>12) == 02 ) ! 284: (void)usage(); ! 285: } ! 286: #else NOSPOOL ! 287: if(id_num == 0) (void)usage(); ! 288: #endif NOSPOOL ! 289: ! 290: /* get the file for screen pages */ ! 291: if (pages) { ! 292: strcpy(screen_file, SCREEN_FILE); ! 293: mktemp(screen_file); ! 294: if ((screens = creat(screen_file, 0666)) <= 0){ ! 295: fprintf(stderr, "couldn't create: %s\n", screen_file); ! 296: get_out(); ! 297: } ! 298: (void)close(screens); ! 299: if ((screens = open(screen_file, 2)) <= 0){ ! 300: fprintf(stderr, "couldn't reopen: %s\n", screen_file); ! 301: get_out(); ! 302: } ! 303: } ! 304: ! 305: #ifndef NOSPOOL ! 306: /*open up the network to get file from remote host */ ! 307: sp = getservbyname(P_SERV, "tcp"); ! 308: hp = gethostbyname(REMOTE_HOST); ! 309: if (hp == NULL) { ! 310: fprintf(stderr, "impv: nohost - %s\n", REMOTE_HOST); ! 311: get_out(); ! 312: } ! 313: bzero((char *)&sin, sizeof (sin)); ! 314: bcopy(hp->h_addr, (char *)&sin.sin_addr, hp->h_length); ! 315: sin.sin_family = hp->h_addrtype; ! 316: sin.sin_port = sp->s_port; ! 317: s = socket(AF_INET, SOCK_STREAM, 0); ! 318: if (s < 0) { ! 319: perror("impv: socket"); ! 320: get_out(); ! 321: } ! 322: (void)setsockopt(s, SOL_SOCKET, SO_KEEPALIVE, 0, 0); ! 323: if (connect(s, (char *)&sin, sizeof (sin)) < 0) { ! 324: perror("impv: connect"); ! 325: get_out(); ! 326: } ! 327: /* write the ipd file name to remote_host */ ! 328: (void)sprintf(string, "P%c%03d", rq ? 'r' : 'n', id_num); ! 329: (void)write(s, string, strlen(string)); ! 330: #endif NOSPOOL ! 331: ! 332: in_bufp = in_buf; ! 333: family[0] = font0; ! 334: inicodes(); ! 335: ! 336: #ifdef XWIND ! 337: if (!XOpenDisplay(display)) { ! 338: fprintf(stderr, "%s: Can't open display '%s'\n", ! 339: prog, XDisplayName(display)); ! 340: exit(1); ! 341: } ! 342: if (reverse) { ! 343: forepix = WhitePixel; ! 344: backpix = BlackPixel; ! 345: backmap = BlackPixmap; ! 346: bdrmap = WhitePixmap; ! 347: mouspix = WhitePixel; ! 348: } else { ! 349: forepix = BlackPixel; ! 350: backpix = WhitePixel; ! 351: backmap = WhitePixmap; ! 352: bdrmap = BlackPixmap; ! 353: mouspix = BlackPixel; ! 354: } ! 355: if (DisplayCells() > 2) { ! 356: if (fore_color && XParseColor(fore_color, &cdef) && ! 357: XGetHardwareColor(&cdef)) ! 358: forepix = cdef.pixel; ! 359: if (back_color && XParseColor(back_color, &cdef) && ! 360: XGetHardwareColor(&cdef)) { ! 361: backpix = cdef.pixel; ! 362: backmap = XMakeTile(backpix); ! 363: } ! 364: if (brdr_color && XParseColor(brdr_color, &cdef) && ! 365: XGetHardwareColor(&cdef)) ! 366: bdrmap = XMakeTile(cdef.pixel); ! 367: if (mous_color && XParseColor(mous_color, &cdef) && ! 368: XGetHardwareColor(&cdef)) ! 369: mouspix = cdef.pixel; ! 370: } ! 371: win.bdrwidth = bwidth; ! 372: win.border = bdrmap; ! 373: win.background = backmap; ! 374: ! 375: sprintf(def, "=%dx%d+0+0", DisplayWidth() - (bwidth << 1), ! 376: DisplayHeight() - (bwidth << 1)); ! 377: Win = XCreate ( ! 378: "Imagen Previewer", argv[0], geometry, def, &win, 200, 200); ! 379: XSetResizeHint(Win, 100, 100, 1, 1); ! 380: XMapWindow (Win); ! 381: ptubew = win.width; ! 382: /* crock around crock */ ! 383: if ((DisplayType() == XDEV_QDSS) && (bwidth < 4)) ! 384: ptubew &= ~7; ! 385: if (ptubew > scr_x) ! 386: ptubew = scr_x; ! 387: ptubeh = win.height; ! 388: if (ptubeh > scr_y) ! 389: ptubeh = scr_y; ! 390: ! 391: XSelectInput (Win, KeyPressed|ButtonPressed|ExposeRegion|ExposeCopy); ! 392: XDefineCursor(Win, ! 393: XCreateCursor(impv_width, impv_height, impv_bits, impv_bits, ! 394: 7, 7, mouspix, backpix, GXcopy)); ! 395: XSync(0); ! 396: Select_mask = 1 << dpyno(); ! 397: maxplus1 = 1 + dpyno(); ! 398: #else XWIND ! 399: /* set up the raster pixrect functions */ ! 400: if( slide ) { ! 401: #ifdef COLOR ! 402: ptube = pr_open("/dev/cgone0"); ! 403: tmp[0] = 0; ! 404: tmp[1] = 130; ! 405: tmp[2] = 180; ! 406: tmp[3] = 210; ! 407: tmp[4] = 235; ! 408: tmp[5] = 255; ! 409: l = 0; ! 410: for( i = 0; i < 6; i++ ) ! 411: for( j = 0; j < 6; j++ ) ! 412: for( k = 0; k < 6; k++ ) { ! 413: r[l] = tmp[i]; ! 414: g[l] = tmp[j]; ! 415: b[l++] = tmp[k]; ! 416: } ! 417: ! 418: pr_putcolormap(ptube,0,216,r,g,b); ! 419: #endif COLOR ! 420: } ! 421: else ! 422: ptube = pr_open("/dev/fb"); ! 423: pscreen = mem_create(scr_x, scr_y, scr_d); ! 424: #ifdef COLOR ! 425: if( slide ) { ! 426: backcolor = setcolor(0); ! 427: z = (unsigned char *)(mpr_d(pscreen)->md_image); ! 428: for (l = scr_size; l--; ) *z++ = backcolor; ! 429: } ! 430: #endif COLOR ! 431: picon = mem_create(46, 53, scr_d); ! 432: side = mem_create(ptubew-scr_x, ptubeh, scr_d); ! 433: ptubew = ptube->pr_size.x; ! 434: ptubeh = ptube->pr_size.y; ! 435: #endif XWIND ! 436: ! 437: dofile(); ! 438: (void)write(s, string, strlen(string)); ! 439: get_out(); ! 440: } ! 441: ! 442: #ifdef XWIND ! 443: unsigned char rot8[] = { ! 444: 0x00, 0x80, 0x40, 0xc0, 0x20, 0xa0, 0x60, 0xe0, ! 445: 0x10, 0x90, 0x50, 0xd0, 0x30, 0xb0, 0x70, 0xf0, ! 446: 0x08, 0x88, 0x48, 0xc8, 0x28, 0xa8, 0x68, 0xe8, ! 447: 0x18, 0x98, 0x58, 0xd8, 0x38, 0xb8, 0x78, 0xf8, ! 448: 0x04, 0x84, 0x44, 0xc4, 0x24, 0xa4, 0x64, 0xe4, ! 449: 0x14, 0x94, 0x54, 0xd4, 0x34, 0xb4, 0x74, 0xf4, ! 450: 0x0c, 0x8c, 0x4c, 0xcc, 0x2c, 0xac, 0x6c, 0xec, ! 451: 0x1c, 0x9c, 0x5c, 0xdc, 0x3c, 0xbc, 0x7c, 0xfc, ! 452: 0x02, 0x82, 0x42, 0xc2, 0x22, 0xa2, 0x62, 0xe2, ! 453: 0x12, 0x92, 0x52, 0xd2, 0x32, 0xb2, 0x72, 0xf2, ! 454: 0x0a, 0x8a, 0x4a, 0xca, 0x2a, 0xaa, 0x6a, 0xea, ! 455: 0x1a, 0x9a, 0x5a, 0xda, 0x3a, 0xba, 0x7a, 0xfa, ! 456: 0x06, 0x86, 0x46, 0xc6, 0x26, 0xa6, 0x66, 0xe6, ! 457: 0x16, 0x96, 0x56, 0xd6, 0x36, 0xb6, 0x76, 0xf6, ! 458: 0x0e, 0x8e, 0x4e, 0xce, 0x2e, 0xae, 0x6e, 0xee, ! 459: 0x1e, 0x9e, 0x5e, 0xde, 0x3e, 0xbe, 0x7e, 0xfe, ! 460: 0x01, 0x81, 0x41, 0xc1, 0x21, 0xa1, 0x61, 0xe1, ! 461: 0x11, 0x91, 0x51, 0xd1, 0x31, 0xb1, 0x71, 0xf1, ! 462: 0x09, 0x89, 0x49, 0xc9, 0x29, 0xa9, 0x69, 0xe9, ! 463: 0x19, 0x99, 0x59, 0xd9, 0x39, 0xb9, 0x79, 0xf9, ! 464: 0x05, 0x85, 0x45, 0xc5, 0x25, 0xa5, 0x65, 0xe5, ! 465: 0x15, 0x95, 0x55, 0xd5, 0x35, 0xb5, 0x75, 0xf5, ! 466: 0x0d, 0x8d, 0x4d, 0xcd, 0x2d, 0xad, 0x6d, 0xed, ! 467: 0x1d, 0x9d, 0x5d, 0xdd, 0x3d, 0xbd, 0x7d, 0xfd, ! 468: 0x03, 0x83, 0x43, 0xc3, 0x23, 0xa3, 0x63, 0xe3, ! 469: 0x13, 0x93, 0x53, 0xd3, 0x33, 0xb3, 0x73, 0xf3, ! 470: 0x0b, 0x8b, 0x4b, 0xcb, 0x2b, 0xab, 0x6b, 0xeb, ! 471: 0x1b, 0x9b, 0x5b, 0xdb, 0x3b, 0xbb, 0x7b, 0xfb, ! 472: 0x07, 0x87, 0x47, 0xc7, 0x27, 0xa7, 0x67, 0xe7, ! 473: 0x17, 0x97, 0x57, 0xd7, 0x37, 0xb7, 0x77, 0xf7, ! 474: 0x0f, 0x8f, 0x4f, 0xcf, 0x2f, 0xaf, 0x6f, 0xef, ! 475: 0x1f, 0x9f, 0x5f, 0xdf, 0x3f, 0xbf, 0x7f, 0xff ! 476: }; ! 477: ! 478: static short current_page = -1; ! 479: static short current_x = -1; ! 480: #endif XWIND ! 481: ! 482: ppause() ! 483: { ! 484: short y = 0; ! 485: short x; ! 486: register int c, i; ! 487: register unsigned char *z, *scptr; ! 488: #ifdef COLOR ! 489: unsigned char setcolor(); ! 490: #endif COLOR ! 491: ! 492: #ifdef XWIND ! 493: short current_y = 0; ! 494: int select_mask; ! 495: XEvent event; ! 496: scptr = pscreen; ! 497: for (i = sizeof pscreen; i--; scptr++) *scptr = rot8[*scptr]; ! 498: winker(); ! 499: scptr = pscreen; ! 500: winker(); ! 501: #else XWIND ! 502: scptr = (unsigned char *)(mpr_d(pscreen)->md_image); ! 503: #endif XWIND ! 504: if (current_x < 0) ! 505: if((current_x = (scr_x - ptubew)/2) < 0) current_x = 0; ! 506: x = current_x; ! 507: /*write the screen */ ! 508: while(1) { ! 509: #ifdef XWIND ! 510: if (page == current_page && x == current_x && ! 511: y < current_y && y + ptubeh > current_y) { ! 512: int delta = current_y - y; ! 513: XMoveArea(Win, 0, 0, 0, delta, ptubew, ptubeh - delta); ! 514: BitsPut(x, y, 0, 0, ptubew, delta); ! 515: } else if (page == current_page && x == current_x && ! 516: y > current_y && current_y + ptubeh > y) { ! 517: int delta = y - current_y; ! 518: XMoveArea(Win, 0, delta, 0, 0, ptubew, ptubeh - delta); ! 519: BitsPut(x, y + ptubeh - delta, 0, ptubeh - delta, ! 520: ptubew, delta); ! 521: } else if (page == current_page && y == current_y && ! 522: x < current_x && x + ptubew > current_x) { ! 523: int delta = current_x - x; ! 524: XMoveArea(Win, 0, 0, delta, 0, ptubew - delta, ptubeh); ! 525: BitsPut(x, y, 0, 0, delta, ptubeh); ! 526: } else if (page == current_page && y == current_y && ! 527: x > current_x && current_x + ptubew > x) { ! 528: int delta = x - current_x; ! 529: XMoveArea(Win, delta, 0, 0, 0, ptubew - delta, ptubeh); ! 530: BitsPut(x + ptubew - delta, y, ptubew - delta, 0, ! 531: delta, ptubeh); ! 532: } else if (y != current_y || x != current_x || ! 533: page != current_page) ! 534: BitsPut(x, y, 0, 0, min(scr_x - x, ptubew), ! 535: min(scr_y - y, ptubeh)); ! 536: current_y = y; ! 537: current_x = x; ! 538: current_page = page; ! 539: XFlush(); ! 540: select_mask = Select_mask; ! 541: if (select(maxplus1, &select_mask, NULL, NULL, 0) < 0) exit(1); ! 542: if (!(select_mask & Select_mask)) continue; ! 543: XPending(); ! 544: do { ! 545: XNextEvent (&event); ! 546: switch (event.type) { ! 547: case ExposeWindow: ! 548: ptubeh = ((XExposeEvent *)(&event))->height; ! 549: ptubew = ((XExposeEvent *)(&event))->width; ! 550: case ExposeRegion: { ! 551: short ex = ((XExposeEvent *)(&event))->x; ! 552: short ew = ((XExposeEvent *)(&event))->width; ! 553: short ey = ((XExposeEvent *)(&event))->y; ! 554: short eh = ((XExposeEvent *)(&event))->height; ! 555: BitsPut(x + ex, y + ey, ex, ey, ! 556: min(scr_x - (x + ex), ew), ! 557: min(scr_y - (y + ey), eh)); ! 558: continue; ! 559: } ! 560: case ExposeCopy: ! 561: continue; ! 562: case ButtonPressed: ! 563: { ! 564: short detail = ((XButtonPressedEvent *) (&event))->detail; ! 565: switch (detail & ValueMask) { ! 566: case LeftButton: if (detail & ShiftMask) ! 567: c = 'l'; ! 568: else ! 569: c = 'u'; ! 570: break; ! 571: case MiddleButton: if (detail & ShiftMask) { ! 572: if (x < scr_x - (x + ptubew)) ! 573: c = '6'; ! 574: else ! 575: c = '4'; ! 576: } else { ! 577: if (y < scr_y - (y + ptubeh)) ! 578: c = '3'; ! 579: else ! 580: c = '9'; ! 581: } ! 582: break; ! 583: case RightButton: if (detail & ShiftMask) ! 584: c = 'r'; ! 585: else ! 586: c = 'd'; ! 587: break; ! 588: } ! 589: break; ! 590: } ! 591: case KeyPressed: ! 592: switch ((((XKeyPressedEvent *) (&event))->detail) & ValueMask) { ! 593: case KC_E5: c = '-'; break; /* prev screen */ ! 594: case KC_E6: c = '+'; break; /* next screen */ ! 595: case KC_CURSOR_UP: c = 'u'; break; /* prev screen */ ! 596: case KC_CURSOR_DOWN: c = 'd'; break; /* next screen */ ! 597: case KC_CURSOR_LEFT: c = '<'; break; /* left screen */ ! 598: case KC_CURSOR_RIGHT: c = '>'; break; /* right screen */ ! 599: case KC_KEYPAD_0: c = '0'; break; /* R0 */ ! 600: case KC_KEYPAD_PERIOD: c = '.'; break; /* R. */ ! 601: case KC_KEYPAD_COMMA: c = ','; break; /* R, */ ! 602: case KC_KEYPAD_1: c = '1'; break; /* R1 */ ! 603: case KC_KEYPAD_2: c = '2'; break; /* R2 */ ! 604: case KC_KEYPAD_3: c = '3'; break; /* R3 */ ! 605: case KC_KEYPAD_4: c = '4'; break; /* R4 */ ! 606: case KC_KEYPAD_5: c = '5'; break; /* R5 */ ! 607: case KC_KEYPAD_6: c = '6'; break; /* R6 */ ! 608: case KC_KEYPAD_7: c = '7'; break; /* R7 */ ! 609: case KC_KEYPAD_8: c = '8'; break; /* R8 */ ! 610: case KC_KEYPAD_9: c = '9'; break; /* R9 */ ! 611: case KC_KEYPAD_MINUS: c = '-'; break; /* R- */ ! 612: ! 613: default: ! 614: { ! 615: char *string; ! 616: int nbytes; ! 617: string = XLookupMapping (&event, &nbytes); ! 618: if (nbytes == 1) ! 619: c = *string; ! 620: else ! 621: continue; ! 622: } ! 623: } ! 624: } ! 625: #else XWIND ! 626: /* adjust place of page on screen so it is centered */ ! 627: /* will clip the edges of imagen300 pages */ ! 628: pr_rop(ptube, 0, 0, ptubew, ptubeh, PIX_SRC, pscreen, x, y); ! 629: if( !slide ) { ! 630: pr_rop(ptube, scr_x, 0, 4, ptubeh, PIX_NOT(PIX_SRC), ! 631: side, 0, 0); ! 632: page_icon(y); ! 633: } ! 634: /* have a look */ ! 635: c = getchar(); ! 636: if( c == 033 ){ /* fixup for SUN 120 keypad */ ! 637: c = getchar(); ! 638: if(c == '[') c = getchar(); ! 639: if(c == '2') c = getchar(); ! 640: if(c == '2'){ ! 641: c = getchar() + 1; ! 642: (void) getchar(); ! 643: } ! 644: else if(c == '1'){ ! 645: c = getchar() + 3; ! 646: (void) getchar(); ! 647: } ! 648: } ! 649: #endif XWIND ! 650: switch(c){ ! 651: case 04: ! 652: case 03: ! 653: return(-1); /* quit on EOF or ^C */ ! 654: case '1': ! 655: y++; ! 656: break; ! 657: case '7': ! 658: y--; ! 659: break; ! 660: case 0102: ! 661: case '2': ! 662: y += 65; ! 663: break; ! 664: case 0101: ! 665: case '8': ! 666: y -= 65; ! 667: break; ! 668: case '3': ! 669: y = scr_y - ptubeh -1; ! 670: break; ! 671: case '9': ! 672: y = 0; ! 673: break; ! 674: case '4': ! 675: x = 0; ! 676: break; ! 677: case '5': ! 678: if((x = (scr_x - ptubew)/2) < 0) x = 0; ! 679: break; ! 680: case '6': ! 681: if((x = scr_x - ptubew) < 0) x = 0; ! 682: break; ! 683: case '<': ! 684: x -= 65; ! 685: break; ! 686: case '>': ! 687: x += 65; ! 688: break; ! 689: case 'l': ! 690: x -= ptubew; ! 691: break; ! 692: case 'r': ! 693: x += ptubew; ! 694: break; ! 695: case 'd': ! 696: if (y < scr_y - 1 - ptubeh) { ! 697: y += ptubeh; ! 698: break; ! 699: } ! 700: /* falls into */ ! 701: case '.': ! 702: if (pages && page != finish) { ! 703: page = (page +1)%pages; ! 704: (void)lseek(screens, scr_size * page, 0); ! 705: (void)read(screens, scptr, scr_size); ! 706: y = 0; ! 707: break; ! 708: } ! 709: /* falls into */ ! 710: case '+': ! 711: case ',': ! 712: if (pages && page == finish) { ! 713: (void)lseek(screens, scr_size * page, 0); ! 714: (void)write(screens, scptr, scr_size); ! 715: } ! 716: if (pages){ ! 717: page = finish = (finish +1)%pages; ! 718: if(start == finish) start = (start + 1)%pages; ! 719: } ! 720: /*blank the memory where screen image is built*/ ! 721: z=scptr; ! 722: for (i=scr_size;i--;) *z++ = backcolor; ! 723: return(0); ! 724: case 'u': ! 725: if (y > 0) { ! 726: y -= ptubeh; ! 727: break; ! 728: } ! 729: /* falls into */ ! 730: case '-': ! 731: if (pages == 0 || page == start) { ! 732: #ifndef XWIND ! 733: if (y == 0) ! 734: fprintf(stderr, "can not back up more\n"); ! 735: #endif XWIND ! 736: y = 0; ! 737: }else{ ! 738: if(page == finish) { ! 739: (void)lseek(screens, scr_size * page, 0); ! 740: (void)write(screens, scptr, scr_size); ! 741: } ! 742: page = (page==0? (pages-1):(page -1))%pages; ! 743: (void)lseek(screens, scr_size * page, 0); ! 744: (void)read(screens, scptr, scr_size); ! 745: if (c == '-') ! 746: y = 0; ! 747: else ! 748: y = scr_y - 1 - ptubeh; ! 749: } ! 750: break; ! 751: default: ! 752: break; ! 753: } ! 754: if (x < 0) x = 0; ! 755: else if (x >= scr_x - ptubew) x = scr_x - 1 - ptubew; ! 756: if (y < 0) y = 0; ! 757: else if (y >= scr_y - ptubeh) y = scr_y - 1 - ptubeh; ! 758: #ifdef XWIND ! 759: } while (QLength() > 0); ! 760: #endif ! 761: } ! 762: } ! 763: ! 764: /* get a character from the input file */ ! 765: gc() ! 766: { ! 767: static int len = 0; ! 768: ! 769: if(macro_on == TRUE) { ! 770: /* macro in effect read from its code*/ ! 771: if(macro_length == macro_count+1) macro_on = FALSE; ! 772: return(mp[macro_count++]); ! 773: } ! 774: else { ! 775: /*read from the input file */ ! 776: if(in_bufp <= &in_buf[len-1]) { ! 777: return(*in_bufp++); ! 778: } ! 779: len = read(s, in_buf, 512); ! 780: if(len == 0) { ! 781: fprintf(stderr,"No such job\n"); ! 782: (void)fflush(stderr); ! 783: get_out(); ! 784: } ! 785: else if(len < 0) { ! 786: perror("impv: read failed"); ! 787: get_out(); ! 788: } ! 789: ! 790: in_bufp = in_buf; ! 791: winker(); ! 792: return(*in_bufp++); ! 793: } ! 794: } ! 795: ! 796: get_out() ! 797: { ! 798: /*reset keyboard*/ ! 799: #ifdef XWIND ! 800: XDestroyWindow (Win); ! 801: #else XWIND ! 802: (void)stty(0, &cbreak); ! 803: if(pscreen != NULL) pr_close(pscreen); ! 804: if(ptube != NULL) pr_close(ptube); ! 805: printf("\n"); ! 806: #endif XWIND ! 807: if(big || little) ! 808: printf("%d pixels/glyphs/lines would be off the page\n", ! 809: big + little); ! 810: if (screens && unlink(screen_file) < 0) ! 811: printf("%s not removed\n", screen_file); ! 812: exit(0); ! 813: } ! 814: ! 815: winker() ! 816: { ! 817: #ifdef XWIND ! 818: XPixFill(Win, ptubew / 2 - 8, ptubeh - 50, 16, 16, 0, NULL, GXinvert, 1); ! 819: XFlush(); ! 820: #else XWIND ! 821: pr_rop(ptube, 450, 780, 16, 16, PIX_NOT(PIX_SRC), NULL, 0, 0); ! 822: #endif XWIND ! 823: } ! 824: ! 825: #ifdef XWIND ! 826: unsigned char outbuf[CHUNKSIZE]; ! 827: ! 828: BitsPut (srcx, srcy, dstx, dsty, width, height) ! 829: int srcx, srcy, dstx, dsty, width, height; ! 830: { ! 831: register unsigned char *data, *ptr; ! 832: register int i, per, delta; ! 833: int linesize; ! 834: ! 835: linesize = (scr_x + 7) >> 3; ! 836: dstx -= (srcx & 7); ! 837: width += (srcx & 7); ! 838: srcx &= ~7; ! 839: data = &pscreen[(srcy*linesize) + (srcx>>3)]; ! 840: ! 841: per = BitmapSize(width, 1); ! 842: delta = CHUNKSIZE / per; ! 843: ! 844: while (height) { ! 845: if (height < delta) ! 846: delta = height; ! 847: for (ptr = outbuf, i = delta; ! 848: --i >= 0; ! 849: data += linesize, ptr += per) ! 850: bcopy(data, ptr, per); ! 851: XBitmapBitsPut(Win, dstx, dsty, width, delta, outbuf, ! 852: forepix, backpix, NULL, GXcopy, AllPlanes); ! 853: dsty += delta; ! 854: height -= delta; ! 855: } ! 856: } ! 857: #endif XWIND ! 858: ! 859: #ifndef XWIND ! 860: page_icon(y) ! 861: int y; ! 862: { ! 863: int h, i; ! 864: ! 865: i = 43 * ptubeh / scr_y; ! 866: pr_rop(picon, 0 , 0, 46, 53, PIX_NOT(PIX_SRC), NULL, 0, 0); ! 867: pr_rop(picon, 2 , 2, 42, 49, PIX_CLR, NULL, 0, 0); ! 868: pr_rop(picon, 6 , 4, 34, 45, PIX_NOT(PIX_SRC), NULL, 0, 0); ! 869: h = 44 * y / scr_y; ! 870: pr_rop(picon, 5, 5+h, 36, i, PIX_NOT(PIX_SRC), picon, 5, 5+h); ! 871: pr_rop(ptube, ptubew-46, ptubeh/2, 46, 53, PIX_SRC, picon, 0, 0); ! 872: } ! 873: #endif ! 874: ! 875: #ifdef COLOR ! 876: /* ! 877: set color ! 878: */ ! 879: unsigned char ! 880: setcolor(code) ! 881: register short int code; ! 882: { ! 883: register unsigned char color; ! 884: register float c1,c2; ! 885: ! 886: c1 = (float)(5 - code) / 255.; ! 887: c2 = (float)code / 255.; ! 888: color = 36 * ((int)(bc.red * c1 + .5) + (int)(cc.red * c2 + .5)) ! 889: + 6 * ((int)(bc.green * c1 + .5) + (int)(cc.green * c2 + .5)) ! 890: + ((int)(bc.blue * c1 + .5) + (int)(cc.blue * c2 + .5)); ! 891: return(color); ! 892: } ! 893: #endif COLOR ! 894: ! 895: usage() ! 896: { ! 897: #ifdef NOSPOOL ! 898: #ifdef COLOR ! 899: printf("usage: impv [-p#] [-s] [file]\n"); ! 900: #else COLOR ! 901: #ifdef XWIND ! 902: printf("usage: ximpv [=<geometry>] [-p#] [-rv] [-fg <color>] [-bg <color>] [-bd <color>] [-ms <color>] [host:display] [file]\n"); ! 903: #else XWIND ! 904: printf("usage: impv [-p#] [file]\n"); ! 905: #endif XWIND ! 906: #endif COLOR ! 907: (void)fflush(stdout); ! 908: exit(0); ! 909: #else NOSPOOL ! 910: #ifdef COLOR ! 911: printf("usage: impv [-p#] [-s] [-r] [idnumber | -n name]\n"); ! 912: #else COLOR ! 913: printf("usage: impv [-p#] [-r] [idnumber | -n name]\n"); ! 914: #endif COLOR ! 915: (void)fflush(stdout); ! 916: get_out(); ! 917: #endif NOSPOOL ! 918: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.