/* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % X X TTTTT OOO PPPP SSSSS % % X X T O O P P S % % X T O O PPPP SSS % % X X T O O P S % % X X T OOO P SSSSS % % % % % % Import X11 image to a Postscript format. % % % % % % Software Design % % John Cristy % % July 1992 % % % % % % Copyright 1992 E. I. du Pont de Nemours & Company % % % % Permission to use, copy, modify, distribute, and sell this software and % % its documentation for any purpose is hereby granted without fee, % % provided that the above Copyright notice appear in all copies and that % % both that Copyright notice and this permission notice appear in % % supporting documentation, and that the name of E. I. du Pont de Nemours % % & Company not be used in advertising or publicity pertaining to % % distribution of the software without specific, written prior % % permission. E. I. du Pont de Nemours & Company makes no representations % % about the suitability of this software for any purpose. It is provided % % "as is" without express or implied warranty. % % % % E. I. du Pont de Nemours & Company disclaims all warranties with regard % % to this software, including all implied warranties of merchantability % % and fitness, in no event shall E. I. du Pont de Nemours & Company be % % liable for any special, indirect or consequential damages or any % % damages whatsoever resulting from loss of use, data or profits, whether % % in an action of contract, negligence or other tortious action, arising % % out of or in connection with the use or performance of this software. % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % XtoPS is an X Window System window dumping utility. XtoPS reads an % image from any visible window on an X server and outputs it to an % encapsulated Postscript file. You can view this file with any % Postscript compatible viewer or printer. The image is displayed in % color on viewers or printers that support color Postscript, otherwise % it is displayed as grayscale. The target window can be specified by id % or name or be selected by clicking the mouse in the desired window. % The keyboard bell is rung once at the beginning of the dump and twice % when the dump is completed. % % The XtoPS program command syntax is: % % Usage: XtoPS [options ...] file % % Where options include: % -border include image borders in the output image % -delay seconds pause before selecting target window % -display server X server to contact % -frame include window manager frame % -geometry geometry preferred size and location of the image % -monochrome transform image to black and white % -rotate degrees apply Paeth rotation to the image % -scale geometry preferred size factors of the image % -screen select image from root window % -verbose print detailed information about the image % -window id select window with this id or name % % Change '-' to '+' in any option above to reverse its effect. % For example, +frame means do not window manager frame. % % Specify 'file' as '-' for standard input or output. % % */ /* Include declarations. */ #include "display.h" #include "image.h" #include "alien.h" #include "X.h" /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % E r r o r % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Function Error displays an error message and then terminates the program. % % The format of the Error routine is: % % Error(message,qualifier) % % A description of each parameter follows: % % o message: Specifies the message to display before terminating the % program. % % o qualifier: Specifies any qualifier to the message. % % */ void Error(message,qualifier) char *message, *qualifier; { (void) fprintf(stderr,"%s: %s",application_name,message); if (qualifier != (char *) NULL) (void) fprintf(stderr," (%s)",qualifier); (void) fprintf(stderr,".\n"); exit(1); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % U s a g e % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Procedure Usage displays the program usage; % % The format of the Usage routine is: % % Usage(message) % % A description of each parameter follows: % % message:Specifies a specific message to display to the user. % */ static void Usage(message) char *message; { char **p; static char *options[]= { "-border include image borders in the output image", "-delay seconds pause before selecting target window", "-display server X server to contact", "-frame include window manager frame", "-geometry geometry preferred size and location of the image", "-monochrome transform image to black and white", "-rotate degrees apply Paeth rotation to the image", "-scale geometry preferred size factors of the image", "-screen select image from root window", "-verbose print detailed information about the image", "-window id select window with this id or name", (char *) NULL }; if (message != (char *) NULL) (void) fprintf(stderr,"Can't continue, %s.\n\n",message); (void) fprintf(stderr,"Usage: %s [options ...] file\n",application_name); (void) fprintf(stderr,"\nWhere options include:\n"); for (p=options; *p != (char *) NULL; p++) (void) fprintf(stderr," %s\n",*p); (void) fprintf(stderr, "\nChange '-' to '+' in any option above to reverse its effect.\n"); (void) fprintf(stderr, "For example, +frame means do not include window manager frame.\n"); (void) fprintf(stderr,"\nSpecify 'file' as '-' for standard output.\n"); exit(1); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % M a i n % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % */ int main(argc,argv) int argc; char *argv[]; { char *filename, *image_geometry, *option, *resource_value, *scale_geometry, *server_name, *target_window; Display *display; Image *image; int degrees, i, x; long start_time; unsigned int borders, delay, frame, monochrome, screen, verbose; XrmDatabase resource_database, server_database; /* Display usage profile if there are no command line arguments. */ application_name=(*argv); if (argc < 2) Usage((char *) NULL); /* Connect to X server. */ server_name=(char *) NULL; for (i=1; i < argc; i++) { /* Check command line for server name. */ option=argv[i]; if ((strlen(option) > 1) && ((*option == '-') || (*option == '+'))) if (strncmp("dis",option+1,3) == 0) { /* User specified server name. */ i++; if (i == argc) Usage("missing server name on -display"); server_name=argv[i]; break; } } display=XOpenDisplay(server_name); if (display == (Display *) NULL) Error("unable to connect to X server",XDisplayName(server_name)); /* Set our forgiving error handler. */ XSetErrorHandler(XError); /* Initialize resource database. */ XrmInitialize(); resource_database=XrmGetDatabase(display); resource_value=XResourceManagerString(display); if (resource_value == (char *) NULL) resource_value=""; server_database=XrmGetStringDatabase(resource_value); XrmMergeDatabases(server_database,&resource_database); /* Get user defaults from X resource database. */ resource_value=XGetResource(resource_database,application_name,"borders", (char *) NULL,"False"); borders=IsTrue(resource_value); resource_value=XGetResource(resource_database,application_name,"delay", (char *) NULL,"0"); delay=IsTrue(resource_value); resource_value=XGetResource(resource_database,application_name,"frame", (char *) NULL,"False"); frame=IsTrue(resource_value); image_geometry=XGetResource(resource_database,application_name, "imageGeometry","ImageGeometry",(char *) NULL); resource_value=XGetResource(resource_database,application_name,"monochrome", (char *) NULL,"False"); monochrome=IsTrue(resource_value); resource_value=XGetResource(resource_database,application_name,"rotate", (char *) NULL,"False"); scale_geometry=XGetResource(resource_database,application_name, "scaleGeometry","ScaleGeometry",(char *) NULL); degrees=atoi(resource_value); resource_value=XGetResource(resource_database,application_name,"screen", (char *) NULL,"False"); screen=IsTrue(resource_value); resource_value=XGetResource(resource_database,application_name,"verbose", (char *) NULL,"False"); verbose=IsTrue(resource_value); /* Check command syntax. */ filename=(char *) NULL; target_window=(char *) NULL; for (i=1; i < argc; i++) { option=argv[i]; if ((strlen(option) < 2) || ((*option != '-') && (*option != '+'))) filename=argv[i]; else switch(*(option+1)) { case 'b': { borders=(*option == '-'); break; } case 'd': { if (strncmp("delay",option+1,2) == 0) { delay=0; if (*option == '-') { i++; if ((i == argc) || !sscanf(argv[i],"%d",&x)) Usage("missing seconds on -delay"); delay=atoi(argv[i]); } } else if (strncmp("display",option+1,3) == 0) { server_name=(char *) NULL; if (*option == '-') { i++; if (i == argc) Usage("missing server name on -display"); server_name=argv[i]; } } else Usage(option); break; } case 'g': { /* User specified server name. */ i++; if (i == argc) Usage("missing geometry on -geometry"); image_geometry=argv[i]; break; } case 'h': { Usage((char *) NULL); break; } case 'f': { frame=(*option == '-'); break; } case 'm': { monochrome=(*option == '-'); break; } case 'r': { degrees=0; if (*option == '-') { i++; if ((i == argc) || !sscanf(argv[i],"%d",&x)) Usage("missing degrees on -rotate"); degrees=atoi(argv[i]); } break; } case 's': { if (strncmp("scale",option+1,4) == 0) { scale_geometry=(char *) NULL; if (*option == '-') { i++; if ((i == argc) || !sscanf(argv[i],"%f",(float *) &x)) Usage("missing scale geometry on -scale"); scale_geometry=argv[i]; } } else if (strncmp("screen",option+1,4) == 0) screen=(*option == '-'); else Usage((char *) NULL); break; } case 'v': { verbose=(*option == '-'); break; } case 'w': { i++; if (i == argc) Usage("missing id, name, or 'root' on -window"); target_window=argv[i]; break; } default: Usage((char *) NULL); } } if (filename == (char *) NULL) Usage("missing an image file name"); /* Read image from X server. */ if (delay > 0) (void) sleep(delay); start_time=time((long *) 0); image=ReadXImage(target_window,server_name,frame,screen,borders); if (image == (Image *) NULL) exit(1); if (image_geometry || scale_geometry) image=TransformImage(image,(char *) NULL,image_geometry,scale_geometry); if ((degrees % 360) != 0) { Image *rotated_image; /* Rotate image. */ rotated_image=RotateImage(image,(double) degrees,False); if (rotated_image != (Image *) NULL) { DestroyImage(image); image=rotated_image; } } if (monochrome) { register unsigned int bit; /* Convert image to monochrome PseudoColor class. */ GrayImage(image); if ((image->class == DirectClass) || (image->colors > 2)) QuantizeImage(image,2,8,False,False); bit=Intensity(image->colormap[0]) > Intensity(image->colormap[1]); image->colormap[bit].red=0; image->colormap[bit].green=0; image->colormap[bit].blue=0; image->colormap[!bit].red=255; image->colormap[!bit].green=255; image->colormap[!bit].blue=255; } (void) strcpy(image->filename,filename); (void) PrintImage(image,image_geometry); if (verbose) { /* Display detailed info about the image. */ if (image->class == DirectClass) image->colors=NumberColors(image); (void) fprintf(stderr,"[%u] %s %ux%u",image->scene,image->filename, image->columns,image->rows); if (image->class == DirectClass) (void) fprintf(stderr," DirectClass "); else (void) fprintf(stderr," PseudoClass "); (void) fprintf(stderr,"%uc %s %ds\n",image->colors,image->magick, time((long *) 0)-start_time+1); } DestroyImage(image); XCloseDisplay(display); return(False); }