/*
 *  Source machine generated by GadToolsBox V2.0
 *  which is (c) Copyright 1991-1993 Jaba Development
 *
 *  GUI Designed by : -- Unnamed --
 */

#include <exec/types.h>
#include <intuition/intuition.h>
#include <intuition/classes.h>
#include <intuition/classusr.h>
#include <intuition/imageclass.h>
#include <intuition/gadgetclass.h>
#include <libraries/gadtools.h>
#include <graphics/displayinfo.h>
#include <graphics/gfxbase.h>
#include <clib/exec_protos.h>
#include <clib/intuition_protos.h>
#include <clib/gadtools_protos.h>
#include <clib/graphics_protos.h>
#include <clib/utility_protos.h>
#include <string.h>

#include "form.h"

struct Screen         *Scr = NULL;
UBYTE                 *PubScreenName = NULL;
APTR                   VisualInfo = NULL;
struct Window         *Project0Wnd = NULL;
struct Gadget         *Project0GList = NULL;
struct IntuiMessage    Project0Msg;
struct Gadget         *Project0Gadgets[9];
UWORD                  Project0Left = 120;
UWORD                  Project0Top = 37;
UWORD                  Project0Width = 316;
UWORD                  Project0Height = 136;
UBYTE                 *Project0Wdt = (UBYTE *)"Quick Format v2.3";

UBYTE *Gadget700Labels[] = {
	(UBYTE *)"FFS",
	(UBYTE *)"DCFFS",
	(UBYTE *)"INTL",
	(UBYTE *)"OFS",
	NULL };

struct TextAttr topaz8 = {
	( STRPTR )"topaz.font", 8, 0x00, 0x01 };

struct IntuiText Project0IText[] = {
	2, 0, JAM1,177, 47, &topaz8, (UBYTE *)"Format Mode:", NULL };

UWORD Project0GTypes[] = {
	STRING_KIND,
	CHECKBOX_KIND,
	CHECKBOX_KIND,
	CHECKBOX_KIND,
	BUTTON_KIND,
	BUTTON_KIND,
	STRING_KIND,
	CYCLE_KIND,
	CHECKBOX_KIND
};


UBYTE status[9]={1,0,0,0,0,0,0,0,0};
char drive[10]="df0:",name[20]="Empty",trashcan[30],quick[30],ffs[10],dcffs[10],ofs[10],intl[10];
char stringa[250],nome[30]=" name ",format[50]="Format drive ";
void form(void);
char *cycle[4]={ " FFS "," DIRCACHE "," INTL "," OFS " };
int count=0;

struct NewGadget Project0NGad[] = {
	76, 21, 176, 13, (UBYTE *)"_Name ", NULL, GD_Gadget00, PLACETEXT_LEFT|NG_HIGHLABEL, NULL, (APTR)Gadget00Clicked,
	96, 45, 26, 11, (UBYTE *)"_Trashcan ", NULL, GD_Gadget10, PLACETEXT_LEFT|NG_HIGHLABEL, NULL, (APTR)Gadget10Clicked,
	96, 59, 26, 11, (UBYTE *)"_Verify   ", NULL, GD_Gadget20, PLACETEXT_LEFT|NG_HIGHLABEL, NULL, (APTR)Gadget20Clicked,
	96, 73, 26, 11, (UBYTE *)"_Quick    ", NULL, GD_Gadget30, PLACETEXT_LEFT|NG_HIGHLABEL, NULL, (APTR)Gadget30Clicked,
	34, 110, 83, 15, (UBYTE *)"_Format!", NULL, GD_Gadget40, PLACETEXT_IN, NULL, (APTR)Gadget40Clicked,
	180, 110, 83, 15, (UBYTE *)"_Cancel", NULL, GD_Gadget50, PLACETEXT_IN, NULL, (APTR)Gadget50Clicked,
	76, 6, 175, 12, (UBYTE *)"_Drive", NULL, GD_Gadget60, PLACETEXT_LEFT|NG_HIGHLABEL, NULL, (APTR)Gadget60Clicked,
	176, 66, 88, 13, NULL, NULL, GD_Gadget70, 0, NULL, (APTR)Gadget70Clicked,
	96, 87, 26, 11, (UBYTE *)"_Install  ", NULL, GD_Gadget80, PLACETEXT_LEFT|NG_HIGHLABEL, NULL, (APTR)Gadget80Clicked
};

