main

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "Licence").
 * You may not use this file except in compliance with the Licence.
 *
 * You can obtain a copy of the licence at
 * RiscOS/Sources/FileSys/ImageFS/SparkFS/Codecs/SparkARJ/LICENCE.
 * See the Licence for the specific language governing permissions
 * and limitations under the Licence.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the Licence file. If applicable, add the
 * following below this CDDL HEADER, with the fields enclosed by
 * brackets "[]" replaced with your own identifying information:
 * Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 1992 David Pilling.  All rights reserved.
 * Use is subject to license terms.
 */
/*->c.main                     */

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <signal.h>
#include <ctype.h>
#include <time.h>
#include <locale.h>

#include "kernel.h"
#include "swis.h"

#include "Interface/SparkFS.h"

#include "SparkLib/zflex.h"
#include "SparkLib/sfs.h"
#include "SparkLib/zbuffer.h"
#include "SparkLib/sinterface.h"
#include "SparkLib/err.h"

#include "arcs.h"
#include "cat.h"
#include "convert.h"
#include "main.h"



/****************************************************************************/


static flink link=
{
 veneer_updatecat,
 veneer_loadarchive,
 veneer_deletefile,
 veneer_createdir,
 veneer_createfile,
 veneer_loadfile,
 veneer_savefile,
 veneer_opensave,
 veneer_closesave,
 veneer_openload,
 veneer_closeload,
 veneer_rename,
 veneer_create,
 veneer_convert,
 veneer_info,
 veneer_method,
 veneer_validate,
 veneer_diropen,
 veneer_flush
};



static void ARJ_finalise(void)
{
 _kernel_swi_regs rx;

 rx.r[0]=REMLINK;
 rx.r[1]=(int)&link;

 _kernel_swi(LINKSWI,&rx,&rx);
}



static _kernel_oserror * initlink(void * pw)
{
 _kernel_oserror  * err;
 _kernel_swi_regs   rx;

 rx.r[0]=ADDLINK;
 rx.r[1]=(int)&link;
 rx.r[2]=(int)pw;
 rx.r[3]=COMPATIBLE;

 err=_kernel_swi(LINKSWI,&rx,&rx);

 return(err);
}



_kernel_oserror * ARJ_initialise(char * cmd_tail,int podule_base,void * pw)
{
 _kernel_oserror  * err;

 cmd_tail=NULL;
 podule_base=0;

 err=initlink(pw);

 atexit(ARJ_finalise);

 return(NULL);
}