130 lines
2.5 KiB
C
130 lines
2.5 KiB
C
#include "options.h"
|
|
#include "config.h"
|
|
#ifdef AX25
|
|
#include "global.h"
|
|
#include "mbuf.h"
|
|
#include "iface.h"
|
|
#include "kiss.h"
|
|
#include "trace.h"
|
|
#ifdef COH386
|
|
#undef __ARGS /* avoid a redefinition */
|
|
#endif
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#if defined(MSDOS) && defined(SERIALTEST)
|
|
#include "8250.h"
|
|
#endif
|
|
|
|
#ifndef MDKISSPORT
|
|
/* Send raw data packet on KISS TNC */
|
|
void
|
|
kiss_raw(interface,data)
|
|
struct interface *interface;
|
|
struct mbuf *data;
|
|
{
|
|
register struct mbuf *bp;
|
|
void dump();
|
|
int slip_raw();
|
|
|
|
dump(interface,IF_TRACE_OUT,TRACE_AX25,data);
|
|
|
|
/* Put type field for KISS TNC on front */
|
|
if((bp = pushdown(data,1)) == NULLBUF){
|
|
free_p(data);
|
|
return;
|
|
}
|
|
bp->data[0] = KISS_DATA;
|
|
|
|
slip_raw(interface,bp);
|
|
}
|
|
|
|
/* Process incoming KISS TNC frame */
|
|
void
|
|
kiss_recv(interface,bp)
|
|
struct interface *interface;
|
|
struct mbuf *bp;
|
|
{
|
|
char kisstype;
|
|
int ax_recv();
|
|
void dump();
|
|
extern int16 freeps; /* defined in ipcmd.c */
|
|
|
|
#if defined(MSDOS) && defined(SERIALTEST)
|
|
/* Also done in slip.c, kpc.c and nrs.c to clear error flag possibly
|
|
* set in the async handler
|
|
*/
|
|
extern int16 serial_err; /* defined in ipcmd.c */
|
|
extern int32 tot_rframes;
|
|
struct fifo *fp;
|
|
|
|
tot_rframes++;
|
|
fp = &asy[interface->dev].fifo;
|
|
if(fp->error){ /* contains 8250 line status register */
|
|
serial_err++;
|
|
fp->error = 0;
|
|
free_p(bp);
|
|
return;
|
|
}
|
|
#endif
|
|
|
|
kisstype = pullchar(&bp);
|
|
|
|
switch(lonibble(kisstype)){
|
|
case KISS_DATA:
|
|
dump(interface,IF_TRACE_IN,TRACE_AX25,bp);
|
|
ax_recv(interface,bp);
|
|
break;
|
|
default:
|
|
free_p(bp); /* probably no good */
|
|
freeps++; /* remove after test - K5JB */
|
|
}
|
|
}
|
|
#endif /* MDKISSPORT */
|
|
|
|
/* Perform device control on KISS TNC by sending control messages */
|
|
kiss_ioctl(interface,argc,argv)
|
|
struct interface *interface;
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
struct mbuf *hbp;
|
|
register int i;
|
|
register char *cp;
|
|
int atoi();
|
|
|
|
if(argc < 1){
|
|
printf("Data field missing\n");
|
|
return 1;
|
|
}
|
|
|
|
/* Allocate space for arg bytes */
|
|
if((hbp = alloc_mbuf((int16)argc)) == NULLBUF){
|
|
free_p(hbp);
|
|
return 0;
|
|
}
|
|
|
|
hbp->cnt = argc;
|
|
hbp->next = NULLBUF;
|
|
cp = hbp->data;
|
|
*cp = (char)atoi(argv[0]);
|
|
|
|
#ifdef KPCPORT
|
|
if (!strncmp(interface->name,"kp", 2) &&
|
|
interface->name[strlen(interface->name) - 1] == 'b')
|
|
*cp |= 0x10;
|
|
#endif
|
|
#ifdef MDKISSPORT /* watch out for sign extensions here if we start using */
|
|
/* upper parts of this number */
|
|
if(interface->kissport)
|
|
*cp |= interface->kissport << 4;
|
|
#endif
|
|
for(i = 1,cp++;i < argc;)
|
|
*cp++ = (char)atoi(argv[i++]);
|
|
|
|
slip_raw(interface,hbp); /* Even more "raw" than kiss_raw */
|
|
|
|
return 0;
|
|
}
|
|
#endif /* AX25 */
|