ULONG Project0GTags[] = {
	(GTST_String), (ULONG)"Empty", (GTST_MaxChars), 20, (STRINGA_Justification), (GACT_STRINGCENTER), (GT_Underscore), '_', (TAG_DONE),
	(GTCB_Checked), TRUE, (GT_Underscore), '_', (TAG_DONE),
	(GTCB_Checked), TRUE, (GT_Underscore), '_', (GA_Disabled), TRUE, (TAG_DONE),
	(GT_Underscore), '_', (TAG_DONE),
	(GT_Underscore), '_', (TAG_DONE),
	(GT_Underscore), '_', (TAG_DONE),
	(GTST_String), (ULONG)"DF0:", (GTST_MaxChars), 10, (STRINGA_Justification), (GACT_STRINGCENTER), (GT_Underscore), '_', (TAG_DONE),
	(GTCY_Labels), (ULONG)&Gadget700Labels[ 0 ], (TAG_DONE),
	(GT_Underscore), '_', (TAG_DONE)
};

void main(void)
{
        SetupScreen();
        OpenProject0Window();
        HandleProject0IDCMP();
        CloseProject0Window();
        CloseDownScreen();
}

int SetupScreen( void )
{
	if ( ! ( Scr = LockPubScreen( PubScreenName )))
		return( 1L );

	if ( ! ( VisualInfo = GetVisualInfo( Scr, TAG_DONE )))
		return( 2L );

	return( 0L );
}

void CloseDownScreen( void )
{
	if ( VisualInfo ) {
		FreeVisualInfo( VisualInfo );
		VisualInfo = NULL;
	}

	if ( Scr        ) {
		UnlockPubScreen( NULL, Scr );
		Scr = NULL;
	}
}

void Project0Render( void )
{
	UWORD		offx, offy;

	offx = Project0Wnd->BorderLeft;
	offy = Project0Wnd->BorderTop;


	DrawBevelBox( Project0Wnd->RPort, offx + 5, offy + 40, 138, 63, GT_VisualInfo, VisualInfo, GTBB_Recessed, TRUE, TAG_DONE );
	DrawBevelBox( Project0Wnd->RPort, offx + 20, offy + 3, 244, 36, GT_VisualInfo, VisualInfo, GTBB_Recessed, TRUE, TAG_DONE );
	DrawBevelBox( Project0Wnd->RPort, offx + 149, offy + 40, 154, 63, GT_VisualInfo, VisualInfo, GTBB_Recessed, TRUE, TAG_DONE );
	PrintIText( Project0Wnd->RPort, Project0IText, offx, offy );
}

int HandleProject0IDCMP( void )
{
	struct IntuiMessage	*m;
	struct Gadget		*func;
	BOOL			running = TRUE;
        int num;
        ActivateGadget(Project0Gadgets[6],Project0Wnd,NULL);
        while (running)
        {
                while((running)&&(m = GT_GetIMsg( Project0Wnd->UserPort ))) {

		GT_ReplyIMsg( m );

		switch ( m->Class ) {

			case	IDCMP_REFRESHWINDOW:
				GT_BeginRefresh( Project0Wnd );
				Project0Render();
				GT_EndRefresh( Project0Wnd, TRUE );
				break;

			case	IDCMP_CLOSEWINDOW:
				running = FALSE;
				break;

			case	IDCMP_GADGETUP:
				func = ( struct Gadget * )m->IAddress;
                                num=func->GadgetID;
                                switch(num)
                                {
                                        case 6:
                                           strcpy(drive,((struct StringInfo *)func->SpecialInfo)->Buffer);
                                           ActivateGadget(Project0Gadgets[0],Project0Wnd,NULL);
                                           break;
                                        case 0:
                                           strcpy(name,((struct StringInfo *)func->SpecialInfo)->Buffer);
                                           if (!strcmp(name,""))
                                           {
                                                DisplayBeep(Scr);
                                                ActivateGadget(Project0Gadgets[0],Project0Wnd,NULL);
                                           }
                                           break;
                                        case 1:
                                        case 2:
                                        case 3:
                                        case 8:
                                           checked(num);
                                           break;
                                        case 7:
                                           count=(count+1)%4;
                                           break;
                                        case 4:
                                           form();
                                           break;
                                        case 5:
                                           running=FALSE;
                                           break;
                                }
                                break;
		}
	}
    }
}

