Initial commit

Examples/PrintReq/PrintReqExample.c

@@ -0,0 +1,519 @@
+#include <exec/types.h>
+#include <exec/memory.h>
+#include <dos/dos.h>
+#include <intuition/intuition.h>
+#include <intuition/gadgetclass.h>
+#include <intuition/imageclass.h>
+#include <intuition/icclass.h>
+#include <gadgets/listbrowser.h>
+#include <images/label.h>
+#include <libraries/asl.h>
+#include <libraries/gadtools.h>
+#include <utility/tagitem.h>
+#include <proto/asl.h>
+#include <proto/dos.h>
+#include <proto/diskfont.h>
+#include <proto/exec.h>
+#include <proto/gadtools.h>
+#include <proto/graphics.h>
+#include <proto/icon.h>
+#include <proto/intuition.h>
+#include <proto/utility.h>
+#include <proto/wb.h>
+#include <classact.h>
+#include <stdio.h>
+#include <string.h>
+
+enum { GAD_FROM, GAD_TO, GAD_COPIES, GAD_COLLATE };
+
+LONG easy_req(struct Window *, char *, char *, char *, ...);
+VOID draw_collate(struct Window *, BOOL);
+
+/* Image for the no-collate image.
+ */
+__chip UWORD nocollate_data[450] =
+{
+	/* Plane 0 */
+	0x0003, 0xFFFF, 0xC000, 0x07FF, 0xFF80,
+	0x0002, 0x0000, 0x4000, 0x0400, 0x0080,
+	0x0002, 0x0002, 0x6000, 0x0400, 0x04C0,
+	0x0002, 0x5806, 0x6000, 0x04B0, 0x0CC0,
+	0x01FF, 0xFFE2, 0x6003, 0xFFFF, 0xC4C0,
+	0x0100, 0x0027, 0x6002, 0x0000, 0x4EC0,
+	0x0100, 0x0330, 0x6002, 0x0006, 0x60C0,
+	0x012E, 0x00B4, 0x6002, 0x5C01, 0x68C0,
+	0xFFFF, 0xF130, 0x61FF, 0xFFE2, 0x60C0,
+	0x8000, 0x13B0, 0x6100, 0x0027, 0x60C0,
+	0x8001, 0x9830, 0x6100, 0x0330, 0x60C0,
+	0x9700, 0x5E30, 0x612E, 0x00BC, 0x60C0,
+	0x8000, 0x9830, 0x6100, 0x0130, 0x60C0,
+	0x9400, 0x5834, 0x6128, 0x00B0, 0x68C0,
+	0x8001, 0x9830, 0x6100, 0x0330, 0x60C0,
+	0x8B5F, 0x1830, 0x6116, 0xBE30, 0x60C0,
+	0x8000, 0x1830, 0x6100, 0x0030, 0x60C0,
+	0x97B6, 0x1E30, 0x612F, 0x6C3C, 0x60C0,
+	0x8000, 0x1830, 0x6100, 0x0030, 0x60C0,
+	0x8BA8, 0x1830, 0x6117, 0x5030, 0x60C0,
+	0x8000, 0x183F, 0xE100, 0x0030, 0x7FC0,
+	0x9BF7, 0x183F, 0xE137, 0xEE30, 0x7FC0,
+	0x8000, 0x1830, 0x0100, 0x0030, 0x6000,
+	0x9400, 0x1830, 0x0128, 0x0030, 0x6000,
+	0x8000, 0x1FF0, 0x0100, 0x003F, 0xE000,
+	0x9B00, 0x1FF0, 0x0136, 0x003F, 0xE000,
+	0x8000, 0x1800, 0x0100, 0x0030, 0x0000,
+	0x8000, 0x1800, 0x0100, 0x0030, 0x0000,
+	0xFFFF, 0xF800, 0x01FF, 0xFFF0, 0x0000,
+	0x3FFF, 0xF800, 0x007F, 0xFFF0, 0x0000,
+	/* Plane 1 */
+	0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+	0x0001, 0xFFFF, 0x8000, 0x03FF, 0xFF00,
+	0x0001, 0xFFFD, 0x8000, 0x03FF, 0xFB00,
+	0x0001, 0xDBF9, 0x8000, 0x03B7, 0xF300,
+	0x0000, 0x001D, 0x8000, 0x0000, 0x3B00,
+	0x00FF, 0xFFD8, 0x8001, 0xFFFF, 0xB100,
+	0x00FF, 0xFCCF, 0x8001, 0xFFF9, 0x9F00,
+	0x00ED, 0xFF47, 0x8001, 0xDBFE, 0x8F00,
+	0x0000, 0x0ECF, 0x8000, 0x001D, 0x9F00,
+	0x7FFF, 0xEC47, 0x80FF, 0xFFD8, 0x8F00,
+	0x7FFE, 0x67CF, 0x80FF, 0xFCCF, 0x9F00,
+	0x76FF, 0xA7CF, 0x80ED, 0xFF4F, 0x9F00,
+	0x7FFF, 0x67CF, 0x80FF, 0xFECF, 0x9F00,
+	0x77FF, 0xA3C7, 0x80EF, 0xFF47, 0x8F00,
+	0x7FFE, 0x67CF, 0x80FF, 0xFCCF, 0x9F00,
+	0x6BDF, 0xE7CF, 0x80D7, 0xBFCF, 0x9F00,
+	0x7FFF, 0xE7CF, 0x80FF, 0xFFCF, 0x9F00,
+	0x76F5, 0xE7CF, 0x80ED, 0xEBCF, 0x9F00,
+	0x7FFF, 0xE7CF, 0x80FF, 0xFFCF, 0x9F00,
+	0x6BEF, 0xE7CF, 0x80D7, 0xDFCF, 0x9F00,
+	0x7FFF, 0xE7C0, 0x00FF, 0xFFCF, 0x8000,
+	0x7AF7, 0xE7C0, 0x00F5, 0xEFCF, 0x8000,
+	0x7FFF, 0xE7C0, 0x00FF, 0xFFCF, 0x8000,
+	0x77FF, 0xE7C0, 0x00EF, 0xFFCF, 0x8000,
+	0x7FFF, 0xE000, 0x00FF, 0xFFC0, 0x0000,
+	0x7BFF, 0xE000, 0x00F7, 0xFFC0, 0x0000,
+	0x7FFF, 0xE000, 0x00FF, 0xFFC0, 0x0000,
+	0x7FFF, 0xE000, 0x00FF, 0xFFC0, 0x0000,
+	0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+	0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+};
+
+struct Image nocollate_image =
+{
+	0, 0, 74, 30, 2, &nocollate_data[0], 0x3, 0x0, NULL
+};
+
+/* Image for the no-collate image.
+ */
+__chip UWORD collate_data[468] =
+{
+	/* Plane 0 */
+	0x01FF, 0xFFE0, 0x07FF, 0xFF80, 0x1FFF, 0xFE00,
+	0x0100, 0x0020, 0x0400, 0x0080, 0x1000, 0x0200,
+	0x0100, 0x0130, 0x0400, 0x0CC0, 0x1000, 0x3300,
+	0x012C, 0x0330, 0x04B0, 0x02C0, 0x12C0, 0x0B00,
+	0xFFFF, 0xF133, 0xFFFF, 0xC4CF, 0xFFFF, 0x1300,
+	0x8000, 0x13B2, 0x0000, 0x4EC8, 0x0001, 0x0B00,
+	0x8000, 0x9832, 0x0006, 0x60C8, 0x0019, 0xB300,
+	0x9701, 0x9A32, 0x5C01, 0x68C9, 0x7005, 0xA300,
+	0x8000, 0x9832, 0x0002, 0x60C8, 0x0009, 0x8300,
+	0x9401, 0xD832, 0x5007, 0x60C9, 0x4005, 0x8300,
+	0x8000, 0x1832, 0x0000, 0x60C8, 0x0019, 0x8300,
+	0x8B5F, 0x1832, 0x2D7C, 0x60C8, 0xB5F1, 0x8300,
+	0x8000, 0x1832, 0x0000, 0x60C8, 0x0001, 0x8300,
+	0x97B4, 0x1A32, 0x5ED0, 0x68C9, 0x7B41, 0xA300,
+	0x8000, 0x1832, 0x0000, 0x60C8, 0x0001, 0x8300,
+	0x8BA8, 0x1832, 0x2EA0, 0x60C8, 0xBA81, 0x8300,
+	0x8000, 0x1832, 0x0000, 0x60C8, 0x0001, 0x8300,
+	0x9BF7, 0x1832, 0x6FDC, 0x60C9, 0xBF71, 0x8300,
+	0x8000, 0x1832, 0x0000, 0x60C8, 0x0001, 0x8300,
+	0x9400, 0x1832, 0x5000, 0x60C9, 0x4001, 0x8300,
+	0x8000, 0x1FF2, 0x0000, 0x7FC8, 0x0001, 0xFF00,
+	0x9B00, 0x1FF2, 0x6C00, 0x7FC9, 0xB001, 0xFF00,
+	0x8000, 0x1802, 0x0000, 0x6008, 0x0001, 0x8000,
+	0x8000, 0x1802, 0x0000, 0x6008, 0x0001, 0x8000,
+	0xFFFF, 0xF803, 0xFFFF, 0xE00F, 0xFFFF, 0x8000,
+	0x3FFF, 0xF800, 0xFFFF, 0xE003, 0xFFFF, 0x8000,
+	/* Plane 1 */
+	0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+	0x00FF, 0xFFC0, 0x03FF, 0xFF00, 0x0FFF, 0xFC00,
+	0x00FF, 0xFEC0, 0x03FF, 0xF300, 0x0FFF, 0xCC00,
+	0x00ED, 0xFCC0, 0x03B7, 0xFD00, 0x0EDF, 0xF400,
+	0x0000, 0x0EC0, 0x0000, 0x3B00, 0x0000, 0xEC00,
+	0x7FFF, 0xEC41, 0xFFFF, 0xB107, 0xFFFE, 0xF400,
+	0x7FFF, 0x67C1, 0xFFF9, 0x9F07, 0xFFE6, 0x4C00,
+	0x76FE, 0x63C1, 0xDBFE, 0x8F07, 0x6FFA, 0x3C00,
+	0x7FFF, 0x67C1, 0xFFFD, 0x9F07, 0xFFF6, 0x7C00,
+	0x77FE, 0x23C1, 0xDFF8, 0x8F07, 0x7FFA, 0x3C00,
+	0x7FFF, 0xE7C1, 0xFFFF, 0x9F07, 0xFFE6, 0x7C00,
+	0x6BDF, 0xE7C1, 0xAF7F, 0x9F06, 0xBDFE, 0x7C00,
+	0x7FFF, 0xE7C1, 0xFFFF, 0x9F07, 0xFFFE, 0x7C00,
+	0x76F5, 0xE3C1, 0xDBD7, 0x8F07, 0x6F5E, 0x3C00,
+	0x7FFF, 0xE7C1, 0xFFFF, 0x9F07, 0xFFFE, 0x7C00,
+	0x6BEF, 0xE7C1, 0xAFBF, 0x9F06, 0xBEFE, 0x7C00,
+	0x7FFF, 0xE7C1, 0xFFFF, 0x9F07, 0xFFFE, 0x7C00,
+	0x7AF7, 0xE7C1, 0xEBDF, 0x9F07, 0xAF7E, 0x7C00,
+	0x7FFF, 0xE7C1, 0xFFFF, 0x9F07, 0xFFFE, 0x7C00,
+	0x77FF, 0xE7C1, 0xDFFF, 0x9F07, 0x7FFE, 0x7C00,
+	0x7FFF, 0xE001, 0xFFFF, 0x8007, 0xFFFE, 0x0000,
+	0x7BFF, 0xE001, 0xEFFF, 0x8007, 0xBFFE, 0x0000,
+	0x7FFF, 0xE001, 0xFFFF, 0x8007, 0xFFFE, 0x0000,
+	0x7FFF, 0xE001, 0xFFFF, 0x8007, 0xFFFE, 0x0000,
+	0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+	0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000,
+};
+
+struct Image collate_image =
+{
+	0, 0, 88, 26, 2, &collate_data[0], 0x3, 0x0, NULL
+};
+
+/* Here's where it all starts.
+ */
+main()
+{
+	struct Screen *screen = NULL;
+
+	if (!ButtonBase) return(20);
+
+	/* We'll just open up on the default public screen, and use its screen font.
+	 */
+	if (screen = LockPubScreen(NULL))
+	{
+		struct DrawInfo *drinfo = GetScreenDrawInfo(screen);
+		struct List *radio_list;
+		struct Image *l, *collate_limage, *nocollate_limage;
+		struct Gadget *collate_gad, *nocollate_gad;
+		Object *layout, *collate_layout;
+		UWORD mapping[4];
+
+		/* Setup a simple mapping.
+		 */
+		mapping[0] = drinfo->dri_Pens[BACKGROUNDPEN];
+		mapping[1] = drinfo->dri_Pens[SHADOWPEN];
+		mapping[2] = drinfo->dri_Pens[SHINEPEN];
+		mapping[3] = drinfo->dri_Pens[FILLPEN];
+
+		/* Create radio buttons.
+		 */
+		radio_list = RadioButtons(	"All Pages",
+									"Odd Pages",
+									"Even Pages",
+									"Current Page",
+									"Range of Pages:",
+									NULL);
+
+		nocollate_limage = LabelObject,
+			/* LABEL_Mapping, mapping, */
+			LABEL_Image, &nocollate_image,
+			LabelEnd;
+		collate_limage = LabelObject,
+			/* LABEL_Mapping, mapping, */
+			LABEL_Image, &collate_image,
+			LabelEnd;
+
+		if (layout = LayoutObject,
+						GA_DrawInfo, drinfo,
+						LAYOUT_DeferLayout, TRUE,	/* Layout refreshes done on
+													 * task's context (by the
+													 * window class) */
+						LAYOUT_SpaceOuter, TRUE,
+						LAYOUT_ShrinkWrap, TRUE,
+						LAYOUT_VertAlignment, LAYOUT_ALIGN_TOP,
+						LAYOUT_Orientation, LAYOUT_ORIENT_VERT,
+
+						LAYOUT_AddChild, LayoutObject,
+							LAYOUT_Orientation, LAYOUT_ORIENT_HORIZ,
+							LAYOUT_VertAlignment, LAYOUT_ALIGN_CENTER,
+							LAYOUT_SpaceOuter, TRUE,
+
+							LAYOUT_AddImage, l = LabelObject,
+								IA_Font, screen->Font,
+								LABEL_Text, "Driver:",
+								LabelEnd,
+							CHILD_MinWidth, l->Width,
+							CHILD_MinHeight, l->Height,
+							CHILD_WeightedWidth, 0,
+							CHILD_WeightedHeight, 0,
+
+							LAYOUT_AddChild, ButtonObject,
+								GA_Text, "EpsonX",
+								GA_ReadOnly, TRUE,
+								ButtonEnd,
+							LayoutEnd,
+						CHILD_WeightedHeight, 0,
+
+						LAYOUT_AddChild, LayoutObject,
+							LAYOUT_Orientation, LAYOUT_ORIENT_HORIZ,
+
+							LAYOUT_AddChild, LayoutObject,
+								LAYOUT_Orientation, LAYOUT_ORIENT_VERT,
+								LAYOUT_SpaceOuter, TRUE,
+								LAYOUT_BevelStyle, BVS_GROUP,
+								LAYOUT_Label, "Page Range",
+
+								LAYOUT_AddChild, RadioButtonObject,
+									GA_DrawInfo, drinfo,
+									RADIOBUTTON_Labels, radio_list,
+									RADIOBUTTON_Spacing, 3,
+									RadioButtonEnd,
+	
+								LAYOUT_AddChild, LayoutObject,
+									LAYOUT_Orientation, LAYOUT_ORIENT_HORIZ,
+									LAYOUT_VertAlignment, LAYOUT_ALIGN_CENTER,
+	
+									LAYOUT_AddImage, l = LabelObject,
+										IA_Font, screen->Font,
+										LABEL_Text, "from:",
+										LabelEnd,
+									CHILD_MinWidth, l->Width,
+									CHILD_MinHeight, l->Height,
+									CHILD_WeightedWidth, 0,
+									CHILD_WeightedHeight, 0,
+	
+									LAYOUT_AddChild, IntegerObject,
+										INTEGER_Number, 1,
+										INTEGER_Minimum, 0,
+										IntegerEnd,
+	
+									LAYOUT_AddImage, l = LabelObject,
+										IA_Font, screen->Font,
+										LABEL_Text, " to:",
+										LabelEnd,
+									CHILD_MinWidth, l->Width,
+									CHILD_MinHeight, l->Height,
+									CHILD_WeightedWidth, 0,
+									CHILD_WeightedHeight, 0,
+	
+									LAYOUT_AddChild, IntegerObject,
+										INTEGER_Number, 1,
+										INTEGER_Minimum, 0,
+										IntegerEnd,
+	
+									LayoutEnd,
+								LayoutEnd,
+	
+							LAYOUT_AddChild, LayoutObject,
+								LAYOUT_Orientation, LAYOUT_ORIENT_VERT,
+								LAYOUT_SpaceOuter, TRUE,
+								LAYOUT_BevelStyle, BVS_GROUP,
+								LAYOUT_Label, "Copies",
+								LAYOUT_VertAlignment, LAYOUT_ALIGN_TOP,
+								LAYOUT_ShrinkWrap, TRUE,
+	
+								LAYOUT_AddChild, LayoutObject,
+									LAYOUT_Orientation, LAYOUT_ORIENT_HORIZ,
+									LAYOUT_VertAlignment, LAYOUT_ALIGN_CENTER,
+	
+									LAYOUT_AddImage, l = LabelObject,
+										IA_Font, screen->Font,
+										LABEL_Text, "Number of Copies:",
+										LabelEnd,
+									CHILD_MinWidth, l->Width,
+									CHILD_MinHeight, l->Height,
+									CHILD_WeightedWidth, 0,
+									CHILD_WeightedHeight, 0,
+	
+									LAYOUT_AddChild, IntegerObject,
+										INTEGER_Number, 1,
+										INTEGER_Minimum, 0,
+										IntegerEnd,
+	
+									LayoutEnd,
+	
+								LAYOUT_AddChild, LayoutObject,
+									LAYOUT_Orientation, LAYOUT_ORIENT_HORIZ,
+									LAYOUT_VertAlignment, LAYOUT_ALIGN_CENTER,
+	
+									LAYOUT_AddChild, CheckBoxObject,
+										GA_ID, GAD_COLLATE,
+										GA_Text, "Collate Pages?",
+										GA_RelVerify, TRUE,
+										CheckBoxEnd,
+									CHILD_MinHeight, screen->Font->ta_YSize + 6,
+	
+									LayoutEnd,
+	
+								LAYOUT_AddChild, collate_layout = LayoutObject,
+									LAYOUT_HorizAlignment, LAYOUT_ALIGN_CENTER,
+									LAYOUT_AddChild, collate_gad = ButtonObject,
+										GA_Image, nocollate_limage,
+										GA_ReadOnly, TRUE,
+										ButtonEnd,
+									CHILD_MinWidth, 100,
+									CHILD_MinHeight, 40,
+									CHILD_WeightedWidth, 0,
+									LayoutEnd,
+	
+								LayoutEnd,
+							LayoutEnd,
+						CHILD_WeightedHeight, 0,
+
+						LayoutEnd)
+		{
+			struct MsgPort *app_port;
+			Object *window_obj;
+
+			/* Create a message port for App* messages.  This is needed for
+			 * iconification.  We're being a touch naughty by not checking
+			 * the return code, but that just means that iconification won't
+			 * work, nothing really bad will happen.
+			 */
+			app_port = CreateMsgPort();
+
+			/* Create the window object.
+			 */
+			if (window_obj = WindowObject,
+								WA_Left, 0,
+								WA_Top, screen->Font->ta_YSize + 3,
+								WA_CustomScreen, screen,
+								WA_IDCMP, IDCMP_CLOSEWINDOW | IDCMP_REFRESHWINDOW,
+								WA_Flags, WFLG_DRAGBAR | WFLG_DEPTHGADGET | WFLG_CLOSEGADGET |
+											WFLG_SIZEGADGET | WFLG_ACTIVATE | WFLG_SMART_REFRESH,
+								WA_Title, "Print Requester example",
+								WA_NewLookMenus, TRUE,
+								WINDOW_ParentGroup, layout,
+								WINDOW_IconifyGadget, TRUE,
+								WINDOW_Icon, GetDiskObject("PROGDIR:PrintReq"),
+								WINDOW_IconTitle, "PrintReq",
+								WINDOW_AppPort, app_port,
+								WINDOW_LockHeight, TRUE,
+								TAG_DONE))
+			{
+				struct Window *win;
+
+				/*  Open the window.
+				 */
+				if (win = (struct Window *)CA_OpenWindow(window_obj))
+				{
+					ULONG signal;
+					BOOL ok = TRUE, collate = FALSE;
+
+					/* Draw the collate image.
+					 */
+					/* draw_collate(win, collate); */
+
+					/* Obtain the window wait signal mask.
+					 */
+					GetAttr(WINDOW_SigMask, window_obj, &signal);
+
+					/* Input Event Loop
+					 */
+					while (ok)
+					{
+						ULONG result;
+
+						Wait(signal | (1L << app_port->mp_SigBit));
+
+						/* CA_HandleInput() returns the gadget ID of a clicked
+						 * gadget, or one of several pre-defined values.  For
+						 * this demo, we're only actually interested in a
+						 * close window and a couple of gadget clicks.
+						 */
+						while ((result = CA_HandleInput(window_obj, NULL)) != WMHI_LASTMSG)
+						{
+							switch(result & WMHI_CLASSMASK)
+							{
+								case WMHI_CLOSEWINDOW:
+									ok = FALSE;
+									break;
+
+								case WMHI_GADGETUP:
+									switch (result & WMHI_GADGETMASK)
+									{
+										case GAD_COLLATE:
+											collate = !collate;
+											if (collate)
+											{
+												SetGadgetAttrs(collate_gad, win, NULL,
+													GA_Image, collate_limage,
+													TAG_DONE);
+											}
+											else
+											{
+												SetGadgetAttrs(collate_gad, win, NULL,
+													GA_Image, nocollate_limage,
+													TAG_DONE);
+											}
+											RethinkLayout(collate_layout, win, NULL, TRUE);
+											break;
+
+										default:
+											break;
+									}
+									break;
+
+								case WMHI_ICONIFY:
+									if (CA_Iconify(window_obj))
+										win = NULL;
+									break;
+							 
+								case WMHI_UNICONIFY:
+									win = CA_OpenWindow(window_obj);
+									break;
+
+								default:
+									break;
+							}
+						}
+					}
+ 				}
+				else
+					easy_req(NULL, "PrintReq failed to start\nCouldn't open window", "Quit", "");
+
+				/* Disposing of the window object will also close the
+				 * window if it is already opened and it will dispose of
+				 * all objects attached to it.
+				 */
+				DisposeObject(window_obj);
+			}
+			else
+				easy_req(NULL, "PrintReq failed to start\nCouldn't create window", "Quit", "");
+
+			/* Lose the App* message port.
+			 */
+			if (app_port)
+				DeleteMsgPort(app_port);
+		}
+		else
+			easy_req(NULL, "PrintReq failed to start\nCouldn't create layout", "Quit", "");
+
+		/* Get rid of our images.
+		 */
+		if (collate_limage)
+			DisposeObject(collate_limage);
+		if (nocollate_limage)
+			DisposeObject(nocollate_limage);
+
+		if (radio_list)
+			FreeRadioButtons(radio_list);
+
+		if (drinfo)
+			FreeScreenDrawInfo(screen, drinfo);
+
+	    UnlockPubScreen(0, screen);
+	}
+	else
+		easy_req(NULL, "PrintReq failed to start\nCouldn't lock destination screen", "Quit", "");
+
+	exit(0);
+}
+
+/* Do an easy requester.
+ */
+LONG easy_req(struct Window *win, char *reqtext, char *reqgads, char *reqargs,
+...)
+{
+	struct EasyStruct general_es =
+	{
+		sizeof(struct EasyStruct),
+		0,
+		"SBGen",
+		NULL,
+		NULL
+	};
+
+	general_es.es_TextFormat = reqtext;
+	general_es.es_GadgetFormat = reqgads;
+
+	return(EasyRequestArgs(win, &general_es, NULL, &reqargs));
+}