int OpenProject0Window( void )
{
	struct NewGadget	ng;
	struct Gadget	*g;
	UWORD		lc, tc;
	UWORD		offx = Scr->WBorLeft, offy = Scr->WBorTop + Scr->RastPort.TxHeight + 1;

	if ( ! ( g = CreateContext( &Project0GList )))
		return( 1L );

	for( lc = 0, tc = 0; lc < Project0_CNT; lc++ ) {

		CopyMem((char * )&Project0NGad[ lc ], (char * )&ng, (long)sizeof( struct NewGadget ));

		ng.ng_VisualInfo = VisualInfo;
		ng.ng_TextAttr   = &topaz8;
		ng.ng_LeftEdge  += offx;
		ng.ng_TopEdge   += offy;

		Project0Gadgets[ lc ] = g = CreateGadgetA((ULONG)Project0GTypes[ lc ], g, &ng, ( struct TagItem * )&Project0GTags[ tc ] );

		while( Project0GTags[ tc ] ) tc += 2;
		tc++;

		if ( NOT g )
			return( 2L );
	}

	if ( ! ( Project0Wnd = OpenWindowTags( NULL,
				WA_Left,	Project0Left,
				WA_Top,		Project0Top,
				WA_Width,	Project0Width,
				WA_Height,	Project0Height + offy,
				WA_IDCMP,	STRINGIDCMP|CHECKBOXIDCMP|BUTTONIDCMP|CYCLEIDCMP|IDCMP_CLOSEWINDOW|IDCMP_REFRESHWINDOW|IDCMP_VANILLAKEY,
				WA_Flags,	WFLG_DRAGBAR|WFLG_DEPTHGADGET|WFLG_CLOSEGADGET|WFLG_SMART_REFRESH|WFLG_ACTIVATE,
				WA_Gadgets,	Project0GList,
				WA_Title,	Project0Wdt,
				WA_ScreenTitle,	"Quick Format V2.3 ©1994 By Mirko Zappitelli",
				WA_PubScreen,	Scr,
				WA_AutoAdjust,	TRUE,
				TAG_DONE )))
	return( 4L );

	GT_RefreshWindow( Project0Wnd, NULL );

	Project0Render();

	return( 0L );
}

void CloseProject0Window( void )
{
	if ( Project0Wnd        ) {
		CloseWindow( Project0Wnd );
		Project0Wnd = NULL;
	}

	if ( Project0GList      ) {
		FreeGadgets( Project0GList );
		Project0GList = NULL;
	}
}

void checked(int num)
{
        BOOL verify;
        status[num-1]=1-status[num-1];

        if (status[0]==0) strcpy(trashcan," NOICONS"); else strcpy(trashcan,"");

        //if (status[1]==1) verify=TRUE;else verify=FALSE;

        if (status[2]==1) strcpy(quick," QUICK"); else strcpy(quick,"");
        
}
void form(void)
{
        struct Window *win;
        int err,a;
        char buf[120],directories[30],*dir[13]={ "S","L","C","Devs","Libs","System","Utilities","Fonts","Prefs","Prefs/Env-Archive","Devs/Printers","Devs/Keymaps","Prefs/Env-Archive/Sys" };
        char copy[30];
        
        sprintf(stringa,"SYS:System/Format >NIL: drive %s name %s %s %s %s",drive,name,trashcan,quick,cycle[count]);
        win=OpenWindowTags(NULL,
                      WA_Width,500,
                      WA_Height,100,
                      WA_Top,90,
                      WA_Left,80,
                      WA_DragBar,TRUE,
                      WA_Activate,TRUE,
                      WA_DepthGadget,TRUE,
                      WA_PubScreen,Scr,
                      TAG_DONE);
        SetAPen(win->RPort,1);
        Move(win->RPort,win->BorderLeft+16,win->BorderTop+8);
        Text(win->RPort,"Formatting disk...",18);
        Move(win->RPort,win->BorderLeft+170,win->BorderTop+8);
        system(stringa);
        err=IoErr();
        if (err)
        {
                DisplayBeep(Scr);
                Move(win->RPort,win->BorderLeft+16,win->BorderTop+16);
                Fault(err,"ERRORE",buf,120);
                Text(win->RPort,buf,strlen(buf));
                goto fine;
        }
        else Text(win->RPort,"OK",2);
        if (status[7]==1) 
        {
                Move(win->RPort,win->BorderLeft+16,win->BorderTop+24);
                Text(win->RPort,"Installing disk...",18);
                sprintf(copy,"C:Install >NIL: %s",drive);
                system(copy);
                Move(win->RPort,win->BorderLeft+170,win->BorderTop+24);
                Text(win->RPort,"OK",2);
                Move(win->RPort,win->BorderLeft+16,win->BorderTop+32);
                Text(win->RPort,"Making Directories...",21);
                for (a=0;a<13;a++)
                {
                        strcpy(directories,"");
                        sprintf(directories,"makedir %s%s",drive,dir[a]);
                        system(directories);
                }
                Move(win->RPort,win->BorderLeft+188,win->BorderTop+32);
                Text(win->RPort,"OK",2);
                Move(win->RPort,win->BorderLeft+16,win->BorderTop+40);
                Text(win->RPort,"Copying files...",16);
                copystartup(drive);
                copyc(drive);
                copyl(drive);
                copylibs(drive);
                copyprefs(drive);
                Move(win->RPort,win->BorderLeft+170,win->BorderTop+40);
                Text(win->RPort,"Done.",5);
        }
        fine:
         Delay(200);
         CloseWindow(win);
}       

void copystartup(char *drive)
{
        char copia[57];
        sprintf(copia,"C:copy >NIL: SYS:S/QFormat.confg %sS/startup-sequence",drive);
        system(copia);
        strcpy(copia,"");
        sprintf(copia,"C:copy >NIL: SYS:S/shell-startup %sS",drive);
        system(copia);
}

void copyc(char *drive)
{
        char copie[50];
        sprintf(copie,"C:copy >NIL: SYS:C/dir %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/list %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/delete %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/copy %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/IPrefs %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/makedir %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/assign %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/SetPatch %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/Binddrivers %sC",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:C/LoadWB %sC",drive);
        system(copie);
}
        
void copyl(char *drive)
{
        char copy[50];
        sprintf(copy,"C:copy >NIL: SYS:L/port-handler %sL",drive);
        system(copy);
}

void copylibs(char *drive)
{
        char copia[50];
        sprintf(copia,"C:copy >NIL: SYS:Libs/asl.library %sLibs",drive);
        system(copia);
        strcpy(copia,"");
        sprintf(copia,"C:copy >NIL: SYS:Libs/version.library %sLibs",drive);
        system(copia);
        strcpy(copia,"");
        sprintf(copia,"C:copy >NIL: SYS:Libs/diskfont.library %sLibs",drive);
        system(copia);
        strcpy(copia,"");
        sprintf(copia,"C:copy >NIL: SYS:Libs/iffparse.library %sLibs",drive);
        system(copia);
}

int copyprefs(char *drive)
{
        char copie[80];
        sprintf(copie,"C:copy >NIL: SYS:Prefs/env-archive/sys/wbconfig.prefs %sPrefs/env-archive/sys",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:Prefs.info %s",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:System.info %s",drive);
        system(copie);
        strcpy(copie,"");
        sprintf(copie,"C:copy >NIL: SYS:Utilities.info %s",drive);
        system(copie);
        return (0);
}