diff -ur --new-file old/atm/.kernel new/atm/.kernel --- old/atm/.kernel Fri Jul 19 15:46:26 1996 +++ new/atm/.kernel Fri Jul 19 17:42:11 1996 @@ -1,2 +1,2 @@ # this file is used to control automated generation of differences -2.0.0 +2.0 diff -ur --new-file old/atm/BUGS new/atm/BUGS --- old/atm/BUGS Wed Jul 17 18:54:05 1996 +++ new/atm/BUGS Wed Jul 31 11:24:48 1996 @@ -1,9 +1,10 @@ -Known bugs and restrictions in version 0.14 +Known bugs and restrictions in version 0.15 =========================================== IP over ATM ----------- + - atmarpd seems to leak memory - kernel crashes badly if (remote) ARP server is set to local machine - clients don't always refresh their entry at ARP server (fixed ?) - ARP timers are too short and should be different for client and server @@ -21,6 +22,7 @@ Signaling --------- + - atmsigd appears to leak memory - never initiates a RESTART procedure - doesn't implement T322 (i.e. STATUS ENQUIRY is not retried) - atmsigd sometimes terminates ungracefully when encountering errors in diff -ur --new-file old/atm/CHANGES new/atm/CHANGES --- old/atm/CHANGES Fri Jul 19 15:21:51 1996 +++ new/atm/CHANGES Wed Jul 31 19:25:05 1996 @@ -1,3 +1,88 @@ +Version 0.14 to 0.15 (31-JUL-1996) +==================== + +Bug fixes +--------- + + - zatm: fixed traffic shaper settings for UBR (with a little help from Joern + Wohlrab) + - atmsigd compilation didn't use the same UNI version configuration as qgen + - field "class" in struct atm_traform broke compilation of ATM applications + written in C++, so it has been renamed to "traffic_class" (reported by + Furquan Ansari) + - AAL parameters IE wasn't included in CONNECT, which violated RFC1755 + (discovered by Robert Olsson) + - zatm: removed broken sanity check for in-sequence skb delivery on RX + - clip didn't have clip_open function, so SIOCSIFFLAGS on the interface failed + with ENODEV + - single-copy compiles again + - zatm: driver doesn't pretend any longer to support single-copy (but + single-copy will come back later) + - QOS IE was sent with the wrong coding standard when using UNI 3.1 (with help + from Fraz Ahmad) + - zatm: forgot to remove some debugging code (around ZATM_TUNE) + - qlib.c didn't zero the length array, leading to (rare) "not enough space" + errors from QMSG (actually, the "break" mechanism seems to be flaky - will + have to check) + - fixed Arequipa race condition when the upper layer protocol and signaling + decided to close the SVC at the same time + - alloc_tx used to return NULL in out of memory conditions, thereby possibly + hanging atm_sendmsg + +New features +------------ + + - ttcp_atm now also accepts names with -p + - (finally !) added send/receive buffer limits and cleaned up the use of + vcc->[rt]x_{inuse,quota} + - added mkdiff script for automatic generation of diffs + - Arequipa now works for PVCs too (but arequipad is now required for any + use of Arequipa, not only for incoming connections) + +Other changes +------------- + + - atm/atm-.patch is now called atm/atm.patch (to make the diffs more + useful) + - the maximum SDU size is now checked in net/atm/common.c:adjust_tp + - text2atm/atm2text now accepts/generates E.164 addresses with a leading + + sign, as required by ANS (atm95-1532) + - internal signaling protocol: added message as_error to un-overload as_close + - internal signaling protocol: split as_establish into as_connect and + as_accept + - internal signaling prococol: as_close.reply no longer contains positive + numbers + - internal signaling prococol: as_bind now also carries the AAL type + - atmsigd: now also checks the AAL type in as_bind messages + - kernel signaling: a few minor changes + - STANDARDS (i.e. UNI version) configuration option has been moved from + atm/qgen/Makefile to atm/Rules.make + - atmsigd's startup message now gives more useful indication of which UNI + version(s) it supports + - signaling no longer uses sa[sp]_[rt]xtp, so ... + - sa[sp]_[rt]xtp is gone + - removed atm/sigd/svc.c from the distribution. We now have many other tools + for testing SVCs, so it's superfluous. + - atmarpd: revalidation is now less frequent (use -DFREQUENT_REVAL for + the faster timeout) + - ioctl CLIP_PVC now returns the number of the new interface and clip prints + its name to standard output (like atmarp -c) + - clip now issues the CLIP_PVC ioctl after binding, which avoids wasting + interface numbers on failed setup attempts + - atmsigd -d now sets the debug level for qgen and SSCOP to DIAG_INFO, and + doesn't set q_dump + - zatm: added protection against I > M + - atm_peek_aal5 now only aligns to page boundaries for pdu_size >= PAGE_SIZE + - eni driver now spits out CRC error messages at most every other second + - zatm driver now repeats RX error messages at most every other second + - ttcp_atm now sleeps for a second after setting up an SVC, because the + switch seems to lag behind (need to examine this further) + - moved SAAL from sigd/ to saal/ (for sharing with UNI 4.0 signaling) + - Arequipa sockets are now closed via arequipad instead of via atmsigd (new + ioctls AREQUIPA_CTRL and AREQUIPA_CLS3RD) + - various minor changes + + Version 0.13 to 0.14 (19-JUL-1996) ==================== diff -ur --new-file old/atm/Makefile new/atm/Makefile --- old/atm/Makefile Wed Jun 5 19:37:32 1996 +++ new/atm/Makefile Wed Jul 31 14:37:38 1996 @@ -1,7 +1,7 @@ -# "qgen" _must_ appear before "sigd" +# "qgen" and "saal" _must_ appear before "sigd" # "lib" must appear before anything else -DIRS=lib maint ip test debug qgen sigd arpd ilmid led aqd +DIRS=lib maint ip test debug qgen saal sigd arpd ilmid led aqd all: for n in $(DIRS); do $(MAKE) -C $$n || exit; done diff -ur --new-file old/atm/README new/atm/README --- old/atm/README Fri Jul 19 14:22:25 1996 +++ new/atm/README Tue Jul 30 19:15:22 1996 @@ -1,4 +1,4 @@ -ATM on Linux, release 0.14 (pre-alpha) by Werner Almesberger, EPFL LRC +ATM on Linux, release 0.15 (pre-alpha) by Werner Almesberger, EPFL LRC ====================================== werner.almesberger@lrc.di.epfl.ch This is experimental software. There are known major bugs and certainly diff -ur --new-file old/atm/Rules.make new/atm/Rules.make --- old/atm/Rules.make Fri Jul 19 15:09:39 1996 +++ new/atm/Rules.make Tue Jul 30 21:36:22 1996 @@ -1,3 +1,13 @@ +# Default is UNI 3.0, foor good reasons, see below. +# +STANDARDS=-DUNI30 +# +# Note: some UNI 3.0 switches will show really strange behaviour if confronted +# with using 3.1 signaling, so be sure to test your network *very* +# carefully before permanently configuring machines to use UNI 3.1. +# +# STANDARDS=-DUNI31 -DALLOW_UNI30 + CC=cc CFLAGS_NOWARN=-g -DVERSION=\"`cat ../VERSION`\" $(INCLUDES) -I../lib CFLAGS_NOOPT=$(CFLAGS_NOWARN) -Wall -Wshadow -Wpointer-arith -Wcast-align \ diff -ur --new-file old/atm/USAGE new/atm/USAGE --- old/atm/USAGE Fri Jul 19 15:43:40 1996 +++ new/atm/USAGE Wed Jul 31 18:58:08 1996 @@ -1,4 +1,4 @@ -Usage instructions - ATM on Linux, release 0.14 (pre-alpha) +Usage instructions - ATM on Linux, release 0.15 (pre-alpha) ------------------------------------------------------------- For updates of ATM on Linux, please check the Web page at @@ -17,7 +17,7 @@ In order to install this package, you need - the package itself - ftp://lrcftp.epfl.ch/pub/linux/atm/dist/atm-0.14.tar.gz + ftp://lrcftp.epfl.ch/pub/linux/atm/dist/atm-0.15.tar.gz - the Linux kernel, version 2.0, e.g. from ftp://ftp.cs.helsinki.fi/pub/Software/Linux/Kernel/v2.0/linux-2.0.tar.gz - Perl, version 4 or 5 @@ -31,7 +31,7 @@ all the files listed above there. Then extract the ATM on Linux distribution: -tar xfz atm-0.14.tar.gz +tar xfz atm-0.15.tar.gz and the kernel source: @@ -40,14 +40,14 @@ Finally, you can extract the ATM-related patches: cd linux -patch -s -p1 <../atm/atm-0.14.patch +patch -s -p1 <../atm/atm.patch The distribution installs into the following directories: atm/ Documentation in ASCII format, kernel patch, top-level Makefile, and distribution scripts - atm/sigd/ UNI 3.0 and UNI 3.1 signaling demon: atmsigd, test program: - svc + atm/sigd/ UNI 3.0 and UNI 3.1 signaling demon: atmsigd + atm/saal/ Signaling AAL library (SSCOP, SSCF, and SAAL) atm/qgen/ Q.2931-style message handling atm/ilmid/ ILMI address registration demon: ilmid atm/maint/ ATM maintenance programs: atmaddr, atmdiag, atmdump, atmtcp, @@ -84,9 +84,9 @@ Enable extended debugging (CONFIG_ATM_TNETA1570_DEBUG) The "MMU hacks" add single-copy support for raw AAL5 on adapters whose -driver supports this (currently only the ENI155p). It's generally a good -idea to enable extended debugging, although this might slow down the -drivers a bit. +driver supports this (currently only the ENI155p). Extended debugging +should only be enabled when tracing specific problems, because it slows +down the drivers, and it may introduce new race conditions. The TNETA1570 driver is for a board developed by Rolf Fiedler at TU Chemnitz, see also ftp://ftp.infotech.tu-chemnitz.de/pub/linux-atm . @@ -139,9 +139,10 @@ make make install -make install will install executables in the directory /usr/local/bin. -Libraries and header files are installed in /usr/lib and /usr/include, -respectively. Man pages are installed in /usr/local/man. +make install will install executables in the directory /usr/local/bin and +/usr/local/sbin, respectively. Libraries and header files are installed in +/usr/lib and /usr/include, respectively. Man pages are installed in +/usr/local/man. Device setup @@ -345,9 +346,9 @@ with this package. The original is on ftp://ftp.sgi.com/sgi/src/ttcp . The following options have been added: - -a use native ATM instead of UDP/TCP. (The address must be in the + -a use native ATM instead of UDP/TCP. The address must be in the format [.]. for PVCs, or a valid ATM end system - address for SVCs.) + address for SVCs. -P use a CBR connection with a peak cell rate of cells per second. Default is to use UBR. -C disable (UDP) checksums @@ -456,9 +457,13 @@ If atmsigd is killed, all system calls requiring interaction with it will return with an error and set errno to EUNATCH. -Note that atmsigd provides only very limited functionality and not all -messages conform to UNI 3.1 yet. Signaling is known to work for Classical -IP over ATM with a Fore ASX-200 switch. +Note that atmsigd provides only very limited functionality. Signaling is +known to work for Classical IP over ATM with a Fore ASX-200 switch. + +By default, atmsigd is configured to conform to UNI 3.0. It can be compiled +for UNI 3.1 by changing the STANDARDS= line at the beginning of +atm/Rules.make, and running make clean; make in atm/qgen and atm/sigd (in +this order). Note that atmsigd is configured to be paranoid. If it detects unusual problems, it frequently terminates. This will (obviously) change in the @@ -467,21 +472,16 @@ atmsigd also looks for a configuration file atmsigd.conf in the current directory. -The svc program is used to test SVCs: - - svc - -attempts to set up a call to the specified destination (BHLI and BLLI are -omitted, so most end systems will refuse such calls). - - svc - -listens for incoming calls (without BHLI nor BLLI) and accepts them. - ILMI demon ---------- +ILMI provides a mechanism for automatic address configuration. If there is +no switch or if the switch doesn't support ILMI, the ATM addresses must be +configured manually (see section "Manual address configuration"). Note that +the ILMI demon should not be used on interfaces where addresses are +manually configured. + The ILMI demon is started as follows: # ilmid [-b] [-d] [-l ] [-x] [] @@ -511,8 +511,8 @@ ---------------------------- If your switch doesn't support ILMI, you have to set the ATM address -manually on the switch and on the PC(s). Under Linux, use the atmaddr -command to set the address: +manually on the switch and on the PC(s). On the Linux side, make sure that +ilmid doesn't run, then use the atmaddr command to set the address: # atmaddr -a [] @@ -777,8 +777,7 @@ Arequipa (Application REQUested IP over ATM, [6]) is an extension to IP over ATM that adds support for using direct ATM connections (with QOS parameters, etc.) to carry traffic between INET sockets. On a system that -should accept incoming Arequipa connections, the Arequipa demon has to be -started: +should use Arequipa connections, the Arequipa demon has to be started: # arequipad [-b] [-d] [-n] @@ -789,6 +788,9 @@ The status of Arequipa connections is shown in /proc/atm/arequipa. +If atmsigd is not running, all attempts to use Arequipa fail and the ioctls +set errno to EUNATCH. + The following example illustrates the use of Arequipa with ttcp_atm. A machine "a" sends data to a machine "b", which is also registered with that name in the DNS. Furthermore, "b" has an entry with the name "b-atm" in the @@ -799,6 +801,7 @@ then run on "a": +# arequipad -b # ttcp_atm -t -s -Q b-atm b diff -ur --new-file old/atm/VERSION new/atm/VERSION --- old/atm/VERSION Fri Jul 19 14:21:12 1996 +++ new/atm/VERSION Tue Jul 30 18:02:35 1996 @@ -1 +1 @@ -0.14 +0.15 diff -ur --new-file old/atm/aqd/io.c new/atm/aqd/io.c --- old/atm/aqd/io.c Fri Jun 7 13:12:55 1996 +++ new/atm/aqd/io.c Wed Jul 31 16:31:44 1996 @@ -28,7 +28,7 @@ extern int pretty; -static int incoming; +static int kernel,incoming; void open_all(void) @@ -37,6 +37,10 @@ struct atm_blli blli; struct atm_qos qos; + if ((kernel = socket(PF_ATMSVC,SOCK_DGRAM,0)) < 0) + diag(COMPONENT,DIAG_FATAL,"socket: %s",strerror(errno)); + if (ioctl(kernel,AREQUIPA_CTRL,0) < 0) + diag(COMPONENT,DIAG_FATAL,"ioctl AREQUIPA_CTRL: %s",strerror(errno)); if ((incoming = socket(PF_ATMSVC,SOCK_DGRAM,ATM_AAL5)) < 0) diag(COMPONENT,DIAG_FATAL,"socket: %s",strerror(errno)); memset(&qos,0,sizeof(qos)); @@ -62,10 +66,30 @@ void close_all(void) { + (void) close(kernel); (void) close(incoming); } +static void recv_kernel(void) +{ + struct atm_vcc *vcc; + int size; + + size = read(kernel,&vcc,sizeof(vcc)); + if (size < 0) { + diag(COMPONENT,DIAG_ERROR,"read kernel: %s",strerror(errno)); + return; + } + if (size != sizeof(vcc)) + diag(COMPONENT,DIAG_FATAL,"kernel message has bad size (%d != %d)", + size,sizeof(vcc)); + diag(COMPONENT,DIAG_DEBUG,"Closing socket 0x%08lx",(unsigned long) vcc); + if (ioctl(kernel,AREQUIPA_CLS3RD,(unsigned long) vcc) < 0) + diag(COMPONENT,DIAG_ERROR,"ioctl AREQUIPA_CLS3RD: %s",strerror(errno)); +} + + static void accept_new(void) { char buffer[MAX_ATM_ADDR_LEN+1]; @@ -81,9 +105,11 @@ if (atm2text(buffer,MAX_ATM_ADDR_LEN+1,(struct sockaddr *) &addr,pretty) < 0) strcpy(buffer,""); diag(COMPONENT,DIAG_DEBUG,"Incoming call from %s",buffer); + /* * Connection acceptance policy functions go here. */ + if (ioctl(fd,AREQUIPA_INCOMING,0) < 0) diag(COMPONENT,DIAG_ERROR,"ioctl AREQUIPA_INCOMING: %s", strerror(errno)); @@ -98,12 +124,16 @@ while (1) { FD_ZERO(&fds); + FD_SET(kernel,&fds); FD_SET(incoming,&fds); - ret = select(incoming+1,&fds,NULL,NULL,NULL); + ret = select((kernel > incoming ? kernel : incoming)+1,&fds,NULL,NULL, + NULL); if (ret < 0) { if (errno != EINTR) perror("select"); + continue; } - else if (FD_ISSET(incoming,&fds)) accept_new(); - /* why else would we get here ? */ + if (FD_ISSET(kernel,&fds)) recv_kernel(); + if (FD_ISSET(incoming,&fds)) accept_new(); + } } diff -ur --new-file old/atm/arpd/arp.c new/atm/arpd/arp.c --- old/atm/arpd/arp.c Thu Jul 18 20:15:23 1996 +++ new/atm/arpd/arp.c Mon Jul 29 13:40:22 1996 @@ -33,8 +33,15 @@ #define SEC 1000000 #define T_REPLY (1*SEC) /* 1 sec */ #define R_REPLY 5 /* 5 retries */ -#define T_REVAL (30*SEC) /* 30 sec - make much larger (if srv ...) @@@ */ -#define R_REVAL 0 /* no retries */ +#ifdef FREQUENT_REVAL +#define T_CREVAL (30*SEC) /* 30 sec, client */ +#define T_SREVAL (35*SEC) /* 35 sec, server */ +#else +#define T_CREVAL (600*SEC) /* 10 min, client (RFC1577: <= 15 min) */ +#define T_SREVAL (1500*SEC) /* 25 min, server (RFC1577: >= 20 min) */ +#endif +#define R_CREVAL 0 /* no retries */ +#define R_SREVAL 0 /* no retries */ #define T_RETRY (1*SEC) /* 1 sec */ #define R_RETRY 25000 /* enough try keep trying during a long weekend */ @@ -470,7 +477,8 @@ if (entry->state != as_valid && !entry->vccs && itf->arp_srv) connect_me(entry); if ((entry->flags & ATF_ARPSRV) || !(entry->flags & ATF_PERM)) - START_TIMER(entry,REVAL); + if (entry->itf->arp_srv) START_TIMER(entry,CREVAL); + else START_TIMER(entry,SREVAL); entry->state = as_valid; } @@ -691,7 +699,7 @@ vcc->connecting = 0; vcc->fd = fd; vcc->entry = entry; - if (!(flags & ATF_PERM)) START_TIMER(entry,REVAL); + if (!(flags & ATF_PERM)) START_TIMER(entry,CREVAL); Q_INSERT_HEAD(entry->vccs,vcc); Q_INSERT_HEAD(itf->table,entry); return 0; @@ -712,7 +720,9 @@ *entry->addr = *addr; entry->qos = *qos; entry->flags = flags; - if (!(flags & ATF_PERM) || (flags & ATF_ARPSRV)) START_TIMER(entry,REVAL); + if (!(flags & ATF_PERM) || (flags & ATF_ARPSRV)) + if (itf->arp_srv) START_TIMER(entry,CREVAL); + else START_TIMER(entry,SREVAL); entry->itf = itf; Q_INSERT_HEAD(itf->table,entry); if (flags & ATF_ARPSRV) { diff -ur --new-file old/atm/atm-0.14.patch new/atm/atm-0.14.patch --- old/atm/atm-0.14.patch Fri Jul 19 15:46:43 1996 +++ new/atm/atm-0.14.patch Thu Jan 1 01:00:00 1970 @@ -1,16033 +0,0 @@ ---- ref/Makefile Fri Jun 7 10:55:00 1996 -+++ work/Makefile Mon Jun 10 17:41:25 1996 -@@ -126,6 +126,10 @@ - - DRIVERS := $(DRIVERS) drivers/net/net.a - -+ifdef CONFIG_ATM -+DRIVERS := $(DRIVERS) drivers/atm/atm.a -+endif -+ - ifdef CONFIG_CD_NO_IDESCSI - DRIVERS := $(DRIVERS) drivers/cdrom/cdrom.a - endif -@@ -288,6 +292,7 @@ - if [ -f SCSI_MODULES ]; then inst_mod SCSI_MODULES scsi; fi; \ - if [ -f FS_MODULES ]; then inst_mod FS_MODULES fs; fi; \ - if [ -f CDROM_MODULES ]; then inst_mod CDROM_MODULES cdrom; fi; \ -+ if [ -f ATM_MODULES ]; then inst_mod ATM_MODULES atm; fi; \ - \ - ls *.o > .allmods; \ - echo $$MODULES | tr ' ' '\n' | sort | comm -23 .allmods - > .misc; \ ---- ref/Documentation/Configure.help Fri Jun 7 15:28:46 1996 -+++ work/Documentation/Configure.help Thu Jul 18 10:29:16 1996 -@@ -1164,6 +1164,101 @@ - you can read some network related routing information from that - file. Everything you write to that file will be discarded. - -+Asynchronous Transfer Mode (ATM) -+CONFIG_ATM -+ You are likely to want to enable this. -+ -+Enable single-copy -+CONFIG_MMU_HACKS -+ Single-copy avoids intermediate buffering of AAL5 PDUs when using the -+ native ATM API. Enabling single-copy may lead to significant throughput -+ improvements. Note that single-copy probably still has bugs, so -+ enabling it may de-stabilize the system. -+ -+Extended debugging for single-copy -+CONFIG_MMU_HACKS_DEBUG -+ Extended debugging records various events and displays that list when -+ an inconsistency is detected. This mechanism is faster than generally -+ using printks, but still has some impact on performance. Enable this -+ if you suspect problems with single-copy. -+ -+Classical IP over ATM with ATMARP -+CONFIG_ATM_ATMARP -+ Classical IP over ATM for PVCs and SVCs, supporting InARP and ATMARP. -+ This interface is younger than the old "CLIP" interface (next item) -+ and it may therefore still have some bugs. In the future, it will -+ replace the old interface entirely. -+ -+Classical IP over ATM for PVCs (obsolete) -+CONFIG_ATM_CLIP -+ Classical IP over ATM for PVCs only and without InARP. This interface -+ is obsolete and will be removed in later versions of ATM on Linux, as -+ soon as ATMARP is fully mature. -+ -+Application REQUested IP over ATM -+CONFIG_AREQUIPA -+ Arequipa is an experimental mechanism to create short-cut ATM SVCs for -+ IP traffic. See -+ ftp://lrcftp.epfl.ch/pub/arequipa/draft-almesberger-arequipa-01.txt -+ for details. -+ -+LANE support -+CONFIG_ATM_LANE -+ Lan Emulation emulates services of existing LANs across an ATM network. -+ Client in Linux currently supports only one virtual LAN, and it has -+ not been tested in environment which uses other than DIX Ethernet- -+ data frames, i.e. Appletalk, IPX support has not been tested. -+ Specification for LANE can be found from ATM Forum's specification -+ LAN Emulation Over ATM - Version 1.0. -+ -+ATM over TCP -+CONFIG_ATM_TCP -+ ATM over TCP driver. Useful for doing some simple experiments with the -+ native ATM socket API, but not for many other things. You don't need -+ this is you have a "real" ATM card. -+ -+Efficient Networks ENI155P -+CONFIG_ATM_ENI -+ Driver for the Efficient Networks ENI155p series 155 Mbps ATM adapters. -+ Both, the C and S variants (512kB and 2MB ob-board RAM, respectively), -+ and the FPGA and the ASIC Tonga versions of the board are supported. -+ The driver works with MMF (-MF) and UTP-5 (-U5) adapters. -+ -+Enable extended debugging -+CONFIG_ATM_ENI_DEBUG -+ Extended debugging records various events and displays that list when -+ an inconsistency is detected. This mechanism is faster than generally -+ using printks, but still has some impact on performance. Note that -+ extended debugging may create certain race conditions itself. Enable -+ this ONLY if you suspect problems with the driver. -+ -+ZeitNet ZN1221/ZN1225 -+CONFIG_ATM_ZATM -+ Driver for the ZeitNet ZN1221 (MMF) and ZN1225 (UTP-5) 155 Mbps ATM -+ adapters. -+ -+Enable extended debugging -+CONFIG_ATM_ZATM_DEBUG -+ Extended debugging records various events and displays that list when -+ an inconsistency is detected. This mechanism is faster than generally -+ using printks, but still has some impact on performance. Note that -+ extended debugging may create certain race conditions itself. Enable -+ this ONLY if you suspect problems with the driver. -+ -+Rolfs TI TNETA1570 -+CONFIG_ATM_TNETA1570 -+ Driver for the TNETA1570 155 Mbps ATM adapter, both developed by Rolf -+ Fiedler at TU Chemnitz, see also -+ ftp://ftp.infotech.tu-chemnitz.de/pub/linux-atm -+ -+Enable extended debugging -+CONFIG_ATM_TNETA1570_DEBUG -+ Extended debugging records various events and displays that list when -+ an inconsistency is detected. This mechanism is faster than generally -+ using printks, but still has some impact on performance. Note that -+ extended debugging may create certain race conditions itself. Enable -+ this ONLY if you suspect problems with the driver. -+ - SCSI support? - CONFIG_SCSI - If you want to use a SCSI harddisk, SCSI tapedrive, SCSI CDROM or ---- ref/kernel/ksyms.c Wed May 29 15:42:27 1996 -+++ work/kernel/ksyms.c Mon Jun 10 17:43:08 1996 -@@ -62,6 +62,9 @@ - #ifdef __SMP__ - #include - #endif -+#ifdef CONFIG_ATM -+#include -+#endif - - extern char *get_options(char *str, int *ints); - extern void set_device_ro(int dev,int flag); -@@ -76,6 +79,10 @@ - - extern void hard_reset_now(void); - -+#ifdef CONFIG_ATM_TCP -+extern int (*atmtcp_attach_hook)(struct socket *sock); -+#endif -+ - struct symbol_table symbol_table = { - #include - #ifdef MODVERSIONS -@@ -348,7 +355,16 @@ - #ifdef CONFIG_BLK_DEV_MD - X(disk_name), /* for md.c */ - #endif -- -+ -+#ifdef CONFIG_ATM -+ X(atm_dev_register), -+ X(atm_dev_deregister), -+ X(atm_find_ci), -+#endif -+#ifdef CONFIG_ATM_TCP -+ X(atmtcp_attach_hook), -+#endif -+ - /* binfmt_aout */ - X(get_write_access), - X(put_write_access), ---- ref/arch/i386/config.in Mon May 13 06:17:23 1996 -+++ work/arch/i386/config.in Mon Jun 10 17:36:00 1996 -@@ -72,6 +72,10 @@ - endmenu - fi - -+if [ "$CONFIG_ATM" = "y" ]; then -+ source drivers/atm/Config.in -+fi -+ - mainmenu_option next_comment - comment 'ISDN subsystem' - ---- ref/arch/sparc/config.in Thu Apr 25 12:22:05 1996 -+++ work/arch/sparc/config.in Thu Jul 11 13:50:26 1996 -@@ -100,6 +100,12 @@ - endmenu - fi - -+if [ "$CONFIG_ATM" = "y" ]; then -+ if [ "$CONFIG_INET" = "y" ]; then -+ tristate 'ATM over TCP' CONFIG_ATM_TCP n -+ fi -+fi -+ - source fs/Config.in - - mainmenu_option next_comment ---- ref/drivers/Makefile Mon Apr 22 09:59:39 1996 -+++ work/drivers/Makefile Mon Jun 10 17:44:29 1996 -@@ -9,7 +9,7 @@ - - SUB_DIRS := block char net #streams - MOD_SUB_DIRS := $(SUB_DIRS) --ALL_SUB_DIRS := $(SUB_DIRS) pci sbus scsi sound cdrom isdn -+ALL_SUB_DIRS := $(SUB_DIRS) atm pci sbus scsi sound cdrom isdn - - ifdef CONFIG_PCI - SUB_DIRS += pci -@@ -50,6 +50,11 @@ - ifeq ($(CONFIG_ISDN),m) - MOD_SUB_DIRS += isdn - endif -+endif -+ -+ifdef CONFIG_ATM -+SUB_DIRS += atm -+MOD_SUB_DIRS += atm - endif - - ifeq ($(CONFIG_AP1000),y) ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/Config.in Wed Jul 17 21:59:55 1996 -@@ -0,0 +1,21 @@ -+# -+# ATM device configuration -+# -+comment 'ATM drivers' -+if [ "$CONFIG_INET" = "y" ]; then -+ tristate 'ATM over TCP' CONFIG_ATM_TCP n -+fi -+if [ "$CONFIG_PCI" = "y" ]; then -+ tristate 'Efficient Networks ENI155P' CONFIG_ATM_ENI y -+ if [ ! "$CONFIG_ATM_ENI" = "n" ]; then -+ bool ' Enable extended debugging' CONFIG_ATM_ENI_DEBUG n -+ fi -+ tristate 'ZeitNet ZN1221/ZN1225' CONFIG_ATM_ZATM y -+ if [ ! "$CONFIG_ATM_ZATM" = "n" ]; then -+ bool ' Enable extended debugging' CONFIG_ATM_ZATM_DEBUG n -+ fi -+ bool 'Rolfs TI TNETA1570' CONFIG_ATM_TNETA1570 y -+ if [ "$CONFIG_ATM_TNETA1570" = "y" ]; then -+ bool ' Enable extended debugging' CONFIG_ATM_TNETA1570_DEBUG n -+ fi -+fi ---- ref/net/Config.in Wed Jun 5 13:42:27 1996 -+++ work/net/Config.in Wed Jul 17 19:33:18 1996 -@@ -27,4 +27,17 @@ - if [ "$CONFIG_NETLINK" = "y" ]; then - bool 'Routing messages' CONFIG_RTNETLINK - fi -+bool 'Asynchronous Transfer Mode (ATM)' CONFIG_ATM y -+if [ "$CONFIG_ATM" = "y" ]; then -+ bool ' Enable single-copy' CONFIG_MMU_HACKS n -+ if [ "$CONFIG_MMU_HACKS" = "y" ]; then -+ bool ' Extended debugging for single-copy' CONFIG_MMU_HACKS_DEBUG y -+ fi -+ if [ "$CONFIG_INET" = "y" ]; then -+ bool ' Classical IP over ATM with ATMARP' CONFIG_ATM_ATMARP y -+ bool ' Classical IP over ATM for PVCs (obsolete)' CONFIG_ATM_CLIP n -+ bool ' Application REQUested IP over ATM' CONFIG_AREQUIPA y -+ fi -+ bool ' LANE support' CONFIG_ATM_LANE y -+fi - endmenu ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/Makefile Thu Jul 18 20:51:29 1996 -@@ -0,0 +1,38 @@ -+# File: drivers/atm/Makefile -+# -+# Makefile for the Linux network (ATM) device drivers. -+# -+ -+L_TARGET := atm.a -+L_OBJS := atmdev_init.o -+M_OBJS := -+ -+include ../../.config -+ -+ifeq ($(CONFIG_ATM_ENI),y) -+L_OBJS += eni.o suni.o -+endif -+ -+ifeq ($(CONFIG_ATM_ZATM),y) -+L_OBJS += zatm.o uPD98402.o -+endif -+ -+ifeq ($(CONFIG_ATM_TNETA1570),y) -+L_OBJS += tneta1570.o suni.o -+endif -+ -+ifeq ($(CONFIG_ATM_FORE200),y) -+L_OBJS += fore200.o -+endif -+ -+ifeq ($(CONFIG_ATM_TCP),y) -+L_OBJS += atmtcp.o -+else -+ ifeq ($(CONFIG_ATM_TCP),m) -+ M_OBJS += atmtcp.o -+ endif -+endif -+ -+EXTRA_CFLAGS=-g -+ -+include $(TOPDIR)/Rules.make ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/atmdev_init.c Thu Jul 18 20:50:30 1996 -@@ -0,0 +1,47 @@ -+/* drivers/atm/atmdev_init.c - ATM device driver initialization */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+ -+ -+#ifdef CONFIG_ATM_ENI -+extern int eni_detect(void); -+#endif -+#ifdef CONFIG_ATM_ZATM -+extern int zatm_detect(void); -+#endif -+#ifdef CONFIG_ATM_TNETA1570 -+extern int tneta1570_detect(void); -+#endif -+#ifdef CONFIG_ATM_FORE200 -+extern int fore200_detect(void); -+#endif -+#ifdef CONFIG_ATM_TCP -+extern int atmtcp_init(void); -+#endif -+ -+ -+int atmdev_init(void) -+{ -+ int devs; -+ -+ devs = 0; -+#ifdef CONFIG_ATM_ENI -+ devs += eni_detect(); -+#endif -+#ifdef CONFIG_ATM_ZATM -+ devs += zatm_detect(); -+#endif -+#ifdef CONFIG_ATM_TNETA1570 -+ devs += tneta1570_detect(); -+#endif -+#ifdef CONFIG_ATM_FORE200 -+ devs += fore200_detect(); -+#endif -+#ifdef CONFIG_ATM_TCP -+ devs += atmtcp_init(); -+#endif -+ return devs; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/atmtcp.c Thu Jul 4 17:05:57 1996 -@@ -0,0 +1,316 @@ -+/* drivers/atm/atmtcp.c - ATM over TCP "device" driver */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+/* Various enhancements 1996 by Ronald A. McCormick */ -+ -+ -+#include -+#include /* printk */ -+#include /* verify_area */ -+#include -+#include -+#include -+#include -+#include -+#include /* xtime */ -+#include /* set_fs, get_fs, ... */ -+#include /* ntohs, htons */ -+ -+ -+#define DEV_LABEL "atmtcp" -+ -+ -+#define MAX_VPI_BITS 8 -+#define MAX_VCI_BITS 16 -+ -+ -+#define PRIV(c) ((struct private *) ((c)->dev_data)) -+ -+ -+extern int (*atmtcp_attach_hook)(struct socket *sock); -+ -+ -+/* BIG BUG: we can never get rid of an ATMTCP interface @@@ */ -+ -+ -+/* -+ * correct compilation of this is implementation-dependent ! -+ */ -+ -+struct atmtcp_hdr { -+ unsigned short vpi; -+ unsigned short vci; -+ unsigned short length; /* ... of data part */ -+}; -+ -+struct private { -+ struct atm_dev *dev; /* device back pointer */ -+ struct socket *sock; /* file descriptor */ -+}; -+ -+ -+static int atmtcp_open(struct atm_vcc *vcc,short vpi,int vci) -+{ -+ int error; -+ -+ error = atm_find_ci(vcc,&vpi,&vci); -+ if (error) return error; -+ vcc->vpi = vpi; -+ vcc->vci = vci; -+ if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC) return 0; -+#ifdef DEBUG -+ printk(KERN_DEBUG DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number, -+ vcc->vpi,vcc->vci); -+#endif -+ vcc->flags |= ATM_VF_ADDR | ATM_VF_READY; -+ return 0; -+} -+ -+ -+int atmtcp_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) -+{ -+ if (cmd == ATM_SETCIRANGE) { -+ struct atm_cirange ci; -+ struct atm_vcc *walk; -+ -+ memcpy_fromfs(&ci,(void *) arg,sizeof(struct atm_cirange)); -+ if (ci.vpi_bits == ATM_CI_MAX) ci.vpi_bits = MAX_VPI_BITS; -+ if (ci.vci_bits == ATM_CI_MAX) ci.vci_bits = MAX_VCI_BITS; -+ if (ci.vpi_bits > MAX_VPI_BITS || ci.vpi_bits < 0 || -+ ci.vci_bits > MAX_VCI_BITS || ci.vci_bits < 0) -+ return -EINVAL; -+/* -+ * should all this checking be done in net/atm ? -+ */ -+ for (walk = dev->vccs; walk; walk = walk->next) -+ if ((walk->vpi >> ci.vpi_bits) || -+ (walk->vci >> ci.vci_bits)) return -EBUSY; -+ dev->ci_range = ci; -+ return 0; -+ } -+ return -EINVAL; -+} -+ -+ -+ -+static int do_recv(struct socket *sock,unsigned char *ubuf,int size, -+ int nonblock) -+{ -+ struct iovec iov; -+ struct msghdr msg; -+ -+ iov.iov_base = ubuf; -+ iov.iov_len = size; -+ -+ msg.msg_name = NULL; -+ msg.msg_namelen = 0; -+ msg.msg_control = NULL; -+ msg.msg_iov = &iov; -+ msg.msg_iovlen = 1; -+ -+ return sock->ops->recvmsg(sock,&msg,size,nonblock,0,NULL); -+} -+ -+ -+static int do_send(struct socket *sock,const void *buff,int len,int nonblock) -+{ -+ struct iovec iov; -+ struct msghdr msg; -+ -+ iov.iov_base = (void *)buff; -+ iov.iov_len = len; -+ -+ msg.msg_name = NULL; -+ msg.msg_namelen = 0; -+ msg.msg_control = NULL; -+ msg.msg_iov = &iov; -+ msg.msg_iovlen = 1; -+ -+ return sock->ops->sendmsg(sock,&msg,len,nonblock,0); -+} -+ -+ -+static int atmtcp_setsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int optlen) -+{ -+ return -EINVAL; -+} -+ -+ -+static int atmtcp_send(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ struct atmtcp_hdr hdr; -+ unsigned long old_fs; -+ int len,size; -+ void *pos; -+ -+ if (!PRIV(vcc->dev)->sock) { -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ hdr.vpi = htons(vcc->vpi); -+ hdr.vci = htons(vcc->vci); -+ old_fs = get_fs(); -+ set_fs(get_ds()); -+ hdr.length = htons(skb->len); -+ size = do_send(PRIV(vcc->dev)->sock,(char *) &hdr,sizeof(hdr),0); -+ if (size <= 0) { -+ printk(KERN_WARNING "atmtcp_send: PDU lost; errno = %d\n", -+ -size); -+ dev_kfree_skb(skb,FREE_WRITE); -+ set_fs(old_fs); -+ vcc->stats->tx_err++; -+ return size; -+ } -+ pos = skb->data; -+ len = skb->len; -+ while (len) { -+ size = do_send(PRIV(vcc->dev)->sock,pos,len,0); -+ if (size < 0 && size != -EAGAIN) { -+ printk(KERN_ERR "atmtcp_send: link failure; errno = " -+ "%d\n",-size); -+ dev_kfree_skb(skb,FREE_WRITE); -+ set_fs(old_fs); -+ vcc->stats->tx_err++; -+ return size; -+ } -+ if (size > 0) { -+ len -= size; -+ pos += size; -+ } -+ } -+ dev_kfree_skb(skb,FREE_WRITE); -+ set_fs(old_fs); -+ vcc->stats->tx++; -+ return 0; -+} -+ -+ -+static void atmtcp_poll(struct atm_vcc *vcc,int nonblock) -+{ -+ struct atm_dev *dev; -+ struct atm_vcc *walk; -+ struct sk_buff *skb; -+ struct atmtcp_hdr hdr; -+ unsigned long old_fs; -+ int size,left; -+ void *pos; -+ -+ if (!(dev = vcc->dev) || !PRIV(dev)->sock) return; -+ if (skb_peek(&vcc->recvq)) nonblock = 1; -+ old_fs = get_fs(); -+ set_fs(get_ds()); -+ while ((size = do_recv(PRIV(dev)->sock,(char*) &hdr,sizeof(hdr), -+ nonblock) == sizeof(hdr))) { -+ if (!(skb = vcc->peek(vcc,ntohs(hdr.length),NULL))) { -+ printk(KERN_WARNING "atmtcp_poll: peek reject (%d)\n", -+ ntohs(hdr.length)); -+ break; -+ } -+ skb->atm.timestamp = xtime; -+ skb->len = ntohs(hdr.length); -+ skb->free = 1; -+ skb->atm.iovcnt = 0; -+ pos = skb->data; -+ for (left = ntohs(hdr.length); left; left -= size) { -+ size = do_recv(PRIV(dev)->sock,pos,left,0); -+ if (size == -EAGAIN) size = 0; -+ if (size < 0) { -+ printk(KERN_ERR "atmtcp_poll: bad read: %d\n", -+ size); -+ vcc->stats->rx_err++; -+ break; -+ } -+ pos += size; -+ } -+ for (walk = dev->vccs; walk; walk = walk->next) -+ if (walk->vpi == ntohs(hdr.vpi) && walk->vci == -+ ntohs(hdr.vci)) break; -+ if (walk) { -+ skb_queue_tail(&walk->recvq,skb); -+ wake_up(&walk->sleep); -+ nonblock = 1; -+ vcc->stats->rx++; -+ } -+ else { -+ printk(KERN_ERR "atmtcp_poll: bad label %d.%d at itf " -+ "%d\n",ntohs(hdr.vpi),ntohs(hdr.vci),dev->number); -+ kfree_skb(skb,FREE_READ); -+ vcc->stats->rx_err++; -+ } -+ } -+ set_fs(old_fs); -+ if (size > 0 && size != sizeof(hdr)) { -+ printk(KERN_ERR "atmtcp_poll: bad header (%d)\n",size); -+ vcc->stats->rx_err++; -+ } -+} -+ -+ -+static struct atmdev_ops ops = { -+ atmtcp_open, -+ NULL, /* no close */ -+ atmtcp_ioctl, -+ NULL, /* no getsockopt */ -+ atmtcp_setsockopt, -+ atmtcp_send, -+ NULL, /* no direct writes */ -+ atmtcp_poll, -+ NULL, /* no send_oam */ -+ NULL, /* no phy_put */ -+ NULL, /* no phy_get */ -+ NULL /* no feedback */ -+}; -+ -+ -+int atmtcp_attach(struct socket *sock) -+{ -+ struct private *dsc; -+ -+ if (!suser()) return -EPERM; -+ dsc = kmalloc(sizeof(struct private),GFP_KERNEL); -+ if (!dsc) return -ENOMEM; -+ dsc->dev = atm_dev_register(DEV_LABEL,&ops,0); -+ if (!dsc->dev) { -+ kfree(dsc); -+ return -EBUSY; -+ } -+ dsc->dev->dev_data = dsc; -+ dsc->dev->ci_range.vpi_bits = MAX_VPI_BITS; -+ dsc->dev->ci_range.vci_bits = MAX_VCI_BITS; -+ sock->inode->i_count++; -+ dsc->sock = sock; -+ printk(KERN_NOTICE DEV_LABEL "(itf %d): ready\n",dsc->dev->number); -+ MOD_INC_USE_COUNT; -+ return dsc->dev->number; -+} -+ -+ -+int atmtcp_init(void) -+{ -+ printk(KERN_NOTICE DEV_LABEL ": ready (dynamic device creation)\n"); -+ atmtcp_attach_hook = atmtcp_attach; -+ return 1; -+} -+ -+ -+#ifdef MODULE -+ -+int init_module(void) -+{ -+ (void) atmtcp_init(); -+ return 0; -+} -+ -+ -+void cleanup_module(void) -+{ -+ /* -+ * We currently have no means to detach ATM devices. That'll follow -+ * a bit later. (Needs careful usage tracking and open/close -+ * interlocking.) -+ */ -+ atmtcp_attach_hook = NULL; -+} -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/eni.c Thu Jul 18 22:07:12 1996 -@@ -0,0 +1,1944 @@ -+/* drivers/atm/eni.c - Efficient Networks ENI155P device driver */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include /* for xtime */ -+#include -+#include -+#include -+#include -+#include -+ -+#include "tonga.h" -+#include "midway.h" -+#include "suni.h" -+#include "eni.h" -+ -+ -+/* -+ * TODO: -+ * -+ * Show stoppers -+ * none -+ * -+ * Major -+ * - test ASIC Tonga support -+ * -+ * Minor -+ * - OAM support -+ * - fix bugs listed below -+ */ -+ -+/* -+ * KNOWN BUGS: -+ * -+ * - may run into JK-JK bug and deadlock -+ * - should allocate UBR channel first -+ * - ATM DD interface doesn't support double connect(2) yet -+ * - buffer space allocation algorithm is stupid -+ * (RX: should be maxSDU+maxdelay*rate -+ * TX: should be maxSDU+min(maxSDU,maxdelay*rate) ) -+ * - adapter memory may fragment badly -+ * - ATM DD interface doesn't know about CLP -+ * - doesn't support OAM cells -+ * - buddy implementation is hyper-inefficient -+ * - eni_put_free may hang if not putting memory fragments that _complete_ -+ * 2^n block -+ * - keeps IRQ even if initialization fails -+ */ -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+#ifndef CONFIG_ATM_ENI_DEBUG -+ -+ -+#define NULLCHECK(x) -+ -+#define EVENT(s,a,b) -+ -+ -+static void event_dump(void) -+{ -+} -+ -+ -+#else -+ -+ -+/* -+ * NULL pointer checking -+ */ -+ -+#define NULLCHECK(x) \ -+ if ((unsigned long) (x) < 0x30) printk(KERN_CRIT #x "==0x%x\n", (int) (x)) -+ -+/* -+ * Very extensive activity logging. Greatly improves bug detection speed but -+ * costs a few Mbps if enabled. -+ */ -+ -+#define EV 64 -+ -+static const char *ev[EV]; -+static unsigned long ev_a[EV],ev_b[EV]; -+static int ec = 0; -+ -+ -+static void EVENT(const char *s,unsigned long a,unsigned long b) -+{ -+ ev[ec] = s; -+ ev_a[ec] = a; -+ ev_b[ec] = b; -+ ec = (ec+1) % EV; -+} -+ -+ -+static void event_dump(void) -+{ -+ int n,i; -+ -+ for (n = 0; n < EV; n++) { -+ i = (ec+n) % EV; -+ printk(KERN_NOTICE); -+ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); -+ } -+} -+ -+ -+#endif /* CONFIG_ATM_ENI_DEBUG */ -+ -+ -+/* -+ * NExx must not be equal at end -+ * EExx may be equal at end -+ * xxPJOK verify validity of pointer jumps -+ * xxPMOK operating on a circular buffer of "c" words -+ */ -+ -+#define NEPJOK(a0,a1,b) \ -+ ((a0) < (a1) ? (b) <= (a0) || (b) > (a1) : (b) <= (a0) && (b) > (a1)) -+#define EEPJOK(a0,a1,b) \ -+ ((a0) < (a1) ? (b) < (a0) || (b) >= (a1) : (b) < (a0) && (b) >= (a1)) -+#define NEPMOK(a0,d,b,c) NEPJOK(a0,(a0+d) & (c-1),b) -+#define EEPMOK(a0,d,b,c) EEPJOK(a0,(a0+d) & (c-1),b) -+ -+ -+static int tx_complete = 0,dma_complete = 0,queued = 0,requeued = 0, -+ backlogged = 0,rx_enqueued = 0,rx_dequeued = 0,pushed = 0,submitted = 0, -+ putting = 0; -+ -+static struct atm_dev *eni_boards = NULL; -+ -+ -+/*-------------------------------- utilities --------------------------------*/ -+ -+ -+static void dump_mem(struct eni_dev *eni_dev) -+{ -+ int i; -+ -+ for (i = 0; i < eni_dev->free_len; i++) -+ printk(KERN_DEBUG " %d: 0x%lx %d\n",i, -+ eni_dev->free_list[i].start, -+ 1 << eni_dev->free_list[i].order); -+} -+ -+ -+static void dump(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ -+ int i; -+ -+ eni_dev = ENI_DEV(dev); -+ printk(KERN_NOTICE "Free memory\n"); -+ dump_mem(eni_dev); -+ printk(KERN_NOTICE "TX buffers\n"); -+ for (i = 0; i < NR_CHAN; i++) -+ if (eni_dev->tx[i].send) -+ printk(KERN_NOTICE " TX %d @ 0x%08lx: %ld\n",i, -+ (unsigned long) eni_dev->tx[i].send, -+ eni_dev->tx[i].words*4); -+ printk(KERN_NOTICE "RX buffers\n"); -+ for (i = 0; i < 1024; i++) -+ if (eni_dev->rx_map[i] && ENI_VCC(eni_dev->rx_map[i])->rx) -+ printk(KERN_NOTICE " RX %d @ 0x%08lx: %ld\n",i, -+ (unsigned long) ENI_VCC(eni_dev->rx_map[i])->recv, -+ ENI_VCC(eni_dev->rx_map[i])->words*4); -+ printk(KERN_NOTICE "----\n"); -+} -+ -+ -+static void eni_put_free(struct eni_dev *eni_dev,unsigned long start, -+ unsigned long size) -+{ -+ struct eni_free *list; -+ int len,order; -+ -+ DPRINTK("init 0x%lx+%ld(0x%lx)\n",start,size,size); -+ start += eni_dev->base_diff; -+ list = eni_dev->free_list; -+ len = eni_dev->free_len; -+ while (size) { -+ if (len >= eni_dev->free_list_size) { -+ printk(KERN_CRIT "eni_put_free overflow (0x%lx,%ld)\n", -+ start,size); -+ break; -+ } -+ for (order = 0; !((start | size) & (1 << order)); order++); -+ if (MID_MIN_BUF_SIZE > (1 << order)) { -+ printk(KERN_CRIT "eni_put_free: order %d too small\n", -+ order); -+ break; -+ } -+ list[len].start = start; -+ list[len].order = order; -+ len++; -+ start += 1 << order; -+ size -= 1 << order; -+ } -+ eni_dev->free_len = len; -+ /*dump_mem(eni_dev);*/ -+} -+ -+ -+static unsigned long eni_alloc_mem(struct eni_dev *eni_dev,unsigned long *size) -+{ -+ struct eni_free *list; -+ unsigned long start; -+ int len,i,order,best_order,index; -+ -+ list = eni_dev->free_list; -+ len = eni_dev->free_len; -+ if (*size < MID_MIN_BUF_SIZE) *size = MID_MIN_BUF_SIZE; -+ if (*size > MID_MAX_BUF_SIZE) return 0; -+ for (order = 0; (1 << order) < *size; order++); -+ DPRINTK("trying: %ld->%d\n",*size,order); -+ best_order = 65; /* we don't have more than 2^64 of anything ... */ -+ index = 0; /* silence GCC */ -+ for (i = 0; i < len; i++) -+ if (list[i].order == order) { -+ best_order = order; -+ index = i; -+ break; -+ } -+ else if (best_order > list[i].order && list[i].order > order) { -+ best_order = list[i].order; -+ index = i; -+ } -+ if (best_order == 65) return 0; -+ start = list[index].start-eni_dev->base_diff; -+ list[index] = list[--len]; -+ eni_dev->free_len = len; -+ *size = 1 << order; -+ eni_put_free(eni_dev,start+*size,(1 << best_order)-*size); -+ DPRINTK("%ld bytes (order %d) at 0x%lx\n",*size,order,start); -+ for (i = (*size >> 2)-1; i >= 0; i--) /* never leak data */ -+ ((unsigned long *) start)[i] = 0; -+ /*dump_mem(eni_dev);*/ -+ return start; -+} -+ -+ -+static void eni_free_mem(struct eni_dev *eni_dev,unsigned long start, -+ unsigned long size) -+{ -+ struct eni_free *list; -+ int len,i,order; -+ -+ start += eni_dev->base_diff; -+ list = eni_dev->free_list; -+ len = eni_dev->free_len; -+ for (order = -1; size; order++) size >>= 1; -+ DPRINTK("eni_free_mem: 0x%lx+0x%lx (order %d)\n",start,size,order); -+ for (i = 0; i < len; i++) -+ if (list[i].start == (start^(1 << order)) && -+ list[i].order == order) { -+ DPRINTK("match[%d]: 0x%lx/0x%lx(0x%x), %d/%d\n",i, -+ list[i].start,start,1 << order,list[i].order,order); -+ list[i] = list[--len]; -+ start &= ~(1 << order); -+ order++; -+ i = -1; -+ continue; -+ } -+ if (len >= eni_dev->free_list_size) { -+ printk(KERN_ALERT "eni_free_mem overflow (0x%lx,%d)\n",start, -+ order); -+ return; -+ } -+ list[len].start = start; -+ list[len].order = order; -+ eni_dev->free_len = len+1; -+ /*dump_mem(eni_dev);*/ -+} -+ -+ -+/*----------------------------------- RX ------------------------------------*/ -+ -+ -+#define ENI_VCC_NOS ((struct atm_vcc *) 1) -+ -+ -+static __u32 fetch(struct atm_vcc *vcc,int i) -+{ -+ return ntohl(ENI_VCC(vcc)->recv[(ENI_VCC(vcc)->descr+i+1) & -+ (ENI_VCC(vcc)->words-1)]); /* ^ skip descr */ -+} -+ -+ -+static void rx_ident_err(struct atm_vcc *vcc) -+{ -+ struct atm_dev *dev; -+ struct eni_vcc *eni_vcc; -+ -+ dev = vcc->dev; -+ /* immediately halt adapter */ -+ ENI_DEV(dev)->reg[MID_MC_S] &= ~(MID_DMA_ENABLE | MID_TX_ENABLE | -+ MID_RX_ENABLE); -+ /* dump useful information */ -+ eni_vcc = ENI_VCC(vcc); -+ printk(KERN_ALERT DEV_LABEL "(itf %d): driver error - RX ident " -+ "mismatch\n",dev->number); -+ printk(KERN_ALERT " VCI %d, rxing %d, words %ld\n",vcc->vci, -+ eni_vcc->rxing,eni_vcc->words); -+ printk(KERN_ALERT " host descr 0x%08lx, rx pos 0x%08lx, descr value " -+ "0x%08lx\n",eni_vcc->descr,eni_vcc->rx_pos, -+ eni_vcc->recv[eni_vcc->descr]); -+ printk(KERN_ALERT " last 0x%08lx, servicing %d\n", -+ (unsigned long) eni_vcc->last,eni_vcc->servicing); -+ EVENT("---dump ends here---\n",0,0); -+ printk(KERN_NOTICE "---recent events---\n"); -+ event_dump(); -+ ENI_DEV(dev)->fast = NULL; /* really stop it */ -+ ENI_DEV(dev)->slow = NULL; -+ skb_queue_head_init(&ENI_DEV(dev)->rx_queue); -+} -+ -+ -+static int do_rx_dma(struct atm_vcc *vcc,struct sk_buff *skb, -+ unsigned long skip,unsigned long size,unsigned long eff) -+{ -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ unsigned long dma_rd,dma_wr; -+ unsigned long dma[RX_DMA_BUF*2]; -+ unsigned long paddr,here; -+ int i,j; -+ -+ eni_dev = ENI_DEV(vcc->dev); -+ eni_vcc = ENI_VCC(vcc); -+ paddr = 0; /* GCC, shut up */ -+ if (skb) { -+ paddr = (unsigned long) skb->data; -+ if (paddr & 3) -+ printk(KERN_CRIT DEV_LABEL "(itf %d): VCI %d has " -+ "mis-aligned RX data (0x%lx)\n",vcc->dev->number, -+ vcc->vci,paddr); -+ skb->atm.size = size+skip; -+ /* PDU plus descriptor */ -+ skb->atm.vcc = vcc; -+ } -+ j = 0; -+ if ((eff && skip) || 1) { /* @@@ actually, skip is always == 1 ... */ -+ here = (eni_vcc->descr+skip) & (eni_vcc->words-1); -+ dma[j++] = (here << MID_DMA_COUNT_SHIFT) | (vcc->vci -+ << MID_DMA_VCI_SHIFT) | MID_DT_JK; -+ j++; -+ } -+ here = (eni_vcc->descr+size+skip) & (eni_vcc->words-1); -+ if (!eff) size += skip; -+ else { -+ unsigned long words; -+ -+ if (!size) { -+ DPRINTK("strange things happen ...\n"); -+ EVENT("strange things happen ... (skip=%ld,eff=%ld)\n", -+ size,eff); -+ } -+ words = eff; -+ if (paddr & 15) { -+ unsigned long init; -+ -+ init = 4-((paddr & 15) >> 2); -+ if (init > words) init = words; -+ dma[j++] = MID_DT_WORD | (init << MID_DMA_COUNT_SHIFT) | -+ (vcc->vci << MID_DMA_VCI_SHIFT); -+ dma[j++] = paddr; -+ paddr += init << 2; -+ words -= init; -+ } -+ if (words & ~7) { -+#if 0 /* works with *some* PCI chipsets ... */ -+ dma[j++] = MID_DT_8W | ((words >> 3) << -+ MID_DMA_COUNT_SHIFT) | (vcc->vci << -+ MID_DMA_VCI_SHIFT); -+ dma[j++] = paddr; -+ paddr += (words & ~7) << 2; -+ words &= 7; -+#else -+ dma[j++] = MID_DT_4W | ((words >> 2) << -+ MID_DMA_COUNT_SHIFT) | (vcc->vci << -+ MID_DMA_VCI_SHIFT); -+ dma[j++] = paddr; -+ paddr += (words & ~3) << 2; -+ words &= 3; -+#endif -+ } -+ if (words) { -+ dma[j++] = MID_DT_WORD | (words << MID_DMA_COUNT_SHIFT) -+ | (vcc->vci << MID_DMA_VCI_SHIFT); -+ dma[j++] = paddr; -+ } -+ } -+ if (size != eff) { -+ dma[j++] = (here << MID_DMA_COUNT_SHIFT) | -+ (vcc->vci << MID_DMA_VCI_SHIFT) | MID_DT_JK; -+ j++; -+ } -+ if (!j || j > 2*RX_DMA_BUF) { -+ printk(KERN_CRIT DEV_LABEL "!j or j too big!!!\n"); -+ if (skb) kfree_skb(skb,FREE_READ); -+ return -1; -+ } -+ dma[j-2] |= MID_DMA_END; -+ j = j >> 1; -+ dma_wr = eni_dev->reg[MID_DMA_WR_RX]; -+ dma_rd = eni_dev->reg[MID_DMA_RD_RX]; -+ if (!NEPMOK(dma_wr,j+j+1,dma_rd,NR_DMA_RX)) { /* @@@ +1 is ugly */ -+ printk(KERN_WARNING DEV_LABEL "(itf %d): RX DMA full\n", -+ vcc->dev->number); -+ if (skb) kfree_skb(skb,FREE_READ); -+ return -1; -+ } -+ for (i = 0; i < j; i++) { -+ eni_dev->rx_dma[dma_wr*2] = dma[i*2]; -+ eni_dev->rx_dma[dma_wr*2+1] = dma[i*2+1]; -+ dma_wr = (dma_wr+1) & (NR_DMA_RX-1); -+ } -+ if (skb) { -+ skb->atm.pos = eni_vcc->descr+size+1; -+ skb_queue_tail(&eni_dev->rx_queue,skb); -+eni_vcc->last = skb; -+rx_enqueued++; -+ } -+ eni_vcc->descr = here; -+ eni_dev->reg[MID_DMA_WR_RX] = dma_wr; -+ return 0; -+} -+ -+ -+static void discard(struct atm_vcc *vcc,unsigned long size) -+{ -+ struct eni_vcc *eni_vcc; -+ -+ eni_vcc = ENI_VCC(vcc); -+ EVENT("discard (size=%ld)\n",size,0); -+ while (do_rx_dma(vcc,NULL,1,size,0)) EVENT("BUSY LOOP",0,0); -+ /* could do a full fallback, but that might be more expensive */ -+ if (eni_vcc->rxing) eni_vcc->last->atm.pos += size+1; -+ else eni_vcc->rx_pos = (eni_vcc->rx_pos+size+1) & (eni_vcc->words-1); -+} -+ -+ -+/* -+ * TODO: should check whether direct copies (without DMA setup, dequeuing on -+ * interrupt, etc.) aren't much faster for AAL0 -+ */ -+ -+static int rx_aal0(struct atm_vcc *vcc) -+{ -+ struct eni_vcc *eni_vcc; -+ unsigned long descr; -+ unsigned long length; -+ struct sk_buff *skb; -+ -+ DPRINTK(">rx_aal0\n"); -+ eni_vcc = ENI_VCC(vcc); -+ descr = eni_vcc->recv[eni_vcc->descr]; -+ if ((descr & MID_RED_IDEN) != (MID_RED_RX_ID << MID_RED_SHIFT)) { -+ rx_ident_err(vcc); -+ return 1; -+ } -+ if (descr & MID_RED_T) { -+ DPRINTK(DEV_LABEL "(itf %d): trashing empty cell\n", -+ vcc->dev->number); -+ length = 0; -+ vcc->stats->rx_err++; -+ } -+ else { -+ length = ATM_CELL_SIZE-1; /* no HEC */ -+ } -+ if (!length) skb = NULL; -+ else skb = vcc->peek(vcc,length,fetch); -+ if (!skb) { -+ discard(vcc,length >> 2); -+ return 0; -+ } -+ skb->free = 1; /* not very useful ... */ -+ skb->len = length; -+ skb->atm.timestamp = eni_vcc->timestamp; -+ DPRINTK("got len %ld\n",length); -+ if (do_rx_dma(vcc,skb,1,length >> 2,length >> 2)) return 1; -+ eni_vcc->rxing++; -+ return 0; -+} -+ -+ -+static int rx_aal5(struct atm_vcc *vcc) -+{ -+ struct eni_vcc *eni_vcc; -+ unsigned long descr; -+ unsigned long size,eff,length; -+ struct sk_buff *skb; -+ -+ EVENT("rx_aal5\n",0,0); -+ DPRINTK(">rx_aal5\n"); -+ eni_vcc = ENI_VCC(vcc); -+ descr = eni_vcc->recv[eni_vcc->descr]; -+ if ((descr & MID_RED_IDEN) != (MID_RED_RX_ID << MID_RED_SHIFT)) { -+ rx_ident_err(vcc); -+ return 1; -+ } -+ if (descr & (MID_RED_T | MID_RED_CRC_ERR)) { -+ if (descr & MID_RED_T) { -+ EVENT("empty cell (descr=0x%08lx)\n",descr,0); -+ DPRINTK(DEV_LABEL "(itf %d): trashing empty cell\n", -+ vcc->dev->number); -+ size = 0; -+ } -+ else { -+ printk(KERN_WARNING DEV_LABEL "(itf %d): discarding " -+ "PDU with CRC error\n",vcc->dev->number); -+ size = (descr & MID_RED_COUNT)*(ATM_CELL_PAYLOAD >> 2); -+ EVENT("CRC error (descr=0x%08lx,size=%ld)\n",descr, -+ size); -+ } -+ eff = length = 0; -+ vcc->stats->rx_err++; -+ } -+ else { -+ size = (descr & MID_RED_COUNT)*(ATM_CELL_PAYLOAD >> 2); -+ DPRINTK("size=%ld\n",size); -+ length = eni_vcc->recv[(eni_vcc->descr+size-1) & -+ (eni_vcc->words-1)] & 0xffff; /* -trailer(2)+header(1) */ -+ if (length && length <= (size << 2)-8 && length <= -+ ATM_MAX_AAL5_PDU) eff = (length+3) >> 2; -+ else { /* ^ trailer length (8) */ -+ EVENT("bad PDU (descr=0x08%lx,length=%ld)\n",descr, -+ length); -+ printk(KERN_ERR DEV_LABEL "(itf %d): bad AAL5 PDU " -+ "(VCI=%d,length=%ld,size=%ld (descr 0x%lx))\n", -+ vcc->dev->number,vcc->vci,length,size << 2,descr); -+#if 0 -+printk("0x%lx[0x%lx] (0x%lx,%ld) size %ld len %ld\n", -+ (unsigned long) eni_vcc->recv,eni_vcc->descr,(unsigned long) eni_vcc, -+ eni_vcc->words,size << 2,length); -+#endif -+ length = eff = 0; -+ vcc->stats->rx_err++; -+ } -+ } -+ if (!eff) skb = NULL; -+ else { -+ skb = vcc->peek(vcc,eff << 2,fetch); -+ if (!skb) { -+ EVENT("peek reject (eff << 2=%ld)\n",eff << 2,0); -+ DPRINTK(DEV_LABEL "(itf %d): peek reject for %ld " -+ "bytes\n",vcc->dev->number,eff << 2); -+ } -+ } -+ if (!skb) { -+ discard(vcc,size); -+ return 0; -+ } -+ skb->free = 1; /* not very useful ... */ -+ skb->len = length; -+ DPRINTK("got len %ld\n",length); -+ if (do_rx_dma(vcc,skb,1,size,eff)) return 1; -+ eni_vcc->rxing++; -+ return 0; -+} -+ -+ -+static inline int rx_vcc(struct atm_vcc *vcc) -+{ -+ volatile unsigned long *vci_dsc; -+ struct eni_vcc *eni_vcc; -+ unsigned long tmp; -+ -+ eni_vcc = ENI_VCC(vcc); -+ vci_dsc = ENI_DEV(vcc->dev)->vci+vcc->vci*4; -+ EVENT("rx_vcc(1)\n",0,0); -+ while (eni_vcc->descr != (tmp = (vci_dsc[1] & MID_VCI_DESCR) >> -+ MID_VCI_DESCR_SHIFT)) { -+ EVENT("rx_vcc(2: host dsc=0x%lx, nic dsc=0x%lx)\n", -+ eni_vcc->descr,tmp); -+ DPRINTK("CB_DESCR %ld REG_DESCR %ld\n",ENI_VCC(vcc)->descr, -+ ((vci_dsc[1] & MID_VCI_DESCR) >> MID_VCI_DESCR_SHIFT)); -+ if (ENI_VCC(vcc)->rx(vcc)) return 1; -+ } -+ /* clear IN_SERVICE flag */ -+ vci_dsc[0] &= ~MID_VCI_IN_SERVICE; -+ /* -+ * If new data has arrived between evaluating the while condition and -+ * clearing IN_SERVICE, we wouldn't be notified until additional data -+ * follows. So we have to loop again to be sure. -+ */ -+ EVENT("rx_vcc(3)\n",0,0); -+ while (ENI_VCC(vcc)->descr != (tmp = (vci_dsc[1] & MID_VCI_DESCR) >> -+ MID_VCI_DESCR_SHIFT)) { -+ EVENT("rx_vcc(4: host dsc=0x%lx, nic dsc=0x%lx)\n", -+ eni_vcc->descr,tmp); -+ DPRINTK("CB_DESCR %ld REG_DESCR %ld\n",ENI_VCC(vcc)->descr, -+ ((vci_dsc[1] & MID_VCI_DESCR) >> MID_VCI_DESCR_SHIFT)); -+ if (ENI_VCC(vcc)->rx(vcc)) return 1; -+ } -+ return 0; -+} -+ -+ -+static void poll_rx(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ struct atm_vcc *curr; -+ -+ eni_dev = ENI_DEV(dev); -+ while ((curr = eni_dev->fast)) { -+ EVENT("poll_tx.fast\n",0,0); -+ if (rx_vcc(curr)) return; -+ eni_dev->fast = ENI_VCC(curr)->next; -+ ENI_VCC(curr)->next = ENI_VCC_NOS; -+ ENI_VCC(curr)->servicing--; -+ } -+ while ((curr = eni_dev->slow)) { -+ EVENT("poll_tx.slow\n",0,0); -+ if (rx_vcc(curr)) return; -+ eni_dev->slow = ENI_VCC(curr)->next; -+ ENI_VCC(curr)->next = ENI_VCC_NOS; -+ ENI_VCC(curr)->servicing--; -+ } -+} -+ -+ -+static void get_service(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ struct atm_vcc *vcc; -+ unsigned long vci; -+ -+ DPRINTK(">get_service\n"); -+ eni_dev = ENI_DEV(dev); -+ while (eni_dev->reg[MID_SERV_WRITE] != eni_dev->serv_read) { -+ vci = eni_dev->service[eni_dev->serv_read]; -+ eni_dev->serv_read = (eni_dev->serv_read+1) & (NR_SERVICE-1); -+ vcc = eni_dev->rx_map[vci & 1023]; -+ if (!vcc) { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): VCI %ld not " -+ "found\n",dev->number,vci); -+ continue; /* nasty but we try to go on anyway */ -+ /* @@@ nope, doesn't work */ -+ } -+ EVENT("getting from service\n",0,0); -+ if (ENI_VCC(vcc)->next != ENI_VCC_NOS) { -+ EVENT("double service\n",0,0); -+ DPRINTK("Grr, servicing VCC %ld twice\n",vci); -+ continue; -+ } -+ ENI_VCC(vcc)->timestamp = xtime; -+ ENI_VCC(vcc)->next = NULL; -+ if (vcc->rxtp.class == ATM_CBR) { -+ if (eni_dev->fast) -+ ENI_VCC(eni_dev->last_fast)->next = vcc; -+ else eni_dev->fast = vcc; -+ eni_dev->last_fast = vcc; -+ } -+ else { -+ if (eni_dev->slow) -+ ENI_VCC(eni_dev->last_slow)->next = vcc; -+ else eni_dev->slow = vcc; -+ eni_dev->last_slow = vcc; -+ } -+putting++; -+ ENI_VCC(vcc)->servicing++; -+ } -+} -+ -+ -+static void dequeue_rx(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ struct atm_vcc *vcc; -+ struct sk_buff *skb; -+ volatile unsigned long *vci_dsc; -+ int first; -+ -+ eni_dev = ENI_DEV(dev); -+ first = 1; -+ while (1) { -+ skb = skb_dequeue(&eni_dev->rx_queue); -+ if (!skb) { -+ if (first) { -+ DPRINTK(DEV_LABEL "(itf %d): RX but not " -+ "rxing\n",dev->number); -+ EVENT("nothing to dequeue\n",0,0); -+ } -+ break; -+ } -+ EVENT("dequeued (size=%d,pos=0x%lx)\n",skb->atm.size, -+ skb->atm.pos); -+/*printk("DMA@0x%X\n",eni_dev->reg[MID_DMA_ADDR]);*/ -+rx_dequeued++; -+ vcc = skb->atm.vcc; -+ eni_vcc = ENI_VCC(vcc); -+ first = 0; -+ vci_dsc = eni_dev->vci+(vcc->vci << 2); -+ if (!EEPMOK(eni_vcc->rx_pos,skb->atm.size,(vci_dsc[1] & -+ MID_VCI_READ) >> MID_VCI_READ_SHIFT,eni_vcc->words)) { -+ EVENT("requeuing\n",0,0); -+ skb_queue_head(&eni_dev->rx_queue,skb); -+ break; -+ } -+ eni_vcc->rxing--; -+ eni_vcc->rx_pos = skb->atm.pos & (eni_vcc->words-1); -+ if (!skb->len) kfree_skb(skb,FREE_READ); -+ else { -+ EVENT("pushing (len=%d)\n",skb->len,0); -+ if (vcc->aal == ATM_AAL0) -+ *(unsigned long *) skb->data = -+ ntohl(*(unsigned long *) skb->data); -+ vcc->push(vcc,skb); -+ pushed++; -+ } -+ vcc->stats->rx++; -+ } -+ wake_up(&eni_dev->rx_wait); -+} -+ -+ -+static int open_rx_first(struct atm_vcc *vcc) -+{ -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ unsigned long size; -+ -+ DPRINTK("open_rx_first\n"); -+ eni_dev = ENI_DEV(vcc->dev); -+ eni_vcc = ENI_VCC(vcc); -+ eni_vcc->rx = NULL; -+ if (vcc->rxtp.class == ATM_NONE) return 0; -+ size = vcc->rxtp.max_sdu*3; /* @@@ improve this */ -+ eni_vcc->recv = (volatile unsigned long *) eni_alloc_mem(eni_dev,&size); -+ DPRINTK("rx at 0x%lx\n",(unsigned long) eni_vcc->recv); -+ eni_vcc->words = size >> 2; -+ if (!eni_vcc->recv) return -ENOBUFS; -+ eni_vcc->rx = vcc->aal == ATM_AAL5 ? rx_aal5 : rx_aal0; -+ eni_vcc->descr = 0; -+ eni_vcc->rx_pos = 0; -+ eni_vcc->rxing = 0; -+ eni_vcc->servicing = 0; -+ eni_vcc->next = ENI_VCC_NOS; -+ return 0; -+} -+ -+ -+static int open_rx_second(struct atm_vcc *vcc) -+{ -+ volatile unsigned long *here; -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ unsigned long size; -+ int order; -+ -+ DPRINTK("open_rx_second\n"); -+ eni_dev = ENI_DEV(vcc->dev); -+ eni_vcc = ENI_VCC(vcc); -+ if (!eni_vcc->rx) return 0; -+ /* set up VCI descriptor */ -+ here = eni_dev->vci+(vcc->vci << 2); -+ DPRINTK("loc 0x%x\n",eni_vcc->recv-eni_dev->ram); -+ size = eni_vcc->words >> 8; -+ for (order = -1; size; order++) size >>= 1; -+ here[1] = 0; /* descr, read = 0 */ -+ here[2] = 0; /* write, state, count = 0 */ -+ if (eni_dev->rx_map[vcc->vci]) -+ printk(KERN_CRIT DEV_LABEL "(itf %d): BUG - VCI %d already " -+ "in use\n",vcc->dev->number,vcc->vci); -+ eni_dev->rx_map[vcc->vci] = vcc; /* now it counts */ -+ here[0] = ((vcc->aal != ATM_AAL5 ? MID_MODE_RAW : MID_MODE_AAL5) << -+ MID_VCI_MODE_SHIFT) | MID_VCI_PTI_MODE | -+ (((eni_vcc->recv-eni_dev->ram) >> MID_LOC_SKIP) << -+ MID_VCI_LOCATION_SHIFT) | (order << MID_VCI_SIZE_SHIFT); -+ return 0; -+} -+ -+ -+static void close_rx(struct atm_vcc *vcc) -+{ -+ volatile unsigned long *here; -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ unsigned long flags,tmp; -+ -+ eni_vcc = ENI_VCC(vcc); -+ if (!eni_vcc->rx) return; -+ eni_dev = ENI_DEV(vcc->dev); -+ if (vcc->vpi != ATM_VPI_UNSPEC && vcc->vci != ATM_VCI_UNSPEC) { -+ here = eni_dev->vci+(vcc->vci << 2); -+ /* block receiver */ -+ *here = (*here & ~MID_VCI_MODE) | (MID_MODE_TRASH << -+ MID_VCI_MODE_SHIFT); -+ /* wait for receiver to become idle */ -+ udelay(27); -+ /* discard pending cell */ -+ *here &= ~MID_VCI_IN_SERVICE; -+ /* don't accept any new ones */ -+ eni_dev->rx_map[vcc->vci] = NULL; -+ /* wait for RX queue to drain */ -+ DPRINTK("eni_close: waiting for RX ...\n"); -+ EVENT("RX closing\n",0,0); -+ save_flags(flags); -+ cli(); -+ while (eni_vcc->rxing || eni_vcc->servicing) { -+ EVENT("drain PDUs (rx %ld, serv %ld)\n",eni_vcc->rxing, -+ eni_vcc->servicing); -+ printk(KERN_INFO "%d+%d RX left\n",eni_vcc->servicing, -+ eni_vcc->rxing); -+ sleep_on(&eni_dev->rx_wait); -+ } -+ while (eni_vcc->rx_pos != (tmp = eni_dev->vci[vcc->vci*4+1] & -+ MID_VCI_READ) >> MID_VCI_READ_SHIFT) { -+ EVENT("drain discard (host 0x%lx, nic 0x%lx)\n", -+ eni_vcc->rx_pos,tmp); -+ printk(KERN_INFO "draining RX: host 0x%lx, nic 0x%lx\n", -+ eni_vcc->rx_pos,tmp); -+ sleep_on(&eni_dev->rx_wait); -+ } -+ restore_flags(flags); -+ } -+ eni_free_mem(eni_dev,(unsigned long) eni_vcc->recv, -+ eni_vcc->words << 2); -+ eni_vcc->rx = NULL; -+} -+ -+ -+static int start_rx(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ -+ eni_dev = ENI_DEV(dev); -+ eni_dev->rx_map = (struct atm_vcc **) get_free_page(GFP_KERNEL); -+ if (!eni_dev->rx_map) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): couldn't get free page\n", -+ dev->number); -+ free_page((unsigned long) eni_dev->free_list); -+ return -ENOMEM; -+ } -+ memset(eni_dev->rx_map,0,PAGE_SIZE); -+ eni_dev->fast = eni_dev->last_fast = NULL; -+ eni_dev->slow = eni_dev->last_slow = NULL; -+ eni_dev->rx_wait = NULL; -+ skb_queue_head_init(&eni_dev->rx_queue); -+ eni_dev->serv_read = eni_dev->reg[MID_SERV_WRITE]; -+ eni_dev->reg[MID_DMA_WR_RX] = 0; -+ return 0; -+} -+ -+ -+/*----------------------------------- TX ------------------------------------*/ -+ -+ -+enum enq_res { enq_ok,enq_next,enq_jam }; -+ -+ -+static inline void put_dma(int chan,unsigned long *dma,int *j, -+ unsigned long paddr,unsigned long size) -+{ -+ unsigned long init; -+ -+ DPRINTK("put_dma: 0x%lx+0x%lx\n",paddr,size); -+ EVENT("put_dma: 0x%lx+0x%lx\n",paddr,size); -+ if (paddr & 3) -+ printk(KERN_ERR "put_dma: unaligned addr (0x%lx)\n",paddr); -+#if 0 /* don't complain - all cases that pass are handled somewhere else */ -+ if (size & 3) -+ printk(KERN_ERR "put_dma: unaligned size (0x%lx)\n",size); -+#endif -+ size = (size+3) >> 2; -+/* fixme: extra DMA descr when misaligned short PDU @@@ */ -+ if (paddr & 31) { -+ init = 8-((paddr & 31) >> 2); -+ if (init > size) init = size; -+ dma[(*j)++] = MID_DT_WORD | (init << MID_DMA_COUNT_SHIFT) | -+ (chan << MID_DMA_CHAN_SHIFT); -+ dma[(*j)++] = paddr; -+ paddr += init << 2; -+ size -= init; -+ } -+ if (size & ~7) { -+ dma[(*j)++] = MID_DT_8W | ((size >> 3) << MID_DMA_COUNT_SHIFT) -+ | (chan << MID_DMA_CHAN_SHIFT); -+ dma[(*j)++] = paddr; -+ paddr += (size & ~7) << 2; -+ size &= 7; -+ } -+ if (size) { -+ dma[(*j)++] = MID_DT_WORD | (size << MID_DMA_COUNT_SHIFT) | -+ (chan << MID_DMA_CHAN_SHIFT); -+ dma[(*j)++] = paddr; -+ } -+} -+ -+ -+static enum enq_res do_tx(struct sk_buff *skb) -+{ -+ struct atm_vcc *vcc; -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ struct eni_tx *tx; -+ unsigned long dma_rd,dma_wr; -+ unsigned long dma[TX_DMA_BUF*2]; -+ unsigned long size; /* in words */ -+ int aal5,dma_size,i,j; -+ -+ DPRINTK(">do_tx\n"); -+ NULLCHECK(skb); -+ EVENT("do_tx: skb=0x%lx, %d bytes\n",(unsigned long) skb,skb->len); -+ vcc = skb->atm.vcc; -+ NULLCHECK(vcc); -+ eni_dev = ENI_DEV(vcc->dev); -+ NULLCHECK(eni_dev); -+ eni_vcc = ENI_VCC(vcc); -+ tx = eni_vcc->tx; -+ NULLCHECK(tx); -+ if ((unsigned long) skb->data & 3) -+ printk(KERN_ERR DEV_LABEL "(itf %d): VCI %d has mis-aligned " -+ "TX data\n",vcc->dev->number,vcc->vci); -+ /* -+ * Potential future IP speedup: make hard_header big enough to put -+ * segmentation descriptor directly into PDU. Saves: 4 slave writes, -+ * 1 DMA xfer & 2 DMA'ed bytes (protocol layering is for wimps :-) -+ */ -+ -+ /* check space in buffer */ -+ if (!(aal5 = vcc->aal == ATM_AAL5)) -+ size = (ATM_CELL_PAYLOAD >> 2)+TX_DESCR_SIZE; -+ /* cell without HEC plus segmentation header (includes -+ four-byte cell header) */ -+ else { -+ size = skb->len+4*AAL5_TRAILER+ATM_CELL_PAYLOAD-1; -+ /* add AAL5 trailer */ -+ size = ((size-(size % ATM_CELL_PAYLOAD)) >> 2)+TX_DESCR_SIZE; -+ /* add segmentation header */ -+ } -+ if (!NEPMOK(tx->tx_pos,size+TX_GAP, -+ eni_dev->reg[MID_TX_RDPTR(tx->index)],tx->words)) { -+ /* leave some space for "too close" */ -+ DPRINTK(DEV_LABEL "(itf %d): TX full (size %ld)\n", -+ vcc->dev->number,size); -+ return enq_next; -+ } -+ /* check DMA */ -+ dma_wr = eni_dev->reg[MID_DMA_WR_TX]; -+ dma_rd = eni_dev->reg[MID_DMA_RD_TX]; -+ dma_size = 2; /* JK for descriptor and final fill */ -+DPRINTK("iovcnt = %d\n",skb->atm.iovcnt); -+ if (!skb->atm.iovcnt) dma_size += 3; -+ else dma_size += 3*skb->atm.iovcnt; -+ if (dma_size > TX_DMA_BUF) { -+ printk(KERN_WARNING DEV_LABEL "(itf %d): needs %d DMA entries " -+ "(got only %d)\n",vcc->dev->number,dma_size,TX_DMA_BUF); -+ } -+ DPRINTK("dma_wr is %ld, tx_pos is %ld\n",dma_wr,tx->tx_pos); -+ if (dma_wr != dma_rd && ((dma_rd+NR_DMA_TX-dma_wr) & (NR_DMA_TX-1)) < -+ dma_size) { -+ printk(KERN_WARNING DEV_LABEL "(itf %d): TX DMA full\n", -+ vcc->dev->number); -+ return enq_jam; -+ } -+ /* prepare DMA queue entries */ -+ j = 0; -+ dma[j++] = (((tx->tx_pos+TX_DESCR_SIZE) & (tx->words-1)) << -+ MID_DMA_COUNT_SHIFT) | (tx->index << MID_DMA_CHAN_SHIFT) | -+ MID_DT_JK; -+ j++; -+ if (!skb->atm.iovcnt) -+ if (aal5) -+ put_dma(tx->index,dma,&j,(unsigned long) skb->data, -+ skb->len); -+ else put_dma(tx->index,dma,&j,(unsigned long) skb->data+4, -+ skb->len-4); -+ else { -+DPRINTK("doing direct send\n"); -+ for (i = 0; i < skb->atm.iovcnt; i++) -+ put_dma(tx->index,dma,&j,(unsigned long) -+ ((struct iovec *) skb->data)[i].iov_base, -+ ((struct iovec *) skb->data)[i].iov_len); -+ } -+ /* JK for AAL5 trailer - AAL0 doesn't need it, but who cares ... */ -+ dma[j++] = (((tx->tx_pos+size) & (tx->words-1)) << -+ MID_DMA_COUNT_SHIFT) | (tx->index << MID_DMA_CHAN_SHIFT) | -+ MID_DMA_END | MID_DT_JK; -+ j++; -+ DPRINTK("DMA at end: %d\n",j); -+ /* store frame */ -+ tx->send[tx->tx_pos] = (MID_SEG_TX_ID << MID_SEG_ID_SHIFT) | -+ (aal5 ? MID_SEG_AAL5 : 0) | (tx->prescaler << MID_SEG_PR_SHIFT) | -+ (tx->resolution << MID_SEG_RATE_SHIFT) | -+ (size/(ATM_CELL_PAYLOAD/4)); -+/*printk("dsc = 0x%08lx\n",tx->send[tx->tx_pos]);*/ -+ tx->send[(tx->tx_pos+1) & (tx->words-1)] = (vcc->vci << -+ MID_SEG_VCI_SHIFT) | (aal5 ? 0 : (skb->data[3] & 0xf)); -+ DPRINTK("size: %ld, len:%ld\n",size,skb->len); -+ if (aal5) -+ tx->send[(tx->tx_pos+size-AAL5_TRAILER) & (tx->words-1)] = -+ skb->len; -+ j = j >> 1; -+ for (i = 0; i < j; i++) { -+ eni_dev->tx_dma[dma_wr*2] = dma[i*2]; -+ eni_dev->tx_dma[dma_wr*2+1] = dma[i*2+1]; -+ dma_wr = (dma_wr+1) & (NR_DMA_TX-1); -+ } -+ skb->atm.pos = tx->tx_pos; -+ skb->atm.size = size; -+ ENI_VCC(vcc)->txing += size; -+ tx->tx_pos = (tx->tx_pos+size) & (tx->words-1); -+ DPRINTK("dma_wr set to %ld, tx_pos is now %ld\n",dma_wr,tx->tx_pos); -+ eni_dev->reg[MID_DMA_WR_TX] = dma_wr; -+ skb_queue_tail(&eni_dev->tx_queue,skb); -+queued++; -+ return enq_ok; -+} -+ -+ -+static void poll_tx(struct atm_dev *dev) -+{ -+ struct eni_tx *tx; -+ struct sk_buff *skb; -+ enum enq_res res; -+ int i; -+ -+ DPRINTK(">poll_tx\n"); -+ for (i = NR_CHAN-1; i >= 0; i--) { -+ tx = &ENI_DEV(dev)->tx[i]; -+ if (tx->send) -+ while ((skb = skb_dequeue(&tx->backlog))) { -+ res = do_tx(skb); -+ if (res != enq_ok) { -+ DPRINTK("re-queuing TX PDU\n"); -+ skb_queue_head(&tx->backlog,skb); -+requeued++; -+ if (res == enq_jam) return; -+ else break; -+ } -+ } -+ } -+} -+ -+ -+static void dequeue_tx(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ struct atm_vcc *vcc; -+ struct sk_buff *skb; -+ struct eni_tx *tx; -+ -+ NULLCHECK(dev); -+ eni_dev = ENI_DEV(dev); -+ NULLCHECK(eni_dev); -+ while ((skb = skb_dequeue(&eni_dev->tx_queue))) { -+ vcc = skb->atm.vcc; -+ NULLCHECK(vcc); -+ tx = ENI_VCC(vcc)->tx; -+ NULLCHECK(ENI_VCC(vcc)->tx); -+ DPRINTK("dequeue_tx: next 0x%lx curr 0x%lx\n",skb->atm.pos, -+ eni_dev->reg[MID_TX_DESCRSTART(tx->index)]); -+ if (ENI_VCC(vcc)->txing < tx->words && skb->atm.pos == -+ eni_dev->reg[MID_TX_DESCRSTART(tx->index)]) { -+ skb_queue_head(&eni_dev->tx_queue,skb); -+ break; -+ } -+ ENI_VCC(vcc)->txing -= skb->atm.size; -+ if (vcc->pop) vcc->pop(vcc,skb); -+ else dev_kfree_skb(skb,FREE_WRITE); -+ vcc->stats->tx++; -+ wake_up(&eni_dev->tx_wait); -+dma_complete++; -+ } -+} -+ -+ -+static int alloc_tx(struct eni_dev *eni_dev,int *pcr,int min,int max,int ubr) -+{ -+ static const int pre_div[] = { 4,16,128,2048 }; -+ /* 2^(((x+2)^2-(x+2))/2+1) */ -+ int i,pre,res; -+ -+ DPRINTK("in pcr: %d/%d%s\n",min,max,ubr ? " (ubr)" : ""); -+ for (i = !ubr; i < NR_CHAN; i++) -+ if (!eni_dev->tx[i].send) break; -+ if (i == NR_CHAN) return -EAGAIN; -+ if (min) -+ if (min == ATM_MAX_PCR) pre = res = 0; -+ else { -+ int div; -+ -+ for (pre = 0; pre < 3; pre++) -+ if (TS_CLOCK/pre_div[pre]/64 <= min) break; -+ div = pre_div[pre]*min; -+ DPRINTK("min div %d\n",div); -+ res = TS_CLOCK/div-1; -+ } -+ else { -+ int div; -+ -+ if (max > eni_dev->tx_bw && !ubr) max = eni_dev->tx_bw; -+ for (pre = 3; pre >= 0; pre--) -+ if (TS_CLOCK/pre_div[pre]/64 > max) break; -+ if (pre < 3) pre++; /* else fail later */ -+ div = pre_div[pre]*max; -+ DPRINTK("max div %d\n",div); -+ res = (TS_CLOCK+div-1)/div-1; -+ } -+ if (res < 0) res = 0; -+ if (res > MID_SEG_MAX_RATE) res = MID_SEG_MAX_RATE; -+ eni_dev->tx[i].prescaler = pre; -+ eni_dev->tx[i].resolution = res; -+ eni_dev->tx[i].pcr = *pcr = TS_CLOCK/pre_div[pre]/(res+1); -+ DPRINTK("out pcr: %d (%d:%d) <%d,%d>\n",*pcr,pre,res,min,max); -+ DPRINTK("got chan %d\n",i); -+ if ((min && *pcr < min) || (max && *pcr > max)) return -EINVAL; -+ if (*pcr > eni_dev->tx_bw && !ubr) return -EAGAIN; -+ return i; -+} -+ -+ -+static int open_tx_first(struct atm_vcc *vcc) -+{ -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ unsigned long size,mem; -+ int tx_ind,pcr,order; -+ -+ eni_dev = ENI_DEV(vcc->dev); -+ eni_vcc = ENI_VCC(vcc); -+ eni_vcc->tx = NULL; -+ if (vcc->txtp.class == ATM_NONE) return 0; -+ eni_vcc->txing = 0; -+ if (vcc->txtp.class != ATM_UBR) -+ size = vcc->txtp.max_sdu*3; /* @@@ improve */ -+ else { -+ if (eni_dev->ubr) { -+ eni_vcc->tx = eni_dev->ubr; -+ return 0; -+ } -+ size = UBR_BUFFER; -+ vcc->txtp.min_pcr = ATM_MAX_PCR; -+ vcc->txtp.max_pcr = 0; -+ } -+ DPRINTK("get_tx\n"); -+ mem = eni_alloc_mem(eni_dev,&size); -+ if (!mem) return -ENOBUFS; -+ if ((tx_ind = alloc_tx(eni_dev,&pcr,vcc->txtp.min_pcr, -+ vcc->txtp.max_pcr,vcc->txtp.class == ATM_UBR)) < 0) { -+ eni_free_mem(eni_dev,mem,size); -+ return tx_ind; -+ } -+ if (vcc->txtp.class == ATM_UBR) eni_dev->ubr = &eni_dev->tx[tx_ind]; -+ else eni_dev->tx_bw -= pcr; -+ vcc->txtp.min_pcr = vcc->txtp.max_pcr = pcr; -+ eni_dev->tx[tx_ind].send = (volatile unsigned long *) mem; -+ eni_dev->tx[tx_ind].words = size >> 2; -+ skb_queue_head_init(&eni_dev->tx[tx_ind].backlog); -+ size >>= 10; -+ for (order = -1; size; order++) size >>= 1; -+ eni_dev->reg[MID_TX_PLACE(tx_ind)] = (order << MID_SIZE_SHIFT) | -+ ((eni_dev->tx[tx_ind].send-eni_dev->ram) >> MID_LOC_SKIP); -+ eni_dev->tx[tx_ind].tx_pos = eni_dev->reg[MID_TX_DESCRSTART(tx_ind)] & -+ MID_DESCR_START; -+/*printk("mp 0x%lx tp 0x%lx\n",(unsigned long) eni_dev->tx[tx_ind].send, -+ eni_dev->tx[tx_ind].tx_pos);*/ -+ eni_vcc->tx = &eni_dev->tx[tx_ind]; -+ return 0; -+} -+ -+ -+static int open_tx_second(struct atm_vcc *vcc) -+{ -+ return 0; /* nothing to do */ -+} -+ -+ -+static void close_tx(struct atm_vcc *vcc) -+{ -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ unsigned long flags; -+ -+ eni_vcc = ENI_VCC(vcc); -+ if (!eni_vcc->tx) return; -+ eni_dev = ENI_DEV(vcc->dev); -+ /* wait for TX queue to drain */ -+ DPRINTK("eni_close: waiting for TX ...\n"); -+ save_flags(flags); -+ cli(); -+ while (skb_peek(&eni_vcc->tx->backlog) || eni_vcc->txing) { -+ DPRINTK("%d TX left\n",eni_vcc->txing); -+ sleep_on(&eni_dev->tx_wait); -+ } -+ restore_flags(flags); -+#if 0 -+ if (skb_peek(&eni_vcc->tx->backlog)) -+ printk(KERN_CRIT DEV_LABEL "SKBs in BACKLOG !!!\n"); -+#endif -+ if (eni_vcc->tx != eni_dev->ubr) { -+ eni_free_mem(eni_dev,(unsigned long) eni_vcc->tx->send, -+ eni_vcc->tx->words << 2); -+ eni_vcc->tx->send = NULL; -+ eni_dev->tx_bw += eni_vcc->tx->pcr; -+ } -+ eni_vcc->tx = NULL; -+} -+ -+ -+static int start_tx(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ int i; -+ -+ eni_dev = ENI_DEV(dev); -+ eni_dev->lost = 0; -+ eni_dev->tx_bw = ATM_OC3_PCR; -+ eni_dev->tx_wait = NULL; -+ eni_dev->ubr = NULL; -+ skb_queue_head_init(&eni_dev->tx_queue); -+ eni_dev->reg[MID_DMA_WR_TX] = 0; -+ for (i = 0; i < NR_CHAN; i++) { -+ eni_dev->tx[i].send = NULL; -+ eni_dev->tx[i].index = i; -+ } -+ return 0; -+} -+ -+ -+/*--------------------------------- common ----------------------------------*/ -+ -+ -+static void foo(void) -+{ -+printk(KERN_INFO -+ "tx_complete=%d,dma_complete=%d,queued=%d,requeued=%d,sub=%d,\n" -+ "backlogged=%d,rx_enqueued=%d,rx_dequeued=%d,putting=%d,pushed=%d\n", -+ tx_complete,dma_complete,queued,requeued,submitted,backlogged, -+ rx_enqueued,rx_dequeued,putting,pushed); -+if (eni_boards) printk(KERN_INFO "loss: %ld\n",ENI_DEV(eni_boards)->lost); -+} -+ -+static void misc_int(struct atm_dev *dev,unsigned long reason) -+{ -+ struct eni_dev *eni_dev; -+ -+ DPRINTK(">misc_int\n"); -+ eni_dev = ENI_DEV(dev); -+ if (reason & MID_STAT_OVFL) { -+ EVENT("stat overflow\n",0,0); -+ eni_dev->lost += eni_dev->reg[MID_STAT] & MID_OVFL_TRASH; -+ } -+ if (reason & MID_SUNI_INT) { -+ EVENT("SUNI int\n",0,0); -+ dev->phy->interrupt(dev); -+ foo(); -+ } -+ if (reason & MID_TX_IDENT_MISM) { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - ident " -+ "mismatch\n",dev->number); -+ EVENT("---dump ends here---\n",0,0); -+ printk(KERN_NOTICE "---recent events---\n"); -+ event_dump(); -+ } -+ if (reason & MID_TX_DMA_OVFL) { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - DMA " -+ "overflow\n",dev->number); -+ EVENT("---dump ends here---\n",0,0); -+ printk(KERN_NOTICE "---recent events---\n"); -+ event_dump(); -+ } -+} -+ -+ -+static void eni_int(int irq,void *dev_id,struct pt_regs *regs) -+{ -+ struct atm_dev *dev; -+ struct eni_dev *eni_dev; -+ unsigned long reason; -+ -+ DPRINTK(">eni_int\n"); -+ dev = dev_id; -+ eni_dev = ENI_DEV(dev); -+ while ((reason = eni_dev->reg[MID_ISA])) { -+ DPRINTK(DEV_LABEL ": int 0x%lx\n",reason); -+ if (reason & MID_RX_DMA_COMPLETE) { -+ EVENT("INT: RX DMA complete, starting dequeue_rx\n", -+ 0,0); -+ dequeue_rx(dev); -+ EVENT("dequeue_rx done, starting poll_rx\n",0,0); -+ poll_rx(dev); -+ EVENT("poll_rx done\n",0,0); -+ /* poll_tx ? */ -+ } -+ if (reason & MID_SERVICE) { -+ EVENT("INT: service, starting get_service\n",0,0); -+ get_service(dev); -+ EVENT("get_service done, starting poll_rx\n",0,0); -+ poll_rx(dev); -+ EVENT("poll_rx done\n",0,0); -+ } -+ if (reason & MID_TX_DMA_COMPLETE) { -+ EVENT("INT: TX DMA COMPLETE\n",0,0); -+ dequeue_tx(dev); -+ } -+ if (reason & MID_TX_COMPLETE) { -+ EVENT("INT: TX COMPLETE\n",0,0); -+tx_complete++; -+ wake_up(&eni_dev->tx_wait); -+ poll_tx(dev); -+ /* poll_rx ? */ -+ } -+ if (reason & (MID_STAT_OVFL | MID_SUNI_INT | MID_TX_IDENT_MISM -+ | MID_TX_DMA_OVFL)) { -+ EVENT("misc interrupt\n",0,0); -+ misc_int(dev,reason); -+ } -+ } -+} -+ -+ -+/*--------------------------------- entries ---------------------------------*/ -+ -+ -+static const char *media_name[] = { -+ "MMF", "SMF", "MMF", "03?", /* 0- 3 */ -+ "UTP", "05?", "06?", "07?", /* 4- 7 */ -+ "TAXI","09?", "10?", "11?", /* 8-11 */ -+ "12?", "13?", "14?", "15?", /* 12-15 */ -+ "MMF", "SMF", "18?", "19?", /* 16-19 */ -+ "UTP", "21?", "22?", "23?", /* 20-23 */ -+ "24?", "25?", "26?", "27?", /* 24-27 */ -+ "28?", "29?", "30?", "31?" /* 28-31 */ -+}; -+ -+ -+#define SET_SEPROM \ -+ ({ if (!error && !pci_error) { \ -+ pci_error = pcibios_write_config_byte(eni_dev->bus,eni_dev->dev_fn, \ -+ PCI_TONGA_CTRL,tonga); \ -+ udelay(10); /* 10 usecs */ \ -+ } }) -+#define GET_SEPROM \ -+ ({ if (!error && !pci_error) { \ -+ pci_error = pcibios_read_config_byte(eni_dev->bus,eni_dev->dev_fn, \ -+ PCI_TONGA_CTRL,&tonga); \ -+ udelay(10); /* 10 usecs */ \ -+ } }) -+ -+ -+static int get_esi_asic(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ unsigned char tonga; -+ int error,failed,pci_error; -+ int address,i,j; -+ -+ eni_dev = ENI_DEV(dev); -+ error = pci_error = 0; -+ tonga = SEPROM_MAGIC | SEPROM_DATA | SEPROM_CLK; -+ SET_SEPROM; -+ for (i = 0; i < ESI_LEN && !error && !pci_error; i++) { -+ /* start operation */ -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ tonga |= SEPROM_CLK; -+ SET_SEPROM; -+ tonga &= ~SEPROM_DATA; -+ SET_SEPROM; -+ tonga &= ~SEPROM_CLK; -+ SET_SEPROM; -+ /* send address */ -+ address = ((i+SEPROM_ESI_BASE) << 1)+1; -+ for (j = 7; j >= 0; j--) { -+ tonga = (address >> j) & 1 ? tonga | SEPROM_DATA : -+ tonga & ~SEPROM_DATA; -+ SET_SEPROM; -+ tonga |= SEPROM_CLK; -+ SET_SEPROM; -+ tonga &= ~SEPROM_CLK; -+ SET_SEPROM; -+ } -+ /* get ack */ -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ tonga |= SEPROM_CLK; -+ SET_SEPROM; -+ GET_SEPROM; -+ failed = tonga & SEPROM_DATA; -+ tonga &= ~SEPROM_CLK; -+ SET_SEPROM; -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ if (failed) error = -EIO; -+ else { -+ dev->esi[i] = 0; -+ for (j = 7; j >= 0; j--) { -+ dev->esi[i] <<= 1; -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ tonga |= SEPROM_CLK; -+ SET_SEPROM; -+ GET_SEPROM; -+ if (tonga & SEPROM_DATA) dev->esi[i] |= 1; -+ tonga &= ~SEPROM_CLK; -+ SET_SEPROM; -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ } -+ /* get ack */ -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ tonga |= SEPROM_CLK; -+ SET_SEPROM; -+ GET_SEPROM; -+ if (!(tonga & SEPROM_DATA)) error = -EIO; -+ tonga &= ~SEPROM_CLK; -+ SET_SEPROM; -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ } -+ /* stop operation */ -+ tonga &= ~SEPROM_DATA; -+ SET_SEPROM; -+ tonga |= SEPROM_CLK; -+ SET_SEPROM; -+ tonga |= SEPROM_DATA; -+ SET_SEPROM; -+ } -+ if (pci_error) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): error reading ESI (%s)\n", -+ dev->number,pcibios_strerror(pci_error)); -+ error = -EIO; -+ } -+ return error; -+} -+ -+ -+#undef SET_SEPROM -+#undef GET_SEPROM -+ -+ -+static int get_esi_fpga(struct atm_dev *dev,unsigned long base) -+{ -+ struct eni_dev *eni_dev; -+ struct midway_eprom *eprom; -+ int i; -+ -+ eprom = (struct midway_eprom *) (base+EPROM_SIZE-sizeof(struct -+ midway_eprom)); -+ eni_dev = ENI_DEV(dev); -+ for (i = 0; i < ESI_LEN; i++) -+ dev->esi[i] = eprom->mac[(i & ~3) | (3-(i & 3))]; -+ return 0; -+} -+ -+ -+static int eni_init(struct atm_dev *dev) -+{ -+ struct midway_eprom *eprom; -+ struct eni_dev *eni_dev; -+ unsigned int real_base,base; -+ unsigned short command; -+ unsigned char revision; -+ int error,i,last; -+ -+ DPRINTK(">eni_init\n"); -+ dev->ci_range.vpi_bits = 0; -+ dev->ci_range.vci_bits = NR_VCI_LD; -+ eni_dev = ENI_DEV(dev); -+ if ((error = pcibios_read_config_word(eni_dev->bus,eni_dev->dev_fn, -+ PCI_COMMAND,&command)) || (error = pcibios_read_config_dword( -+ eni_dev->bus,eni_dev->dev_fn,PCI_BASE_ADDRESS_0,&real_base)) || -+ (error = pcibios_read_config_byte(eni_dev->bus,eni_dev->dev_fn, -+ PCI_INTERRUPT_LINE,&eni_dev->irq)) || (error = -+ pcibios_read_config_byte(eni_dev->bus,eni_dev->dev_fn, -+ PCI_REVISION_ID,&revision))) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): init error %s\n", -+ dev->number,pcibios_strerror(error)); -+ return -EINVAL; -+ } -+ real_base &= MEM_VALID; /* strip flags */ -+ if ((error = pcibios_write_config_word(eni_dev->bus,eni_dev->dev_fn, -+ PCI_COMMAND,PCI_COMMAND_MEMORY | (eni_dev->asic ? -+ PCI_COMMAND_PARITY | PCI_COMMAND_SERR : 0)))) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): can't enable memory (%s)" -+ "\n",dev->number,pcibios_strerror(error)); -+ return error; -+ } -+ printk(KERN_NOTICE DEV_LABEL "(itf %d): rev.%d,base=0x%x,irq=%d,", -+ dev->number,revision,real_base,eni_dev->irq); -+ if (!(base = (unsigned long) vremap(real_base,MAP_MAX_SIZE))) { -+ printk("\n"); -+ printk(KERN_ERR DEV_LABEL "(itf %d): can't set up page " -+ "mapping\n",dev->number); -+ return error; -+ } -+ eni_dev->base_diff = real_base-base; -+ /* id may not be present in ASIC Tonga boards - check this @@@ */ -+ if (!eni_dev->asic) { -+ eprom = (struct midway_eprom *) (base+EPROM_SIZE-sizeof(struct -+ midway_eprom)); -+ if (eprom->magic != ENI155_MAGIC) { -+ printk("\n"); -+ printk(KERN_ERR KERN_ERR DEV_LABEL "(itf %d): bad " -+ "magic - expected 0x%X, got 0x%lX\n",dev->number, -+ ENI155_MAGIC,eprom->magic); -+ return -EINVAL; -+ } -+ } -+ eni_dev->phy = (volatile unsigned long *) (base+PHY_BASE); -+ eni_dev->reg = (volatile unsigned long *) (base+REG_BASE); -+ eni_dev->ram = (volatile unsigned long *) (base+RAM_BASE); -+ last = (MAP_MAX_SIZE-RAM_BASE)/4; -+ for (i = last-RAM_INCREMENT; i >= 0; -+ i -= RAM_INCREMENT) { -+ eni_dev->ram[i] = 0x55555555; -+ if (eni_dev->ram[i] != 0x55555555) last = i; -+ else { -+ eni_dev->ram[i] = 0xAAAAAAAA; -+ if (eni_dev->ram[i] != 0xAAAAAAAA) last = i; -+ else eni_dev->ram[i] = i; -+ } -+ } -+ for (i = 0; i < last; i += RAM_INCREMENT) -+ if (eni_dev->ram[i] != i) break; -+ eni_dev->mem = i << 2; -+ memset((void *) eni_dev->ram,0,eni_dev->mem); -+ /* TODO: should shrink allocation now */ -+ printk("mem=%dkB (",eni_dev->mem >> 10); -+ /* TODO: check for non-SUNI, check for TAXI ? */ -+ if (!(eni_dev->reg[MID_RES_ID_MCON] & 0x200) != !eni_dev->asic) { -+ printk(")\n"); -+ printk(KERN_ERR DEV_LABEL "(itf %d): ERROR - wrong id 0x%0lx\n", -+ dev->number,eni_dev->reg[MID_RES_ID_MCON]); -+ return -EINVAL; -+ } -+ error = eni_dev->asic ? get_esi_asic(dev) : get_esi_fpga(dev,base); -+ if (error) return error; -+ for (i = 0; i < ESI_LEN; i++) -+ printk("%s%02X",i ? "-" : "",dev->esi[i]); -+ printk(")\n"); -+ printk(KERN_NOTICE DEV_LABEL "(itf %d): %s,%s\n",dev->number, -+ eni_dev->reg[MID_RES_ID_MCON] & 0x200 ? "ASIC" : "FPGA", -+ media_name[eni_dev->reg[MID_RES_ID_MCON] & DAUGTHER_ID]); -+ return suni_init(dev); -+} -+ -+ -+static int eni_start(struct atm_dev *dev) -+{ -+ struct eni_dev *eni_dev; -+ volatile unsigned long *buf; -+ unsigned long buffer_mem; -+ int error; -+ -+ DPRINTK(">eni_start\n"); -+ eni_dev = ENI_DEV(dev); -+ if (request_irq(eni_dev->irq,&eni_int,0,DEV_LABEL,dev)) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): IRQ%d is already in use\n", -+ dev->number,eni_dev->irq); -+ return -EAGAIN; -+ } -+ /* @@@ should release IRQ on error */ -+ if ((error = pcibios_write_config_word(eni_dev->bus,eni_dev->dev_fn, -+ PCI_COMMAND,PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER | -+ (eni_dev->asic ? PCI_COMMAND_PARITY | PCI_COMMAND_SERR : 0)))) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): can't enable memory+" -+ "master (%s)\n",dev->number,pcibios_strerror(error)); -+ return error; -+ } -+ if ((error = pcibios_write_config_byte(eni_dev->bus,eni_dev->dev_fn, -+ PCI_TONGA_CTRL,END_SWAP_DMA))) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): can't set endian swap " -+ "(%s)\n",dev->number,pcibios_strerror(error)); -+ return error; -+ } -+ /* determine addresses of internal tables */ -+ eni_dev->vci = eni_dev->ram; -+ eni_dev->rx_dma = eni_dev->ram+NR_VCI*4; -+ eni_dev->tx_dma = eni_dev->rx_dma+NR_DMA_RX*2; -+ eni_dev->service = eni_dev->tx_dma+NR_DMA_TX*2; -+ buf = eni_dev->service+NR_SERVICE; -+ DPRINTK("vci 0x%lx,rx 0x%lx, tx 0x%lx,srv 0x%lx,buf 0x%lx\n", -+ (unsigned long) eni_dev->vci,(unsigned long) eni_dev->rx_dma, -+ (unsigned long) eni_dev->tx_dma,(unsigned long) eni_dev->service, -+ buf); -+ /* initialize memory management */ -+ buffer_mem = eni_dev->mem-((unsigned long) buf- -+ (unsigned long) eni_dev->ram); -+ eni_dev->free_list_size = buffer_mem/MID_MIN_BUF_SIZE/2; -+ eni_dev->free_list = (struct eni_free *) kmalloc( -+ sizeof(struct eni_free)*(eni_dev->free_list_size+1),GFP_KERNEL); -+ if (!eni_dev->free_list) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): couldn't get free page\n", -+ dev->number); -+ return -ENOMEM; -+ } -+ eni_dev->free_len = 0; -+ eni_put_free(eni_dev,(unsigned long) buf,buffer_mem); -+ memset((void *) eni_dev->vci,0,16*NR_VCI); /* clear VCI table */ -+ /* -+ * byte_addr free (k) -+ * 0x00000000 512 VCI table -+ * 0x00004000 496 RX DMA -+ * 0x00005000 492 TX DMA -+ * 0x00006000 488 service list -+ * 0x00007000 484 buffers -+ * 0x00080000 0 end (512kB) -+ */ -+ eni_dev->reg[MID_IE] = 0xffffffff; -+#if 0 -+MID_TX_COMPLETE_0 | MID_TX_DMA_OVFL | -+ MID_TX_IDENT_MISM | MID_RX_DMA_COMPLETE | MID_TX_DMA_COMPLETE | -+ MID_SERVICE | MID_SUNI_INT | MID_STAT_OVFL; /* enable interrupts */ -+#endif -+ error = start_tx(dev); -+ if (error) return error; -+ error = start_rx(dev); -+ if (error) return error; -+ error = dev->phy->start(dev); -+ if (error) return error; -+ eni_dev->reg[MID_MC_S] |= (1 << MID_INT_SEL_SHIFT) | -+ MID_TX_LOCK_MODE | MID_DMA_ENABLE | MID_TX_ENABLE | MID_RX_ENABLE; -+ /* Tonga uses SBus INTReq1 */ -+ (void) eni_dev->reg[MID_ISA]; /* clear Midway interrupts */ -+ return 0; -+} -+ -+ -+static void eni_close(struct atm_vcc *vcc) -+{ -+ DPRINTK(">eni_close\n"); -+ if (!ENI_VCC(vcc)) return; -+ vcc->flags &= ~ATM_VF_READY; -+ close_rx(vcc); -+ close_tx(vcc); -+ DPRINTK("eni_close: done waiting\n"); -+ /* deallocate memory */ -+ kfree(ENI_VCC(vcc)); -+ ENI_VCC(vcc) = NULL; -+ vcc->flags &= ~ATM_VF_ADDR; -+ /*foo();*/ -+} -+ -+ -+static int get_ci(struct atm_vcc *vcc,short *vpi,int *vci) -+{ -+ struct atm_vcc *walk; -+ -+ if (*vpi == ATM_VPI_ANY) *vpi = 0; -+ if (*vci == ATM_VCI_ANY) { -+ for (*vci = ATM_NOT_RSV_VCI; *vci < NR_VCI; (*vci)++) { -+ if (vcc->rxtp.class != ATM_NONE && -+ ENI_DEV(vcc->dev)->rx_map[*vci]) -+ continue; -+ if (vcc->txtp.class != ATM_NONE) { -+ for (walk = vcc->dev->vccs; walk; -+ walk = walk->next) -+ if ((walk->flags & ATM_VF_ADDR) && -+ walk->vci == *vci && -+ walk->txtp.class != ATM_NONE) -+ break; -+ if (walk) continue; -+ } -+ break; -+ } -+ return *vci == NR_VCI ? -EADDRINUSE : 0; -+ } -+ if (*vci == ATM_VCI_UNSPEC) return 0; -+ if (vcc->rxtp.class != ATM_NONE && ENI_DEV(vcc->dev)->rx_map[*vci]) -+ return -EADDRINUSE; -+ if (vcc->txtp.class == ATM_NONE) return 0; -+ for (walk = vcc->dev->vccs; walk; walk = walk->next) -+ if ((walk->flags & ATM_VF_ADDR) && walk->vci == *vci && -+ walk->txtp.class != ATM_NONE) -+ return -EADDRINUSE; -+ return 0; -+} -+ -+ -+static int eni_open(struct atm_vcc *vcc,short vpi,int vci) -+{ -+ struct eni_dev *eni_dev; -+ struct eni_vcc *eni_vcc; -+ int error; -+ -+ DPRINTK(">eni_open\n"); -+ EVENT("eni_open\n",0,0); -+ if (!(vcc->flags & ATM_VF_PARTIAL)) ENI_VCC(vcc) = NULL; -+ eni_dev = ENI_DEV(vcc->dev); -+#if 1 /* set to 0 to test atm_find_ci (get_ci usually is faster) */ -+ error = get_ci(vcc,&vpi,&vci); -+ if (error) return error; -+#else -+ error = atm_find_ci(vcc,&vpi,&vci); -+ if (error) return error; -+#endif -+ vcc->vpi = vpi; -+ vcc->vci = vci; -+ if (vci != ATM_VPI_UNSPEC && vpi != ATM_VCI_UNSPEC) -+ vcc->flags |= ATM_VF_ADDR; -+ if (vcc->aal != ATM_AAL0 && vcc->aal != ATM_AAL5) return -EINVAL; -+ DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, -+ vcc->vci); -+ if (!(vcc->flags & ATM_VF_PARTIAL)) { -+ eni_vcc = kmalloc(sizeof(struct eni_vcc),GFP_KERNEL); -+ if (!eni_vcc) return -ENOMEM; -+ ENI_VCC(vcc) = eni_vcc; -+ eni_vcc->tx = NULL; /* for eni_close after open_rx */ -+ if ((error = open_rx_first(vcc))) { -+ eni_close(vcc); -+ return error; -+ } -+ if ((error = open_tx_first(vcc))) { -+ eni_close(vcc); -+ return error; -+ } -+ } -+ if (vci == ATM_VPI_UNSPEC || vpi == ATM_VCI_UNSPEC) return 0; -+ if ((error = open_rx_second(vcc))) { -+ eni_close(vcc); -+ return error; -+ } -+ if ((error = open_tx_second(vcc))) { -+ eni_close(vcc); -+ return error; -+ } -+ vcc->flags |= ATM_VF_READY; -+ /* should power down SUNI while !ref_count @@@ */ -+ return 0; -+} -+ -+ -+static int eni_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) -+{ -+ if (cmd == ENI_MEMDUMP) { -+ dump(dev); -+ return 0; -+ } -+ if (cmd == ATM_SETCIRANGE) { -+ struct atm_cirange ci; -+ -+ memcpy_fromfs(&ci,(void *) arg,sizeof(struct atm_cirange)); -+ if ((ci.vpi_bits == 0 || ci.vpi_bits == ATM_CI_MAX) && -+ (ci.vci_bits == NR_VCI_LD || ci.vpi_bits == ATM_CI_MAX)) -+ return 0; -+ return -EINVAL; -+ } -+ if (!dev->phy->ioctl) return -EINVAL; -+ return dev->phy->ioctl(dev,cmd,arg); -+} -+ -+ -+static int eni_getsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int *optlen) -+{ -+#ifdef CONFIG_MMU_HACKS -+ -+static const struct atm_buffconst bctx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; -+static const struct atm_buffconst bcrx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; -+ -+#else -+ -+static const struct atm_buffconst bctx = { 4,0,4,0,0,0 }; -+static const struct atm_buffconst bcrx = { 4,0,4,0,0,0 }; -+ -+#endif -+ int error; -+ -+ if (level == SOL_AAL && (optname == SO_BCTXOPT || -+ optname == SO_BCRXOPT)) { -+ if (get_fs_long(optlen) < sizeof(struct atm_buffconst)) -+ return -EINVAL; -+ put_fs_long(sizeof(struct atm_buffconst),optlen); -+ error = verify_area(VERIFY_WRITE,optval, -+ sizeof(struct atm_buffconst)); -+ if (error) return error; -+ memcpy_tofs(optval,optname == SO_BCTXOPT ? &bctx : &bcrx, -+ sizeof(struct atm_buffconst)); -+ return 0; -+ } -+ return -EINVAL; -+} -+ -+ -+static int eni_setsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int optlen) -+{ -+ return -EINVAL; -+} -+ -+ -+static int eni_send(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ unsigned long flags; -+ -+ DPRINTK(">eni_send\n"); -+ if (!ENI_VCC(vcc)->tx) { -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ if (!skb) { -+ printk(KERN_CRIT "!skb in eni_send ?\n"); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ if (vcc->aal == ATM_AAL0) { -+ if (skb->len != ATM_CELL_SIZE-1) { -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ *(unsigned long *) skb->data = htonl(*(unsigned long *) -+ skb->data); -+ } -+submitted++; -+ skb->atm.vcc = vcc; -+ save_flags(flags); -+ cli(); /* brute force */ -+ if (skb_peek(&ENI_VCC(vcc)->tx->backlog) || do_tx(skb)) { -+ skb_queue_tail(&ENI_VCC(vcc)->tx->backlog,skb); -+ backlogged++; -+ } -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+static int eni_sg_send(struct atm_vcc *vcc,unsigned long start, -+ unsigned long size) -+{ -+ return vcc->aal == ATM_AAL5 && !((start | size) & 3); -+ /* don't tolerate misalignment */ -+} -+ -+ -+static void eni_phy_put(struct atm_dev *dev,unsigned char value, -+ unsigned long addr) -+{ -+ ENI_DEV(dev)->phy[addr] = value; -+} -+ -+ -+ -+static unsigned char eni_phy_get(struct atm_dev *dev,unsigned long addr) -+{ -+ volatile unsigned tmp; /* force 32 bit access */ -+ -+ tmp = ENI_DEV(dev)->phy[addr]; -+ return tmp; -+} -+ -+ -+static const struct atmdev_ops ops = { -+ eni_open, -+ eni_close, -+ eni_ioctl, -+ eni_getsockopt, -+ eni_setsockopt, -+ eni_send, -+ eni_sg_send, -+ NULL, /* no poll */ -+ NULL, /* no send_oam */ -+ eni_phy_put, -+ eni_phy_get, -+ NULL /* no feedback */ -+}; -+ -+ -+int eni_detect(void) -+{ -+ struct atm_dev *dev; -+ struct eni_dev *eni_dev; -+ int devs,type,index; -+ -+ if (!pcibios_present()) { -+ printk(KERN_ERR DEV_LABEL " driver but no PCI BIOS ?\n"); -+ return 0; -+ } -+ eni_dev = (struct eni_dev *) kmalloc(sizeof(struct eni_dev), -+ GFP_KERNEL); -+ if (!eni_dev) return -ENOMEM; -+ devs = 0; -+ for (type = 0; type < 2; type++) { -+ index = 0; -+ while (!pcibios_find_device(PCI_VENDOR_ID_EF,type ? -+ PCI_DEVICE_ID_EF_ATM_ASIC : PCI_DEVICE_ID_EF_ATM_FPGA, -+ index,&eni_dev->bus,&eni_dev->dev_fn)) { -+ dev = atm_dev_register(DEV_LABEL,&ops,0); -+ if (!dev) break; -+ ENI_DEV(dev) = eni_dev; -+ eni_dev->asic = type; -+ if (eni_init(dev) || eni_start(dev)) { -+ atm_dev_deregister(dev); -+ break; -+ } -+ eni_dev->more = eni_boards; -+ eni_boards = dev; -+ index++; -+ devs++; -+ eni_dev = (struct eni_dev *) kmalloc(sizeof(struct -+ eni_dev),GFP_KERNEL); -+ if (!eni_dev) break; -+ } -+ } -+ return devs; -+} -+ -+ -+#ifdef MODULE -+ -+int init_module(void) -+{ -+ if (!eni_detect()) { -+ printk(KERN_ERROR DEV_LABEL ": no adapter found\n"); -+ return -ENXIO; -+ } -+ MOD_INC_USE_COUNT; -+ return 0; -+} -+ -+ -+void cleanup_module(void) -+{ -+ /* -+ * Well, there's no way to get rid of the driver yet, so we don't -+ * have to clean up, right ? :-) -+ */ -+} -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/eni.h Fri Jul 19 15:08:56 1996 -@@ -0,0 +1,113 @@ -+/* drivers/atm/eni.h - Efficient Networks ENI155P device driver declarations */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVER_ATM_ENI_H -+#define DRIVER_ATM_ENI_H -+ -+#include -+ -+#define ENI_MEMDUMP _IOW('a',ATMIOC_SARPRV,struct atmif_sioc) -+ /* printk memory map */ -+ -+ -+#ifdef __KERNEL__ -+ -+#include -+#include -+#include -+#include -+#include -+ -+#include "midway.h" -+ -+ -+#define KERNEL_OFFSET 0xC0000000 /* kernel 0x0 is at phys 0xC0000000 */ -+#define DEV_LABEL "eni" -+ -+#define UBR_BUFFER (128*1024) /* UBR buffer size */ -+ -+#define RX_DMA_BUF 5 /* burst and skip a few things */ -+#define TX_DMA_BUF 60 /* should be enough for 64 kB */ -+ -+ -+struct eni_free { -+ unsigned long start; /* counting in bytes */ -+ int order; -+}; -+ -+struct eni_tx { -+ volatile unsigned long *send; /* base, NULL if unused */ -+ int prescaler; /* shaping prescaler */ -+ int resolution; /* shaping divider */ -+ unsigned long tx_pos; /* current TX write position */ -+ unsigned long words; /* size of TX queue */ -+ int index; /* TX channel number */ -+ int pcr; /* peak cell rate */ -+ struct sk_buff_head backlog; /* queue of waiting TX buffers */ -+}; -+ -+struct eni_vcc { -+ int (*rx)(struct atm_vcc *vcc); /* RX function, NULL if none */ -+ volatile unsigned long *recv; /* receive buffer */ -+ unsigned long words; /* its size in words */ -+ unsigned long descr; /* next descriptor (RX) */ -+ unsigned long rx_pos; /* current RX descriptor pos */ -+ struct eni_tx *tx; /* TXer, NULL if none */ -+ int rxing; /* number of pending PDUs */ -+ int servicing; /* number of waiting VCs (0 or 1) */ -+ int txing; /* number of pending TX cells/PDUs */ -+ struct timeval timestamp; /* for RX timing */ -+ struct atm_vcc *next; /* next pending RX */ -+ struct sk_buff *last; /* last PDU being DMAed (used to carry -+ discard information) */ -+}; -+ -+struct eni_dev { -+ /*-------------------------------- base pointers into Midway address -+ space */ -+ volatile unsigned long *phy; /* PHY interface chip registers */ -+ volatile unsigned long *reg; /* register base */ -+ volatile unsigned long *ram; /* RAM base */ -+ volatile unsigned long *vci; /* VCI table */ -+ volatile unsigned long *rx_dma; /* RX DMA queue */ -+ volatile unsigned long *tx_dma; /* TX DMA queue */ -+ volatile unsigned long *service;/* service list */ -+ /*-------------------------------- TX part */ -+ struct eni_tx tx[NR_CHAN]; /* TX channels */ -+ struct eni_tx *ubr; /* UBR channel */ -+ struct sk_buff_head tx_queue; /* PDUs currently being TX DMAed*/ -+ struct wait_queue *tx_wait; /* for close */ -+ int tx_bw; /* remaining bandwidth */ -+ /*-------------------------------- RX part */ -+ unsigned long serv_read; /* host service read index */ -+ struct atm_vcc *fast,*last_fast;/* queues of VCCs with pending PDUs */ -+ struct atm_vcc *slow,*last_slow; -+ struct atm_vcc **rx_map; /* for fast lookups */ -+ struct sk_buff_head rx_queue; /* PDUs currently being RX-DMAed */ -+ struct wait_queue *rx_wait; /* for close */ -+ /*-------------------------------- statistics */ -+ unsigned long lost; /* number of lost cells (RX) */ -+ /*-------------------------------- memory management */ -+ unsigned long base_diff; /* virtual-real base address */ -+ int free_len; /* free list length */ -+ struct eni_free *free_list; /* free list */ -+ int free_list_size; /* maximum size of free list */ -+ /*-------------------------------- ENI links */ -+ struct atm_dev *more; /* other ENI devices */ -+ /*-------------------------------- general information */ -+ int mem; /* RAM on board (in bytes) */ -+ int asic; /* PCI interface type, 0 for FPGA */ -+ unsigned char irq; /* IRQ */ -+ unsigned char bus; /* PCI stuff */ -+ unsigned char dev_fn; -+}; -+ -+ -+#define ENI_DEV(d) ((struct eni_dev *) (d)->dev_data) -+#define ENI_VCC(d) ((struct eni_vcc *) (d)->dev_data) -+ -+#endif /* __KERNEL__ */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/midway.h Mon Jun 10 17:36:06 1996 -@@ -0,0 +1,265 @@ -+/* drivers/atm/midway.h - Efficient Networks Midway (SAR) description */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVERS_ATM_MIDWAY_H -+#define DRIVERS_ATM_MIDWAY_H -+ -+ -+#define NR_VCI 1024 /* number of VCIs */ -+#define NR_VCI_LD 10 /* log2(NR_VCI) */ -+#define NR_DMA_RX 512 /* RX DMA queue entries */ -+#define NR_DMA_TX 512 /* TX DMA queue entries */ -+#define NR_SERVICE NR_VCI /* service list size */ -+#define NR_CHAN 8 /* number of TX channels */ -+#define TS_CLOCK 25000000 /* traffic shaper clock (cell/sec) */ -+ -+#define MAP_MAX_SIZE 0x00400000 /* memory window for max config */ -+#define EPROM_SIZE 0x00010000 -+#define MEM_VALID 0xffc00000 /* mask base address with this */ -+#define PHY_BASE 0x00020000 /* offset of PHY register are */ -+#define REG_BASE 0x00040000 /* offset of Midway register area */ -+#define RAM_BASE 0x00200000 /* offset of RAM area */ -+#define RAM_INCREMENT 0x00008000 /* probe for RAM every 128kB (32 kw) */ -+ -+#define MID_VCI_BASE RAM_BASE -+#define MID_DMA_RX_BASE (MID_VCI_BASE+NR_VCI*16) -+#define MID_DMA_TX_BASE (MID_DMA_RX_BASE+NR_DMA_RX*8) -+#define MID_SERVICE_BASE (MID_DMA_TX_BASE+NR_DMA_TX*8) -+#define MID_FREE_BASE (MID_SERVICE_BASE+NR_SERVICE*4) -+ -+#define MAC_LEN 6 /* atm.h */ -+ -+#define MID_MIN_BUF_SIZE (1024) /* 1 kB is minimum */ -+#define MID_MAX_BUF_SIZE (128*1024) /* 128 kB is maximum */ -+ -+#define RX_DESCR_SIZE 1 /* RX PDU descr is 1 longword */ -+#define TX_DESCR_SIZE 2 /* TX PDU descr is 2 longwords */ -+#define AAL5_TRAILER (ATM_AAL5_TRAILER/4) /* AAL5 trailer is 2 longwords */ -+ -+#define TX_GAP 8 /* TX buffer gap (words) */ -+ -+/* -+ * Midway Reset/ID -+ * -+ * All values read-only. Writing to this register resets Midway chip. -+ */ -+ -+#define MID_RES_ID_MCON 0x00 /* Midway Reset/ID */ -+ -+#define MID_ID 0xf0000000 /* Midway version */ -+#define MID_SHIFT 24 -+#define MID_MOTHER_ID 0x00000700 /* mother board id */ -+#define MID_MOTHER_SHIFT 8 -+#define MID_CON_TI 0x00000080 /* 0: normal ctrl; 1: SABRE */ -+#define MID_CON_SUNI 0x00000040 /* 0: UTOPIA; 1: SUNI */ -+#define MID_CON_V6 0x00000020 /* 0: non-pipel UTOPIA (required iff -+ !CON_SUNI; 1: UTOPIA */ -+#define DAUGTHER_ID 0x0000001f /* daugther board id */ -+ -+/* -+ * Interrupt Status Acknowledge, Interrupt Status & Interrupt Enable -+ */ -+ -+#define MID_ISA 0x01 /* Interrupt Status Acknowledge */ -+#define MID_IS 0x02 /* Interrupt Status */ -+#define MID_IE 0x03 /* Interrupt Enable */ -+ -+#define MID_TX_COMPLETE_7 0x00010000 /* channel N completed a PDU */ -+#define MID_TX_COMPLETE_6 0x00008000 /* transmission */ -+#define MID_TX_COMPLETE_5 0x00004000 -+#define MID_TX_COMPLETE_4 0x00002000 -+#define MID_TX_COMPLETE_3 0x00001000 -+#define MID_TX_COMPLETE_2 0x00000800 -+#define MID_TX_COMPLETE_1 0x00000400 -+#define MID_TX_COMPLETE_0 0x00000200 -+#define MID_TX_COMPLETE 0x0001fe00 /* any TX */ -+#define MID_TX_DMA_OVFL 0x00000100 /* DMA to adapter overflow */ -+#define MID_TX_IDENT_MISM 0x00000080 /* TX: ident mismatch => halted */ -+#define MID_DMA_LERR_ACK 0x00000040 /* LERR - SBus ? */ -+#define MID_DMA_ERR_ACK 0x00000020 /* DMA error */ -+#define MID_RX_DMA_COMPLETE 0x00000010 /* DMA to host done */ -+#define MID_TX_DMA_COMPLETE 0x00000008 /* DMA from host done */ -+#define MID_SERVICE 0x00000004 /* something in service list */ -+#define MID_SUNI_INT 0x00000002 /* interrupt from SUNI */ -+#define MID_STAT_OVFL 0x00000001 /* statistics overflow */ -+ -+/* -+ * Master Control/Status -+ */ -+ -+#define MID_MC_S 0x04 -+ -+#define MID_INT_SELECT 0x000001C0 /* Interrupt level (000: off) */ -+#define MID_INT_SEL_SHIFT 6 -+#define MID_TX_LOCK_MODE 0x00000020 /* 0: streaming; 1: TX ovfl->lock */ -+#define MID_DMA_ENABLE 0x00000010 /* R: 0: disable; 1: enable -+ W: 0: no change; 1: enable */ -+#define MID_TX_ENABLE 0x00000008 /* R: 0: TX disabled; 1: enabled -+ W: 0: no change; 1: enable */ -+#define MID_RX_ENABLE 0x00000004 /* like TX */ -+#define MID_WAIT_1MS 0x00000002 /* R: 0: timer not running; 1: running -+ W: 0: no change; 1: no interrupts -+ for 1 ms */ -+#define MID_WAIT_500US 0x00000001 /* like WAIT_1MS, but 0.5 ms */ -+ -+/* -+ * Statistics -+ * -+ * Cleared when reading. -+ */ -+ -+#define MID_STAT 0x05 -+ -+#define MID_VCI_TRASH 0xFFFF0000 /* trashed cells because of VCI mode */ -+#define MID_VCI_TRASH_SHIFT 16 -+#define MID_OVFL_TRASH 0x0000FFFF /* trashed cells because of overflow */ -+ -+/* -+ * Address registers -+ */ -+ -+#define MID_SERV_WRITE 0x06 /* free pos in service area (R, 10 bits) */ -+#define MID_DMA_ADDR 0x07 /* virtual DMA address (R, 32 bits) */ -+#define MID_DMA_WR_RX 0x08 /* (RW, 9 bits) */ -+#define MID_DMA_RD_RX 0x09 -+#define MID_DMA_WR_TX 0x0A -+#define MID_DMA_RD_TX 0x0B -+ -+/* -+ * Transmit Place Registers (0x10+4*channel) -+ */ -+ -+#define MID_TX_PLACE(c) (0x10+4*(c)) -+ -+#define MID_SIZE 0x00003800 /* size, N*256 x 32 bit */ -+#define MID_SIZE_SHIFT 11 -+#define MID_LOCATION 0x000007FF /* location in adapter memory (word) */ -+ -+#define MID_LOC_SKIP 8 /* 8 bits of location are always zero -+ (applies to all uses of location) */ -+ -+/* -+ * Transmit ReadPtr Registers (0x11+4*channel) -+ */ -+ -+#define MID_TX_RDPTR(c) (0x11+4*(c)) -+ -+#define MID_READ_PTR 0x00007FFF /* next word for PHY */ -+ -+/* -+ * Transmit DescrStart Registers (0x12+4*channel) -+ */ -+ -+#define MID_TX_DESCRSTART(c) (0x12+4*(c)) -+ -+#define MID_DESCR_START 0x00007FFF /* seg buffer being DMAed */ -+ -+#define ENI155_MAGIC 0xa54b872d -+ -+struct midway_eprom { -+ unsigned char mac[MAC_LEN],inv_mac[MAC_LEN]; -+ unsigned char pad[36]; -+ unsigned long serial,inv_serial; -+ unsigned long magic,inv_magic; -+}; -+ -+ -+/* -+ * VCI table entry -+ */ -+ -+#define MID_VCI_IN_SERVICE 0x00000001 /* set if VCI is currently in -+ service list */ -+#define MID_VCI_SIZE 0x00038000 /* reassembly buffer size, -+ 2* kB */ -+#define MID_VCI_SIZE_SHIFT 15 -+#define MID_VCI_LOCATION 0x1ffc0000 /* buffer location */ -+#define MID_VCI_LOCATION_SHIFT 18 -+#define MID_VCI_PTI_MODE 0x20000000 /* 0: trash, 1: preserve */ -+#define MID_VCI_MODE 0xc0000000 -+#define MID_VCI_MODE_SHIFT 30 -+#define MID_VCI_READ 0x00007fff -+#define MID_VCI_READ_SHIFT 0 -+#define MID_VCI_DESCR 0x7fff0000 -+#define MID_VCI_DESCR_SHIFT 16 -+#define MID_VCI_COUNT 0x000007ff -+#define MID_VCI_COUNT_SHIFT 0 -+#define MID_VCI_STATE 0x0000c000 -+#define MID_VCI_STATE_SHIFT 14 -+#define MID_VCI_WRITE 0x7fff0000 -+#define MID_VCI_WRITE_SHIFT 16 -+ -+#define MID_MODE_TRASH 0 -+#define MID_MODE_RAW 1 -+#define MID_MODE_AAL5 2 -+ -+/* -+ * Reassembly buffer descriptor -+ */ -+ -+#define MID_RED_COUNT 0x000007ff -+#define MID_RED_CRC_ERR 0x00000800 -+#define MID_RED_T 0x00001000 -+#define MID_RED_CE 0x00010000 -+#define MID_RED_CLP 0x01000000 -+#define MID_RED_IDEN 0xfe000000 -+#define MID_RED_SHIFT 25 -+ -+#define MID_RED_RX_ID 0x1b /* constant identifier */ -+ -+/* -+ * Segmentation buffer descriptor -+ */ -+ -+#define MID_SEG_COUNT MID_RED_COUNT -+#define MID_SEG_RATE 0x01f80000 -+#define MID_SEG_RATE_SHIFT 19 -+#define MID_SEG_PR 0x06000000 -+#define MID_SEG_PR_SHIFT 25 -+#define MID_SEG_AAL5 0x08000000 -+#define MID_SEG_ID 0xf0000000 -+#define MID_SEG_ID_SHIFT 28 -+#define MID_SEG_MAX_RATE 63 -+ -+#define MID_SEG_CLP 0x00000001 -+#define MID_SEG_PTI 0x0000000e -+#define MID_SEG_PTI_SHIFT 1 -+#define MID_SEG_VCI 0x00003ff0 -+#define MID_SEG_VCI_SHIFT 4 -+ -+#define MID_SEG_TX_ID 0xb /* constant identifier */ -+ -+/* -+ * DMA entry -+ */ -+ -+#define MID_DMA_COUNT 0xffff0000 -+#define MID_DMA_COUNT_SHIFT 16 -+#define MID_DMA_END 0x00000020 -+#define MID_DMA_TYPE 0x0000000f -+ -+#define MID_DT_JK 0x3 -+#define MID_DT_WORD 0x0 -+#define MID_DT_2W 0x7 -+#define MID_DT_4W 0x4 -+#define MID_DT_8W 0x5 -+#define MID_DT_16W 0x6 -+#define MID_DT_2WM 0xf -+#define MID_DT_4WM 0xc -+#define MID_DT_8WM 0xd -+#define MID_DT_16WM 0xe -+ -+/* only for RX*/ -+#define MID_DMA_VCI 0x0000ffc0 -+#define MID_DMA_VCI_SHIFT 6 -+ -+/* only for TX */ -+#define MID_DMA_CHAN 0x000001c0 -+#define MID_DMA_CHAN_SHIFT 6 -+ -+#define MID_DT_BYTE 0x1 -+#define MID_DT_HWORD 0x2 -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/suni.c Mon Jun 10 17:36:06 1996 -@@ -0,0 +1,271 @@ -+/* drivers/atm/suni.c - PMC SUNI (PHY) driver */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+ -+#include "suni.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+struct suni_priv { -+ struct sonet_stats sonet_stats; /* link diagnostics */ -+ unsigned char loop_mode; /* loopback mode */ -+ struct atm_dev *dev; /* device back-pointer */ -+ struct suni_priv *next; /* next SUNI */ -+}; -+ -+ -+#define PRIV(dev) ((struct suni_priv *) dev->phy_data) -+ -+#define PUT(val,reg) dev->ops->phy_put(dev,val,SUNI_##reg) -+#define GET(reg) dev->ops->phy_get(dev,SUNI_##reg) -+#define REG_CHANGE(mask,shift,value,reg) \ -+ PUT((GET(reg) & ~(mask)) | ((value) << (shift)),reg) -+ -+ -+static struct timer_list poll_timer = { NULL, NULL, 0L, 0L, NULL }; -+static int start_timer = 1; -+static struct suni_priv *sunis = NULL; -+ -+ -+static void suni_hz(unsigned long dummy) -+{ -+ struct suni_priv *walk; -+ struct atm_dev *dev; -+ struct sonet_stats *stats; -+ -+ for (walk = sunis; walk; walk = walk->next) { -+ dev = walk->dev; -+ stats = &walk->sonet_stats; -+ PUT(0,MRI); /* latch counters */ -+ udelay(1); -+ stats->section_bip += (GET(RSOP_SBL) & 0xff) | -+ ((GET(RSOP_SBM) & 0xff) << 8); -+ if (stats->section_bip < 0) stats->section_bip = LONG_MAX; -+ stats->line_bip += (GET(RLOP_LBL) & 0xff) | -+ ((GET(RLOP_LB) & 0xff) << 8) | -+ ((GET(RLOP_LBM) & 0xff) << 16); -+ if (stats->line_bip < 0) stats->line_bip = LONG_MAX; -+ stats->path_bip += (GET(RPOP_PBL) & 0xff) | -+ ((GET(RPOP_PBM) & 0xff) << 8); -+ if (stats->path_bip < 0) stats->path_bip = LONG_MAX; -+ stats->line_febe += (GET(RLOP_LFL) & 0xff) | -+ ((GET(RLOP_LF) & 0xff) << 8) | -+ ((GET(RLOP_LFM) & 0xff) << 16); -+ if (stats->line_febe < 0) stats->line_febe = LONG_MAX; -+ stats->path_febe += (GET(RPOP_PFL) & 0xff) | -+ ((GET(RPOP_PFM) & 0xff) << 8); -+ if (stats->path_febe < 0) stats->path_febe = LONG_MAX; -+ stats->corr_hcs += GET(RACP_CHEC) & 0xff; -+ if (stats->corr_hcs < 0) stats->corr_hcs = LONG_MAX; -+ stats->uncorr_hcs += GET(RACP_UHEC) & 0xff; -+ if (stats->uncorr_hcs < 0) stats->uncorr_hcs = LONG_MAX; -+ stats->rx_cells += (GET(RACP_RCCL) & 0xff) | -+ ((GET(RACP_RCC) & 0xff) << 8) | -+ ((GET(RACP_RCCM) & 0xff) << 16); -+ if (stats->rx_cells < 0) stats->rx_cells = LONG_MAX; -+ stats->tx_cells += (GET(TACP_TCCL) & 0xff) | -+ ((GET(TACP_TCC) & 0xff) << 8) | -+ ((GET(TACP_TCCM) & 0xff) << 16); -+ if (stats->tx_cells < 0) stats->tx_cells = LONG_MAX; -+ } -+ if (!start_timer) { -+ del_timer(&poll_timer); -+ poll_timer.expires = jiffies+HZ; -+ add_timer(&poll_timer); -+ } -+} -+ -+ -+static int fetch_stats(struct atm_dev *dev,struct sonet_stats *arg,int zero) -+{ -+ unsigned long flags; -+ -+ save_flags(flags); -+ cli(); -+ if (arg) -+ memcpy_tofs(arg,&PRIV(dev)->sonet_stats, -+ sizeof(struct sonet_stats)); -+ if (zero) -+ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+#define HANDLE_FLAG(flag,reg,bit) \ -+ if (todo & flag) { \ -+ if (set) PUT(GET(reg) | bit,reg); \ -+ else PUT(GET(reg) & ~bit,reg); \ -+ todo &= ~flag; \ -+ } -+ -+ -+static int change_diag(struct atm_dev *dev,unsigned long arg,int set) -+{ -+ int todo; -+ -+ todo = get_fs_long(arg); -+ HANDLE_FLAG(SONET_INS_SBIP,TSOP_DIAG,SUNI_TSOP_DIAG_DBIP8); -+ HANDLE_FLAG(SONET_INS_LBIP,TLOP_DIAG,SUNI_TLOP_DIAG_DBIP); -+ HANDLE_FLAG(SONET_INS_PBIP,TPOP_CD,SUNI_TPOP_DIAG_DB3); -+ HANDLE_FLAG(SONET_INS_FRAME,RSOP_CIE,SUNI_RSOP_CIE_FOOF); -+ HANDLE_FLAG(SONET_INS_LAIS,TSOP_CTRL,SUNI_TSOP_CTRL_LAIS); -+ HANDLE_FLAG(SONET_INS_PAIS,TPOP_CD,SUNI_TPOP_DIAG_PAIS); -+ HANDLE_FLAG(SONET_INS_LOS,TSOP_DIAG,SUNI_TSOP_DIAG_DLOS); -+ HANDLE_FLAG(SONET_INS_HCS,TACP_CS,SUNI_TACP_CS_DHCS); -+ put_fs_long(todo,arg); -+ return 0; -+} -+ -+ -+#undef HANDLE_FLAG -+ -+ -+static int get_diag(struct atm_dev *dev,unsigned long arg) -+{ -+ int set; -+ -+ set = 0; -+ if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DBIP8) set |= SONET_INS_SBIP; -+ if (GET(TLOP_DIAG) & SUNI_TLOP_DIAG_DBIP) set |= SONET_INS_LBIP; -+ if (GET(TPOP_CD) & SUNI_TPOP_DIAG_DB3) set |= SONET_INS_PBIP; -+ /* SONET_INS_FRAME is one-shot only */ -+ if (GET(TSOP_CTRL) & SUNI_TSOP_CTRL_LAIS) set |= SONET_INS_LAIS; -+ if (GET(TPOP_CD) & SUNI_TPOP_DIAG_PAIS) set |= SONET_INS_PAIS; -+ if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DLOS) set |= SONET_INS_LOS; -+ if (GET(TACP_CS) & SUNI_TACP_CS_DHCS) set |= SONET_INS_HCS; -+ put_fs_long(set,arg); -+ return 0; -+} -+ -+ -+static int suni_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) -+{ -+ int error; -+ -+ switch (cmd) { -+ case SONET_GETSTATZ: -+ case SONET_GETSTAT: -+ return fetch_stats(dev,(struct sonet_stats *) arg, -+ cmd == SONET_GETSTATZ); -+ case SONET_SETDIAG: -+ return change_diag(dev,arg,1); -+ case SONET_CLRDIAG: -+ return change_diag(dev,arg,0); -+ case SONET_GETDIAG: -+ return get_diag(dev,arg); -+ case SONET_SETFRAMING: -+ if (!suser()) return -EPERM; -+ if (arg != SONET_FRAME_SONET) return -EINVAL; -+ return 0; -+ case SONET_GETFRAMING: -+ put_fs_long(SONET_FRAME_SONET,arg); -+ return 0; -+ case SONET_GETFRSENSE: -+ return -EINVAL; -+ case SUNI_SETLOOP: -+ if (!suser()) return -EPERM; -+ if (arg > SUNI_LM_LOOP) return -EINVAL; -+ PUT((GET(MCT) & ~(SUNI_MCT_DLE | SUNI_MCT_LLE)) | -+ (arg == SUNI_LM_DIAG ? SUNI_MCT_DLE : 0) | -+ (arg == SUNI_LM_LOOP ? SUNI_MCT_LLE : 0),MCT); -+ PRIV(dev)->loop_mode = arg; -+ return 0; -+ case SUNI_GETLOOP: -+ error = verify_area(VERIFY_WRITE,(void *) arg, -+ sizeof(int)); -+ if (error) return error; -+ put_fs_long(PRIV(dev)->loop_mode,arg); -+ return 0; -+ default: -+ return -EINVAL; -+ } -+} -+ -+ -+static void suni_int(struct atm_dev *dev) -+{ -+ printk(KERN_NOTICE "%s(itf %d): signal %s\n",dev->type,dev->number, -+ GET(RSOP_SIS) & SUNI_RSOP_SIS_LOSV ? "lost" : "detected again"); -+} -+ -+ -+static int suni_start(struct atm_dev *dev) -+{ -+ unsigned long flags; -+ -+ if (!(PRIV(dev) = kmalloc(sizeof(struct suni_priv),GFP_KERNEL))) -+ return -ENOMEM; -+ PRIV(dev)->dev = dev; -+ save_flags(flags); -+ cli(); -+ PRIV(dev)->next = sunis; -+ sunis = PRIV(dev); -+ restore_flags(flags); -+ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); -+ PUT(GET(RSOP_CIE) | SUNI_RSOP_CIE_LOSE,RSOP_CIE); -+ /* interrupt on loss of signal */ -+ (void) GET(RSOP_SIS); /* clear SUNI interrupts */ -+ PRIV(dev)->loop_mode = SUNI_LM_NONE; -+ suni_hz(0); /* clear SUNI counters */ -+ (void) fetch_stats(dev,NULL,1); /* clear kernel counters */ -+ cli(); -+ if (!start_timer) restore_flags(flags); -+ else { -+ start_timer = 0; -+ restore_flags(flags); -+ /*init_timer(&poll_timer);*/ -+ poll_timer.expires = jiffies+HZ; -+ poll_timer.function = suni_hz; -+#if 0 -+printk(KERN_DEBUG "[u] p=0x%lx,n=0x%lx\n",(unsigned long) poll_timer.prev, -+ (unsigned long) poll_timer.next); -+#endif -+ add_timer(&poll_timer); -+ } -+ return 0; -+} -+ -+ -+static const struct atmphy_ops suni_ops = { -+ suni_start, -+ suni_ioctl, -+ suni_int -+}; -+ -+ -+int suni_init(struct atm_dev *dev) -+{ -+ unsigned char mri; -+ -+ mri = GET(MRI); /* reset SUNI */ -+ PUT(mri | SUNI_MRI_RESET,MRI); -+ PUT(mri,MRI); -+ PUT(0,MT); /* disable all tests */ -+ REG_CHANGE(SUNI_TPOP_APM_S,SUNI_TPOP_APM_S_SHIFT,SUNI_TPOP_S_SONET, -+ TPOP_APM); /* use SONET */ -+ REG_CHANGE(SUNI_TACP_IUCHP_CLP,0,SUNI_TACP_IUCHP_CLP, -+ TACP_IUCHP); /* idle cells */ -+ PUT(SUNI_IDLE_PATTERN,TACP_IUCPOP); -+ dev->phy = &suni_ops; -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/suni.h Fri Jul 19 15:08:56 1996 -@@ -0,0 +1,219 @@ -+/* drivers/atm/suni.h - PMC SUNI (PHY) declarations */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVER_ATM_SUNI_H -+#define DRIVER_ATM_SUNI_H -+ -+#include -+#include -+ -+ -+/* SUNI registers */ -+ -+#define SUNI_MRI 0x00 /* Master Reset and Identity / Load -+ Meter */ -+#define SUNI_MC 0x01 /* Master Configuration */ -+#define SUNI_MIS 0x02 /* Master Interrupt Status */ -+ /* no 0x03 */ -+#define SUNI_MCM 0x04 /* Master Clock Monitor */ -+#define SUNI_MCT 0x05 /* Master Control */ -+#define SUNI_CSCS 0x06 /* Clock Synthesis Control and Status */ -+#define SUNI_CRCS 0x07 /* Clock Recovery Control and Status */ -+ /* 0x08-0x0F reserved */ -+#define SUNI_RSOP_CIE 0x10 /* RSOP Control/Interrupt Enable */ -+#define SUNI_RSOP_SIS 0x11 /* RSOP Status/Interrupt Status */ -+#define SUNI_RSOP_SBL 0x12 /* RSOP Section BIP-8 LSB */ -+#define SUNI_RSOP_SBM 0x13 /* RSOP Section BIP-8 MSB */ -+#define SUNI_TSOP_CTRL 0x14 /* TSOP Control */ -+#define SUNI_TSOP_DIAG 0x15 /* TSOP Diagnostic */ -+ /* 0x16-0x17 reserved */ -+#define SUNI_RLOP_CS 0x18 /* RLOP Control/Status */ -+#define SUNI_RLOP_IES 0x19 /* RLOP Interrupt Enable/Status */ -+#define SUNI_RLOP_LBL 0x1A /* RLOP Line BIP-8/24 LSB */ -+#define SUNI_RLOP_LB 0x1B /* RLOP Line BIP-8/24 */ -+#define SUNI_RLOP_LBM 0x1C /* RLOP Line BIP-8/24 MSB */ -+#define SUNI_RLOP_LFL 0x1D /* RLOP Line FEBE LSB */ -+#define SUNI_RLOP_LF 0x1E /* RLOP Line FEBE */ -+#define SUNI_RLOP_LFM 0x1F /* RLOP Line FEBE MSB */ -+#define SUNI_TLOP_CTRL 0x20 /* TLOP Control */ -+#define SUNI_TLOP_DIAG 0x21 /* TLOP Diagnostic */ -+ /* 0x22-0x2F reserved */ -+#define SUNI_RPOP_SC 0x30 /* RPOP Status/Control */ -+#define SUNI_RPOP_IS 0x31 /* RPOP Interrupt Status */ -+ /* 0x32 reserved */ -+#define SUNI_RPOP_IE 0x33 /* RPOP Interrupt Enable */ -+ /* 0x34-0x36 reserved */ -+#define SUNI_RPOP_PSL 0x37 /* RPOP Path Signal Label */ -+#define SUNI_RPOP_PBL 0x38 /* RPOP Path BIP-8 LSB */ -+#define SUNI_RPOP_PBM 0x39 /* RPOP Path BIP-8 MSB */ -+#define SUNI_RPOP_PFL 0x3A /* RPOP Path FEBE LSB */ -+#define SUNI_RPOP_PFM 0x3B /* RPOP Path FEBE MSB */ -+ /* 0x3C reserved */ -+#define SUNI_RPOP_PBC 0x3D /* RPOP Path BIP-8 Configuration */ -+ /* 0x3E-0x3F reserved */ -+#define SUNI_TPOP_CD 0x40 /* TPOP Control/Diagnostic */ -+#define SUNI_TPOP_PC 0x41 /* TPOP Pointer Control */ -+ /* 0x42-0x44 reserved */ -+#define SUNI_TPOP_APL 0x45 /* TPOP Arbitrary Pointer LSB */ -+#define SUNI_TPOP_APM 0x46 /* TPOP Arbitrary Pointer MSB */ -+ /* 0x47 reserved */ -+#define SUNI_TPOP_PSL 0x48 /* TPOP Path Signal Label */ -+#define SUNI_TPOP_PS 0x49 /* TPOP Path Status */ -+ /* 0x4A-0x4F reserved */ -+#define SUNI_RACP_CS 0x50 /* RACP Control/Status */ -+#define SUNI_RACP_IES 0x51 /* RACP Interrupt Enable/Status */ -+#define SUNI_RACP_MHP 0x52 /* RACP Match Header Pattern */ -+#define SUNI_RACP_MHM 0x53 /* RACP Match Header Mask */ -+#define SUNI_RACP_CHEC 0x54 /* RACP Correctable HCS Error Count */ -+#define SUNI_RACP_UHEC 0x55 /* RACP Uncorrectable HCS Err Count */ -+#define SUNI_RACP_RCCL 0x56 /* RACP Receive Cell Counter LSB */ -+#define SUNI_RACP_RCC 0x57 /* RACP Receive Cell Counter */ -+#define SUNI_RACP_RCCM 0x58 /* RACP Receive Cell Counter MSB */ -+#define SUNI_RACP_CFG 0x59 /* RACP Configuration */ -+ /* 0x5A-0x5F reserved */ -+#define SUNI_TACP_CS 0x60 /* TACP Control/Status */ -+#define SUNI_TACP_IUCHP 0x61 /* TACP Idle/Unassigned Cell Hdr Pat */ -+#define SUNI_TACP_IUCPOP 0x62 /* TACP Idle/Unassigned Cell Payload -+ Octet Pattern */ -+#define SUNI_TACP_FIFO 0x63 /* TACP FIFO Configuration */ -+#define SUNI_TACP_TCCL 0x64 /* TACP Transmit Cell Counter LSB */ -+#define SUNI_TACP_TCC 0x65 /* TACP Transmit Cell Counter */ -+#define SUNI_TACP_TCCM 0x66 /* TACP Transmit Cell Counter MSB */ -+#define SUNI_TACP_CFG 0x67 /* TACP Configuration */ -+ /* 0x68-0x7F reserved */ -+#define SUNI_MT 0x80 /* Master Test */ -+ /* 0x81-0xFF reserved */ -+ -+/* SUNI register values */ -+ -+ -+/* MRI is reg 0 */ -+#define SUNI_MRI_ID 0x0f /* R, SUNI revision number */ -+#define SUNI_MRI_ID_SHIFT 0 -+#define SUNI_MRI_TYPE 0x70 /* R, SUNI type (lite is 011) */ -+#define SUNI_MRI_TYPE_SHIFT 4 -+#define SUNI_MRI_RESET 0x80 /* RW, reset & power down chip -+ 0: normal operation -+ 1: reset & low power */ -+/* MCT is reg 5 */ -+#define SUNI_MCT_LOOPT 0x01 /* RW, timing source, 0: from -+ TRCLK+/- */ -+#define SUNI_MCT_DLE 0x02 /* RW, diagnostic loopback */ -+#define SUNI_MCT_LLE 0x04 /* RW, line loopback */ -+#define SUNI_MCT_FIXPTR 0x20 /* RW, disable transmit payload pointer -+ adjustments -+ 0: payload ptr controlled by TPOP -+ ptr control reg -+ 1: payload pointer fixed at 522 */ -+#define SUNI_MCT_LCDV 0x40 /* R, loss of cell delineation */ -+#define SUNI_MCT_LCDE 0x80 /* RW, loss of cell delineation -+ interrupt (1: on) */ -+/* RSOP_CIE is reg 0x10 */ -+#define SUNI_RSOP_CIE_OOFE 0x01 /* RW, enable interrupt on frame alarm -+ state change */ -+#define SUNI_RSOP_CIE_LOFE 0x02 /* RW, enable interrupt on loss of -+ frame state change */ -+#define SUNI_RSOP_CIE_LOSE 0x04 /* RW, enable interrupt on loss of -+ signal state change */ -+#define SUNI_RSOP_CIE_BIPEE 0x08 /* RW, enable interrupt on section -+ BIP-8 error (B1) */ -+#define SUNI_RSOP_CIE_FOOF 0x20 /* W, force RSOP out of frame at next -+ boundary */ -+#define SUNI_RSOP_CIE_DDS 0x40 /* RW, disable scrambling */ -+ -+/* RSOP_SIS is reg 0x11 */ -+#define SUNI_RSOP_SIS_OOFV 0x01 /* R, out of frame */ -+#define SUNI_RSOP_SIS_LOFV 0x02 /* R, loss of frame */ -+#define SUNI_RSOP_SIS_LOSV 0x04 /* R, loss of signal */ -+#define SUNI_RSOP_SIS_OOFI 0x08 /* R, out of frame interrupt */ -+#define SUNI_RSOP_SIS_LOFI 0x10 /* R, loss of frame interrupt */ -+#define SUNI_RSOP_SIS_LOSI 0x20 /* R, loss of signal interrupt */ -+#define SUNI_RSOP_SIS_BIPEI 0x40 /* R, section BIP-8 interrupt */ -+ -+/* TSOP_CTRL is reg 0x14 */ -+#define SUNI_TSOP_CTRL_LAIS 0x01 /* insert alarm indication signal */ -+#define SUNI_TSOP_CTRL_DS 0x40 /* disable scrambling */ -+ -+/* TSOP_DIAG is reg 0x15 */ -+#define SUNI_TSOP_DIAG_DFP 0x01 /* insert single bit error cont. */ -+#define SUNI_TSOP_DIAG_DBIP8 0x02 /* insert section BIP err (cont) */ -+#define SUNI_TSOP_DIAG_DLOS 0x04 /* set line to zero (loss of signal) */ -+ -+/* TLOP_DIAG is reg 0x21 */ -+#define SUNI_TLOP_DIAG_DBIP 0x01 /* insert line BIP err (continuously) */ -+ -+/* TPOP_DIAG is reg 0x40 */ -+#define SUNI_TPOP_DIAG_PAIS 0x01 /* insert STS path alarm ind (cont) */ -+#define SUNI_TPOP_DIAG_DB3 0x02 /* insert path BIP err (continuously) */ -+ -+/* TPOP_APM is reg 0x46 */ -+#define SUNI_TPOP_APM_APTR 0x03 /* RW, arbitrary pointer, upper 2 -+ bits */ -+#define SUNI_TPOP_APM_APTR_SHIFT 0 -+#define SUNI_TPOP_APM_S 0x0c /* RW, "unused" bits of payload -+ pointer */ -+#define SUNI_TPOP_APM_S_SHIFT 2 -+#define SUNI_TPOP_APM_NDF 0xf0 /* RW, NDF bits */ -+#define SUNI_TPOP_APM_NDF_SHIFT 4 -+ -+#define SUNI_TPOP_S_SONET 0 /* set S bits to 00 */ -+#define SUNI_TPOP_S_SDH 2 /* set S bits to 10 */ -+ -+/* RACP_IES is reg 0x51 */ -+#define SUNI_RACP_IES_FOVRI 0x02 /* R, FIFO overrun */ -+#define SUNI_RACP_IES_UHCSI 0x04 /* R, uncorrectable HCS error */ -+#define SUNI_RACP_IES_CHCSI 0x08 /* R, correctable HCS error */ -+#define SUNI_RACP_IES_OOCDI 0x10 /* R, change of cell delineation -+ state */ -+#define SUNI_RACP_IES_FIFOE 0x20 /* RW, enable FIFO overrun interrupt */ -+#define SUNI_RACP_IES_HCSE 0x40 /* RW, enable HCS error interrupt */ -+#define SUNI_RACP_IES_OOCDE 0x80 /* RW, enable cell delineation state -+ change interrupt */ -+ -+/* TACP_CS is reg 0x60 */ -+#define SUNI_TACP_CS_FIFORST 0x01 /* RW, reset transmit FIFO (sticky) */ -+#define SUNI_TACP_CS_DSCR 0x02 /* RW, disable payload scrambling */ -+#define SUNI_TACP_CS_HCAADD 0x04 /* RW, add coset polynomial to HCS */ -+#define SUNI_TACP_CS_DHCS 0x10 /* RW, insert HCS errors */ -+#define SUNI_TACP_CS_FOVRI 0x20 /* R, FIFO overrun */ -+#define SUNI_TACP_CS_TSOCI 0x40 /* R, TSOC input high */ -+#define SUNI_TACP_CS_FIFOE 0x80 /* RW, enable FIFO overrun interrupt */ -+ -+/* TACP_IUCHP is reg 0x61 */ -+#define SUNI_TACP_IUCHP_CLP 0x01 /* RW, 8th bit of 4th octet of i/u -+ pattern */ -+#define SUNI_TACP_IUCHP_PTI 0x0e /* RW, 5th-7th bits of 4th octet of i/u -+ pattern */ -+#define SUNI_TACP_IUCHP_PTI_SHIFT 1 -+#define SUNI_TACP_IUCHP_GFC 0xf0 /* RW, 1st-4th bits of 1st octet of i/u -+ pattern */ -+#define SUNI_TACP_IUCHP_GFC_SHIFT 4 -+ -+/* MT is reg 0x80 */ -+#define SUNI_MT_HIZIO 0x01 /* RW, all but data bus & MP interface -+ tri-state */ -+#define SUNI_MT_HIZDATA 0x02 /* W, also tri-state data bus */ -+#define SUNI_MT_IOTST 0x04 /* RW, enable test mode */ -+#define SUNI_MT_DBCTRL 0x08 /* W, control data bus by CSB pin */ -+#define SUNI_MT_PMCTST 0x10 /* W, PMC test mode */ -+ -+ -+#define SUNI_IDLE_PATTERN 0x6a /* idle pattern */ -+ -+/* ioctls */ -+ -+#define SUNI_GETLOOP _IOR('a',ATMIOC_PHYPRV,int) /* get loopback mode */ -+#define SUNI_SETLOOP _IO('a',ATMIOC_PHYPRV+1) /* set loopback mode */ -+ -+#define SUNI_LM_NONE 0 /* no loopback */ -+#define SUNI_LM_DIAG 1 /* diagnostic (i.e. loop TX to RX) */ -+#define SUNI_LM_LOOP 2 /* line (i.e. loop RX to TX) */ -+ -+ -+#ifdef __KERNEL__ -+int suni_init(struct atm_dev *dev); -+#endif -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/tonga.h Mon Jun 10 17:36:07 1996 -@@ -0,0 +1,20 @@ -+/* drivers/atm/tonga.h - Efficient Networks Tonga (PCI bridge) declarations */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVER_ATM_TONGA_H -+#define DRIVER_ATM_TONGA_H -+ -+#define PCI_TONGA_CTRL 0x60 /* control register */ -+ -+#define END_SWAP_DMA 0x80 /* endian swap on DMA */ -+#define END_SWAP_BYTE 0x40 /* endian swap on slave byte accesses */ -+#define END_SWAP_WORD 0x20 /* endian swap on slave word accesses */ -+#define SEPROM_MAGIC 0x0c /* obscure required pattern (ASIC only) */ -+#define SEPROM_DATA 0x02 /* serial EEPROM data (ASIC only) */ -+#define SEPROM_CLK 0x01 /* serial EEPROM clock (ASIC only) */ -+ -+#define SEPROM_ESI_BASE 64 /* start of ESI in serial EEPROM */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/uPD98401.h Mon Jun 10 17:36:08 1996 -@@ -0,0 +1,292 @@ -+/* drivers/atm/uPD98401.h - NEC uPD98401 (SAR) declarations */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVERS_ATM_uPD98401_H -+#define DRIVERS_ATM_uPD98401_H -+ -+ -+#define MAX_CRAM_SIZE (1 << 18) /* 2^18 words */ -+#define RAM_INCREMENT 1024 /* check in 4 kB increments */ -+ -+#define uPD98401_PORTS 0x24 /* probably more ? */ -+ -+ -+/* -+ * Commands -+ */ -+ -+#define uPD98401_OPEN_CHAN 0x20000000 /* open channel */ -+#define uPD98401_CHAN_ADDR 0x0003fff8 /* channel address */ -+#define uPD98401_CHAN_ADDR_SHIFT 3 -+#define uPD98401_CLOSE_CHAN 0x24000000 /* close channel */ -+#define uPD98401_CHAN_RT 0x02000000 /* RX/TX (0 TX, 1 RX) */ -+#define uPD98401_DEACT_CHAN 0x28000000 /* deactivate channel */ -+#define uPD98401_TX_READY 0x30000000 /* TX ready */ -+#define uPD98401_ADD_BAT 0x34000000 /* add batches */ -+#define uPD98401_POOL 0x000f0000 /* pool number */ -+#define uPD98401_POOL_SHIFT 16 -+#define uPD98401_POOL_NUMBAT 0x0000ffff /* number of batches */ -+#define uPD98401_NOP 0x3f000000 /* NOP */ -+#define uPD98401_IND_ACC 0x00000000 /* Indirect Access */ -+#define uPD98401_IA_RW 0x10000000 /* Read/Write (0 W, 1 R) */ -+#define uPD98401_IA_B3 0x08000000 /* Byte select, 1 enable */ -+#define uPD98401_IA_B2 0x04000000 -+#define uPD98401_IA_B1 0x02000000 -+#define uPD98401_IA_B0 0x01000000 -+#define uPD98401_IA_BALL 0x0f000000 /* whole longword */ -+#define uPD98401_IA_TGT 0x000c0000 /* Target */ -+#define uPD98401_IA_TGT_SHIFT 18 -+#define uPD98401_IA_TGT_CM 0 /* - Control Memory */ -+#define uPD98401_IA_TGT_SAR 1 /* - uPD98401 registers */ -+#define uPD98401_IA_TGT_PHY 3 /* - PHY device */ -+#define uPD98401_IA_ADDR 0x0003ffff -+ -+/* -+ * Command Register Status -+ */ -+ -+#define uPD98401_BUSY 0x80000000 /* SAR is busy */ -+#define uPD98401_LOCKED 0x40000000 /* SAR is locked by other CPU */ -+ -+/* -+ * Indications -+ */ -+ -+/* Normal (AAL5) Receive Indication */ -+#define uPD98401_AAL5_UINFO 0xffff0000 /* user-supplied information */ -+#define uPD98401_AAL5_UINFO_SHIFT 16 -+#define uPD98401_AAL5_SIZE 0x0000ffff /* PDU size (in _CELLS_ !!) */ -+#define uPD98401_AAL5_CHAN 0x7fff0000 /* Channel number */ -+#define uPD98401_AAL5_CHAN_SHIFT 16 -+#define uPD98401_AAL5_ERR 0x00008000 /* Error indication */ -+#define uPD98401_AAL5_CI 0x00004000 /* Congestion Indication */ -+#define uPD98401_AAL5_CLP 0x00002000 /* CLP (>= 1 cell had CLP=1) */ -+#define uPD98401_AAL5_ES 0x00000f00 /* Error Status */ -+#define uPD98401_AAL5_ES_SHIFT 8 -+#define uPD98401_AAL5_ES_NONE 0 /* No error */ -+#define uPD98401_AAL5_ES_FREE 1 /* Receiver free buf underflow */ -+#define uPD98401_AAL5_ES_FIFO 2 /* Receiver FIFO overrun */ -+#define uPD98401_AAL5_ES_TOOBIG 3 /* Maximum length violation */ -+#define uPD98401_AAL5_ES_CRC 4 /* CRC error */ -+#define uPD98401_AAL5_ES_ABORT 5 /* User abort */ -+#define uPD98401_AAL5_ES_LENGTH 6 /* Length violation */ -+#define uPD98401_AAL5_ES_T1 7 /* T1 error (timeout) */ -+#define uPD98401_AAL5_ES_DEACT 8 /* Deactivated with DEACT_CHAN */ -+#define uPD98401_AAL5_POOL 0x0000001f /* Free buffer pool number */ -+ -+/* Raw Cell Indication */ -+#define uPD98401_RAW_UINFO uPD98401_AAL5_UINFO -+#define uPD98401_RAW_UINFO_SHIFT uPD98401_AAL5_UINFO_SHIFT -+#define uPD98401_RAW_HEC 0x000000ff /* HEC */ -+#define uPD98401_RAW_CHAN uPD98401_AAL5_CHAN -+#define uPD98401_RAW_CHAN_SHIFT uPD98401_AAL5_CHAN_SHIFT -+ -+/* Transmit Indication */ -+#define uPD98401_TXI_CONN 0x7fff0000 /* Connection Number */ -+#define uPD98401_TXI_CONN_SHIFT 16 -+#define uPD98401_TXI_ACTIVE 0x00008000 /* Channel remains active */ -+#define uPD98401_TXI_PQP 0x00007fff /* Packet Queue Pointer */ -+ -+/* -+ * Directly Addressable Registers -+ */ -+ -+#define uPD98401_GMR 0x00 /* General Mode Register */ -+#define uPD98401_GSR 0x01 /* General Status Register */ -+#define uPD98401_IMR 0x02 /* Interrupt Mask Register */ -+#define uPD98401_RQU 0x03 /* Receive Queue Underrun */ -+#define uPD98401_RQA 0x04 /* Receive Queue Alert */ -+#define uPD98401_ADDR 0x05 /* Last Burst Address */ -+#define uPD98401_VER 0x06 /* Version Number */ -+#define uPD98401_SWR 0x07 /* Software Reset */ -+#define uPD98401_CMR 0x08 /* Command Register */ -+#define uPD98401_CMR_L 0x09 /* Command Register and Lock/Unlock */ -+#define uPD98401_CER 0x0a /* Command Extension Register */ -+#define uPD98401_CER_L 0x0b /* Command Ext Reg and Lock/Unlock */ -+ -+#define uPD98401_MSH(n) (0x10+(n)) /* Mailbox n Start Address High */ -+#define uPD98401_MSL(n) (0x14+(n)) /* Mailbox n Start Address High */ -+#define uPD98401_MBA(n) (0x18+(n)) /* Mailbox n Bottom Address */ -+#define uPD98401_MTA(n) (0x1c+(n)) /* Mailbox n Tail Address */ -+#define uPD98401_MWA(n) (0x20+(n)) /* Mailbox n Write Address */ -+ -+/* GMR is at 0x00 */ -+#define uPD98401_GMR_ONE 0x80000000 /* Must be set to one */ -+#define uPD98401_GMR_SLM 0x40000000 /* Address mode (0 word, 1 byte) */ -+#define uPD98401_GMR_CPE 0x00008000 /* Control Memory Parity Enable */ -+#define uPD98401_GMR_LP 0x00004000 /* Loopback */ -+#define uPD98401_GMR_WA 0x00002000 /* Early Bus Write Abort/RDY */ -+#define uPD98401_GMR_RA 0x00001000 /* Early Read Abort/RDY */ -+#define uPD98401_GMR_SZ 0x00000f00 /* Burst Size Enable */ -+#define uPD98401_BURST16 0x00000800 /* 16-word burst */ -+#define uPD98401_BURST8 0x00000400 /* 8-word burst */ -+#define uPD98401_BURST4 0x00000200 /* 4-word burst */ -+#define uPD98401_BURST2 0x00000100 /* 2-word burst */ -+#define uPD98401_GMR_AD 0x00000080 /* Address (burst resolution) Disable */ -+#define uPD98401_GMR_BO 0x00000040 /* Byte Order (0 little, 1 big) */ -+#define uPD98401_GMR_PM 0x00000020 /* Bus Parity Mode (0 byte, 1 word)*/ -+#define uPD98401_GMR_PC 0x00000010 /* Bus Parity Control (0even,1odd) */ -+#define uPD98401_GMR_BPE 0x00000008 /* Bus Parity Enable */ -+#define uPD98401_GMR_DR 0x00000004 /* Receive Drop Mode (0drop,1don't)*/ -+#define uPD98401_GMR_SE 0x00000002 /* Shapers Enable */ -+#define uPD98401_GMR_RE 0x00000001 /* Receiver Enable */ -+ -+/* GSR is at 0x01, IMR is at 0x02 */ -+#define uPD98401_INT_PI 0x80000000 /* PHY interrupt */ -+#define uPD98401_INT_RQA 0x40000000 /* Receive Queue Alert */ -+#define uPD98401_INT_RQU 0x20000000 /* Receive Queue Underrun */ -+#define uPD98401_INT_RD 0x10000000 /* Receiver Deactivated */ -+#define uPD98401_INT_SPE 0x08000000 /* System Parity Error */ -+#define uPD98401_INT_CPE 0x04000000 /* Control Memory Parity Error */ -+#define uPD98401_INT_SBE 0x02000000 /* System Bus Error */ -+#define uPD98401_INT_IND 0x01000000 /* Initialization Done */ -+#define uPD98401_INT_RCR 0x0000ff00 /* Raw Cell Received */ -+#define uPD98401_INT_RCR_SHIFT 8 -+#define uPD98401_INT_MF 0x000000f0 /* Mailbox Full */ -+#define uPD98401_INT_MF_SHIFT 4 -+#define uPD98401_INT_MM 0x0000000f /* Mailbox Modified */ -+ -+/* VER is at 0x06 */ -+#define uPD98401_MAJOR 0x0000ff00 /* Major revision */ -+#define uPD98401_MAJOR_SHIFT 8 -+#define uPD98401_MINOR 0x000000ff /* Minor revision */ -+ -+/* -+ * Indirectly Addressable Registers -+ */ -+ -+#define uPD98401_IM(n) (0x40000+(n)) /* Scheduler n I and M */ -+#define uPD98401_X(n) (0x40010+(n)) /* Scheduler n X */ -+#define uPD98401_Y(n) (0x40020+(n)) /* Scheduler n Y */ -+#define uPD98401_PC(n) (0x40030+(n)) /* Scheduler n P, C, p and c */ -+#define uPD98401_PS(n) (0x40040+(n)) /* Scheduler n priority and status */ -+ -+/* IM contents */ -+#define uPD98401_IM_I 0xff000000 /* I */ -+#define uPD98401_IM_I_SHIFT 24 -+#define uPD98401_IM_M 0x00ffffff /* M */ -+ -+/* PC contents */ -+#define uPD98401_PC_P 0xff000000 /* P */ -+#define uPD98401_PC_P_SHIFT 24 -+#define uPD98401_PC_C 0x00ff0000 /* C */ -+#define uPD98401_PC_C_SHIFT 16 -+#define uPD98401_PC_p 0x0000ff00 /* p */ -+#define uPD98401_PC_p_SHIFT 8 -+#define uPD98401_PC_c 0x000000ff /* c */ -+ -+/* PS contents */ -+#define uPD98401_PS_PRIO 0xf0 /* Priority level (0 high, 15 low) */ -+#define uPD98401_PS_PRIO_SHIFT 4 -+#define uPD98401_PS_S 0x08 /* Scan - must be 0 (internal) */ -+#define uPD98401_PS_R 0x04 /* Round Robin (internal) */ -+#define uPD98401_PS_A 0x02 /* Active (internal) */ -+#define uPD98401_PS_E 0x01 /* Enabled */ -+ -+#define uPD98401_TOS 0x40100 /* Top of Stack Control Memory Address */ -+#define uPD98401_SMA 0x40200 /* Shapers Control Memory Start Address */ -+#define uPD98401_PMA 0x40201 /* Receive Pool Control Memory Start Address */ -+#define uPD98401_T1R 0x40300 /* T1 Register */ -+#define uPD98401_VRR 0x40301 /* VPI/VCI Reduction Register/Recv. Shutdown */ -+#define uPD98401_TSR 0x40302 /* Time-Stamp Register */ -+ -+/* VRR is at 0x40301 */ -+#define uPD98401_VRR_SDM 0x80000000 /* Shutdown Mode */ -+#define uPD98401_VRR_SHIFT 0x000f0000 /* VPI/VCI Shift */ -+#define uPD98401_VRR_SHIFT_SHIFT 16 -+#define uPD98401_VRR_MASK 0x0000ffff /* VPI/VCI mask */ -+ -+/* -+ * TX packet descriptor -+ */ -+ -+#define uPD98401_TXPD_SIZE 16 /* descriptor size (in bytes) */ -+ -+#define uPD98401_TXPD_V 0x80000000 /* Valid bit */ -+#define uPD98401_TXPD_DP 0x40000000 /* Descriptor (1) or Pointer (0) */ -+#define uPD98401_TXPD_SM 0x20000000 /* Single (1) or Multiple (0) */ -+#define uPD98401_TXPD_CLPM 0x18000000 /* CLP mode */ -+#define uPD98401_CLPM_0 0 /* 00 CLP = 0 */ -+#define uPD98401_CLPM_1 3 /* 11 CLP = 1 */ -+#define uPD98401_CLPM_LAST 1 /* 01 CLP unless last cell */ -+#define uPD98401_TXPD_CLPM_SHIFT 27 -+#define uPD98401_TXPD_PTI 0x07000000 /* PTI pattern */ -+#define uPD98401_TXPD_PTI_SHIFT 24 -+#define uPD98401_TXPD_GFC 0x00f00000 /* GFC pattern */ -+#define uPD98401_TXPD_GFC_SHIFT 20 -+#define uPD98401_TXPD_C10 0x00040000 /* insert CRC-10 */ -+#define uPD98401_TXPD_AAL5 0x00020000 /* AAL5 processing */ -+#define uPD98401_TXPD_MB 0x00010000 /* TX mailbox number */ -+#define uPD98401_TXPD_UU 0x0000ff00 /* CPCS-UU */ -+#define uPD98401_TXPD_UU_SHIFT 8 -+#define uPD98401_TXPD_CPI 0x000000ff /* CPI */ -+ -+/* -+ * TX buffer descriptor -+ */ -+ -+#define uPD98401_TXBD_SIZE 8 /* descriptor size (in bytes) */ -+ -+#define uPD98401_TXBD_LAST 0x80000000 /* last buffer in packet */ -+ -+/* -+ * TX VC table -+ */ -+ -+/* 1st word has the same structure as in a TX packet descriptor */ -+#define uPD98401_TXVC_L 0x80000000 /* last buffer */ -+#define uPD98401_TXVC_SHP 0x0f000000 /* shaper number */ -+#define uPD98401_TXVC_SHP_SHIFT 24 -+#define uPD98401_TXVC_VPI 0x00ff0000 /* VPI */ -+#define uPD98401_TXVC_VPI_SHIFT 16 -+#define uPD98401_TXVC_VCI 0x0000ffff /* VCI */ -+#define uPD98401_TXVC_QRP 6 /* Queue Read Pointer is in word 6 */ -+ -+/* -+ * RX free buffer pools descriptor -+ */ -+ -+#define uPD98401_RXFP_ALERT 0x70000000 /* low water mark */ -+#define uPD98401_RXFP_ALERT_SHIFT 28 -+#define uPD98401_RXFP_BFSZ 0x0f000000 /* buffer size, 64*2^n */ -+#define uPD98401_RXFP_BFSZ_SHIFT 24 -+#define uPD98401_RXFP_BTSZ 0x00ff0000 /* batch size, n+1 */ -+#define uPD98401_RXFP_BTSZ_SHIFT 16 -+#define uPD98401_RXFP_REMAIN 0x0000ffff /* remaining batches in pool */ -+ -+/* -+ * RX VC table -+ */ -+ -+#define uPD98401_RXVC_BTSZ 0xff000000 /* remaining free buffers in batch */ -+#define uPD98401_RXVC_BTSZ_SHIFT 24 -+#define uPD98401_RXVC_MB 0x00200000 /* RX mailbox number */ -+#define uPD98401_RXVC_POOL 0x001f0000 /* free buffer pool number */ -+#define uPD98401_RXVC_POOL_SHIFT 16 -+#define uPD98401_RXVC_UINFO 0x0000ffff /* user-supplied information */ -+#define uPD98401_RXVC_T1 0xffff0000 /* T1 timestamp */ -+#define uPD98401_RXVC_T1_SHIFT 16 -+#define uPD98401_RXVC_PR 0x00008000 /* Packet Reception, 1 if busy */ -+#define uPD98401_RXVC_DR 0x00004000 /* FIFO Drop */ -+#define uPD98401_RXVC_OD 0x00001000 /* Drop OAM cells */ -+#define uPD98401_RXVC_AR 0x00000800 /* AAL5 or raw cell; 1 if AAL5 */ -+#define uPD98401_RXVC_MAXSEG 0x000007ff /* max number of segments per PDU */ -+#define uPD98401_RXVC_REM 0xfffe0000 /* remaining words in curr buffer */ -+#define uPD98401_RXVC_REM_SHIFT 17 -+#define uPD98401_RXVC_CLP 0x00010000 /* CLP received */ -+#define uPD98401_RXVC_BFA 0x00008000 /* Buffer Assigned */ -+#define uPD98401_RXVC_BTA 0x00004000 /* Batch Assigned */ -+#define uPD98401_RXVC_CI 0x00002000 /* Congestion Indication */ -+#define uPD98401_RXVC_DD 0x00001000 /* Dropping incoming cells */ -+#define uPD98401_RXVC_DP 0x00000800 /* like PR ? */ -+#define uPD98401_RXVC_CURSEG 0x000007ff /* Current Segment count */ -+ -+/* -+ * RX lookup table -+ */ -+ -+#define uPD98401_RXLT_ENBL 0x8000 /* Enable */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/uPD98402.h Mon Jun 10 17:36:08 1996 -@@ -0,0 +1,106 @@ -+/* drivers/atm/uPD98402.h - NEC uPD98402 (PHY) declarations */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVERS_ATM_uPD98402_H -+#define DRIVERS_ATM_uPD98402_H -+ -+/* -+ * Registers -+ */ -+ -+#define uPD98402_CMR 0x00 /* Command Register */ -+#define uPD98402_MDR 0x01 /* Mode Register */ -+#define uPD98402_PICR 0x02 /* PHY Interrupt Cause Register */ -+#define uPD98402_PIMR 0x03 /* PHY Interrupt Mask Register */ -+#define uPD98402_ACR 0x04 /* Alarm Cause Register */ -+#define uPD98402_ACMR 0x05 /* Alarm Cause Mask Register */ -+#define uPD98402_PCR 0x06 /* Performance Cause Register */ -+#define uPD98402_PCMR 0x07 /* Performance Cause Mask Register */ -+#define uPD98402_IACM 0x08 /* Internal Alarm Cause Mask Register */ -+#define uPD98402_B1ECT 0x09 /* B1 Error Count Register */ -+#define uPD98402_B2ECT 0x0a /* B2 Error Count Register */ -+#define uPD98402_B3ECT 0x0b /* B3 Error Count Regster */ -+#define uPD98402_PFECB 0x0c /* Path FEBE Count Register */ -+#define uPD98402_LECCT 0x0d /* Line FEBE Count Register */ -+#define uPD98402_HECCT 0x0e /* HEC Error Count Register */ -+#define uPD98402_FJCT 0x0f /* Frequence Justification Count Reg */ -+#define uPD98402_PCOCR 0x10 /* Perf. Counter Overflow Cause Reg */ -+#define uPD98402_PCOMR 0x11 /* Perf. Counter Overflow Mask Reg */ -+#define uPD98402_C11T 0x20 /* C11T Data Register */ -+#define uPD98402_C12T 0x21 /* C12T Data Register */ -+#define uPD98402_C13T 0x22 /* C13T Data Register */ -+#define uPD98402_F1T 0x23 /* F1T Data Register */ -+#define uPD98402_K2T 0x25 /* K2T Data Register */ -+#define uPD98402_C2T 0x26 /* C2T Data Register */ -+#define uPD98402_F2T 0x27 /* F2T Data Register */ -+#define uPD98402_C11R 0x30 /* C11T Data Register */ -+#define uPD98402_C12R 0x31 /* C12T Data Register */ -+#define uPD98402_C13R 0x32 /* C13T Data Register */ -+#define uPD98402_F1R 0x33 /* F1T Data Register */ -+#define uPD98402_K2R 0x35 /* K2T Data Register */ -+#define uPD98402_C2R 0x36 /* C2T Data Register */ -+#define uPD98402_F2R 0x37 /* F2T Data Register */ -+ -+/* CMR is at 0x00 */ -+#define uPD98402_CMR_PFRF 0x01 /* Send path FERF */ -+#define uPD98402_CMR_LFRF 0x02 /* Send line FERF */ -+#define uPD98402_CMR_PAIS 0x04 /* Send path AIS */ -+#define uPD98402_CMR_LAIS 0x08 /* Send line AIS */ -+ -+/* MDR is at 0x01 */ -+#define uPD98402_MDR_ALP 0x01 /* ATM layer loopback */ -+#define uPD98402_MDR_TPLP 0x02 /* PMD loopback, to host */ -+#define uPD98402_MDR_RPLP 0x04 /* PMD loopback, to network */ -+#define uPD98402_MDR_SS0 0x08 /* SS0 */ -+#define uPD98402_MDR_SS1 0x10 /* SS1 */ -+#define uPD98402_MDR_SS_MASK 0x18 /* mask */ -+#define uPD98402_MDR_SS_SHIFT 3 /* shift */ -+#define uPD98402_MDR_HEC 0x20 /* disable HEC inbound processing */ -+#define uPD98402_MDR_FSR 0x40 /* disable frame scrambler */ -+#define uPD98402_MDR_CSR 0x80 /* disable cell scrambler */ -+ -+/* PICR is at 0x02, PIMR is at 0x03 */ -+#define uPD98402_INT_PFM 0x01 /* performance counter has changed */ -+#define uPD98402_INT_ALM 0x02 /* line fault */ -+#define uPD98402_INT_RFO 0x04 /* receive FIFO overflow */ -+#define uPD98402_INT_PCO 0x08 /* performance counter overflow */ -+#define uPD98402_INT_OTD 0x20 /* OTD has occurred */ -+#define uPD98402_INT_LOS 0x40 /* Loss Of Signal */ -+#define uPD98402_INT_LOF 0x80 /* Loss Of Frame */ -+ -+/* ACR is as 0x04, ACMR is at 0x05 */ -+#define uPD98402_ALM_PFRF 0x01 /* path FERF */ -+#define uPD98402_ALM_LFRF 0x02 /* line FERF */ -+#define uPD98402_ALM_PAIS 0x04 /* path AIS */ -+#define uPD98402_ALM_LAIS 0x08 /* line AIS */ -+#define uPD98402_ALM_LOD 0x10 /* loss of delineation */ -+#define uPD98402_ALM_LOP 0x20 /* loss of pointer */ -+#define uPD98402_ALM_OOF 0x40 /* out of frame */ -+ -+/* PCR is at 0x06, PCMR is at 0x07 */ -+#define uPD98402_PFM_PFEB 0x01 /* path FEBE */ -+#define uPD98402_PFM_LFEB 0x02 /* line FEBE */ -+#define uPD98402_PFM_B3E 0x04 /* B3 error */ -+#define uPD98402_PFM_B2E 0x08 /* B2 error */ -+#define uPD98402_PFM_B1E 0x10 /* B1 error */ -+#define uPD98402_PFM_FJ 0x20 /* frequency justification */ -+ -+/* IACM is at 0x08 */ -+#define uPD98402_IACM_PFRF 0x01 /* don't generate path FERF */ -+#define uPD98402_IACM_LFRF 0x02 /* don't generate line FERF */ -+ -+/* PCOCR is at 0x010, PCOMR is at 0x11 */ -+#define uPD98402_PCO_B1EC 0x01 /* B1ECT overflow */ -+#define uPD98402_PCO_B2EC 0x02 /* B2ECT overflow */ -+#define uPD98402_PCO_B3EC 0x04 /* B3ECT overflow */ -+#define uPD98402_PCO_PFBC 0x08 /* PFEBC overflow */ -+#define uPD98402_PCO_LFBC 0x10 /* LFEVC overflow */ -+#define uPD98402_PCO_HECC 0x20 /* HECCT overflow */ -+#define uPD98402_PCO_FJC 0x40 /* FJCT overflow */ -+ -+ -+int uPD98402_init(struct atm_dev *dev); -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/uPD98402.c Mon Jun 10 17:36:09 1996 -@@ -0,0 +1,201 @@ -+/* drivers/atm/uPD98402.c - NEC uPD98402 (PHY) declarations */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include /* for jiffies */ -+#include -+#include -+#include -+#include -+#include -+ -+#include "uPD98402.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+struct uPD98402_priv { -+ struct sonet_stats sonet_stats; /* link diagnostics */ -+ unsigned char framing; /* SONET/SDH framing */ -+}; -+ -+ -+#define PRIV(dev) ((struct uPD98402_priv *) dev->phy_data) -+ -+#define PUT(val,reg) dev->ops->phy_put(dev,val,uPD98402_##reg) -+#define GET(reg) dev->ops->phy_get(dev,uPD98402_##reg) -+ -+ -+static int fetch_stats(struct atm_dev *dev,struct sonet_stats *arg,int zero) -+{ -+ unsigned long flags; -+ -+ save_flags(flags); -+ cli(); -+ PRIV(dev)->sonet_stats.uncorr_hcs += GET(HECCT); -+ if (arg) -+ memcpy_tofs(arg,&PRIV(dev)->sonet_stats, -+ sizeof(struct sonet_stats)); -+ if (zero) { -+ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); -+ PRIV(dev)->sonet_stats.corr_hcs = -1; -+ PRIV(dev)->sonet_stats.tx_cells = -1; -+ PRIV(dev)->sonet_stats.rx_cells = -1; -+ } -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+static int set_framing(struct atm_dev *dev,unsigned char framing) -+{ -+ static const unsigned char sonet[] = { 1,2,3,0 }; -+ static const unsigned char sdh[] = { 1,0,0,2 }; -+ const char *set; -+ unsigned long flags; -+ -+ switch (framing) { -+ case SONET_FRAME_SONET: -+ set = sonet; -+ break; -+ case SONET_FRAME_SDH: -+ set = sdh; -+ break; -+ default: -+ return -EINVAL; -+ } -+ save_flags(flags); -+ cli(); -+ PUT(set[0],C11T); -+ PUT(set[1],C12T); -+ PUT(set[2],C13T); -+ PUT((GET(MDR) & ~uPD98402_MDR_SS_MASK) | (set[3] << -+ uPD98402_MDR_SS_SHIFT),MDR); -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+static int get_sense(struct atm_dev *dev,unsigned long arg) -+{ -+ unsigned long flags; -+ -+ save_flags(flags); -+ cli(); -+ put_fs_byte(GET(C11R),arg); -+ put_fs_byte(GET(C12R),arg+1); -+ put_fs_byte(GET(C13R),arg+2); -+ put_fs_byte(0xff,arg+3); -+ put_fs_byte(0xff,arg+4); -+ put_fs_byte(0xff,arg+5); -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+static int uPD98402_ioctl(struct atm_dev *dev,unsigned int cmd, -+ unsigned long arg) -+{ -+ switch (cmd) { -+ -+ case SONET_GETSTATZ: -+ case SONET_GETSTAT: -+ return fetch_stats(dev,(struct sonet_stats *) arg, -+ cmd == SONET_GETSTATZ); -+ case SONET_SETFRAMING: -+ return set_framing(dev,arg); -+ case SONET_GETFRAMING: -+ put_fs_long(PRIV(dev)->framing,arg); -+ return 0; -+ case SONET_GETFRSENSE: -+ return get_sense(dev,arg); -+ default: -+ return -EINVAL; -+ } -+} -+ -+ -+static void stat_event(struct atm_dev *dev) -+{ -+ unsigned char events; -+ -+ events = GET(PCR); -+ if (events & uPD98402_PFM_PFEB) -+ if ((PRIV(dev)->sonet_stats.path_febe += GET(PFECB)) < 0) -+ PRIV(dev)->sonet_stats.path_febe = LONG_MAX; -+ if (events & uPD98402_PFM_LFEB) -+ if ((PRIV(dev)->sonet_stats.line_febe += GET(LECCT)) < 0) -+ PRIV(dev)->sonet_stats.line_febe = LONG_MAX; -+ if (events & uPD98402_PFM_B3E) -+ if ((PRIV(dev)->sonet_stats.path_bip += GET(B3ECT)) < 0) -+ PRIV(dev)->sonet_stats.path_bip = LONG_MAX; -+ if (events & uPD98402_PFM_B2E) -+ if ((PRIV(dev)->sonet_stats.line_bip += GET(B2ECT)) < 0) -+ PRIV(dev)->sonet_stats.line_bip = LONG_MAX; -+ if (events & uPD98402_PFM_B1E) -+ if ((PRIV(dev)->sonet_stats.section_bip += GET(B1ECT)) < 0) -+ PRIV(dev)->sonet_stats.section_bip = LONG_MAX; -+} -+ -+ -+static void uPD98402_int(struct atm_dev *dev) -+{ -+ static unsigned long silence = 0; -+ unsigned char reason; -+ -+ while ((reason = GET(PICR))) { -+ if (reason & uPD98402_INT_LOS) -+ printk(KERN_NOTICE "%s(itf %d): signal lost\n", -+ dev->type,dev->number); -+ if (reason & uPD98402_INT_PFM) stat_event(dev); -+ if (reason & uPD98402_INT_PCO) { -+ (void) GET(PCOCR); /* clear interrupt cause */ -+ PRIV(dev)->sonet_stats.uncorr_hcs += GET(HECCT); -+ } -+ if ((reason & uPD98402_INT_RFO) && jiffies > silence) { -+ printk(KERN_WARNING "%s(itf %d): uPD98402 receive " -+ "FIFO overflow\n",dev->type,dev->number); -+ silence = jiffies+HZ/2; -+ } -+ } -+} -+ -+ -+static int uPD98402_start(struct atm_dev *dev) -+{ -+DPRINTK("phy_start\n"); -+ if (!(PRIV(dev) = kmalloc(sizeof(struct uPD98402_priv),GFP_KERNEL))) -+ return -ENOMEM; -+ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); -+ (void) GET(PCR); /* clear performance events */ -+ PUT(uPD98402_PFM_FJ,PCMR); /* ignore frequency adj */ -+ (void) GET(PCOCR); /* clear overflows */ -+ PUT(~uPD98402_PCO_HECC,PCOMR); -+ (void) GET(PICR); /* clear interrupts */ -+ PUT(~(uPD98402_INT_PFM | uPD98402_INT_ALM | uPD98402_INT_RFO | -+ uPD98402_INT_LOS),PIMR); /* enable them */ -+ (void) fetch_stats(dev,NULL,1); /* clear kernel counters */ -+ return 0; -+} -+ -+ -+ -+static const struct atmphy_ops uPD98402_ops = { -+ uPD98402_start, -+ uPD98402_ioctl, /* no ioctl yet */ -+ uPD98402_int -+}; -+ -+ -+int uPD98402_init(struct atm_dev *dev) -+{ -+DPRINTK("phy_init\n"); -+ dev->phy = &uPD98402_ops; -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/zatm.c Wed Jul 10 21:02:11 1996 -@@ -0,0 +1,1665 @@ -+/* drivers/atm/zatm.c - ZeitNet ZN122x device driver */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include /* for request_region */ -+#include -+#include -+#include -+#include -+#include -+ -+#include "uPD98401.h" -+#include "uPD98402.h" -+#include "zeprom.h" -+#include "zatm.h" -+ -+ -+/* -+ * TODO: -+ * -+ * Minor features -+ * - support 64 kB SDUs (will have to use multibuffer batches then :-( ) -+ * - proper use of CDV, credit = max(1,CDVT*PCR) -+ * - AAL0 -+ * - better receive timestamps -+ * - OAM -+ */ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+#ifndef CONFIG_ATM_ZATM_DEBUG -+ -+ -+#define NULLCHECK(x) -+ -+#define EVENT(s,a,b) -+ -+ -+static void event_dump(void) -+{ -+} -+ -+ -+#else -+ -+ -+/* -+ * NULL pointer checking -+ */ -+ -+#define NULLCHECK(x) \ -+ if ((unsigned long) (x) < 0x30) printk(KERN_CRIT #x "==0x%x\n", (int) (x)) -+ -+/* -+ * Very extensive activity logging. Greatly improves bug detection speed but -+ * costs a few Mbps if enabled. -+ */ -+ -+#define EV 64 -+ -+static const char *ev[EV]; -+static unsigned long ev_a[EV],ev_b[EV]; -+static int ec = 0; -+ -+ -+static void EVENT(const char *s,unsigned long a,unsigned long b) -+{ -+ ev[ec] = s; -+ ev_a[ec] = a; -+ ev_b[ec] = b; -+ ec = (ec+1) % EV; -+} -+ -+ -+static void event_dump(void) -+{ -+ int n,i; -+ -+ printk(KERN_NOTICE "----- event dump follows -----\n"); -+ for (n = 0; n < EV; n++) { -+ i = (ec+n) % EV; -+ printk(KERN_NOTICE); -+ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); -+ } -+ printk(KERN_NOTICE "----- event dump ends here -----\n"); -+} -+ -+ -+#endif /* CONFIG_ATM_ZATM_DEBUG */ -+ -+ -+#define RING_BUSY 1 /* indication from do_tx that PDU has to be -+ backlogged */ -+ -+static struct atm_dev *zatm_boards = NULL; -+static unsigned long dummy[2] = {0,0}; -+ -+ -+#define zin_n(r) inl_p(zatm_dev->base+r*4) -+#define zin(r) inl_p(zatm_dev->base+uPD98401_##r*4) -+#define zout(v,r) outl_p(v,zatm_dev->base+uPD98401_##r*4) -+#define zwait while (zin(CMR) & uPD98401_BUSY) -+ -+/* RX0, RX1, TX0, TX1 */ -+static const int mbx_entries[NR_MBX] = { 1024,1024,1024,1024 }; -+static const int mbx_esize[NR_MBX] = { 16,16,4,4 }; /* entry size in bytes */ -+ -+#define MBX_SIZE(i) (mbx_entries[i]*mbx_esize[i]) -+ -+ -+/*-------------------------------- utilities --------------------------------*/ -+ -+ -+static void zpokel(struct zatm_dev *zatm_dev,unsigned long value, -+ unsigned long addr) -+{ -+ zwait; -+ zout(value,CER); -+ zout(uPD98401_IND_ACC | uPD98401_IA_BALL | -+ (uPD98401_IA_TGT_CM << uPD98401_IA_TGT_SHIFT) | addr,CMR); -+} -+ -+ -+static unsigned long zpeekl(struct zatm_dev *zatm_dev,unsigned long addr) -+{ -+ zwait; -+ zout(uPD98401_IND_ACC | uPD98401_IA_BALL | uPD98401_IA_RW | -+ (uPD98401_IA_TGT_CM << uPD98401_IA_TGT_SHIFT) | addr,CMR); -+ zwait; -+ return zin(CER); -+} -+ -+ -+/*------------------------------- free lists --------------------------------*/ -+ -+ -+#define HEAD_SIZE (3*sizeof(void *)) -+ -+ -+static void refill_pool(struct atm_dev *dev,int pool) -+{ -+ struct zatm_dev *zatm_dev; -+ struct sk_buff *skb,*first; -+ unsigned long flags; -+ int align,offset,free,count,size; -+ -+ EVENT("refill_pool\n",0,0); -+ zatm_dev = ZATM_DEV(dev); -+ size = (64 << (pool <= ZATM_AAL5_POOL_BASE ? 0 : -+ pool-ZATM_AAL5_POOL_BASE))+HEAD_SIZE; -+ if (size < PAGE_SIZE) { -+ align = 32; /* for 32 byte alignment */ -+ offset = HEAD_SIZE; -+ } -+ else { -+ align = 4096; -+ offset = zatm_dev->pool_info[pool].offset+HEAD_SIZE; -+ } -+ size += align; -+ save_flags(flags); -+ cli(); -+ free = zpeekl(zatm_dev,zatm_dev->pool_base+2*pool) & -+ uPD98401_RXFP_REMAIN; -+ restore_flags(flags); -+ if (free >= zatm_dev->pool_info[pool].low_water) return; -+ EVENT("starting ... POOL: 0x%08lx, 0x%08lx\n", -+ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool), -+ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool+1)); -+ EVENT("dummy: 0x%08lx, 0x%08lx\n",dummy[0],dummy[1]); -+ count = 0; -+ first = NULL; -+ while (free < zatm_dev->pool_info[pool].high_water) { -+ skb = alloc_skb(size,GFP_ATOMIC); -+ if (!skb) { -+ printk(KERN_WARNING DEV_LABEL "(Itf %d): got no new " -+ "skb (%d) with %d free\n",dev->number,size,free); -+ break; -+ } -+ if (!first) first = skb; -+ count++; -+ /* -+ * 2nd skb head structure: -+ * [0] pointer to buffer (for SAR) -+ * [1] buffer descr link pointer (for SAR) -+ * [2] back pointer to skb (for poll_rx) -+ * [3] data -+ * ... -+ */ -+ skb->free = 1; -+ skb->data = (void *) ((((unsigned long) skb->data+align+ -+ offset-1) & ~(align-1))-offset); -+ ((void **) skb->data)[0] = skb->data+HEAD_SIZE; -+ ((void **) skb->data)[1] = NULL; -+ ((void **) skb->data)[2] = skb; -+ EVENT("enq skb 0x%08lx/0x%08lx\n",(unsigned long) skb, -+ (unsigned long) skb->data); -+ cli(); -+ if (zatm_dev->last_free[pool]) -+ ((void **) zatm_dev->last_free[pool]->data)[-2] = -+ skb->data; -+ zatm_dev->last_free[pool] = skb; -+ skb->data += HEAD_SIZE; -+ skb_queue_tail(&zatm_dev->pool[pool],skb); -+ restore_flags(flags); -+ free++; -+ } -+ if (first) { -+ cli(); -+ zwait; -+ zout((unsigned long) first->data-HEAD_SIZE,CER); -+ zout(uPD98401_ADD_BAT | (pool << uPD98401_POOL_SHIFT) | count, -+ CMR); -+ restore_flags(flags); -+ EVENT ("POOL: 0x%08lx, 0x%08lx\n", -+ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool), -+ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool+1)); -+ EVENT("dummy: 0x%08lx, 0x%08lx\n",dummy[0],dummy[1]); -+ } -+} -+ -+ -+static void drain_free(struct atm_dev *dev,int pool) -+{ -+ struct sk_buff *skb; -+ -+ while ((skb = skb_dequeue(&ZATM_DEV(dev)->pool[pool]))) -+ kfree_skb(skb,FREE_READ); -+} -+ -+ -+static int pool_index(int max_pdu) -+{ -+ int i; -+ -+ max_pdu += ATM_CELL_PAYLOAD-1; -+ if (max_pdu > 65536) return -1; -+ for (i = 0; (64 << i) < max_pdu; i++); -+ return i+ZATM_AAL5_POOL_BASE; -+} -+ -+ -+/* use_pool isn't reentrant */ -+ -+ -+static void use_pool(struct atm_dev *dev,int pool) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long flags; -+ int size; -+ -+ zatm_dev = ZATM_DEV(dev); -+ if (!(zatm_dev->pool_info[pool].ref_count++)) { -+ skb_queue_head_init(&zatm_dev->pool[pool]); -+ size = pool-ZATM_AAL5_POOL_BASE; -+ if (size < 0) size = 0; /* 64B... */ -+ else if (size > 10) size = 10; /* ... 64kB */ -+ save_flags(flags); -+ cli(); -+ zpokel(zatm_dev,((zatm_dev->pool_info[pool].low_water/4) << -+ uPD98401_RXFP_ALERT_SHIFT) | -+ (1 << uPD98401_RXFP_BTSZ_SHIFT) | -+ (size << uPD98401_RXFP_BFSZ_SHIFT), -+ zatm_dev->pool_base+pool*2); -+ zpokel(zatm_dev,(unsigned long) dummy,zatm_dev->pool_base+ -+ pool*2+1); -+ restore_flags(flags); -+ zatm_dev->last_free[pool] = NULL; -+ refill_pool(dev,pool); -+ } -+ DPRINTK("pool %d: %d\n",pool,zatm_dev->pool_info[pool].ref_count); -+} -+ -+ -+static void unuse_pool(struct atm_dev *dev,int pool) -+{ -+ if (!(--ZATM_DEV(dev)->pool_info[pool].ref_count)) -+ drain_free(dev,pool); -+} -+ -+ -+static void zatm_feedback(struct atm_vcc *vcc,struct sk_buff *skb, -+ unsigned long start,unsigned long dest,int len) -+{ -+ struct zatm_pool_info *pool; -+ unsigned long offset,flags; -+ -+ DPRINTK("start 0x%08lx dest 0x%08lx len %d\n",start,dest,len); -+ if (len < PAGE_SIZE) return; -+ pool = &ZATM_DEV(vcc->dev)->pool_info[ZATM_VCC(vcc)->pool]; -+ offset = (dest-start) & (PAGE_SIZE-1); -+ save_flags(flags); -+ cli(); -+ if (!offset || pool->offset == offset) { -+ pool->next_cnt = 0; -+ return; -+ } -+ if (offset != pool->next_off) { -+ pool->next_off = offset; -+ pool->next_cnt = 0; -+ return; -+ } -+ if (++pool->next_cnt >= pool->next_thres) { -+ pool->offset = pool->next_off; -+ pool->next_cnt = 0; -+ } -+ restore_flags(flags); -+} -+ -+ -+/*----------------------------------- RX ------------------------------------*/ -+ -+ -+#if 0 -+static void exception(struct atm_vcc *vcc) -+{ -+ static int count = 0; -+ struct zatm_dev *zatm_dev = ZATM_DEV(vcc->dev); -+ struct zatm_vcc *zatm_vcc = ZATM_VCC(vcc); -+ unsigned long *qrp; -+ int i; -+ -+ if (count++ > 2) return; -+ for (i = 0; i < 8; i++) -+ printk("TX%d: 0x%08lx\n",i, -+ zpeekl(zatm_dev,zatm_vcc->tx_chan*VC_SIZE/4+i)); -+ for (i = 0; i < 5; i++) -+ printk("SH%d: 0x%08lx\n",i, -+ zpeekl(zatm_dev,uPD98401_IM(zatm_vcc->shaper)+16*i)); -+ qrp = (unsigned long *) zpeekl(zatm_dev,zatm_vcc->tx_chan*VC_SIZE/4+ -+ uPD98401_TXVC_QRP); -+ printk("qrp=0x%08lx\n",(unsigned long) qrp); -+ for (i = 0; i < 4; i++) printk("QRP[%d]: 0x%08lx",i,qrp[i]); -+} -+#endif -+ -+ -+static const char *err_txt[] = { -+ "No error", -+ "RX buf underflow", -+ "RX FIFO overrun", -+ "Maximum len violation", -+ "CRC error", -+ "User abort", -+ "Length violation", -+ "T1 error", -+ "Deactivated", -+ "???", -+ "???", -+ "???", -+ "???", -+ "???", -+ "???", -+ "???" -+}; -+ -+ -+static void poll_rx(struct atm_dev *dev,int mbx) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long pos,x; -+ int error; -+ -+ EVENT("poll_rx\n",0,0); -+ zatm_dev = ZATM_DEV(dev); -+ pos = (zatm_dev->mbx_start[mbx] & ~0xffff) | zin(MTA(mbx)); -+ while (x = zin(MWA(mbx)), (pos & 0xffff) != x) { -+ unsigned long *here; -+ struct sk_buff *skb,*expect; -+ struct atm_vcc *vcc; -+ int cells,size,chan; -+ -+ EVENT("MBX: host 0x%lx, nic 0x%lx\n",pos,x); -+ here = (unsigned long *) pos; -+ if (((pos += 16) & 0xffff) == zatm_dev->mbx_end[mbx]) -+ pos = zatm_dev->mbx_start[mbx]; -+ cells = here[0] & uPD98401_AAL5_SIZE; -+#if 0 -+{ -+unsigned long *x; -+printk("RX IND: 0x%08x, 0x%08x, 0x%08x, 0x%08x\n",here[0],here[1],here[2], -+ here[3]); -+ printk("POOL: 0x%08lx, 0x%08lx\n",zpeekl(zatm_dev, -+ zatm_dev->pool_base), -+ zpeekl(zatm_dev,zatm_dev->pool_base+1)); -+ x = (unsigned long *) here[2]; -+ printk("[0..3] = 0x%08lx, 0x%08lx, 0x%08lx, 0x%08lx\n", -+ x[0],x[1],x[2],x[3]); -+} -+#endif -+ error = 0; -+ if (here[3] & uPD98401_AAL5_ERR) { -+ error = (here[3] & uPD98401_AAL5_ES) >> -+ uPD98401_AAL5_ES_SHIFT; -+ if (error == uPD98401_AAL5_ES_DEACT || -+ error == uPD98401_AAL5_ES_FREE) continue; -+ } -+EVENT("error code 0x%x/0x%x\n",(here[3] & uPD98401_AAL5_ES) >> -+ uPD98401_AAL5_ES_SHIFT,error); -+ skb = (struct sk_buff *) ((void **) here[2])[2]; -+ skb->atm.timestamp = xtime; -+#if 0 -+printk("[-3..0] 0x%08lx 0x%08lx 0x%08lx 0x%08lx\n",((unsigned *) skb->data)[-3], -+ ((unsigned *) skb->data)[-2],((unsigned *) skb->data)[-1], -+ ((unsigned *) skb->data)[0]); -+#endif -+ EVENT("skb 0x%08lx, here 0x%08lx\n",(unsigned long) skb, -+ (unsigned long) here); -+#if 0 -+printk("dummy: 0x%08lx, 0x%08lx\n",dummy[0],dummy[1]); -+#endif -+ size = error ? 0 : ntohs(((unsigned short *) skb->data)[cells* -+ ATM_CELL_PAYLOAD/sizeof(unsigned short)-3]); -+ EVENT("got skb 0x%lx, size %d\n",(unsigned long) skb,size); -+ chan = (here[3] & uPD98401_AAL5_CHAN) >> -+ uPD98401_AAL5_CHAN_SHIFT; -+ if (chan < zatm_dev->chans && zatm_dev->rx_map[chan]) { -+ vcc = zatm_dev->rx_map[chan]; -+ if (skb == zatm_dev->last_free[ZATM_VCC(vcc)->pool]) -+ zatm_dev->last_free[ZATM_VCC(vcc)->pool] = NULL; -+ expect = skb_dequeue(&zatm_dev->pool[ZATM_VCC(vcc)-> -+ pool]); -+ if (skb != expect) { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): skb " -+ "mismatch - got 0x%08lx, expected " -+ "0x%08lx\n",dev->number, -+ (unsigned long) skb,(unsigned long) expect); -+ size = 0; -+ vcc = NULL; -+ event_dump(); -+ } -+ } -+ else { -+ printk(KERN_ERR DEV_LABEL "(itf %d): RX indication " -+ "for non-existing channel\n",dev->number); -+ size = 0; -+ vcc = NULL; -+ event_dump(); -+ } -+ if (error) { -+ printk(KERN_WARNING DEV_LABEL "(itf %d): chan %d " -+ "error %s\n",dev->number,chan,err_txt[error]); -+ size = 0; -+ } -+ if (size && (size > cells*ATM_CELL_PAYLOAD-ATM_AAL5_TRAILER || -+ size <= (cells-1)*ATM_CELL_PAYLOAD-ATM_AAL5_TRAILER)) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): size %d with %d " -+ "cells\n",dev->number,size,cells); -+ size = 0; -+ event_dump(); -+ } -+ if (size > ATM_MAX_AAL5_PDU) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): size too big " -+ "(%d)\n",dev->number,size); -+ size = 0; -+ event_dump(); -+ } -+ if (!size) { -+ kfree_skb(skb,FREE_READ); -+ if (vcc) vcc->stats->rx_err++; -+ } -+ else { -+ skb->len = size; -+ skb->atm.vcc = vcc; -+ vcc->push(skb->atm.vcc,skb); -+ vcc->stats->rx++; -+ } -+#if 0 -+if (vcc && size == 2) exception(vcc); -+#endif -+ } -+ zout(pos & 0xffff,MTA(mbx)); -+#if 0 /* probably a stupid idea */ -+ refill_pool(dev,zatm_vcc->pool); -+ /* maybe this saves us a few interrupts */ -+#endif -+} -+ -+ -+static int open_rx_first(struct atm_vcc *vcc) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long flags; -+ unsigned short chan; -+ int cells; -+ -+ DPRINTK("open_rx_first (0x%x)\n",inb_p(0xc053)); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ zatm_vcc = ZATM_VCC(vcc); -+ zatm_vcc->rx_chan = 0; -+ if (vcc->rxtp.class == ATM_NONE) return 0; -+ if (vcc->aal == ATM_AAL5) { -+ if (vcc->rxtp.max_sdu > 65464) vcc->rxtp.max_sdu = 65464; -+ /* fix this - we may want to receive 64kB SDUs -+ later */ -+ cells = (vcc->rxtp.max_sdu+ATM_AAL5_TRAILER+ATM_CELL_PAYLOAD-1)/ -+ ATM_CELL_PAYLOAD; -+ zatm_vcc->pool = pool_index(cells*ATM_CELL_PAYLOAD); -+ } -+ else { -+ cells = 1; -+ zatm_vcc->pool = ZATM_AAL0_POOL; -+ } -+ if (zatm_vcc->pool < 0) return -EMSGSIZE; -+ save_flags(flags); -+ cli(); -+ zwait; -+ zout(uPD98401_OPEN_CHAN,CMR); -+ zwait; -+ DPRINTK("0x%x 0x%x\n",zin(CMR),zin(CER)); -+ chan = (zin(CMR) & uPD98401_CHAN_ADDR) >> uPD98401_CHAN_ADDR_SHIFT; -+ restore_flags(flags); -+ DPRINTK("chan is %d\n",chan); -+ if (!chan) return -EAGAIN; -+ use_pool(vcc->dev,zatm_vcc->pool); -+ DPRINTK("pool %d\n",zatm_vcc->pool); -+ /* set up VC descriptor */ -+ cli(); -+ zpokel(zatm_dev,zatm_vcc->pool << uPD98401_RXVC_POOL_SHIFT, -+ chan*VC_SIZE/4); -+ zpokel(zatm_dev,uPD98401_RXVC_OD | (vcc->aal == ATM_AAL5 ? -+ uPD98401_RXVC_AR : 0) | cells,chan*VC_SIZE/4+1); -+ zpokel(zatm_dev,0,chan*VC_SIZE/4+2); -+ zatm_vcc->rx_chan = chan; -+ zatm_dev->rx_map[chan] = vcc; -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+static int open_rx_second(struct atm_vcc *vcc) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long flags; -+ int pos,shift; -+ -+ DPRINTK("open_rx_second (0x%x)\n",inb_p(0xc053)); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ zatm_vcc = ZATM_VCC(vcc); -+ if (!zatm_vcc->rx_chan) return 0; -+ save_flags(flags); -+ cli(); -+ /* should also handle VPI @@@ */ -+ pos = vcc->vci >> 1; -+ shift = (1-(vcc->vci & 1)) << 4; -+ zpokel(zatm_dev,(zpeekl(zatm_dev,pos) & ~(0xffff << shift)) | -+ ((zatm_vcc->rx_chan | uPD98401_RXLT_ENBL) << shift),pos); -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+static void close_rx(struct atm_vcc *vcc) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long flags; -+ int pos,shift; -+ -+ zatm_vcc = ZATM_VCC(vcc); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ if (!zatm_vcc->rx_chan) return; -+DPRINTK("close_rx\n"); -+ /* disable receiver */ -+ save_flags(flags); -+ if (vcc->vpi != ATM_VPI_UNSPEC && vcc->vci != ATM_VCI_UNSPEC) { -+ cli(); -+ pos = vcc->vci >> 1; -+ shift = (1-(vcc->vci & 1)) << 4; -+ zpokel(zatm_dev,zpeekl(zatm_dev,pos) & ~(0xffff << shift),pos); -+ restore_flags(flags); -+ udelay(48000/zatm_dev->khz+1); -+ } -+ cli(); -+ zwait; -+ zout(uPD98401_DEACT_CHAN | uPD98401_CHAN_RT | (zatm_vcc->rx_chan << -+ uPD98401_CHAN_ADDR_SHIFT),CMR); -+ zwait; -+ zout(uPD98401_CLOSE_CHAN | uPD98401_CHAN_RT | (zatm_vcc->rx_chan << -+ uPD98401_CHAN_ADDR_SHIFT),CMR); -+ zwait; -+ if (!(zin(CMR) & uPD98401_CHAN_ADDR)) -+ printk(KERN_CRIT DEV_LABEL "(itf %d): can't close RX channel " -+ "%d\n",vcc->dev->number,zatm_vcc->rx_chan); -+ restore_flags(flags); -+ zatm_dev->rx_map[zatm_vcc->rx_chan] = NULL; -+ zatm_vcc->rx_chan = 0; -+ unuse_pool(vcc->dev,zatm_vcc->pool); -+} -+ -+ -+static int start_rx(struct atm_dev *dev) -+{ -+ struct zatm_dev *zatm_dev; -+ int size,i; -+ -+DPRINTK("start_rx\n"); -+ zatm_dev = ZATM_DEV(dev); -+ size = sizeof(struct atm_vcc *)*zatm_dev->chans; -+ zatm_dev->rx_map = (struct atm_vcc **) kmalloc(size,GFP_KERNEL); -+ if (!zatm_dev->rx_map) return -ENOMEM; -+ memset(zatm_dev->rx_map,0,size); -+ /* set VPI/VCI split (use all VCIs and give what's left to VPIs) */ -+ zpokel(zatm_dev,(1 << dev->ci_range.vci_bits)-1,uPD98401_VRR); -+ /* prepare free buffer pools */ -+ for (i = 0; i <= ZATM_LAST_POOL; i++) { -+ zatm_dev->pool_info[i].ref_count = 0; -+ zatm_dev->pool_info[i].rqa_count = 0; -+ zatm_dev->pool_info[i].rqu_count = 0; -+ zatm_dev->pool_info[i].low_water = LOW_MARK; -+ zatm_dev->pool_info[i].high_water = HIGH_MARK; -+ zatm_dev->pool_info[i].offset = 0; -+ zatm_dev->pool_info[i].next_off = 0; -+ zatm_dev->pool_info[i].next_cnt = 0; -+ zatm_dev->pool_info[i].next_thres = OFF_CNG_THRES; -+ } -+ return 0; -+} -+ -+ -+/*----------------------------------- TX ------------------------------------*/ -+ -+ -+static int do_tx(struct sk_buff *skb) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long *dsc; -+ unsigned long flags; -+ -+ EVENT("do_tx\n",0,0); -+ DPRINTK("sending skb %p\n",skb); -+ zatm_dev = ZATM_DEV(skb->atm.vcc->dev); -+ zatm_vcc = ZATM_VCC(skb->atm.vcc); -+ EVENT("iovcnt=%d\n",skb->atm.iovcnt,0); -+ save_flags(flags); -+ cli(); -+ if (!skb->atm.iovcnt) { -+ if (zatm_vcc->txing == RING_ENTRIES-1) { -+ restore_flags(flags); -+ return RING_BUSY; -+ } -+ zatm_vcc->txing++; -+ dsc = zatm_vcc->ring+zatm_vcc->ring_curr; -+ zatm_vcc->ring_curr = (zatm_vcc->ring_curr+RING_WORDS) & -+ (RING_ENTRIES*RING_WORDS-1); -+ dsc[1] = 0; -+ dsc[2] = skb->len; -+ dsc[3] = (unsigned long) skb->data; -+ mb(); -+ dsc[0] = uPD98401_TXPD_V | uPD98401_TXPD_DP | uPD98401_TXPD_SM -+ | (skb->atm.vcc->aal == ATM_AAL5 ? uPD98401_TXPD_AAL5 : 0); -+ EVENT("dsc (0x%08lx)\n",(unsigned long) dsc,0); -+ } -+ else { -+printk("NONONONOO!!!!\n"); -+#if 0 -+ unsigned long *put; -+ int i; -+ -+ dsc = (unsigned long *) kmalloc(uPD98401_TXPD_SIZE*2+ -+ uPD98401_TXBD_SIZE*skb->atm.iovcnt,GFP_ATOMIC); -+ if (!dsc) { -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EAGAIN; -+ } -+ /* @@@ should check alignment */ -+ put = dsc+8; -+ dsc[0] = uPD98401_TXPD_V | uPD98401_TXPD_DP | -+ (skb->atm.vcc->aal == ATM_AAL5 ? uPD98401_TXPD_AAL5 : 0); -+ dsc[1] = 0; -+ dsc[2] = skb->atm.iovcnt*uPD98401_TXBD_SIZE; -+ dsc[3] = (unsigned long) put; -+ for (i = 0; i < skb->atm.iovcnt; i++) { -+ *put++ = ((struct iovec *) skb->data)[i].iov_len; -+ *put++ = (unsigned long) ((struct iovec *) -+ skb->data)[i].iov_base; -+ } -+ put[-2] |= uPD98401_TXBD_LAST; -+#endif -+ } -+ skb->atm.pos = (unsigned long) dsc; -+ skb_queue_tail(&zatm_vcc->tx_queue,skb); -+ DPRINTK("QRP=0x%08lx\n",zpeekl(zatm_dev,zatm_vcc->tx_chan*VC_SIZE/4+ -+ uPD98401_TXVC_QRP)); -+ zwait; -+ zout(uPD98401_TX_READY | (zatm_vcc->tx_chan << -+ uPD98401_CHAN_ADDR_SHIFT),CMR); -+ restore_flags(flags); -+ EVENT("done\n",0,0); -+ return 0; -+} -+ -+ -+static inline void dequeue_tx(struct atm_vcc *vcc) -+{ -+ struct zatm_vcc *zatm_vcc; -+ struct sk_buff *skb; -+ -+ EVENT("dequeue_tx\n",0,0); -+ zatm_vcc = ZATM_VCC(vcc); -+ skb = skb_dequeue(&zatm_vcc->tx_queue); -+ if (!skb) { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): dequeue_tx but not " -+ "txing\n",vcc->dev->number); -+ return; -+ } -+if (*(unsigned long *) skb->atm.pos != (uPD98401_TXPD_V | uPD98401_TXPD_DP | -+ uPD98401_TXPD_SM | uPD98401_TXPD_AAL5)) printk("@#*$!!!! (%08lx)\n", -+ *(unsigned long *) skb->atm.pos); -+ *(unsigned long *) skb->atm.pos = 0; /* mark as invalid */ -+ zatm_vcc->txing--; -+ if (vcc->pop) vcc->pop(vcc,skb); -+ else dev_kfree_skb(skb,FREE_WRITE); -+ while ((skb = skb_dequeue(&zatm_vcc->backlog))) -+ if (do_tx(skb) == RING_BUSY) { -+ skb_queue_head(&zatm_vcc->backlog,skb); -+ break; -+ } -+ vcc->stats->tx++; -+ wake_up(&zatm_vcc->tx_wait); -+} -+ -+ -+static void poll_tx(struct atm_dev *dev,int mbx) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long pos,x; -+ -+ EVENT("poll_tx\n",0,0); -+ zatm_dev = ZATM_DEV(dev); -+ pos = (zatm_dev->mbx_start[mbx] & ~0xffff) | zin(MTA(mbx)); -+ while (x = zin(MWA(mbx)), (pos & 0xffff) != x) { -+ int chan; -+ -+#if 1 -+ unsigned long data,*addr; -+ -+ EVENT("MBX: host 0x%lx, nic 0x%lx\n",pos,x); -+ addr = (unsigned long *) pos; -+ data = *addr; -+ chan = (data & uPD98401_TXI_CONN) >> uPD98401_TXI_CONN_SHIFT; -+ EVENT("addr = 0x%08lx, data = 0x%08lx,",(unsigned long) addr, -+ data); -+ EVENT("chan = %d\n",chan,0); -+#else -+NO ! -+ chan = (zatm_dev->mbx_start[mbx][pos >> 2] & uPD98401_TXI_CONN) -+ >> uPD98401_TXI_CONN_SHIFT; -+#endif -+ if (chan < zatm_dev->chans && zatm_dev->tx_map[chan]) -+ dequeue_tx(zatm_dev->tx_map[chan]); -+ else { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): TX indication " -+ "for non-existing channel %d\n",dev->number,chan); -+ event_dump(); -+ } -+ if (((pos += 4) & 0xffff) == zatm_dev->mbx_end[mbx]) -+ pos = zatm_dev->mbx_start[mbx]; -+ } -+ zout(pos & 0xffff,MTA(mbx)); -+} -+ -+ -+static int alloc_shaper(struct atm_dev *dev,int *pcr,int min,int max,int ubr) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long flags; -+ unsigned long i,m,c; -+ int shaper; -+ -+ DPRINTK("alloc_shaper (min = %d, max = %d)\n",min,max); -+ zatm_dev = ZATM_DEV(dev); -+ if (!zatm_dev->free_shapers) return -EAGAIN; -+ for (shaper = 0; !((zatm_dev->free_shapers >> shaper) & 1); shaper++); -+ zatm_dev->free_shapers &= ~1 << shaper; -+ if (ubr) { -+ i = c = 5; -+ m = 1; -+ zatm_dev->ubr_ref_cnt++; -+ zatm_dev->ubr = shaper; -+ } -+ else { -+ if (min) { -+ if (min <= 255) { -+ i = min; -+ m = ATM_OC3_PCR; -+ } -+ else { -+ i = 255; -+ m = ATM_OC3_PCR*255/min; -+ } -+ } -+ else { -+ if (max > zatm_dev->tx_bw) max = zatm_dev->tx_bw; -+ if (max <= 255) { -+ i = max; -+ m = ATM_OC3_PCR; -+ } -+ else { -+ i = 255; -+ m = (ATM_OC3_PCR*255+max-1)/max; -+ } -+ } -+ *pcr = i*ATM_OC3_PCR/m; -+ c = 20; /* @@@ should use max_cdv ! */ -+ if ((min && *pcr < min) || (max && *pcr > max)) return -EINVAL; -+ if (zatm_dev->tx_bw < *pcr) return -EAGAIN; -+ zatm_dev->tx_bw -= *pcr; -+ } -+ save_flags(flags); -+ cli(); -+ DPRINTK("i = %d, m = %d, PCR = %d\n",i,m,*pcr); -+ zpokel(zatm_dev,(i << uPD98401_IM_I_SHIFT) | m,uPD98401_IM(shaper)); -+ zpokel(zatm_dev,c << uPD98401_PC_C_SHIFT,uPD98401_PC(shaper)); -+ zpokel(zatm_dev,0,uPD98401_X(shaper)); -+ zpokel(zatm_dev,0,uPD98401_Y(shaper)); -+ zpokel(zatm_dev,uPD98401_PS_E,uPD98401_PS(shaper)); -+ restore_flags(flags); -+ return shaper; -+} -+ -+ -+static void dealloc_shaper(struct atm_dev *dev,int shaper) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long flags; -+ -+ zatm_dev = ZATM_DEV(dev); -+ if (shaper == zatm_dev->ubr) { -+ if (--zatm_dev->ubr_ref_cnt) return; -+ zatm_dev->ubr = -1; -+ } -+ save_flags(flags); -+ cli(); -+ zpokel(zatm_dev,zpeekl(zatm_dev,uPD98401_PS(shaper)) & ~uPD98401_PS_E, -+ uPD98401_PS(shaper)); -+ restore_flags(flags); -+ zatm_dev->free_shapers |= 1 << shaper; -+} -+ -+ -+static void close_tx(struct atm_vcc *vcc) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long flags; -+ int chan; -+struct sk_buff *skb; -+int once = 1; -+ -+ zatm_vcc = ZATM_VCC(vcc); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ chan = zatm_vcc->tx_chan; -+ if (!chan) return; -+ DPRINTK("close_tx\n"); -+ save_flags(flags); -+ cli(); -+ while (skb_peek(&zatm_vcc->backlog)) { -+if (once) { -+printk("waiting for backlog to drain ...\n"); -+event_dump(); -+once = 0; -+} -+ sleep_on(&zatm_vcc->tx_wait); -+ } -+once = 1; -+ while ((skb = skb_peek(&zatm_vcc->tx_queue))) { -+if (once) { -+printk("waiting for TX queue to drain ... %p\n",skb); -+event_dump(); -+once = 0; -+} -+ DPRINTK("waiting for TX queue to drain ... %p\n",skb); -+ sleep_on(&zatm_vcc->tx_wait); -+ } -+#if 0 -+ zwait; -+ zout(uPD98401_DEACT_CHAN | (chan << uPD98401_CHAN_ADDR_SHIFT),CMR); -+#endif -+ zwait; -+ zout(uPD98401_CLOSE_CHAN | (chan << uPD98401_CHAN_ADDR_SHIFT),CMR); -+ zwait; -+ if (!(zin(CMR) & uPD98401_CHAN_ADDR)) -+ printk(KERN_CRIT DEV_LABEL "(itf %d): can't close TX channel " -+ "%d\n",vcc->dev->number,chan); -+ restore_flags(flags); -+ zatm_vcc->tx_chan = 0; -+ zatm_dev->tx_map[chan] = NULL; -+ if (zatm_vcc->shaper != zatm_dev->ubr) { -+ zatm_dev->tx_bw += vcc->txtp.min_pcr; -+ dealloc_shaper(vcc->dev,zatm_vcc->shaper); -+ } -+ if (zatm_vcc->ring) kfree(zatm_vcc->ring); -+} -+ -+ -+static int open_tx_first(struct atm_vcc *vcc) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long flags,*loop; -+ unsigned short chan; -+ int pcr; -+ -+ DPRINTK("open_tx_first\n"); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ zatm_vcc = ZATM_VCC(vcc); -+ zatm_vcc->tx_chan = 0; -+ if (vcc->txtp.class == ATM_NONE) return 0; -+ save_flags(flags); -+ cli(); -+ zwait; -+ zout(uPD98401_OPEN_CHAN,CMR); -+ zwait; -+ DPRINTK("0x%x 0x%x\n",zin(CMR),zin(CER)); -+ chan = (zin(CMR) & uPD98401_CHAN_ADDR) >> uPD98401_CHAN_ADDR_SHIFT; -+ restore_flags(flags); -+ DPRINTK("chan is %d\n",chan); -+ if (!chan) return -EAGAIN; -+ if (vcc->txtp.class == ATM_UBR && zatm_dev->ubr != -1) -+ zatm_vcc->shaper = zatm_dev->ubr; -+ else { -+ if (vcc->txtp.class == ATM_UBR) -+ vcc->txtp.max_sdu = ATM_MAX_AAL5_PDU; -+ if ((zatm_vcc->shaper = alloc_shaper(vcc->dev,&pcr, -+ vcc->txtp.min_pcr,vcc->txtp.max_pcr, -+ vcc->txtp.class == ATM_UBR)) < 0) { -+ close_tx(vcc); -+ return zatm_vcc->shaper; -+ } -+ vcc->txtp.min_pcr = vcc->txtp.max_pcr = pcr; -+ } -+ zatm_vcc->tx_chan = chan; -+ skb_queue_head_init(&zatm_vcc->tx_queue); -+ zatm_vcc->tx_wait = NULL; -+ /* initialize ring */ -+ zatm_vcc->ring = kmalloc(RING_SIZE,GFP_KERNEL); -+ if (!zatm_vcc->ring) return -ENOMEM; -+ memset(zatm_vcc->ring,0,RING_SIZE); -+ loop = zatm_vcc->ring+RING_ENTRIES*RING_WORDS; -+ loop[0] = uPD98401_TXPD_V; -+ loop[1] = loop[2] = 0; -+ loop[3] = (unsigned long) zatm_vcc->ring; -+ zatm_vcc->ring_curr = 0; -+ zatm_vcc->txing = 0; -+ skb_queue_head_init(&zatm_vcc->backlog); -+ zpokel(zatm_dev,(unsigned long) zatm_vcc->ring, -+ chan*VC_SIZE/4+uPD98401_TXVC_QRP); -+ return 0; -+} -+ -+ -+static int open_tx_second(struct atm_vcc *vcc) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ unsigned long flags; -+ -+ DPRINTK("open_tx_second\n"); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ zatm_vcc = ZATM_VCC(vcc); -+ if (!zatm_vcc->tx_chan) return 0; -+ save_flags(flags); -+ /* set up VC descriptor */ -+ cli(); -+ zpokel(zatm_dev,0,zatm_vcc->tx_chan*VC_SIZE/4); -+ zpokel(zatm_dev,uPD98401_TXVC_L | (zatm_vcc->shaper << -+ uPD98401_TXVC_SHP_SHIFT) | (vcc->vpi << uPD98401_TXVC_VPI_SHIFT) | -+ vcc->vci,zatm_vcc->tx_chan*VC_SIZE/4+1); -+ zpokel(zatm_dev,0,zatm_vcc->tx_chan*VC_SIZE/4+2); -+ restore_flags(flags); -+ zatm_dev->tx_map[zatm_vcc->tx_chan] = vcc; -+ return 0; -+} -+ -+ -+static int start_tx(struct atm_dev *dev) -+{ -+ struct zatm_dev *zatm_dev; -+ int i; -+ -+ DPRINTK("start_tx\n"); -+ zatm_dev = ZATM_DEV(dev); -+ zatm_dev->tx_map = (struct atm_vcc **) kmalloc(sizeof(struct atm_vcc *)* -+ zatm_dev->chans,GFP_KERNEL); -+ if (!zatm_dev->tx_map) return -ENOMEM; -+ zatm_dev->tx_bw = ATM_OC3_PCR; -+ zatm_dev->free_shapers = (1 << NR_SHAPERS)-1; -+ zatm_dev->ubr = -1; -+ zatm_dev->ubr_ref_cnt = 0; -+ /* initialize shapers */ -+ for (i = 0; i < NR_SHAPERS; i++) zpokel(zatm_dev,0,uPD98401_PS(i)); -+ return 0; -+} -+ -+ -+/*------------------------------- interrupts --------------------------------*/ -+ -+ -+static void zatm_int(int irq,void *dev_id,struct pt_regs *regs) -+{ -+ struct atm_dev *dev; -+ struct zatm_dev *zatm_dev; -+ unsigned long reason; -+ -+ dev = dev_id; -+ zatm_dev = ZATM_DEV(dev); -+ while ((reason = zin(GSR))) { -+ EVENT("reason 0x%lx\n",reason,0); -+ if (reason & uPD98401_INT_PI) { -+ EVENT("PHY int\n",0,0); -+ dev->phy->interrupt(dev); -+ } -+ if (reason & uPD98401_INT_RQA) { -+ unsigned long pools; -+ int i; -+ -+ pools = zin(RQA); -+ EVENT("RQA (0x%08lx)\n",pools,0); -+ for (i = 0; pools; i++) { -+ if (pools & 1) { -+ refill_pool(dev,i); -+ zatm_dev->pool_info[i].rqa_count++; -+ } -+ pools >>= 1; -+ } -+ } -+ if (reason & uPD98401_INT_RQU) { -+ unsigned long pools; -+ int i; -+ pools = zin(RQU); -+ printk(KERN_WARNING DEV_LABEL "(itf %d): RQU 0x%08lx\n", -+ dev->number,pools); -+ event_dump(); -+ for (i = 0; pools; i++) { -+ if (pools & 1) { -+ refill_pool(dev,i); -+ zatm_dev->pool_info[i].rqu_count++; -+ } -+ pools >>= 1; -+ } -+ } -+ /* don't handle RD */ -+ if (reason & uPD98401_INT_SPE) -+ printk(KERN_ALERT DEV_LABEL "(itf %d): system parity " -+ "error at 0x%08x\n",dev->number,zin(ADDR)); -+ if (reason & uPD98401_INT_CPE) -+ printk(KERN_ALERT DEV_LABEL "(itf %d): control memory " -+ "parity error at 0x%08x\n",dev->number,zin(ADDR)); -+ if (reason & uPD98401_INT_SBE) { -+ printk(KERN_ALERT DEV_LABEL "(itf %d): system bus " -+ "error at 0x%08x\n",dev->number,zin(ADDR)); -+ event_dump(); -+ } -+ /* don't handle IND */ -+ if (reason & uPD98401_INT_MF) { -+ printk(KERN_CRIT DEV_LABEL "(itf %d): mailbox full " -+ "(0x%lx)\n",dev->number,(reason & uPD98401_INT_MF) -+ >> uPD98401_INT_MF_SHIFT); -+ event_dump(); -+ /* @@@ should try to recover */ -+ } -+ if (reason & uPD98401_INT_MM) { -+ if (reason & 1) poll_rx(dev,0); -+ if (reason & 2) poll_rx(dev,1); -+ if (reason & 4) poll_tx(dev,2); -+ if (reason & 8) poll_tx(dev,3); -+ } -+ /* @@@ handle RCRn */ -+ } -+} -+ -+ -+/*----------------------------- (E)EPROM access -----------------------------*/ -+ -+ -+static void eprom_set(struct zatm_dev *zatm_dev,unsigned long value, -+ unsigned short cmd) -+{ -+ int error; -+ -+ if ((error = pcibios_write_config_dword(zatm_dev->bus,zatm_dev->dev_fn, -+ cmd,value))) -+ printk(KERN_ERR DEV_LABEL ": PCI write failed (%s)\n", -+ pcibios_strerror(error)); -+} -+ -+ -+static unsigned long eprom_get(struct zatm_dev *zatm_dev,unsigned short cmd) -+{ -+ unsigned int value; -+ int error; -+ -+ if ((error = pcibios_read_config_dword(zatm_dev->bus,zatm_dev->dev_fn, -+ cmd,&value))) -+ printk(KERN_ERR DEV_LABEL ": PCI read failed (%s)\n", -+ pcibios_strerror(error)); -+ return value; -+} -+ -+ -+static void eprom_put_bits(struct zatm_dev *zatm_dev,unsigned long data, -+ int bits,unsigned short cmd) -+{ -+ unsigned long value; -+ int i; -+ -+ for (i = bits-1; i >= 0; i--) { -+ value = ZEPROM_CS | (((data >> i) & 1) ? ZEPROM_DI : 0); -+ eprom_set(zatm_dev,value,cmd); -+ eprom_set(zatm_dev,value | ZEPROM_SK,cmd); -+ eprom_set(zatm_dev,value,cmd); -+ } -+} -+ -+ -+static void eprom_get_byte(struct zatm_dev *zatm_dev,unsigned char *byte, -+ unsigned short cmd) -+{ -+ int i; -+ -+ *byte = 0; -+ for (i = 8; i; i--) { -+ eprom_set(zatm_dev,ZEPROM_CS,cmd); -+ eprom_set(zatm_dev,ZEPROM_CS | ZEPROM_SK,cmd); -+ *byte <<= 1; -+ if (eprom_get(zatm_dev,cmd) & ZEPROM_DO) *byte |= 1; -+ eprom_set(zatm_dev,ZEPROM_CS,cmd); -+ } -+} -+ -+ -+static unsigned char eprom_try_esi(struct atm_dev *dev,unsigned short cmd, -+ int offset,int swap) -+{ -+ unsigned char buf[ZEPROM_SIZE]; -+ struct zatm_dev *zatm_dev; -+ int i; -+ -+ zatm_dev = ZATM_DEV(dev); -+ for (i = 0; i < ZEPROM_SIZE; i += 2) { -+ eprom_set(zatm_dev,ZEPROM_CS,cmd); /* select EPROM */ -+ eprom_put_bits(zatm_dev,ZEPROM_CMD_READ,ZEPROM_CMD_LEN,cmd); -+ eprom_put_bits(zatm_dev,i >> 1,ZEPROM_ADDR_LEN,cmd); -+ eprom_get_byte(zatm_dev,buf+i+swap,cmd); -+ eprom_get_byte(zatm_dev,buf+i+1-swap,cmd); -+ eprom_set(zatm_dev,0,cmd); /* deselect EPROM */ -+ } -+ memcpy(dev->esi,buf+offset,ESI_LEN); -+ return memcmp(dev->esi,"\0\0\0\0\0",ESI_LEN); /* assumes ESI_LEN == 6 */ -+} -+ -+ -+static void eprom_get_esi(struct atm_dev *dev) -+{ -+ if (eprom_try_esi(dev,ZEPROM_V1_REG,ZEPROM_V1_ESI_OFF,1)) return; -+ (void) eprom_try_esi(dev,ZEPROM_V2_REG,ZEPROM_V2_ESI_OFF,0); -+} -+ -+ -+/*--------------------------------- entries ---------------------------------*/ -+ -+ -+static int zatm_init(struct atm_dev *dev) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned short command; -+ unsigned char revision; -+ int error,i,last; -+ unsigned long t0,t1,t2; -+ -+ DPRINTK(">zatm_init\n"); -+ zatm_dev = ZATM_DEV(dev); -+ if ((error = pcibios_read_config_word(zatm_dev->bus,zatm_dev->dev_fn, -+ PCI_COMMAND,&command)) || (error = pcibios_read_config_dword( -+ zatm_dev->bus,zatm_dev->dev_fn,PCI_BASE_ADDRESS_0,&zatm_dev->base)) -+ || (error = pcibios_read_config_byte(zatm_dev->bus,zatm_dev->dev_fn, -+ PCI_INTERRUPT_LINE,&zatm_dev->irq)) || (error = -+ pcibios_read_config_byte(zatm_dev->bus,zatm_dev->dev_fn, -+ PCI_REVISION_ID,&revision))) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): init error %s\n", -+ dev->number,pcibios_strerror(error)); -+ return -EINVAL; -+ } -+ zatm_dev->base &= PCI_BASE_ADDRESS_IO_MASK; -+ if ((error = pcibios_write_config_word(zatm_dev->bus,zatm_dev->dev_fn, -+ PCI_COMMAND,command | PCI_COMMAND_IO | PCI_COMMAND_MASTER))) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): can't enable IO (%s)\n", -+ dev->number,pcibios_strerror(error)); -+ return error; -+ } -+ eprom_get_esi(dev); -+ printk(KERN_NOTICE DEV_LABEL "(itf %d): rev.%d,base=0x%x,irq=%d,", -+ dev->number,revision,zatm_dev->base,zatm_dev->irq); -+ /* reset uPD98401 */ -+ zout(0,SWR); -+ while (!(zin(GSR) & uPD98401_INT_IND)); -+ zout(uPD98401_GMR_ONE /*uPD98401_BURST4*/,GMR); -+ last = MAX_CRAM_SIZE; -+ for (i = last-RAM_INCREMENT; i >= 0; i -= RAM_INCREMENT) { -+ zpokel(zatm_dev,0x55555555,i); -+ if (zpeekl(zatm_dev,i) != 0x55555555) last = i; -+ else { -+ zpokel(zatm_dev,0xAAAAAAAA,i); -+ if (zpeekl(zatm_dev,i) != 0xAAAAAAAA) last = i; -+ else zpokel(zatm_dev,i,i); -+ } -+ } -+ for (i = 0; i < last; i += RAM_INCREMENT) -+ if (zpeekl(zatm_dev,i) != i) break; -+ zatm_dev->mem = i << 2; -+ while (i) zpokel(zatm_dev,0,--i); -+ /* reset again to rebuild memory pointers */ -+ zout(0,SWR); -+ while (!(zin(GSR) & uPD98401_INT_IND)); -+ zout(uPD98401_GMR_ONE | uPD98401_BURST8 | uPD98401_BURST4 | -+ uPD98401_BURST2 | uPD98401_GMR_PM | uPD98401_GMR_DR,GMR); -+ /* TODO: should shrink allocation now */ -+ printk("mem=%dkB,%s (",zatm_dev->mem >> 10,zatm_dev->copper ? "UTP" : -+ "MMF"); -+ for (i = 0; i < ESI_LEN; i++) -+ printk("%02X%s",dev->esi[i],i == ESI_LEN-1 ? ")\n" : "-"); -+ do { -+ t0 = zpeekl(zatm_dev,uPD98401_TSR); -+ udelay(10); -+ t1 = zpeekl(zatm_dev,uPD98401_TSR); -+ udelay(1010); -+ t2 = zpeekl(zatm_dev,uPD98401_TSR); -+ } -+ while (t0 > t1 || t1 > t2); -+ zatm_dev->khz = t2-2*t1+t0; -+ printk(KERN_NOTICE DEV_LABEL "(itf %d): uPD98401 %d.%d at %d.%03d " -+ "MHz\n",dev->number, -+ (zin(VER) & uPD98401_MAJOR) >> uPD98401_MAJOR_SHIFT, -+ zin(VER) & uPD98401_MINOR,zatm_dev->khz/1000,zatm_dev->khz % 1000); -+ return uPD98402_init(dev); -+} -+ -+ -+static int zatm_start(struct atm_dev *dev) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long curr; -+ int pools,vccs,rx; -+ int error,i,ld; -+ -+ DPRINTK("zatm_start\n"); -+ zatm_dev = ZATM_DEV(dev); -+ if (request_irq(zatm_dev->irq,&zatm_int,0,DEV_LABEL,dev)) { -+ printk(KERN_ERR DEV_LABEL "(itf %d): IRQ%d is already in use\n", -+ dev->number,zatm_dev->irq); -+ return -EAGAIN; -+ } -+ request_region(zatm_dev->base,uPD98401_PORTS,DEV_LABEL); -+ /* define memory regions */ -+ pools = NR_POOLS; -+ if (NR_SHAPERS*SHAPER_SIZE > pools*POOL_SIZE) -+ pools = NR_SHAPERS*SHAPER_SIZE/POOL_SIZE; -+ vccs = (zatm_dev->mem-NR_SHAPERS*SHAPER_SIZE-pools*POOL_SIZE)/ -+ (2*VC_SIZE+RX_SIZE); -+ ld = -1; -+ for (rx = 1; rx < vccs; rx <<= 1) ld++; -+ dev->ci_range.vpi_bits = 0; /* @@@ no VPI for now */ -+ dev->ci_range.vci_bits = ld; -+ zatm_dev->chans = vccs; /* ??? */ -+ curr = rx*RX_SIZE/4; -+ DPRINTK("RX pool 0x%08lx\n",curr); -+ zpokel(zatm_dev,curr,uPD98401_PMA); /* receive pool */ -+ zatm_dev->pool_base = curr; -+ curr += pools*POOL_SIZE/4; -+ DPRINTK("Shapers 0x%08lx\n",curr); -+ zpokel(zatm_dev,curr,uPD98401_SMA); /* shapers */ -+ curr += NR_SHAPERS*SHAPER_SIZE/4; -+ DPRINTK("Free 0x%08lx\n",curr); -+ zpokel(zatm_dev,curr,uPD98401_TOS); /* free pool */ -+ printk(KERN_INFO DEV_LABEL "(itf %d): %d shapers, %d pools, %d RX, " -+ "%ld VCs\n",dev->number,NR_SHAPERS,pools,rx, -+ (zatm_dev->mem-curr*4)/VC_SIZE); -+ /* create mailboxes */ -+ for (i = 0; i < NR_MBX; i++) zatm_dev->mbx_start[i] = 0; -+ for (i = 0; i < NR_MBX; i++) -+ if (mbx_entries[i]) { -+ unsigned long here; -+ -+ here = (unsigned long) kmalloc(2*MBX_SIZE(i), -+ GFP_KERNEL); -+ if (!here) return -ENOMEM; -+ if ((here^(here+MBX_SIZE(i))) & ~0xffff) /* paranoia */ -+ here = (here & ~0xffff)+0x10000; -+ DPRINTK("mbx@0x%08lx-0x%08lx\n",here,here+MBX_SIZE(i)); -+ zatm_dev->mbx_start[i] = here; -+ zatm_dev->mbx_end[i] = (here+MBX_SIZE(i)) & 0xffff; -+ zout(here >> 16,MSH(i)); -+ zout(here,MSL(i)); -+ zout((here+MBX_SIZE(i)) & 0xffff,MBA(i)); -+ zout(here & 0xffff,MTA(i)); -+ zout(here & 0xffff,MWA(i)); -+ } -+ error = start_tx(dev); -+ if (error) return error; -+ error = start_rx(dev); -+ if (error) return error; -+ error = dev->phy->start(dev); -+ if (error) return error; -+ zout(0xffffffff,IMR); /* enable interrupts */ -+ /* enable TX & RX */ -+ zout(zin(GMR) | uPD98401_GMR_SE | uPD98401_GMR_RE,GMR); -+ return 0; -+} -+ -+ -+static void zatm_close(struct atm_vcc *vcc) -+{ -+ DPRINTK(">zatm_close\n"); -+ if (!ZATM_VCC(vcc)) return; -+ vcc->flags &= ~ATM_VF_READY; -+ close_rx(vcc); -+EVENT("close_tx\n",0,0); -+ close_tx(vcc); -+ DPRINTK("zatm_close: done waiting\n"); -+ /* deallocate memory */ -+ kfree(ZATM_VCC(vcc)); -+ ZATM_VCC(vcc) = NULL; -+ vcc->flags &= ~ATM_VF_ADDR; -+} -+ -+ -+static int zatm_open(struct atm_vcc *vcc,short vpi,int vci) -+{ -+ struct zatm_dev *zatm_dev; -+ struct zatm_vcc *zatm_vcc; -+ int error; -+ -+ DPRINTK(">zatm_open\n"); -+ zatm_dev = ZATM_DEV(vcc->dev); -+ if (!(vcc->flags & ATM_VF_PARTIAL)) ZATM_VCC(vcc) = NULL; -+ error = atm_find_ci(vcc,&vpi,&vci); -+ if (error) return error; -+ vcc->vpi = vpi; -+ vcc->vci = vci; -+ if (vci != ATM_VPI_UNSPEC && vpi != ATM_VCI_UNSPEC) -+ vcc->flags |= ATM_VF_ADDR; -+ if (vcc->aal != ATM_AAL5) return -EINVAL; /* @@@ AAL0 */ -+ DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, -+ vcc->vci); -+ if (!(vcc->flags & ATM_VF_PARTIAL)) { -+ zatm_vcc = kmalloc(sizeof(struct zatm_vcc),GFP_KERNEL); -+ if (!zatm_vcc) { -+ vcc->flags &= ~ATM_VF_ADDR; -+ return -ENOMEM; -+ } -+ ZATM_VCC(vcc) = zatm_vcc; -+ ZATM_VCC(vcc)->tx_chan = 0; /* for zatm_close after open_rx */ -+ if ((error = open_rx_first(vcc))) { -+ zatm_close(vcc); -+ return error; -+ } -+ if ((error = open_tx_first(vcc))) { -+ zatm_close(vcc); -+ return error; -+ } -+ } -+ if (vci == ATM_VPI_UNSPEC || vpi == ATM_VCI_UNSPEC) return 0; -+ if ((error = open_rx_second(vcc))) { -+ zatm_close(vcc); -+ return error; -+ } -+ if ((error = open_tx_second(vcc))) { -+ zatm_close(vcc); -+ return error; -+ } -+ vcc->flags |= ATM_VF_READY; -+ return 0; -+} -+ -+ -+static int zatm_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) -+{ -+ struct zatm_dev *zatm_dev; -+ unsigned long flags; -+ int error; -+ -+ zatm_dev = ZATM_DEV(dev); -+printk(KERN_CRIT "got here!\n"); -+ switch (cmd) { -+case ZATM_TUNE: -+{ -+ unsigned long old; -+ -+ old = zin(GMR); -+printk(KERN_INFO "got 0x%08lx\n",old); -+ zout((old & ~0xf00) | (arg & 0xf00),GMR); -+ return old; -+ -+} -+ -+ case ZATM_GETPOOLZ: -+ if (!suser()) return -EPERM; -+ /* fall through */ -+ case ZATM_GETPOOL: -+ { -+ int pool; -+ -+ error = verify_area(VERIFY_WRITE,(void *) arg, -+ sizeof(struct zatm_pool_req)); -+ if (error) return error; -+ error = verify_area(VERIFY_READ,(void *) arg, -+ sizeof(struct zatm_pool_req)); -+ /* paranoia ? */ -+ if (error) return error; -+ pool = get_fs_long(&((struct zatm_pool_req *) -+ arg)->pool_num); -+ if (pool < 0 || pool > ZATM_LAST_POOL) -+ return -EINVAL; -+ save_flags(flags); -+ cli(); -+ memcpy_tofs(&((struct zatm_pool_req *) arg)-> -+ info,&zatm_dev->pool_info[pool], -+ sizeof(struct zatm_pool_info)); -+ if (cmd == ZATM_GETPOOLZ) { -+ zatm_dev->pool_info[pool].rqa_count = 0; -+ zatm_dev->pool_info[pool].rqu_count = 0; -+ } -+ restore_flags(flags); -+ return 0; -+ } -+ case ZATM_SETPOOL: -+ { -+ int pool,low,high,next_thres; -+ -+ if (!suser()) return -EPERM; -+ error = verify_area(VERIFY_READ,(void *) arg, -+ sizeof(struct zatm_pool_req)); -+ if (error) return error; -+ pool = get_fs_long(&((struct zatm_pool_req *) -+ arg)->pool_num); -+ if (pool < 0 || pool > ZATM_LAST_POOL) -+ return -EINVAL; -+ low = get_fs_long(&((struct zatm_pool_req *) -+ arg)->info.low_water); -+ high = get_fs_long(&((struct zatm_pool_req *) -+ arg)->info.high_water); -+ next_thres = get_fs_long( -+ &((struct zatm_pool_req *) arg)->info. -+ next_thres); -+ if (!low) -+ low = zatm_dev->pool_info[pool]. -+ low_water; -+ if (!high) -+ high = zatm_dev->pool_info[pool]. -+ high_water; -+ if (!next_thres) -+ next_thres = zatm_dev->pool_info[pool]. -+ next_thres; -+ if (low >= high || low < 0) return -EINVAL; -+ save_flags(flags); -+ cli(); -+ zatm_dev->pool_info[pool].low_water = low; -+ zatm_dev->pool_info[pool].high_water = high; -+ zatm_dev->pool_info[pool].next_thres = -+ next_thres; -+ restore_flags(flags); -+ return 0; -+ } -+ default: -+ if (!dev->phy->ioctl) return -EINVAL; -+ return dev->phy->ioctl(dev,cmd,arg); -+ } -+} -+ -+ -+static int zatm_getsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int *optlen) -+{ -+#ifdef CONFIG_MMU_HACKS -+ -+static const struct atm_buffconst bctx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; -+static const struct atm_buffconst bcrx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; -+ -+#else -+ -+static const struct atm_buffconst bctx = { 4,0,4,0,0,0 }; -+static const struct atm_buffconst bcrx = { 4,0,4,0,0,0 }; -+ -+#endif -+ int error; -+ -+ if (level == SOL_AAL && (optname == SO_BCTXOPT || -+ optname == SO_BCRXOPT)) { -+ if (get_fs_long(optlen) < sizeof(struct atm_buffconst)) -+ return -EINVAL; -+ put_fs_long(sizeof(struct atm_buffconst),optlen); -+ error = verify_area(VERIFY_WRITE,optval, -+ sizeof(struct atm_buffconst)); -+ if (error) return error; -+ memcpy_tofs(optval,optname == SO_BCTXOPT ? &bctx : &bcrx, -+ sizeof(struct atm_buffconst)); -+ return 0; -+ } -+ return -EINVAL; -+} -+ -+ -+static int zatm_setsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int optlen) -+{ -+ return -EINVAL; -+} -+ -+ -+static int zatm_sg_send(struct atm_vcc *vcc,unsigned long start, -+ unsigned long size) -+{ -+ return vcc->aal == ATM_AAL5; -+ /* @@@ should check size and maybe alignment*/ -+} -+ -+ -+static int zatm_send(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ int error; -+ -+ EVENT(">zatm_send 0x%08x\n",(unsigned long) skb,0); -+ if (!ZATM_VCC(vcc)->tx_chan || !(vcc->flags & ATM_VF_READY)) { -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ if (!skb) { -+ printk(KERN_CRIT "!skb in zatm_send ?\n"); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ skb->atm.vcc = vcc; -+ error = do_tx(skb); -+ if (error != RING_BUSY) return error; -+ skb_queue_tail(&ZATM_VCC(vcc)->backlog,skb); -+ return 0; -+} -+ -+ -+static void zatm_phy_put(struct atm_dev *dev,unsigned char value, -+ unsigned long addr) -+{ -+ struct zatm_dev *zatm_dev; -+ -+ zatm_dev = ZATM_DEV(dev); -+ zwait; -+ zout(value,CER); -+ zout(uPD98401_IND_ACC | uPD98401_IA_B0 | -+ (uPD98401_IA_TGT_PHY << uPD98401_IA_TGT_SHIFT) | addr,CMR); -+} -+ -+ -+static unsigned char zatm_phy_get(struct atm_dev *dev,unsigned long addr) -+{ -+ struct zatm_dev *zatm_dev; -+ -+ zatm_dev = ZATM_DEV(dev); -+ zwait; -+ zout(uPD98401_IND_ACC | uPD98401_IA_B0 | uPD98401_IA_RW | -+ (uPD98401_IA_TGT_PHY << uPD98401_IA_TGT_SHIFT) | addr,CMR); -+ zwait; -+ return zin(CER) & 0xff; -+} -+ -+ -+static const struct atmdev_ops ops = { -+ zatm_open, -+ zatm_close, -+ zatm_ioctl, -+ zatm_getsockopt, -+ zatm_setsockopt, -+ zatm_send, -+ zatm_sg_send, -+ NULL, /* no poll */ -+ NULL, /* no send_oam */ -+ zatm_phy_put, -+ zatm_phy_get, -+ zatm_feedback -+}; -+ -+ -+int zatm_detect(void) -+{ -+ struct atm_dev *dev; -+ struct zatm_dev *zatm_dev; -+ int devs,type,index; -+ -+ if (!pcibios_present()) { -+ printk(KERN_ERR DEV_LABEL " driver but no PCI BIOS ?\n"); -+ return 0; -+ } -+ zatm_dev = (struct zatm_dev *) kmalloc(sizeof(struct zatm_dev), -+ GFP_KERNEL); -+ if (!zatm_dev) return -ENOMEM; -+ devs = 0; -+ for (type = 0; type < 2; type++) { -+ index = 0; -+ while (!pcibios_find_device(PCI_VENDOR_ID_ZEITNET,type ? -+ PCI_DEVICE_ID_ZEITNET_1225 : PCI_DEVICE_ID_ZEITNET_1221, -+ index,&zatm_dev->bus,&zatm_dev->dev_fn)) { -+ dev = atm_dev_register(DEV_LABEL,&ops,0); -+ if (!dev) break; -+ ZATM_DEV(dev) = zatm_dev; -+ zatm_dev->copper = type; -+ if (zatm_init(dev) || zatm_start(dev)) { -+ atm_dev_deregister(dev); -+ break; -+ } -+ zatm_dev->more = zatm_boards; -+ zatm_boards = dev; -+ index++; -+ devs++; -+ zatm_dev = (struct zatm_dev *) kmalloc(sizeof(struct -+ zatm_dev),GFP_KERNEL); -+ if (!zatm_dev) break; -+ } -+ } -+ return devs; -+} -+ -+ -+#ifdef MODULE -+ -+int init_module(void) -+{ -+ if (!zatm_detect()) { -+ printk(KERN_ERROR DEV_LABEL ": no adapter found\n"); -+ return -ENXIO; -+ } -+ MOD_INC_USE_COUNT; -+ return 0; -+} -+ -+ -+void cleanup_module(void) -+{ -+ /* -+ * Well, there's no way to get rid of the driver yet, so we don't -+ * have to clean up, right ? :-) -+ */ -+} -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/zatm.h Fri Jul 19 15:09:24 1996 -@@ -0,0 +1,128 @@ -+/* drivers/atm/zatm.h - ZeitNet ZN122x device driver declarations */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVER_ATM_ZATM_H -+#define DRIVER_ATM_ZATM_H -+ -+#include -+ -+#define ZATM_GETPOOL _IOW('a',ATMIOC_SARPRV+1,struct atmif_sioc) -+ /* get pool statistics */ -+#define ZATM_GETPOOLZ _IOW('a',ATMIOC_SARPRV+2,struct atmif_sioc) -+ /* get statistics and zero */ -+#define ZATM_SETPOOL _IOW('a',ATMIOC_SARPRV+3,struct atmif_sioc) -+ /* set pool parameters */ -+#define ZATM_TUNE _IOW('a',ATMIOC_SARPRV+4,struct atmif_sioc) -+ -+struct zatm_pool_info { -+ int ref_count; /* free buffer pool usage counters */ -+ int low_water,high_water; /* refill parameters */ -+ int rqa_count,rqu_count; /* queue condition counters */ -+ int offset,next_off; /* alignment optimizations: offset */ -+ int next_cnt,next_thres; /* repetition counter and threshold */ -+}; -+ -+struct zatm_pool_req { -+ int pool_num; /* pool number */ -+ struct zatm_pool_info info; /* actual information */ -+}; -+ -+ -+#define ZATM_OAM_POOL 0 /* free buffer pool for OAM cells */ -+#define ZATM_AAL0_POOL 1 /* free buffer pool for AAL0 cells */ -+#define ZATM_AAL5_POOL_BASE 2 /* first AAL5 free buffer pool */ -+#define ZATM_LAST_POOL ZATM_AAL5_POOL_BASE+10 /* max. 64 kB */ -+ -+ -+ -+#ifdef __KERNEL__ -+ -+#include -+#include -+#include -+#include -+ -+ -+#define DEV_LABEL "zatm" -+ -+#define MAX_AAL5_PDU 10240 /* allocate for AAL5 PDUs of this size */ -+#define MAX_RX_SIZE_LD 14 /* ceil(log2((MAX_AAL5_PDU+47)/48)) */ -+ -+#define LOW_MARK 12 /* start adding new buffers if less than 12 */ -+#define HIGH_MARK 30 /* stop adding buffers after reaching 30 */ -+#define OFF_CNG_THRES 5 /* threshold for offset changes */ -+ -+#define RX_SIZE 2 /* RX lookup entry size (in bytes) */ -+#define NR_POOLS 32 /* number of free buffer pointers */ -+#define POOL_SIZE 8 /* buffer entry size (in bytes) */ -+#define NR_SHAPERS 16 /* number of shapers */ -+#define SHAPER_SIZE 4 /* shaper entry size (in bytes) */ -+#define VC_SIZE 32 /* VC dsc (TX or RX) size (in bytes) */ -+ -+#define RING_ENTRIES 32 /* ring entries (without back pointer) */ -+#define RING_WORDS 4 /* ring element size */ -+#define RING_SIZE (sizeof(unsigned long)*(RING_ENTRIES+1)*RING_WORDS) -+ -+#define NR_MBX 4 /* four mailboxes */ -+#define MBX_RX_0 0 /* mailbox indices */ -+#define MBX_RX_1 1 -+#define MBX_TX_0 2 -+#define MBX_TX_1 3 -+ -+ -+struct zatm_vcc { -+ /*-------------------------------- RX part */ -+ int rx_chan; /* RX channel, 0 if none */ -+ int pool; /* free buffer pool */ -+ /*-------------------------------- TX part */ -+ int tx_chan; /* TX channel, 0 if none */ -+ int shaper; /* shaper, <0 if none */ -+ struct sk_buff_head tx_queue; /* list of buffers in transit */ -+ struct wait_queue *tx_wait; /* for close */ -+ unsigned long *ring; /* transmit ring */ -+ int ring_curr; /* current write position */ -+ int txing; /* number of transmits in progress */ -+ struct sk_buff_head backlog; /* list of buffers waiting for ring */ -+}; -+ -+struct zatm_dev { -+ /*-------------------------------- TX part */ -+ int tx_bw; /* remaining bandwidth */ -+ unsigned long free_shapers; /* bit set */ -+ int ubr; /* UBR shaper; -1 if none */ -+ int ubr_ref_cnt; /* number of VCs using UBR shaper */ -+ /*-------------------------------- RX part */ -+ int pool_ref[NR_POOLS]; /* free buffer pool usage counters */ -+ volatile struct sk_buff *last_free[NR_POOLS]; -+ /* last entry in respective pool */ -+ struct sk_buff_head pool[NR_POOLS];/* free buffer pools */ -+ struct zatm_pool_info pool_info[NR_POOLS]; /* pool information */ -+ /*-------------------------------- maps */ -+ struct atm_vcc **tx_map; /* TX VCCs */ -+ struct atm_vcc **rx_map; /* RX VCCs */ -+ int chans; /* map size, must be 2^n */ -+ /*-------------------------------- mailboxes */ -+ unsigned long mbx_start[NR_MBX];/* start addresses */ -+ unsigned short mbx_end[NR_MBX]; /* end offset (in bytes) */ -+ /*-------------------------------- other pointers */ -+ unsigned long pool_base; /* Free buffer pool dsc (word addr) */ -+ /*-------------------------------- ZATM links */ -+ struct atm_dev *more; /* other ZATM devices */ -+ /*-------------------------------- general information */ -+ int mem; /* RAM on board (in bytes) */ -+ int khz; /* timer clock */ -+ int copper; /* PHY type */ -+ unsigned char irq; /* IRQ */ -+ unsigned int base; /* IO base address */ -+ unsigned char bus; /* PCI stuff */ -+ unsigned char dev_fn; -+}; -+ -+ -+#define ZATM_DEV(d) ((struct zatm_dev *) (d)->dev_data) -+#define ZATM_VCC(d) ((struct zatm_vcc *) (d)->dev_data) -+ -+#endif __KERNEL__ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/zeprom.h Wed Jul 10 20:16:37 1996 -@@ -0,0 +1,34 @@ -+/* drivers/atm/zeprom.h - ZeitNet ZN122x EEPROM (NM93C46) declarations */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef DRIVER_ATM_ZEPROM_H -+#define DRIVER_ATM_ZEPROM_H -+ -+/* Different versions use different control registers */ -+ -+#define ZEPROM_V1_REG PCI_VENDOR_ID /* PCI register */ -+#define ZEPROM_V2_REG 0x40 -+ -+/* Bits in contol register */ -+ -+#define ZEPROM_SK 0x80000000 /* strobe (probably on raising edge) */ -+#define ZEPROM_CS 0x40000000 /* Chip Select */ -+#define ZEPROM_DI 0x20000000 /* Data Input */ -+#define ZEPROM_DO 0x10000000 /* Data Output */ -+ -+#define ZEPROM_SIZE 32 /* 32 bytes */ -+#define ZEPROM_V1_ESI_OFF 24 /* ESI offset in EEPROM (V1) */ -+#define ZEPROM_V2_ESI_OFF 4 /* ESI offset in EEPROM (V2) */ -+ -+#define ZEPROM_CMD_LEN 3 /* commands are three bits */ -+#define ZEPROM_ADDR_LEN 6 /* addresses are six bits */ -+ -+/* Commands (3 bits) */ -+ -+#define ZEPROM_CMD_READ 6 -+ -+/* No other commands are needed. */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/tneta1570.h Mon Jun 10 17:36:11 1996 -@@ -0,0 +1,310 @@ -+/* drivers/atm/tneta1570.h - TI TNETA1570 (SAR) declarations */ -+ -+/* Written 1996 by Rolf Fiedler -+ * based on the atm drivers by Werner Almesberger, EPFL LRC -+ */ -+ -+#ifndef DRIVERS_ATM_TNETA1570_H -+#define DRIVERS_ATM_TNETA1570_H -+ -+#include -+ -+#ifdef __KERNEL__ -+ -+#include -+#include -+#include -+#include -+#include -+ -+#define NR_VCI 256 -+#define NR_VCI_LD 8 -+#define NR_VPI 32 -+#define NR_VPI_LD 5 -+#define MAX_VCI 255 -+#define MAX_VPI 255 -+ -+/* this is better put in pci.h, but I want to keep my driver independent */ -+#define MEM_VALID 0xfffffff0 -+#ifndef PCI_VENDOR_ID_TI -+#define PCI_VENDOR_ID_TI 0x104c -+#endif -+#ifndef PCI_DEVICE_ID_TI_TNETA1570 -+#define PCI_DEVICE_ID_TI_TNETA1570 0xa001 -+#endif -+ -+#define KERNEL_OFFSET 0xc0000000 /* kernel 0 is at linear 0xc0000000 */ -+#define DEV_LABEL "tneta1570" -+#define RAM_INCREMENT 1024 /* check in 4 kB increments */ -+ -+/*---------------------------------------------------------*/ -+ -+/* transmit DMA state table, in control memory */ -+struct tneta_tx_dma_state_table{ -+ unsigned int control; -+ unsigned int current_buffer_ptr; -+ unsigned int atm_header; -+ unsigned int dma_state_flag; /* only initialized value */ -+ unsigned int next_buffer_ptr; -+ unsigned int start_of_buffer_address; -+ unsigned int partial_AAL5_tx_CRC; -+ unsigned int AAL5_control_length_field; -+}; -+ -+/* receive DMA state table, in control memory */ -+#define RX_DMA_CONTROL_AAL5 ((1<<29)|(1<<26)) -+#define RX_DMA_CONTROL_AAL0 ((1<<29)|(1<<27)) -+#define RX_TIME_OUT (0xfff<<12) -+#define DMA_ON (1<<31) -+#define DMA_FILTER (1<<30) -+struct tneta_rx_dma_state_table{ -+ unsigned int control; /* needs initialization */ -+ unsigned int current_buffer_ptr; -+ unsigned int sob_ptr; -+ unsigned int EOP; -+ unsigned int sop_ptr; -+ unsigned int AAL0_cells; /* needs initialization if AAL0 */ -+ unsigned int dma_on_idx; /* needs initialization */ -+ unsigned int rx_timeout; /* needs initialization */ -+}; -+ -+#define MAX_AAL5_PDU 9600 /* max size for AAL5 PDUs buffers */ -+#define MAX_AAL5_CELLS 200 -+#define MAX_AAL0_PDU 48 -+#define MAX_AAL0_CELLS 1 -+#define AAL0_BUFS 32 -+#define AAL5_BUFS 16 -+#define FBR_AAL0_32 ((2<<16) | (1<<10) | (0)) -+#define FBR_AAL5_16 ((MAX_AAL5_CELLS<<16) | (0<<10) | (0)) -+#define RX_HDR 20 -+#define MAX_FBR_ENTRIES 256 -+struct tneta_rx_fbrptr { -+ unsigned int * buf_ptr; -+ unsigned int buf_size; -+}; -+ -+#define AAL5_IND (1<<26) -+struct tneta_rx_compl { -+ unsigned int atm_header; -+ unsigned int error; -+ unsigned int buf_ptr; -+ unsigned int trailer; -+ unsigned int control; /* needs initialization */ -+ unsigned int res1; -+ unsigned int res2; -+ unsigned int res3; -+}; -+ -+/* device dependent vcc data */ -+#define TX_SEG_RING_SIZE 256 -+ -+struct tneta1570_vcc { -+ /*-------------------------------- RX part */ -+ int (*rx)(struct atm_vcc *vcc); -+ int rxing; /* pending cells */ -+ struct wait_queue * rx_wait; /* for close */ -+ int dma_channel; /* for close */ -+ int fbr_idx; -+ /*-------------------------------- TX part */ -+ struct wait_queue * tx_wait; /* for close */ -+ int txing; /* cells to be tx'd */ -+ int scheduler_idx; /* index in scheduler table */ -+ unsigned int * seg_ring; /* size aligned 1K */ -+ unsigned int * seg_ring_mptr; /* word aligned */ -+ int seg_ring_idx; -+ -+ struct atm_vcc *next; /* next pending rx */ -+ struct sk_buff *last; /* last PDU */ -+}; -+ -+ -+/* device dependent data */ -+#define TXCMPLR_SZ_IRQ 256 /* size aligned */ -+#define TXCMPLR_SZ_NOI 128 /* size aligned */ -+#define RXCMPLR_SZ_IRQ 128 /* size aligned */ -+#define RXCMPLR_SZ_NOI 64 /* size aligned */ -+#define SAR_REG_WORD(dev, x) (dev->reg[x]) -+#define SAR_REG_SHORT(dev, x) (((unsigned short *)dev->reg)[x]) -+#define MAX_SCHED_ENTRIES 1022 -+#define MAX_TXDMA_ENTRIES 1022 -+#define TX_CMPL_R_IRQ(dev) (dev->txcmplringptr_irq[dev->txcmpl_ring_idx_irq]) -+#define TX_CMPL_R_NOI(dev) (dev->txcmplringptr_noi[dev->txcmpl_ring_idx_noi]) -+#define RX_CMPL_R_IRQ(dev) (dev->rxcmplringptr_irq[dev->rxcmpl_ring_idx_irq]) -+#define RX_CMPL_R_NOI(dev) (dev->rxcmplringptr_noi[dev->rxcmpl_ring_idx_noi]) -+ -+struct tneta1570_dev { -+ /*-------------------------------- TX part */ -+ int txcmpl_ring_idx_noi, txcmpl_ring_idx_irq; -+ unsigned int *txcmplringptr_noi, *txcmplringptr_irq; -+ unsigned int *txcmpl_ring; -+ -+ /*-------------------------------- RX part */ -+ int rxcmpl_ring_idx_noi, rxcmpl_ring_idx_irq; -+ struct tneta_rx_compl *rxcmplringptr_noi, *rxcmplringptr_irq; -+ struct tneta_rx_compl *rxcmpl_ring; -+ -+ /*-------------------------------- maps */ -+ int oam_fbr_idx; -+ -+ /*-------------------------------- stats */ -+ unsigned int lost; /* lost rx cells */ -+ /*-------------------------------- other pointers */ -+ -+ /*-------------------------------- TNETA links */ -+ struct atm_dev *more; /* other TNETA devices */ -+ /*-------------------------------- general information */ -+ -+ volatile unsigned long *ram; /* base of phy device */ -+ volatile unsigned long *scheduler; /* base of scheduler table */ -+ volatile unsigned int *reg; /* base of sar regs device */ -+ volatile struct tneta_rx_fbrptr *free_buf_ptr; /* free buffer pointers */ -+ volatile unsigned long *rx_vpi_vci; /* rx vpi vci table */ -+ volatile struct tneta_tx_dma_state_table *tx_dma_state; /* tx dma state table */ -+ volatile struct tneta_rx_dma_state_table *rx_dma_state; /* rx dma state table */ -+ volatile unsigned long *phy; /* base of phy device */ -+ -+ int mem; /* RAM on board (in bytes) */ -+ void * base; /* board base address */ -+ unsigned long base_diff; /* virtual - phy base address */ -+ unsigned int pci_map_size; /* pci map size of board */ -+ unsigned char irq; /* IRQ */ -+ unsigned char bus; /* PCI stuff */ -+ unsigned char dev_fn; -+}; -+ -+ -+#define TNETA1570_DEV(d) ((struct tneta1570_dev *) (d)->dev_data) -+#define TNETA1570_VCC(d) ((struct tneta1570_vcc *) (d)->dev_data) -+ -+/*---------------------------------------------------------*/ -+ -+/* -+ * Directly Addressable Registers, memory mapped -+ */ -+#define TNETA_REG_BASE_OFFSET 0x3200 /* offset PCI base to registers */ -+#define TNETA_CONFIG 0 /* configuration register */ -+#define TNETA_STATUS 1 /* status register */ -+#define TNETA_INT_MASK 2 /* interrupt mask register */ -+#define TNETA_S_RAT 6 /* 3L RAT cycle # rx DMA state table */ -+#define TNETA_S_RGT 7 /* 3H global reass. timer */ -+#define TNETA_RXUNKNOWN 4 /* rx unknown register */ -+#define TNETA_S_TXCOMPLSIZEI 10 /* 5L TX compl. ring size W/ interrupt */ -+#define TNETA_S_TXCOMPLSIZE 11 /* 5H TX compl. ring size W/O interrupt */ -+#define TNETA_S_RXCOMPLSIZEI 12 /* 6L RX completion ring size W/ interrupt */ -+#define TNETA_S_RXCOMPLSIZE 13 /* 6H RX completion ring size W/O interrupt */ -+#define TNETA_S_FIFO_FREE 14 /* 7L FIFO free-buffer-size */ -+#define TNETA_S_TXSEGSIZE 15 /* 7H Segmentation ring size */ -+#define TNETA_S_AAL_DISCARD 16 /* 8L discarded AAL5 rx cell counter */ -+#define TNETA_S_HEC_ERR 17 /* 8H HEC error counter */ -+#define TNETA_UNKNOWN_P 9 /* Unknown Protocols RX # */ -+#define TNETA_CELL_RXC 10 /* ATM Cells RX'd # */ -+#define TNETA_CELL_TXC 11 /* ATM Cells TX'd # */ -+#define TNETA_S_TXM_RXM 24 /* 12L TX FIFO & RX FIFO max occupancy */ -+#define TNETA_S_VCIM 25 /* 12H VCI mask */ -+#define TNETA_S_SCHEDSIZE 26 /* 13L scheduler-table-size register */ -+#define TNETA_RESET 14 /* software reset register */ -+ -+#define TNETA_TXCOMPLNOI 128 /* TX completion ring W/O interrupt pointer */ -+#define TNETA_TXCOMPLIRQ 129 /* TX completion ring W/ interrupt pointer */ -+#define TNETA_RXCOMPLNOI 130 /* RX completion ring W/O interrupt pointer */ -+#define TNETA_RXCOMPLIRQ 131 /* RX completion ring W/ interrupt pointer */ -+ -+/* configuration register bits */ -+#define TNETA_R0_UNI 0x2000 -+#define TNETA_R0_MAX_RETRY (0xf << 9) /* 1111 max retry master */ -+#define TNETA_R0_LOOP 0x0100 /* set to loop-back (reset!, no enable) */ -+#define TNETA_R0_TX_HECERR 0x0080 /* force HEC error */ -+#define TNETA_R0_SMALL_MAP 0x0040 -+#define TNETA_R0_TX_ENABLE 0x0020 -+#define TNETA_R0_RX_ENABLE 0x0010 -+#define TNETA_R0_ENDIAN (0x0 << 3) /* 00 little endian */ -+#define TNETA_R0_PERBUFFER 0x002 -+#define TNETA_R0_RAT_ENABL 0x001 /* enable reass. aging timer */ -+#define TNETA_R0_STANDARD_MODE (TNETA_R0_UNI) -+ -+/* status register bits */ -+#define TNETA_R1_PCI_MODE 0x400 /* 32/64 bit */ -+#define TNETA_R1_RX_FREEZE 0x200 /* rx ring overflow */ -+#define TNETA_R1_TX_FREEZE 0x100 /* tx ring overflow */ -+#define TNETA_R1_CP_RX 0x080 /* packet reassembly completed */ -+#define TNETA_R1_RX_IRR 0x040 /* rx-unknown written */ -+#define TNETA_R1_HEC_OVER 0x020 /* HEC error counter overflow */ -+#define TNETA_R1_UP_OVER 0x010 /* unknown proto counter overflow */ -+#define TNETA_R1_APD_OVER 0x008 /* AAL5 PDU discard counter overflow */ -+#define TNETA_R1_ACR_OVER 0x004 /* ATM cell rxd counter overflow */ -+#define TNETA_R1_ACT_OVER 0x002 /* ATM cell txd counter overflow */ -+#define TNETA_R1_CP_TX 0x001 /* packet segmentation completed */ -+#define TNETA_R2_STANDARD_INTS (TNETA_R1_RX_FREEZE | \ -+ TNETA_R1_TX_FREEZE | \ -+ TNETA_R1_CP_RX | \ -+ TNETA_R1_CP_TX) -+/* control memory map offsets */ -+#define TNETA_SCHED_TABLE 0x0 -+#define TNETA_FREE_BUFFER_POINTERS 0x3800 -+#define TNETA_RX_VPIVCI_DMA_POINTERS 0x4000 -+#define TNETA_TX_DMA_STATE_TABLE 0x8000 -+#define TNETA_RX_DMA_STATE_TABLE 0x10000 -+#define TNETA_SUNI_OFFSET (0x20000 << 2) -+ -+/* reserved control memory area */ -+#define RESERVED_LL 0xc00 /* lower limit */ -+#define RESERVED_UL 0xe00 /* upper limit */ -+ -+#define TNETA_SUNI_RDREQ 0x00100 -+#define TNETA_SUNI_RD_D_AV (0x10) -+ -+#define OWN (0x1 << 31) /* own bit, set to 1 if owned by tneta1570 */ -+#define SEG_PTR(x) (0x3fffff00 & ((unsigned int)x >> 2)) -+#define BUF_PTR(x) (((unsigned int)x >> 2) & 0x3fffffff) -+ /* pointer to tx data buffer header, aligned to 4 byte */ -+ -+/* tx data buffer header */ -+struct tx_buffer_descriptor{ -+ unsigned int control; -+ unsigned int next_buffer; -+ unsigned int atm_header; -+ unsigned int AAL5_control; -+}; -+ -+/* control word layout */ -+#define TNETA_TXDBH_CTRL_RDY (0x1 << 31) -+#define TNETA_TXDBH_CTRL_SOP (0x1 << 30) -+#define TNETA_TXDBH_CTRL_EOP (0x1 << 29) -+#define TNETA_TXDBH_CTRL_ABORT (0x1 << 28) -+#define TNETA_TXDBH_CTRL_AAL0_PTI (0x0 << 26) -+#define TNETA_TXDBH_CTRL_AAL5 (0x1 << 26) -+#define TNETA_TXDBH_CTRL_AAL0_NOPTI (0x2 << 26) -+#define TNETA_TXDBH_CTRL_INT_NOINT (0x1 << 25) -+#define TNETA_TXDBH_CTRL_BUF_OFFSET (0xff << 16) -+#define TNETA_TXDBH_CTRL_BYTE_COUNT (0xffff << 0) -+ -+#define AAL5_PDU_INT (TNETA_TXDBH_CTRL_RDY | \ -+ TNETA_TXDBH_CTRL_SOP | \ -+ TNETA_TXDBH_CTRL_EOP | \ -+ TNETA_TXDBH_CTRL_AAL5 | \ -+ TNETA_TXDBH_CTRL_INT_NOINT) -+ -+#define AAL0_PDU_INT (TNETA_TXDBH_CTRL_RDY | \ -+ TNETA_TXDBH_CTRL_SOP | \ -+ TNETA_TXDBH_CTRL_EOP | \ -+ TNETA_TXDBH_CTRL_AAL0_PTI) -+ -+/* ATM header */ -+#define TNETA_TXDBH_ATMH_GFC (0xff << 24) -+#define TNETA_TXDBH_ATMH_VPI (0xff << 16) -+#define TNETA_TXDBH_ATMH_VCI (0xffff << 4) -+#define TNETA_TXDBH_ATMH_PTI (0x7 << 1) -+#define TNETA_TXDBH_ATMH_CLP (0x1 << 0) -+ -+/* AAL5 control */ -+#define TNETA_TXDBH_AAL5_CPCS_UU (0xff << 24) -+#define TNETA_TXDBH_AAL5_CPI (0xffff << 16) -+#define TNETA_TXDBH_AAL5_USER (0xffff << 0) -+ -+/* TX completion rings */ -+#define TNETA_TXCR_OWN (0x1 << 31) -+#define TNETA_TXCR_ABORT (0x1 << 30) -+#define TNETA_TXCR_BUFADDR (0x3fffffff << 0) -+ -+#endif __KERNEL__ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/tneta1570.c Mon Jun 10 17:36:12 1996 -@@ -0,0 +1,1479 @@ -+/* drivers/atm/tneta1570.c - ti tneta1570 atm driver */ -+ -+/* Written 1996 by Rolf Fiedler (rolf.fiedler@infotech.tu-chemnitz.de) -+ * based on the atm drivers by Werner Almesberger, EPFL LRC -+ */ -+ -+#include /* for extended debugging options */ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include /* for xtime */ -+#include -+#include -+#include -+#include -+#include -+ -+#include "tneta1570.h" -+#include "suni.h" -+ -+#define SLOW_DOWN_FACTOR 8 -+ -+/* -+ * KNOWN BUGS: -+ * -+ * doesn't work a bit -+ */ -+ -+inline void write_sched_tab(struct tneta1570_dev * dev, int i, unsigned int v); -+inline int read_sched_tab(struct tneta1570_dev * dev, int i); -+static void dequeue_OAM(struct atm_dev *dev); /* dequeue OAM cells */ -+static void dequeue_AAL0(struct atm_dev *dev); /* dequeue AAL0 cells */ -+static void dequeue_AAL5(struct atm_dev *dev); /* dequeue AAL5 cells */ -+static int alloc_dma(struct atm_vcc *vcc); -+ -+#if 0 -+#define DPRINTK printk -+#else -+#define DPRINTK (void) -+#endif -+ -+#ifndef CONFIG_ATM_TNETA1570_DEBUG -+ -+ -+#define NULLCHECK(x) -+ -+#define EVENT(s,a,b) -+ -+ -+static inline void event_dump(void) -+{ -+} -+ -+ -+#else -+ -+ -+/* -+ * NULL pointer checking -+ */ -+ -+#define NULLCHECK(x) \ -+ if ((unsigned long) (x) < 0x30) printk(#x "==0x%x\n", (int) (x)) -+ -+/* -+ * Very extensive activity logging. Greatly improves bug detection speed but -+ * costs a few Mbps if enabled. -+ */ -+ -+#define EV 64 -+ -+static const char *ev[EV]; -+static unsigned long ev_a[EV],ev_b[EV]; -+static int ec = 0; -+ -+static void EVENT(const char *s,unsigned long a,unsigned long b) -+{ -+ ev[ec] = s; -+ ev_a[ec] = a; -+ ev_b[ec] = b; -+ ec = (ec+1) % EV; -+} -+ -+ -+static void event_dump(void) -+{ -+ int n,i; -+ -+ for (n = 0; n < EV; n++) { -+ i = (ec+n) % EV; -+ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); -+ } -+} -+ -+ -+#endif /* CONFIG_ATM_TNETA1570_DEBUG */ -+ -+ -+static int tx_complete = 0,dma_complete = 0,queued = 0,requeued = 0, -+ backlogged = 0,rx_enqueued = 0,rx_dequeued = 0,pushed = 0,submitted = 0, -+ putting = 0; -+ -+static struct atm_dev *tneta1570_boards = NULL; -+ -+ -+/*-------------------------------- utilities --------------------------------*/ -+ -+ -+static void dump_mem(struct tneta1570_dev *tneta1570_dev) -+{ -+} -+ -+ -+static void dump(struct atm_dev *dev) -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ -+ tneta1570_dev = TNETA1570_DEV(dev); -+ printk("\nFree memory\n"); -+ dump_mem(tneta1570_dev); -+ printk("TX buffers\n"); -+ -+ printk("RX buffers\n"); -+ -+ printk("----\n"); -+} -+ -+/* --------------------------memory allocation-------------------------------*/ -+ -+ -+/* -+ * allocate a skbuff with enough room for the SDU header -+ */ -+static struct sk_buff *tneta1570_alloc_tx(struct atm_vcc *vcc, unsigned int size) -+{ -+ struct sk_buff *ptr; -+ -+ ptr = alloc_skb(size + 48, GFP_KERNEL); -+ if(ptr == NULL) return NULL; -+ skb_reserve(ptr, 48); /* room for push */ -+ return ptr; -+} -+ -+ -+ -+/*----------------------------------- RX ------------------------------------*/ -+ -+/* -+ * alloc_dma -+ * find entry in dma state table for this vpi/vci -+ * if vpi already open increase valid vci range -+ * else open vpi, set vci range to vci -+ * return index to dma channel, return 0 on error -+ */ -+static int alloc_dma(struct atm_vcc *vcc) -+{ -+ unsigned char unsorted[MAX_VPI], sorted[MAX_VPI]; -+ unsigned int x; -+ int i; -+ struct tneta1570_dev *tneta1570_dev; -+ -+ EVENT(">alloc_rx_dma\n",0,0); -+ -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+ -+ x = tneta1570_dev->rx_vpi_vci[vcc->vpi]; -+ -+ if(x != 0) { -+ x = 0x7fff & (x >> 16); -+ return x + vcc->vci - 0x800; /* idx = value - offset */ -+ } else { -+ /* create a new vpi entry */ -+ /* first, find dma channel range */ -+ for(i=0; irx_vpi_vci[i] & OWN) { -+ x = tneta1570_dev->rx_vpi_vci[i]; -+ unsorted[i] = 0x7f & (x >> 24); -+ } else { -+ unsorted[i] = 0; -+ } -+ sorted[i] = 0; -+ } -+ for(i=0; irx_vpi_vci[vcc->vpi] = OWN | ((i+8)<<24) | (MAX_VCI); -+ return 256*i + vcc->vci; -+ } -+} -+ -+ -+/* -+ * let the protocol have a look at the buffer -+ */ -+static unsigned long tneta1570_fetch(struct atm_vcc *vcc, int i) -+{ -+ return 0; /* not implemented yet */ -+} -+ -+/* -+ * interrupt driven dequeue for rx buffer -+ * -> for each and every post in the completion ring do -+ * increment completion ring ptr (modulo RXCMPLR_SIZE_IRQ) -+ * get skb address from buffer address -+ * get free-buffer ring address from tneta1570_vcc -+ * prepare skb with header information -+ * vcc->push skb -+ * alloc (ATOMIC) new skb for this vci, put in free-buffer ring -+ * increment free-buffer ring index (modulo FBR_SIZE) -+ */ -+static void dequeue_rx(struct atm_dev * dev) -+{ -+ struct tneta1570_dev * tneta1570_dev; -+ -+ EVENT(">dequeue_rx\n",0,0); -+ NULLCHECK(dev); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ NULLCHECK(tneta1570_dev); -+ -+ /* find here completion ring entries */ -+ EVENT(">completion ring post: %08x, %d\n", -+ (unsigned int)&RX_CMPL_R_IRQ(tneta1570_dev).atm_header, -+ tneta1570_dev->rxcmpl_ring_idx_irq); -+ -+ while(!(RX_CMPL_R_IRQ(tneta1570_dev).control & OWN)) { -+ if((RX_CMPL_R_IRQ(tneta1570_dev).control & 0xff) == 0) { -+ dequeue_OAM(dev); -+ } else { -+ if((RX_CMPL_R_IRQ(tneta1570_dev).error & AAL5_IND)) { -+ dequeue_AAL5(dev); -+ } else { -+ dequeue_AAL0(dev); -+ -+ } -+ } -+ RX_CMPL_R_IRQ(tneta1570_dev).control = OWN; -+ tneta1570_dev->rxcmpl_ring_idx_irq++; -+ tneta1570_dev->rxcmpl_ring_idx_irq %= RXCMPLR_SZ_IRQ; -+ } -+ return ; -+} -+ -+static void dequeue_OAM(struct atm_dev *dev) /* dequeue AAL0 cells */ -+{ -+ struct tneta1570_dev * tneta1570_dev; -+ struct sk_buff *skb, *new_skb; -+ unsigned int *p, *fbr; -+ -+ EVENT(">dequeue_rx_OAM\n",0,0); -+ NULLCHECK(dev); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ NULLCHECK(tneta1570_dev); -+ -+/* if(vcc->push_oam) printk(" PushOAM is present.\n"); */ -+ -+ p = (unsigned int *)(RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr << 2); -+ skb = (struct sk_buff *)(*(p-1)); /* get skb */ -+ -+ /* get new buffer before dequeueing old -+ */ -+ new_skb = alloc_skb(MAX_AAL0_PDU+RX_HDR, GFP_ATOMIC); -+ if(new_skb == NULL) { -+ /* add just received buffer to free list, drop pdu :-( */ -+ fbr = tneta1570_dev->free_buf_ptr[0].buf_ptr; -+ fbr[tneta1570_dev->oam_fbr_idx] = OWN | ((int)p >> 2); -+ tneta1570_dev->oam_fbr_idx++; -+ tneta1570_dev->oam_fbr_idx %= AAL0_BUFS; -+ return; -+ } -+ -+ /* add newly allocated buffer to free list */ -+ fbr = tneta1570_dev->free_buf_ptr[0].buf_ptr; -+ fbr[tneta1570_dev->oam_fbr_idx] = OWN | ((unsigned int)(new_skb->data+4) >> 2); -+ *(struct sk_buff **)(new_skb->data) = new_skb; -+ tneta1570_dev->oam_fbr_idx++; -+ tneta1570_dev->oam_fbr_idx %= AAL0_BUFS; -+ -+ /* push received buffer to protocol */ -+ -+ skb->data[16] = skb->data[12]; -+ skb->data[17] = skb->data[13]; -+ skb->data[18] = skb->data[14]; -+ skb->data[19] = skb->data[15]; -+ skb->data += 4*4; /* skip header */ -+ skb->len = 52; -+ /* should check for multiple buffers @@@@ */ -+ skb->tail = skb->data + skb->len; -+ -+ if (/* vcc->push */ 1) { -+ dev_kfree_skb(skb, GFP_ATOMIC); -+ printk(" Don't know how to call push !\n"); -+ /* vcc->push(vcc,skb); */ -+ } else { -+ dev_kfree_skb(skb, GFP_ATOMIC); -+ printk(DEV_LABEL "(itf %d) No push in protocol.\n", -+ dev->number); -+ } -+} -+ -+ -+static void dequeue_AAL0(struct atm_dev *dev) /* dequeue AAL0 cells */ -+{ -+ struct tneta1570_dev * tneta1570_dev; -+ struct tneta1570_vcc * tneta1570_vcc; -+ struct atm_vcc *vcc; -+ struct sk_buff *skb, *new_skb; -+ unsigned int *p, v, *fbr; -+ -+ EVENT(">dequeue_rx_AAL0\n",0,0); -+ NULLCHECK(dev); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ NULLCHECK(tneta1570_dev); -+ -+ p = (unsigned int *)(RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr << 2); -+ skb = (struct sk_buff *)(*(p-1)); /* get skb */ -+ -+ vcc = skb->atm.vcc; -+ NULLCHECK(vcc); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ NULLCHECK(tneta1570_vcc); -+ /* get new buffer before dequeueing old -+ * if error in peek drop pdu -+ */ -+ new_skb = vcc->peek(vcc, MAX_AAL0_PDU+RX_HDR, NULL); -+ if(new_skb == NULL) { -+ /* add just received buffer to free list, drop pdu :-( */ -+ v = RX_CMPL_R_IRQ(tneta1570_dev).control; -+ fbr = tneta1570_dev->free_buf_ptr[0xff & v].buf_ptr; -+ fbr[tneta1570_vcc->fbr_idx] = OWN | ((int)p >> 2); -+ tneta1570_vcc->fbr_idx++; -+ tneta1570_vcc->fbr_idx %= AAL0_BUFS; -+ return; -+ } -+ -+ /* add newly allocated buffer to free list */ -+ -+ v = RX_CMPL_R_IRQ(tneta1570_dev).control; -+ fbr = tneta1570_dev->free_buf_ptr[0xff & v].buf_ptr; -+ fbr[tneta1570_vcc->fbr_idx] = OWN | ((unsigned int)(new_skb->data+4) >> 2); -+ *(struct sk_buff **)(new_skb->data) = new_skb; -+ new_skb->atm.vcc = vcc; /* link vcc info */ -+ tneta1570_vcc->fbr_idx++; -+ tneta1570_vcc->fbr_idx %= AAL0_BUFS; -+ -+ /* push received buffer to protocol */ -+ -+ skb->data[16] = skb->data[12]; -+ skb->data[17] = skb->data[13]; -+ skb->data[18] = skb->data[14]; -+ skb->data[19] = skb->data[15]; -+ skb->data += 4*4; /* skip header */ -+ skb->len = 52; -+ /* should check for multiple buffers @@@@ */ -+ skb->tail = skb->data + skb->len; -+ skb->free = 1; /* set free flag, is there need for it? */ -+ -+ if (vcc->push) { -+ vcc->push(vcc,skb); -+ } else { -+ printk(DEV_LABEL "(itf %d) No push in protocol.\n", -+ dev->number); -+ } -+ /* update statistics */ -+ vcc->stats->rx++; -+rx_dequeued++; -+} -+ -+ -+ -+static void dequeue_AAL5(struct atm_dev *dev) /* dequeue AAL5 PDU */ -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc * tneta1570_vcc; -+ struct atm_vcc *vcc; -+ struct sk_buff *skb, *new_skb; -+ unsigned int *p, v, *fbr; -+ -+ EVENT(">dequeue_rx_AAL5\n",0,0); -+ NULLCHECK(dev); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ NULLCHECK(tneta1570_dev); -+ -+ p = (unsigned int *)(RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr << 2); -+ skb = (struct sk_buff *)(*(p-1)); /* get skb */ -+ -+ DPRINTK(" p %08x, skb %08x, head %08x, err %08x, sop %08x, trailer %08x, idx %08x", -+ p, skb, -+ RX_CMPL_R_IRQ(tneta1570_dev).atm_header, -+ RX_CMPL_R_IRQ(tneta1570_dev).error, -+ RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr, -+ RX_CMPL_R_IRQ(tneta1570_dev).trailer, -+ RX_CMPL_R_IRQ(tneta1570_dev).control); -+ -+ vcc = skb->atm.vcc; -+ DPRINTK(" vcc %08x", vcc); -+ -+ NULLCHECK(vcc); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ NULLCHECK(tneta1570_vcc); -+ /* get new buffer before dequeueing old -+ * if error in peek drop pdu -+ */ -+ new_skb = vcc->peek(vcc, MAX_AAL5_PDU+RX_HDR, NULL); -+ if(new_skb == NULL) { -+ /* add just received buffer to free list :-( */ -+ v = RX_CMPL_R_IRQ(tneta1570_dev).control; -+ fbr = tneta1570_dev->free_buf_ptr[0xff & v].buf_ptr; -+ fbr[tneta1570_vcc->fbr_idx] = OWN | ((int)p >> 2); -+ tneta1570_vcc->fbr_idx++; -+ tneta1570_vcc->fbr_idx %= AAL5_BUFS; -+ return; -+ } -+ /* add newly allocated buffer to free list */ -+ -+ v = RX_CMPL_R_IRQ(tneta1570_dev).control; -+ fbr = tneta1570_dev->free_buf_ptr[v].buf_ptr; -+ fbr[tneta1570_vcc->fbr_idx] = OWN | ((unsigned int)(new_skb->data+4) >> 2); -+ *(struct sk_buff **)(new_skb->data) = new_skb; -+ new_skb->atm.vcc = vcc; /* link context info */ -+ tneta1570_vcc->fbr_idx++; -+ tneta1570_vcc->fbr_idx %= AAL5_BUFS; -+ -+ /* push received buffer to protocol */ -+ skb->data += 5*4; /* skip header */ -+ skb->len = RX_CMPL_R_IRQ(tneta1570_dev).trailer & 0xffff; -+ /* should check for multiple buffers @@@@ */ -+ skb->tail = skb->data + skb->len; -+ skb->free = 1; /* set free flag, is there need for it? */ -+ -+ if (vcc->push) { -+ vcc->push(vcc,skb); -+ } else { -+ printk(DEV_LABEL "(itf %d) No push in protocol.\n", -+ dev->number); -+ } -+ /* update statistics */ -+ vcc->stats->rx++; -+rx_dequeued++; -+} -+ -+ -+/* -+ * --- bring rx up --- -+ * init vpi/vci table - well, already done by tneta1570_init -+ * kmalloc completion rings -+ * write ptrs to completion rings into sar regs -+ * init completion rings to all OWN -+ * write completion ring related data to device structure, set index to 0 -+ * init dma channels 0, 1, 2 for reception of OAM cells -+ */ -+static int start_rx(struct atm_dev *dev) -+{ -+ int i; -+ unsigned int x; -+ unsigned int *ptr; -+ struct sk_buff *buf; -+ struct tneta1570_dev *tneta1570_dev; -+ -+ EVENT(">start_rx\n",0,0); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ tneta1570_dev->lost = 0; -+ -+ /* init rx completion rings */ -+ tneta1570_dev->rxcmpl_ring = -+ kmalloc(2*RXCMPLR_SZ_IRQ*sizeof(struct tneta_rx_compl), -+ GFP_KERNEL); -+ DPRINTK("RX_CMPL_R->%08x", tneta1570_dev->rxcmpl_ring); -+ if(!tneta1570_dev->rxcmpl_ring) { -+ printk(DEV_LABEL "(itf %d) malloc on rx start failed.\n", dev->number); -+ return -ENOMEM; -+ } -+ /* align completion-ring with irq to its size */ -+ x = (unsigned int)(&tneta1570_dev->rxcmpl_ring[RXCMPLR_SZ_IRQ]); -+ tneta1570_dev->rxcmplringptr_irq = (struct tneta_rx_compl *) -+ (x & (~(RXCMPLR_SZ_IRQ*sizeof(struct tneta_rx_compl) - 1))); -+ /* the rest is for the completion ring w/o irq */ -+ if((tneta1570_dev->rxcmplringptr_irq - RXCMPLR_SZ_NOI) -+ > tneta1570_dev->rxcmpl_ring) { -+ tneta1570_dev->rxcmplringptr_noi = -+ tneta1570_dev->rxcmplringptr_irq - RXCMPLR_SZ_NOI; -+ } else { -+ tneta1570_dev->rxcmplringptr_noi = -+ tneta1570_dev->rxcmplringptr_irq + RXCMPLR_SZ_IRQ; -+ } -+ EVENT(">init rx completion ring irq\n",0,0); -+ for(i=0; irxcmplringptr_irq[i].control = OWN; -+ EVENT(">init tx completion ring noi\n",0,0); -+ for(i=0; irxcmplringptr_noi[i].control = OWN; -+ -+ tneta1570_dev->rxcmpl_ring_idx_noi = 0; -+ tneta1570_dev->rxcmpl_ring_idx_irq = 0; -+ -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_RXCOMPLSIZEI) = RXCMPLR_SZ_IRQ-1; -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_RXCOMPLSIZE) = RXCMPLR_SZ_NOI-1; -+ SAR_REG_WORD(tneta1570_dev, TNETA_RXCOMPLNOI) = (unsigned int)tneta1570_dev->rxcmplringptr_noi; -+ SAR_REG_WORD(tneta1570_dev, TNETA_RXCOMPLIRQ) = (unsigned int)tneta1570_dev->rxcmplringptr_irq; -+ -+ /* init dma 0,1,2 for oam */ -+ -+ /* alloc memory for oam fbr & buffers */ -+ ptr = kmalloc(AAL0_BUFS*sizeof(struct tneta_rx_fbrptr), GFP_KERNEL); -+ if(ptr == NULL) printk(DEV_LABEL "PANIC on start rx \n"); -+ for(i=0; idata) = buf; /* link */ -+ ptr[i] = OWN | ((unsigned int)(buf->data + 4) >> 2); -+ } -+ -+ tneta1570_dev->oam_fbr_idx = 0; -+ /* oam cells use fbr 0 */ -+ tneta1570_dev->free_buf_ptr[0].buf_ptr = ptr; -+ tneta1570_dev->free_buf_ptr[0].buf_size = FBR_AAL0_32; -+ -+ tneta1570_dev->rx_dma_state[0].control = RX_DMA_CONTROL_AAL0; -+ tneta1570_dev->rx_dma_state[0].AAL0_cells = MAX_AAL0_CELLS; -+ tneta1570_dev->rx_dma_state[0].rx_timeout = RX_TIME_OUT; -+ tneta1570_dev->rx_dma_state[0].dma_on_idx = DMA_ON + 0; -+ tneta1570_dev->rx_dma_state[1].control = RX_DMA_CONTROL_AAL0; -+ tneta1570_dev->rx_dma_state[1].AAL0_cells = MAX_AAL0_CELLS; -+ tneta1570_dev->rx_dma_state[1].rx_timeout = RX_TIME_OUT; -+ tneta1570_dev->rx_dma_state[1].dma_on_idx = DMA_ON + 0; -+ tneta1570_dev->rx_dma_state[2].control = RX_DMA_CONTROL_AAL0; -+ tneta1570_dev->rx_dma_state[2].AAL0_cells = MAX_AAL0_CELLS; -+ tneta1570_dev->rx_dma_state[2].rx_timeout = RX_TIME_OUT; -+ tneta1570_dev->rx_dma_state[2].dma_on_idx = DMA_ON + 0; -+ -+ SAR_REG_WORD(tneta1570_dev, TNETA_CONFIG) |= TNETA_R0_RX_ENABLE; -+ -+ return 0; -+} -+ -+/* -+ * open vpi/vci for rx -+ * alloc 16 words for free-buffer ring -+ * alloc 16 skbs, size: if AAL5 -+ * IP-MTU + a little something (64K SDUs need multiple bufs) -+ * else -+ * 48 + a little something -+ * enter pointers to skbs in free-buffer ring -+ * find unused free-buffer ring-pointer table entry -+ * put pointer to free-buffer ring in ring-pointer table & tneta1570_vcc -+ * check if vpi has already alloc'd a dma table range -+ * if not, alloc range in dma table for vpi (size is 256*8 words) -+ * if AAL5 -> set dma state table to AAL5 -+ * else use counter terminated AAL0 (cell count 1) -+ * prepare dma state table entry for this vpi/vci (may turn rx for this vci on) -+ * if range < vci -> set range to vci (max) (this definitely turns it on) -+ */ -+static int open_rx(struct atm_vcc *vcc) -+{ -+ int i, dma_idx, fbr_idx; -+ struct sk_buff *skb; -+ unsigned int *ptr; -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc *tneta1570_vcc; -+ -+ EVENT(">open_rx\n",0,0); -+ -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ -+ tneta1570_vcc->rx_wait = NULL; -+ -+ tneta1570_vcc->dma_channel = alloc_dma(vcc); -+ if(!tneta1570_vcc->dma_channel) return -1; -+ -+ dma_idx = tneta1570_vcc->dma_channel; -+ -+ for(fbr_idx = 0; fbr_idxfree_buf_ptr[fbr_idx].buf_ptr == 0) -+ break; -+ if(fbr_idx == MAX_FBR_ENTRIES) return -1; -+ -+ if(vcc->aal == ATM_AAL0) { -+ /* alloc memory for fbr & buffers */ -+ ptr = kmalloc(AAL0_BUFS*sizeof(struct tneta_rx_fbrptr), -+ GFP_KERNEL); -+ if(ptr == NULL) printk(DEV_LABEL "PANIC on open rx \n"); -+ for(i=0; ipeek(vcc, MAX_AAL0_PDU+RX_HDR, NULL); -+ if(skb == NULL) printk(DEV_LABEL "PANIC on open rx \n"); -+ *(struct sk_buff **)(skb->data) = skb; /* link */ -+ skb->atm.vcc = vcc; /* link vcc info */ -+ ptr[i] = OWN | ((unsigned int)(skb->data+4) >> 2); -+ } -+ -+ tneta1570_vcc->fbr_idx = 0; -+ -+ tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr = ptr; -+ tneta1570_dev->free_buf_ptr[fbr_idx].buf_size = FBR_AAL0_32; -+ -+ tneta1570_dev->rx_dma_state[dma_idx].control = RX_DMA_CONTROL_AAL0; -+ tneta1570_dev->rx_dma_state[dma_idx].AAL0_cells = MAX_AAL0_CELLS; -+ tneta1570_dev->rx_dma_state[dma_idx].rx_timeout = RX_TIME_OUT; -+ tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx = DMA_ON + fbr_idx; -+ -+ } else if(vcc->aal == ATM_AAL5) { -+ /* alloc memory for fbr & buffers */ -+ ptr = kmalloc(AAL5_BUFS*sizeof(struct tneta_rx_fbrptr), -+ GFP_KERNEL); -+ if(ptr == NULL) printk(DEV_LABEL "PANIC on open rx \n"); -+ for(i=0; ipeek(vcc, MAX_AAL5_PDU+RX_HDR, NULL); -+ if(skb == NULL) printk(DEV_LABEL "PANIC on open rx \n"); -+ *(struct sk_buff **)(skb->data) = skb; /* link */ -+ skb->atm.vcc = vcc; /* link vcc info */ -+ ptr[i] = OWN | ((unsigned int)(skb->data+4) >> 2); -+ } -+ -+ tneta1570_vcc->fbr_idx = 0; -+ -+ tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr = ptr; -+ tneta1570_dev->free_buf_ptr[fbr_idx].buf_size = FBR_AAL5_16; -+ -+ tneta1570_dev->rx_dma_state[dma_idx].control = RX_DMA_CONTROL_AAL5; -+ tneta1570_dev->rx_dma_state[dma_idx].rx_timeout = RX_TIME_OUT; -+ tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx = DMA_ON + fbr_idx; -+ -+ } else return -1; -+ return 0; -+} -+ -+/* -+ * close vpi/vci for rx -+ * -+ * get free-buffer ring table address -+ * clear dma state table entry (rx for vci off) -+ * get free-buffer ring address -+ * wait for rx to drain -+ * free all remaining skbs (the ones with own enabled, e.g. all) -+ * free free-buffer ring -+ * set free-buffer-ring ptr to 0 to indicate 'freeness' -+ * check if vpi has another vci enabled -+ * -> yes: if other_vci > this_vci -> do nothing -+ * else -> set max vci to highest other vci -+ * -> no: set vci in vpi/vci table to 0 -+ */ -+static void close_rx(struct atm_vcc *vcc) -+{ -+ int i, fbr_idx, dma_idx, x; -+ struct sk_buff *skb; -+ unsigned int *buf, *ptr; -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc *tneta1570_vcc; -+ -+ EVENT(">close_rx\n",0,0); -+ -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ -+ dma_idx = tneta1570_vcc->dma_channel; -+ fbr_idx = tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx & 0xff; -+ /* wait for EOP */ -+ while(tneta1570_dev->rx_dma_state[dma_idx].control & OWN); -+ tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx = 0; /* off */ -+ /* mark as empty */ -+ ptr = tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr; -+ tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr = 0; /* mark fbr free */ -+ x = tneta1570_dev->free_buf_ptr[fbr_idx].buf_size; -+ x = x >> 10; /* ring size */ -+ x &= 0x3f; -+ x++; -+ x = 16 * x; -+ for(i=0; ifree = 1; /* ???? */ -+ kfree_skb(skb, FREE_READ); -+ } -+ } -+ kfree(ptr); -+ -+ /* if last vci on this vpi is closed, close vpi */ -+ -+} -+ -+ -+/*----------------------------------- TX ------------------------------------*/ -+ -+/* -+ * -- bring tx up -- -+ * init scheduler table to all 0s -+ * kmalloc tx completion rings -+ * write ptrs to completion rings into sar regs -+ * init completion rings to all 0x80000000s -+ * write completion ring related data to device structure, set index to 0 -+ * enable tx in sar -+ */ -+static int start_tx(struct atm_dev *dev) -+{ -+ int i; -+ unsigned int x, *seg_ring, *seg_ring_mptr; -+ struct tneta1570_dev *tneta1570_dev; -+ -+ EVENT(">start_tx\n",0,0); -+ -+ tneta1570_dev = TNETA1570_DEV(dev); -+ -+ /* init tx completion rings */ -+ tneta1570_dev->txcmpl_ring=kmalloc(2*TXCMPLR_SZ_IRQ*4, GFP_KERNEL); -+ if(!tneta1570_dev->txcmpl_ring) { -+ printk(DEV_LABEL "(itf %d) malloc on tx start failed.\n", dev->number); -+ return -ENOMEM; -+ } -+ DPRINTK("TX_CMPL_R->%08x", tneta1570_dev->txcmpl_ring); -+ /* align completion-ring with irq to its size */ -+ x = (unsigned int)(&tneta1570_dev->txcmpl_ring[TXCMPLR_SZ_IRQ]); -+ tneta1570_dev->txcmplringptr_irq = (unsigned int *)(x & (~(TXCMPLR_SZ_IRQ*4 - 1))); -+ /* the rest is for the completion ring w/o irq */ -+ if((tneta1570_dev->txcmplringptr_irq - TXCMPLR_SZ_NOI) > tneta1570_dev->txcmpl_ring) { -+ tneta1570_dev->txcmplringptr_noi = tneta1570_dev->txcmplringptr_irq - TXCMPLR_SZ_NOI; -+ } else { -+ tneta1570_dev->txcmplringptr_noi = tneta1570_dev->txcmplringptr_irq + TXCMPLR_SZ_IRQ; -+ } -+ EVENT(">init tx completion ring irq\n",0,0); -+ for(i=0; itxcmplringptr_irq[i] = OWN; -+ EVENT(">init tx completion ring noi\n",0,0); -+ for(i=0; itxcmplringptr_noi[i] = OWN; -+ -+ tneta1570_dev->txcmpl_ring_idx_noi = 0; -+ tneta1570_dev->txcmpl_ring_idx_irq = 0; -+ -+ /* dma state reread bug fix - allocate dma 1 */ -+ seg_ring_mptr=kmalloc(2*TX_SEG_RING_SIZE*4, GFP_KERNEL); -+ if(!seg_ring_mptr) { -+ printk(DEV_LABEL "(itf %d) malloc on tx open failed.\n", -+ dev->number); -+ return -ENOMEM; -+ } -+ x = (unsigned int)(seg_ring_mptr + TX_SEG_RING_SIZE); -+ seg_ring = (unsigned int *)(x & ~(TX_SEG_RING_SIZE * 4 - 1)); -+ -+ for(i=0; itx_dma_state[1].dma_state_flag = (OWN | SEG_PTR(seg_ring)); -+ -+ /* init registers */ -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_TXCOMPLSIZEI) = TXCMPLR_SZ_IRQ - 1; -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_TXCOMPLSIZE) = TXCMPLR_SZ_NOI - 1; -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_TXSEGSIZE) = TX_SEG_RING_SIZE - 1; -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_SCHEDSIZE) = 2 + SLOW_DOWN_FACTOR; -+ -+ SAR_REG_WORD(tneta1570_dev, TNETA_TXCOMPLNOI) = (unsigned int)tneta1570_dev->txcmplringptr_noi; -+ SAR_REG_WORD(tneta1570_dev, TNETA_TXCOMPLIRQ) = (unsigned int)tneta1570_dev->txcmplringptr_irq; -+ -+ SAR_REG_WORD(tneta1570_dev, TNETA_CONFIG) |= TNETA_R0_TX_ENABLE; -+ -+ return 0; -+} -+ -+/* -+ * -- open vpi/vci -- -+ * find free entry in scheduler table -+ * init tx_dma_state table for this vpi/vci -+ * kmalloc tx_seg_ring, init with all 0s -+ * add entry to scheduler table -+ */ -+static int open_tx(struct atm_vcc *vcc) -+{ -+ int scheduler_idx, i; -+ unsigned int x; -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc *tneta1570_vcc; -+ -+ EVENT(">open_tx\n",0,0); -+ -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ -+ tneta1570_vcc->tx_wait = NULL; -+ -+ if (vcc->txtp.class == ATM_NONE) return 0; -+ -+ tneta1570_vcc->seg_ring_mptr=kmalloc(2*TX_SEG_RING_SIZE*4, GFP_KERNEL); -+ if(!tneta1570_vcc->seg_ring_mptr) { -+ printk(DEV_LABEL "(itf %d) malloc on tx open failed.\n", -+ vcc->dev->number); -+ return -ENOMEM; -+ } -+ /* align seg-ring to its size */ -+ x = (unsigned int)(tneta1570_vcc->seg_ring_mptr + TX_SEG_RING_SIZE); -+ tneta1570_vcc->seg_ring = (unsigned int *)(x & ~(TX_SEG_RING_SIZE * 4 - 1)); -+ -+ EVENT("> seg ring is at phy %x\n", (unsigned int)tneta1570_vcc->seg_ring,0); -+ for(i=0; iseg_ring[i]=0; -+ tneta1570_vcc->seg_ring_idx = 0; -+ -+ /* find free scheduler table entry */ -+ scheduler_idx=0; -+ while(read_sched_tab(tneta1570_dev, scheduler_idx) != 0) { -+ scheduler_idx++; -+ if(scheduler_idx >= MAX_SCHED_ENTRIES) { -+ printk(DEV_LABEL "(itf %d) tx scheduler full on open.\n", -+ vcc->dev->number); -+ return -ENOMEM; -+ } -+ } -+ -+ if((scheduler_idx < SLOW_DOWN_FACTOR) && -+ (scheduler_idx + SLOW_DOWN_FACTOR < MAX_SCHED_ENTRIES)) -+ SAR_REG_SHORT(tneta1570_dev, TNETA_S_SCHEDSIZE) = -+ scheduler_idx + SLOW_DOWN_FACTOR; -+ else SAR_REG_SHORT(tneta1570_dev, TNETA_S_SCHEDSIZE) =scheduler_idx; -+ -+ tneta1570_vcc->scheduler_idx = scheduler_idx; -+ write_sched_tab(tneta1570_dev, scheduler_idx, scheduler_idx+1); /* 1 in entry 0 */ -+ -+ tneta1570_dev->tx_dma_state[scheduler_idx+1].dma_state_flag = -+ (OWN | SEG_PTR(tneta1570_vcc->seg_ring)); -+ -+ tneta1570_vcc->txing = 0; /* init txing flag */ -+ -+ return 0; -+} -+ -+/* -+ * -- close vpi/vci -- -+ * remove scheduler table entry -+ * free tx_seg_ring -+ */ -+static void close_tx(struct atm_vcc *vcc) -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc *tneta1570_vcc; -+ -+ EVENT(">close_tx\n",0,0); -+ -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ -+ while(tneta1570_vcc->txing) { -+ sleep_on(&tneta1570_vcc->tx_wait); /* wait for tx to drain */ -+ } -+ -+ /* remove ptr to segmentation ring */ -+ -+ tneta1570_dev->tx_dma_state[tneta1570_vcc->scheduler_idx+1].dma_state_flag = 0; -+ write_sched_tab(tneta1570_dev, tneta1570_vcc->scheduler_idx, 0); -+ -+ kfree(tneta1570_vcc->seg_ring_mptr); -+} -+ -+/* -+ * -- send skb -- -+ * prepare buffer with header data -+ * set entry in segmentation ring for vpi/vci and increment index -+ * smile ;-) -+ */ -+static int do_tx(struct sk_buff * skb) -+{ -+ struct atm_vcc *vcc; -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc *tneta1570_vcc; -+ unsigned int seg_ring_entry, i; -+ unsigned int *buffer; -+ -+ NULLCHECK(skb); -+ EVENT(">do_tx: skb=0x%lx, %d bytes\n",(unsigned long) skb,skb->len); -+ vcc = skb->atm.vcc; -+ NULLCHECK(vcc); -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+ NULLCHECK(tneta1570_dev); -+ tneta1570_vcc = TNETA1570_VCC(vcc); -+ if ((unsigned long) skb->data & 2) { -+ printk(DEV_LABEL "(itf %d): VCI %d has mis-aligned TX data\n", -+ vcc->dev->number,vcc->vci); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ /* ping seems to be a problem here, its not using my alloc function */ -+ /* prepare buffer descriptor */ -+ if((skb->data - skb->head) < 24) { -+ DPRINTK(DEV_LABEL "(itf %d): skbuff push impossible (%d)\n", -+ vcc->dev->number, skb->data - skb->head); -+ /* copy the data if push not possible */ -+ if(!(buffer=kmalloc(skb->len + 24, GFP_ATOMIC))) { -+ printk(DEV_LABEL "(itf %d): malloc on send failed.\n", -+ vcc->dev->number); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -ENOMEM; -+ } -+ EVENT(">tx mem alloc'd at %08x\n", (unsigned int)buffer,0); -+ NULLCHECK(skb->data); -+ if(vcc->aal == ATM_AAL0) { -+ buffer[3] = 0; -+ buffer[4] = ((unsigned int *)skb->data)[0]; /* copy atm header */ -+ buffer[5] = 0; -+ for(i=0; ilen/4+1; i++) -+ buffer[6+i] = ((unsigned int *)skb->data)[1+i]; -+ buffer[2] = AAL0_PDU_INT | (0xffff & skb->len); /* offset 0 */ -+ } else { -+ buffer[3] = 0; -+ buffer[4] = (vcc->vpi << 20) | (vcc->vci << 4); /* prepare atm header */ -+ buffer[5] = 0; -+ for(i=0; ilen/4+1; i++) -+ buffer[6+i] = ((unsigned int *)skb->data)[i]; -+ buffer[2] = AAL5_PDU_INT | (0xffff & skb->len); -+ } -+ buffer[1] = (unsigned int)skb; -+ buffer[0] = 0; /* push size */ -+ EVENT(">data copied\n",0,0); -+ } else { /* push skb and put header in front of sdu */ -+ if(vcc->aal == ATM_AAL0) { /* sdu contains header */ -+ buffer = (unsigned int *)skb_push(skb, 20); /* make room for 1+4 words header */ -+ buffer[3] = 0; -+ buffer[4] = buffer[5]; /* copy atm header */ -+ buffer[5] = 0; -+ buffer[2] = AAL0_PDU_INT | (0xffff & (skb->len-20)); /* offset 0 */ -+ buffer[0] = 20; /* push size */ -+ } else { -+ buffer = (unsigned int *)skb_push(skb, 24); /* make room for 1+4 words header */ -+ buffer[3] = 0; -+ buffer[4] = (vcc->vpi << 20) | (vcc->vci << 4); /* prepare atm header */ -+ buffer[5] = 0; -+ buffer[2] = AAL5_PDU_INT | (0xffff & (skb->len-24)); -+ buffer[0] = 24; /* push size */ -+ } -+ buffer[1] = (unsigned int)skb; /* store skb ptr for dequeue */ -+ } -+ -+ seg_ring_entry = ((unsigned int)(&buffer[2]) >> 2) | OWN; -+ tneta1570_vcc->seg_ring[tneta1570_vcc->seg_ring_idx] = seg_ring_entry; -+ DPRINTK(">zippered up"); -+ DPRINTK(">sched %d," -+ ">dma %08x," -+ ">sridx %d >seg_r %08x (%08x)," -+ ">buffer %08x, (%08x)," -+ "atm header %08x\n", -+ read_sched_tab(tneta1570_dev, tneta1570_vcc->scheduler_idx), -+ tneta1570_dev->tx_dma_state[tneta1570_vcc->scheduler_idx+1].dma_state_flag, -+ tneta1570_vcc->seg_ring_idx, -+ tneta1570_vcc->seg_ring, -+ tneta1570_vcc->seg_ring[tneta1570_vcc->scheduler_idx], -+ &buffer[2], buffer[2], buffer[4]); -+ -+ /* index to seg.ring entry for next SDU */ -+ tneta1570_vcc->seg_ring_idx++; -+ tneta1570_vcc->seg_ring_idx %= TX_SEG_RING_SIZE; -+ -+ tneta1570_vcc->txing++; -+ return 0; -+} -+ -+/* -+ * -- dequeue tx buffer on tx complete interrupt -- -+ * check completion ring -+ * while valid entry -+ * dequeue skb (needs a bit of backtracking) -+ * increment completion ring index -+ */ -+static void dequeue_tx(struct atm_dev * dev) -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ struct atm_vcc *vcc; -+ struct sk_buff *skb; -+ unsigned int * p, v; -+ -+ EVENT(">dequeue_tx\n",0,0); -+ -+ NULLCHECK(dev); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ NULLCHECK(tneta1570_dev); -+ -+ /* find here completion ring entries */ -+ EVENT(">completion ring post: %08x, %d\n", TX_CMPL_R_IRQ(tneta1570_dev), -+ tneta1570_dev->txcmpl_ring_idx_irq); -+ while(!(TX_CMPL_R_IRQ(tneta1570_dev) & OWN)) { -+ p = (unsigned int *)(TX_CMPL_R_IRQ(tneta1570_dev) << 2); -+ TX_CMPL_R_IRQ(tneta1570_dev) = OWN; -+ tneta1570_dev->txcmpl_ring_idx_irq++; -+ tneta1570_dev->txcmpl_ring_idx_irq %= TXCMPLR_SZ_IRQ; -+ skb = (struct sk_buff *)(*(p-1)); /* get skb */ -+ v = *(p-2); /* get skb push size */ -+ -+ if(v==0) { /* free copy area */ -+ kfree(p-2); -+ } else { /* correct skb */ -+ skb_pull(skb, v); -+ } -+ -+ vcc = skb->atm.vcc; -+ NULLCHECK(vcc); -+ if (vcc->pop) vcc->pop(vcc,skb); -+ else dev_kfree_skb(skb,FREE_WRITE); -+ -+ vcc->stats->tx++; -+ TNETA1570_VCC(vcc)->txing--; -+ wake_up(&(TNETA1570_VCC(vcc)->tx_wait)); -+dma_complete++; -+ }; -+} -+ -+ -+ -+/*--------------------------------- common ----------------------------------*/ -+ -+ -+static void foo(void) -+{ -+printk("tx_complete=%d,dma_complete=%d,queued=%d,requeued=%d,sub=%d,\n" -+ "backlogged=%d,rx_enqueued=%d,rx_dequeued=%d,putting=%d,pushed=%d\n", -+ tx_complete,dma_complete,queued,requeued,submitted,backlogged, -+ rx_enqueued,rx_dequeued,putting,pushed); -+printk("loss: %d\n",TNETA1570_DEV(tneta1570_boards)->lost); -+} -+ -+ -+static void tneta1570_int(int irq,void *dev_id,struct pt_regs *regs) -+{ -+ struct atm_dev *dev; -+ struct tneta1570_dev *tneta1570_dev; -+ unsigned long reason; -+ -+ EVENT(">tneta_int\n",0,0); -+ dev = dev_id; -+ tneta1570_dev = TNETA1570_DEV(dev); -+ while ( (reason = 0x3ff & SAR_REG_WORD(tneta1570_dev, TNETA_STATUS)) ) { -+ DPRINTK(DEV_LABEL ": int 0x%08x\n",reason); -+ if (reason & TNETA_R1_RX_FREEZE) { -+ EVENT("INT: RX Freeze - RX ring overflow\n",0,0); -+ } /* ? */ -+ if (reason & TNETA_R1_TX_FREEZE) { -+ EVENT("INT: TX Freeze - TX ring overflow\n",0,0); -+ dequeue_tx(dev); -+ } /* ? */ -+ if (reason & TNETA_R1_CP_RX) { -+ EVENT("INT: RX Complete - RX buffer completed\n",0,0); -+ dequeue_rx(dev); -+ } /* ? */ -+ if (reason & TNETA_R1_CP_TX) { -+ EVENT("INT: TX Complete - TX Buffer completed\n",0,0); -+ dequeue_tx(dev); -+ /* pop buffers which have been completed */ -+ } -+ } -+} -+ -+/* -+ * perform SAR software reset -+ */ -+static int reset_sar(struct tneta1570_dev * tneta1570_dev) -+{ -+ int i; -+ unsigned int pci_config[64]; -+ -+ for(i=0; i<64; i++) -+ if(pcibios_read_config_dword(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ i*4, -+ &pci_config[i]) -+ !=PCIBIOS_SUCCESSFUL) return -1; -+ -+ SAR_REG_WORD(tneta1570_dev, TNETA_RESET) = 0; /* reset sar */ -+ -+ for(i=0; i<64; i++) -+ if(pcibios_write_config_dword(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ i*4, -+ pci_config[i]) -+ !=PCIBIOS_SUCCESSFUL) return -1; -+ return 0; -+ -+} -+ -+ -+inline void write_sched_tab(struct tneta1570_dev * dev, int i, unsigned int v) -+{ -+ if(1 & i) -+ dev->scheduler[i>>1] = (dev->scheduler[i>>1] & 0xffff) | (v << 16); -+ else -+ dev->scheduler[i>>1] = (dev->scheduler[i>>1] & 0xffff0000) | (v & 0xffff); -+} -+ -+inline int read_sched_tab(struct tneta1570_dev * dev, int i) -+{ -+ if(1 & i) -+ return (dev->scheduler[i>>1] >> 16); -+ else -+ return (0xffff & dev->scheduler[i>>1]); -+} -+ -+/*--------------------------------- entries ---------------------------------*/ -+ -+ -+static int tneta1570_init(struct atm_dev *dev) -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ unsigned int real_base,base; -+ unsigned short command; -+ unsigned char revision; -+ int error,i,last; -+ -+ EVENT(">tneta1570_init\n",0,0); -+ -+ dev->ci_range.vpi_bits = NR_VPI_LD; -+ dev->ci_range.vci_bits = NR_VCI_LD; -+ tneta1570_dev = TNETA1570_DEV(dev); -+ -+ if ((error = pcibios_read_config_word(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, PCI_COMMAND,&command)) -+ || (error = pcibios_read_config_dword(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn,PCI_BASE_ADDRESS_0,&real_base)) -+ || (error = pcibios_read_config_byte(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, PCI_INTERRUPT_LINE,&tneta1570_dev->irq)) -+ || (error = pcibios_read_config_byte(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, PCI_REVISION_ID,&revision))) { -+ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, -+ pcibios_strerror(error)); -+ return -EINVAL; -+ } -+ -+ /* find mapping size of board */ -+ if(pcibios_write_config_dword(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ PCI_BASE_ADDRESS_0, -+ 0xffffffff)!=PCIBIOS_SUCCESSFUL) -+ { -+ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, -+ pcibios_strerror(error)); -+ return -EINVAL; -+ } -+ -+ if(pcibios_read_config_dword(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ PCI_BASE_ADDRESS_0, -+ &(tneta1570_dev->pci_map_size))!=PCIBIOS_SUCCESSFUL) -+ { -+ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, -+ pcibios_strerror(error)); -+ return -EINVAL; -+ } -+ tneta1570_dev->pci_map_size=~tneta1570_dev->pci_map_size+1; -+ -+ if(pcibios_write_config_dword(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ PCI_BASE_ADDRESS_0, -+ real_base)!=PCIBIOS_SUCCESSFUL) -+ { -+ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, -+ pcibios_strerror(error)); -+ return -EINVAL; -+ } -+ -+ -+ real_base &= MEM_VALID; /* strip flags */ -+ if ((error = pcibios_write_config_word(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ PCI_COMMAND, -+ PCI_COMMAND_MEMORY))) -+ { -+ printk(DEV_LABEL "(itf %d): can't enable memory (%s)\n", -+ dev->number,pcibios_strerror(error)); -+ return error; -+ } -+ printk(DEV_LABEL "(itf %d): rev.%d,base=0x%x,irq=%d,",dev->number, -+ revision,real_base,tneta1570_dev->irq); -+ if (!(base = (unsigned long) vremap(real_base,tneta1570_dev->pci_map_size))) { -+ printk(DEV_LABEL "(itf %d): can't set up page mapping\n", -+ dev->number); -+ return error; -+ } -+ tneta1570_dev->base_diff = real_base-base; -+ tneta1570_dev->reg = (volatile unsigned int *) (base+TNETA_REG_BASE_OFFSET); -+ tneta1570_dev->scheduler = (volatile unsigned long *) (base+TNETA_SCHED_TABLE); -+ tneta1570_dev->ram = (volatile unsigned long *) (base+TNETA_SCHED_TABLE); -+ tneta1570_dev->free_buf_ptr = (volatile struct tneta_rx_fbrptr *) (base+TNETA_FREE_BUFFER_POINTERS); -+ tneta1570_dev->rx_vpi_vci = (volatile unsigned long *) (base+TNETA_RX_VPIVCI_DMA_POINTERS); -+ tneta1570_dev->tx_dma_state = (volatile struct tneta_tx_dma_state_table *) (base+TNETA_TX_DMA_STATE_TABLE); -+ tneta1570_dev->rx_dma_state = (volatile struct tneta_rx_dma_state_table *) (base+TNETA_RX_DMA_STATE_TABLE); -+ tneta1570_dev->phy = (volatile unsigned long *) (base+TNETA_SUNI_OFFSET); -+ -+ tneta1570_dev->txcmpl_ring_idx_noi = 0; -+ tneta1570_dev->txcmpl_ring_idx_irq = 0; -+ tneta1570_dev->rxcmpl_ring_idx_noi = 0; -+ tneta1570_dev->rxcmpl_ring_idx_irq = 0; -+ -+ /* test board memory, find amount of memory installed */ -+ last = (TNETA_SUNI_OFFSET)/4; /* max up to phy ctrl */ -+ for (i = last-RAM_INCREMENT; i >= 0; i -= RAM_INCREMENT) { -+ if(i>RESERVED_UL || iram[i] = 0x55555555; -+ if (tneta1570_dev->ram[i] != 0x55555555) last = i; -+ else { -+ tneta1570_dev->ram[i] = 0xAAAAAAAA; -+ if (tneta1570_dev->ram[i] != 0xAAAAAAAA) last = i; -+ else tneta1570_dev->ram[i] = i; -+ } -+ } -+ } -+ for (i = 0; i < last; i += RAM_INCREMENT) -+ if(i>RESERVED_UL || iram[i] != i) break; -+ -+ tneta1570_dev->mem = i << 2; /* byte count */ -+ /* init control memory with all 0s (including regs) */ -+ last = i; -+ /* bring sar up */ -+ for(i=0; iRESERVED_UL || iram[i] = 0; -+ -+ printk("mem=%dkB\n",tneta1570_dev->mem >> 10); -+ -+ /* reset SAR */ -+ reset_sar(tneta1570_dev); -+ -+ for(i=0; iRESERVED_UL || iram[i] = 0; -+ /* TODO: check for non-SUNI, check for TAXI ? */ -+ return suni_init(dev); -+} -+ -+ -+static int tneta1570_start(struct atm_dev *dev) -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ int error; -+ -+ EVENT(">tneta1570_start\n",0,0); -+ tneta1570_dev = TNETA1570_DEV(dev); -+ if (request_irq(tneta1570_dev->irq,&tneta1570_int,0,DEV_LABEL,dev)) { -+ printk(DEV_LABEL "(itf %d): IRQ%d is already in use\n", -+ dev->number,tneta1570_dev->irq); -+ return -EAGAIN; -+ } -+ /* @@@ should release IRQ on error */ -+ -+ if ((error = pcibios_write_config_word(tneta1570_dev->bus, -+ tneta1570_dev->dev_fn, -+ PCI_COMMAND, -+ PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER))) -+ { -+ printk(DEV_LABEL "(itf %d): can't enable memory+master (%s)\n", -+ dev->number,pcibios_strerror(error)); -+ return error; -+ } -+ -+ /* bring suni up */ -+ error = dev->phy->start(dev); -+ if (error) return error; -+ -+ SAR_REG_WORD(tneta1570_dev, TNETA_CONFIG) = TNETA_R0_STANDARD_MODE; -+ SAR_REG_WORD(tneta1570_dev, TNETA_INT_MASK) = TNETA_R2_STANDARD_INTS; -+ -+ error = start_tx(dev); -+ if (error) return error; -+ error = start_rx(dev); -+ if (error) return error; -+ -+ return 0; -+} -+ -+ -+ -+static void tneta1570_close(struct atm_vcc *vcc) -+{ -+ EVENT(">tneta1570_close\n",0,0); -+ if (!TNETA1570_VCC(vcc)) return; -+ vcc->flags &= ~ATM_VF_READY; -+ close_rx(vcc); -+ close_tx(vcc); -+ EVENT("tneta1570_close: done waiting\n",0,0); -+ /* deallocate memory */ -+ kfree(TNETA1570_VCC(vcc)); -+ TNETA1570_VCC(vcc) = NULL; -+ vcc->flags &= ~ATM_VF_ADDR; -+ /*foo();*/ -+} -+ -+ -+/* trying to find a connection identifier */ -+/* -+ * not implemented yet -+ */ -+static int get_ci(struct atm_vcc *vcc,short *vpi,int *vci) -+{ -+ return 0; -+} -+ -+ -+static int tneta1570_open(struct atm_vcc *vcc,short vpi,int vci) -+{ -+ struct tneta1570_dev *tneta1570_dev; -+ struct tneta1570_vcc *tneta1570_vcc; -+ int error; -+ -+ EVENT(">tneta1570_open\n",0,0); -+ TNETA1570_VCC(vcc) = NULL; -+ vcc->alloc_tx = tneta1570_alloc_tx; /* set my skb_alloc function */ -+ -+ tneta1570_dev = TNETA1570_DEV(vcc->dev); -+#if 0 /* set to 0 to test atm_find_ci (get_ci usually is faster) */ -+ error = get_ci(vcc,&vpi,&vci); /* get connection id */ -+ if (error) return error; -+#else -+ error = atm_find_ci(vcc,&vpi,&vci); /* get connection id */ -+ if (error) return error; -+#endif -+ vcc->vpi = vpi; -+ vcc->vci = vci; -+ if (vcc->aal != ATM_AAL0 && vcc->aal != ATM_AAL5) return -EINVAL; -+ tneta1570_vcc = kmalloc(sizeof(struct tneta1570_vcc),GFP_KERNEL); -+ if (!tneta1570_vcc) return -ENOMEM; -+ TNETA1570_VCC(vcc) = tneta1570_vcc; -+ DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, -+ vcc->vci); -+ vcc->flags |= ATM_VF_ADDR; /* set flag */ -+ if ((error = open_rx(vcc))) { /* open rx */ -+ tneta1570_close(vcc); /* close on error */ -+ return error; -+ } -+ if ((error = open_tx(vcc))) { /* open tx */ -+ tneta1570_close(vcc); -+ return error; -+ } -+ vcc->flags |= ATM_VF_READY; /* set IF ready */ -+ /* should power down SUNI while !ref_count @@@ */ -+ return 0; -+} -+ -+ -+static int tneta1570_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) -+{ -+ if (cmd == 12345678) dump(dev); -+ if (!dev->phy->ioctl) return -EINVAL; -+ return dev->phy->ioctl(dev,cmd,arg); -+} -+ -+ -+static int tneta1570_getsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int *optlen) -+{ -+ return -EINVAL; -+} -+ -+ -+static int tneta1570_setsockopt(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int optlen) -+{ -+ return -EINVAL; -+} -+ -+/* -+ * -- send a PDU (AAL5 or AAL0) -+ */ -+static int tneta1570_send(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ EVENT(">tneta1570_send\n",0,0); -+ if (!skb) { -+ printk("!skb in tneta1570_send ?\n"); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ if (vcc->aal == ATM_AAL0) { -+ if (skb->len != ATM_CELL_SIZE-1) { -+ dev_kfree_skb(skb,FREE_WRITE); -+ return -EINVAL; -+ } -+ *(unsigned long *) skb->data = htonl(*(unsigned long *) -+ skb->data); -+ /* correct byte order of an AAL0 header */ -+ } -+ -+submitted++; -+ skb->atm.vcc = vcc; -+ -+ return do_tx(skb); -+} -+ -+/* Scatter/Gather send, build vector and send from user space -+ * not yet implemented -+ */ -+static int tneta1570_sg_send(struct atm_vcc *vcc,unsigned long start, -+ unsigned long size) -+{ -+ return vcc->aal == ATM_AAL5 && !((start | size) & 3); -+ /* don't tolerate misalignment */ -+} -+ -+ -+static void tneta1570_phy_put(struct atm_dev *dev,unsigned char value, -+ unsigned long addr) -+{ -+ TNETA1570_DEV(dev)->phy[addr] = value; -+} -+ -+ -+ -+static unsigned char tneta1570_phy_get(struct atm_dev *dev,unsigned long addr) -+{ -+ volatile unsigned tmp; /* force 32 bit access */ -+ -+ /* set address */ -+ TNETA1570_DEV(dev)->phy[addr+TNETA_SUNI_RDREQ]=0; -+ /* read the bugger */ -+ tmp=TNETA1570_DEV(dev)->phy[addr]; -+ -+ return (unsigned char)(0xff & tmp); -+} -+ -+ -+static struct atmdev_ops ops = { -+ tneta1570_open, -+ tneta1570_close, -+ tneta1570_ioctl, -+ tneta1570_getsockopt, -+ tneta1570_setsockopt, -+ tneta1570_send, -+ NULL, /* no tneta1570_sg_send */ -+ NULL, /* no poll */ -+ NULL, /* no send_oam ???? */ -+ tneta1570_phy_put, -+ tneta1570_phy_get, -+ NULL /* no feedback */ -+}; -+ -+ -+int tneta1570_detect(void) -+{ -+ struct atm_dev *dev; -+ struct tneta1570_dev *tneta1570_dev; -+ int index; -+ -+ if (!pcibios_present()) { -+ printk(DEV_LABEL " driver but no PCI BIOS ?\n"); -+ return 0; -+ } -+ tneta1570_dev = (struct tneta1570_dev *) kmalloc(sizeof(struct tneta1570_dev), -+ GFP_KERNEL); -+ if (!tneta1570_dev) return -ENOMEM; -+ index = 0; -+ while (!pcibios_find_device(PCI_VENDOR_ID_TI, -+ PCI_DEVICE_ID_TI_TNETA1570, -+ index, -+ &tneta1570_dev->bus, -+ &tneta1570_dev->dev_fn)) -+ { -+ dev = atm_dev_register(DEV_LABEL,&ops,0); -+ if (!dev) break; -+ TNETA1570_DEV(dev) = tneta1570_dev; -+ -+ if (tneta1570_init(dev) || tneta1570_start(dev)) { -+ atm_dev_deregister(dev); -+ break; -+ } -+ tneta1570_dev->more = tneta1570_boards; -+ tneta1570_boards = dev; -+ index++; -+ tneta1570_dev = (struct tneta1570_dev *) kmalloc(sizeof(struct tneta1570_dev), -+ GFP_KERNEL); -+ if (!tneta1570_dev) break; -+ -+ } -+ return index; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/drivers/atm/fore200.c Thu Jul 18 20:59:50 1996 -@@ -0,0 +1,26 @@ -+/* drivers/atm/fore200.c - This is just a test, not a real driver */ -+ -+/* Written 1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+ -+ -+int fore200_detect(void) -+{ -+ struct linux_sbus *bus; -+ struct linux_sbus_device *sdev = 0; -+ -+ for_each_sbus(bus) { -+ for_each_sbusdev(sdev, bus) { -+ if (strcmp(sdev->prom_name,"FORE,sba-200") == 0) { -+ printk(KERN_NOTICE "fore200: found an SBA-200 " -+ "in slot %x,offset=%08lx,irq=%d", -+ sdev->slot,sdev->offset,sdev->irqs->pri); -+ } -+ } -+ } -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atm.h Wed Jul 17 19:41:04 1996 -@@ -0,0 +1,228 @@ -+/* atm.h - general ATM declarations */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_ATM_H -+#define _LINUX_ATM_H -+ -+/* -+ * BEGIN_xx and END_xx markers are used for automatic generation of -+ * documentation. Do not change them. -+ */ -+ -+#include -+#include -+ -+ -+/* general ATM constants */ -+#define ATM_CELL_SIZE 53 /* ATM cell size incl. header */ -+#define ATM_CELL_PAYLOAD 48 /* ATM payload size */ -+#define ATM_AAL0_SDU 52 /* AAL0 SDU size */ -+#define ATM_MAX_AAL34_PDU 65535 /* maximum AAL3/4 PDU payload */ -+#define ATM_AAL5_TRAILER 8 /* AAL5 trailer size */ -+#define ATM_MAX_AAL5_PDU 65535 /* maximum AAL5 PDU payload */ -+#define ATM_MAX_CDV 9999 /* maximum (default) CDV */ -+#define ATM_NOT_RSV_VCI 32 /* first non-reserved VCI value */ -+ -+#define ATM_MAX_VPI 255 /* maximum VPI at the UNI */ -+#define ATM_MAX_VPI_NNI 4096 /* maximum VPI at the NNI */ -+#define ATM_MAX_VCI 65535 /* maximum VCI */ -+ -+/* -+ * The following items should be added to sys/socket.h aka linux/socket.h -+ */ -+ -+/* address families */ -+#define AF_ATMPVC 6 /* ATM PVCs */ -+#define AF_ATMSVC 7 /* ATM SVCs */ -+ -+/* "protcol" values for the socket system call */ -+#define ATM_AAL0 0 /* "raw" ATM cells */ -+#define ATM_AAL1 1 /* AAL1 (CBR) */ -+#define ATM_AAL2 2 /* AAL2 (VBR) */ -+#define ATM_AAL34 3 /* AAL3/4 (data) */ -+#define ATM_AAL5 5 /* AAL5 (data) */ -+#define ATM_SAAL 12 /* signaling AAL */ -+ -+/* -+ * UGLY - there should only be one protocol family (PF_ATM) for both -+ * address families. A quick glance at some kernel internals seems to -+ * suggest to me that doing it the "right" way might involve some -+ * swimming against the stream ... -+ */ -+ -+/* protocol families */ -+#define PF_ATMPVC AF_ATMPVC -+#define PF_ATMSVC AF_ATMSVC -+ -+/* layers for getsockopt/setsockopt */ -+#define SOL_ATM 2 -+#define SOL_AAL 3 -+ -+/* -+ * ATM layer (values used for flags must be 2^n, non-flag values should use -+ * the remaining values) -+ */ -+ -+#define SO_SETCLP 1 /* set CLP bit value - TODO */ -+#define SO_CIRANGE 3 /* connection identifier range; -+ socket must be bound or connected */ -+#define SO_ATMQOS 5 /* Quality of Service setting */ -+ -+/* AAL layer */ -+#define SO_AALTYPE 0 /* AAL type, get only */ -+ -+/* socket layer */ -+#define SO_BCTXOPT 16 /* not ATM specific - should go */ -+#define SO_BCRXOPT 17 /* somewhere else */ -+ -+ -+/* for SO_BCTXOPT and SO_BCRXOPT */ -+ -+struct atm_buffconst { -+ unsigned long buf_fac; /* buffer alignment factor */ -+ unsigned long buf_off; /* buffer alignment offset */ -+ unsigned long size_fac; /* buffer size factor */ -+ unsigned long size_off; /* buffer size offset */ -+ unsigned long min_size; /* minimum size */ -+ unsigned long max_size; /* maximum size, 0 = unlimited */ -+}; -+ -+ -+/* ATM cell header (for AAL0) */ -+ -+/* BEGIN_CH */ -+#define ATM_HDR_GFC_MASK 0xf0000000 -+#define ATM_HDR_GFC_SHIFT 28 -+#define ATM_HDR_VPI_MASK 0x0ff00000 -+#define ATM_HDR_VPI_SHIFT 20 -+#define ATM_HDR_VCI_MASK 0x000ffff0 -+#define ATM_HDR_VCI_SHIFT 4 -+#define ATM_HDR_PTI_MASK 0x0000000e -+#define ATM_HDR_PTI_SHIFT 1 -+#define ATM_HDR_CLP 0x00000001 -+/* END_CH */ -+ -+ -+/* PTI codings */ -+ -+/* BEGIN_PTI */ -+#define ATM_PTI_US0 0 /* user data cell, congestion not exp, SDU-type 0 */ -+#define ATM_PTI_US1 1 /* user data cell, congestion not exp, SDU-type 1 */ -+#define ATM_PTI_UCES0 2 /* user data cell, cong. experienced, SDU-type 0 */ -+#define ATM_PTI_UCES1 3 /* user data cell, cong. experienced, SDU-type 1 */ -+#define ATM_PTI_SEGF5 4 /* segment OAM F5 flow related cell */ -+#define ATM_PTI_E2EF5 5 /* end-to-end OAM F5 flow related cell */ -+#define ATM_PTI_RSV_RM 6 /* reserved for traffic control/resource mgmt */ -+#define ATM_PTI_RSV 7 /* reserved */ -+/* END_PTI */ -+ -+ -+/* -+ * The following items should stay in linux/atm.h, which should be linked to -+ * netatm/atm.h -+ */ -+ -+/* Traffic description */ -+ -+#define ATM_NONE 0 /* no traffic */ -+#define ATM_UBR 1 -+#define ATM_CBR 2 -+#define ATM_VBR 3 -+#define ATM_ABR 4 -+#define ATM_ANYCLASS 5 /* compatible with everything */ -+ -+#define ATM_MAX_PCR -1 /* maximum available PCR */ -+ -+struct atm_trafprm { -+ unsigned char class; /* traffic class (ATM_UBR, ...) */ -+ int max_pcr; /* maximum PCR in cells per second */ -+ int min_pcr; /* minimum PCR in cells per second */ -+ int max_cdv; /* maximum CDV in microseconds */ -+ int max_sdu; /* maximum SDU in bytes */ -+}; -+ -+struct atm_qos { -+ struct atm_trafprm txtp; /* parameters in TX direction */ -+ struct atm_trafprm rxtp; /* parameters in RX direction */ -+}; -+ -+/* PVC addressing */ -+ -+#define ATM_ITF_ANY -1 /* "magic" PVC address values */ -+#define ATM_VPI_ANY -1 -+#define ATM_VCI_ANY -1 -+#define ATM_VPI_UNSPEC -2 -+#define ATM_VCI_UNSPEC -2 -+ -+ -+struct sockaddr_atmpvc { -+ unsigned short sap_family; /* address family, AF_ATMPVC */ -+ struct { /* PVC address */ -+ short itf; /* ATM interface */ -+ short vpi; /* VPI (only 8 bits at UNI) */ -+ int vci; /* VCI (only 16 bits at UNI) */ -+ } sap_addr; /* PVC address */ -+ struct atm_trafprm sap_txtp; /* TX traffic parameters */ -+ struct atm_trafprm sap_rxtp; /* RX traffic parameters */ -+}; -+ -+/* SVC addressing */ -+ -+#define ATM_ESA_LEN 20 /* ATM End System Address length */ -+#define ATM_E164_LEN 12 /* maximum E.164 number length */ -+ -+#define ATM_MAX_BLLI 16 /* maximum number of BLLI elements */ -+ -+#define ATM_AFI_DCC 0x39 /* DCC ATM Format */ -+#define ATM_AFI_ICD 0x47 /* ICD ATM Format */ -+#define ATM_AFI_E164 0x45 /* E.164 ATM Format */ -+ -+struct sockaddr_atmsvc { -+ unsigned short sas_family; /* address family, AF_ATMSVC */ -+ struct { /* SVC address */ -+ unsigned char prv[ATM_ESA_LEN];/* private ATM address */ -+ char pub[ATM_E164_LEN+1]; /* public address (E.164) */ -+ /* unused addresses must be bzero'ed */ -+ struct atm_blli *blli; /* local SAP, low-layer information */ -+ struct atm_bhli bhli; /* local SAP, high-layer information */ -+ } sas_addr; /* SVC address */ -+ struct atm_trafprm sas_txtp; /* TX traffic parameters */ -+ struct atm_trafprm sas_rxtp; /* RX traffic parameters */ -+}; -+ -+ -+/* -+ * Some stuff for linux/sockios.h -+ */ -+ -+struct atmif_sioc { -+ int number; -+ int length; -+ void *arg; -+}; -+ -+ -+#define SIOCSIFATMTCP _IO('a',ATMIOC_ITF) /* set ATMTCP mode */ -+ -+/* -+ * The following ioctls are obsolete and will be removed in a later release -+ */ -+ -+#define SIOCGIFATMADDR _IOR('a',ATMIOC_ITF+1,struct atmif_sioc) -+ /* get local ATM address */ -+#define SIOCSIFATMADDR _IOR('a',ATMIOC_ITF+2,struct atmif_sioc) -+ /* set local ATM address */ -+ -+#ifdef __KERNEL__ -+ -+#include /* struct net_proto */ -+ -+ -+void atmpvc_proto_init(struct net_proto *pro); -+void atmsvc_proto_init(struct net_proto *pro); -+ -+#endif /* __KERNEL__ */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmclip.h Fri Jul 19 15:10:11 1996 -@@ -0,0 +1,37 @@ -+/* atmclip.h - Classical IP over ATM */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef LINUX_ATMCLIP_H -+#define LINUX_ATMCLIP_H -+ -+#include -+#include -+ -+ -+#define CLIP_NULENCAP SIOCDEVPRIVATE /* set NULL encapsulation */ -+#define CLIP_LLCENCAP (SIOCDEVPRIVATE+1) /* set LLC/SNAP encap. */ -+ -+ -+#define RFC1483LLC_LEN 8 /* LLC+OUI+PID = 8 */ -+#define RFC1626_MTU 9180 /* RFC1626 default MTU */ -+ -+#define CLIP_DEFAULT_IDLETIMER 1200 /* 20 minutes, see RFC1755 */ -+#define CLIP_CHECK_INTERVAL 10 /* check every ten seconds */ -+ -+#define SIOCMKCLIP _IO('a',ATMIOC_CLIP) /* create IP interface */ -+#define CLIP_PVC _IO('a',ATMIOC_CLIP+4) /* IP itf becomes CLIP itf */ -+ -+#ifdef __KERNEL__ -+ -+#include -+#include -+#include -+ -+ -+int atm_init_clip(struct atm_vcc *vcc); -+ -+#endif /* __KERNEL__ */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmdev.h Fri Jul 19 15:07:27 1996 -@@ -0,0 +1,242 @@ -+/* atmdev.h - ATM device driver declarations */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef LINUX_ATMDEV_H -+#define LINUX_ATMDEV_H -+ -+ -+#include -+#include -+#include -+ -+ -+#define MAX_ATM_ITF 10 /* for now, should be lowered */ -+#define MAX_ATM_VCC 128 /* for now, should be dynamic */ -+ -+#define ESI_LEN 6 -+ -+#define ATM_OC3_PCR (155520000/270*260/8/53) -+ /* OC3 link rate: 155520000 bps -+ SONET overhead: /270*260 (9 section, 1 path) -+ bits per cell: /8/53 -+ max cell rate: 353207.547 cells/sec */ -+ -+#define ATM_SD(s) ((struct atm_vcc *) ((s)->data)) -+ -+ -+struct atm_aal_stats { -+ long tx,tx_err; /* TX okay and errors */ -+ long rx,rx_err; /* RX okay and errors */ -+ long rx_drop; /* RX out of memory */ -+}; -+ -+ -+struct atm_dev_stats { -+ struct atm_aal_stats aal0; -+ struct atm_aal_stats aal34; -+ struct atm_aal_stats aal5; -+}; -+ -+ -+#define ATM_GETNAMES _IOW('a',ATMIOC_ITF+3,struct atm_iobuf) -+ /* get interface names (numbers) */ -+#define ATM_GETTYPE _IOW('a',ATMIOC_ITF+4,struct atmif_sioc) -+ /* get interface type name */ -+#define ATM_GETESI _IOW('a',ATMIOC_ITF+5,struct atmif_sioc) -+ /* get interface ESI */ -+#define ATM_GETADDR _IOW('a',ATMIOC_ITF+6,struct atmif_sioc) -+ /* get itf's local ATM addr. list */ -+#define ATM_RSTADDR _IOW('a',ATMIOC_ITF+7,struct atmif_sioc) -+ /* reset itf's ATM address list */ -+#define ATM_ADDADDR _IOW('a',ATMIOC_ITF+8,struct atmif_sioc) -+ /* add a local ATM address */ -+#define ATM_DELADDR _IOW('a',ATMIOC_ITF+9,struct atmif_sioc) -+ /* remove a local ATM address */ -+#define ATM_GETCIRANGE _IOW('a',ATMIOC_ITF+10,struct atmif_sioc) -+ /* get connection identifier range */ -+#define ATM_SETCIRANGE _IOW('a',ATMIOC_ITF+11,struct atmif_sioc) -+ /* set connection identifier range */ -+#define ATM_GETSTAT _IOW('a',ATMIOC_SARCOM+0,struct atmif_sioc) -+ /* get AAL layer statistics */ -+#define ATM_GETSTATZ _IOW('a',ATMIOC_SARCOM+1,struct atmif_sioc) -+ /* get AAL layer statistics and zero */ -+ -+/* for ATM_GETTYPE */ -+#define ATM_ITFTYP_LEN 8 /* maximum length of interface type name */ -+ -+ -+ -+struct atm_iobuf { -+ int length; -+ void *buffer; -+}; -+ -+/* for ATM_GETCIRANGE / ATM_SETCIRANGE */ -+ -+#define ATM_CI_MAX -1 /* use maximum range of VPI/VCI */ -+ -+struct atm_cirange { -+ char vpi_bits; /* 1..8, ATM_CI_MAX (-1) for maximum */ -+ char vci_bits; /* 1..16, ATM_CI_MAX (-1) for maximum */ -+}; -+ -+ -+#define ATM_BACKLOG_DEFAULT 32 /* if we get more, we're likely to time out -+ anyway */ -+ -+#ifdef __KERNEL__ -+ -+#include /* struct wait_queue */ -+#include /* struct timeval */ -+#include -+#include /* struct sk_buff */ -+#include -+ -+#ifdef CONFIG_AREQUIPA -+#include /* for struct sock */ -+#endif -+ -+ -+#define ATM_VF_ADDR 1 /* Address is in use. Set by anybody, cleared -+ by device driver. */ -+#define ATM_VF_READY 2 /* VC is ready to transfer data. Set by device -+ driver, cleared by anybody. */ -+#define ATM_VF_PARTIAL 4 /* resources are bound to PVC (partial PVC -+ setup), controlled by socket layer */ -+#define ATM_VF_BOUND 4 /* local SAP is set, controlled by SVC socket -+ layer */ -+#define ATM_VF_REGIS 8 /* registered with demon, controlled by SVC -+ socket layer */ -+#define ATM_VF_RELEASED 16 /* demon has indicated/requested release, -+ controlled by SVC socket layer */ -+#define ATM_VF_HASQOS 32 /* QOS parameters have been set using the -+ new API */ -+#define ATM_VF_LISTEN 64 /* socket is used for listening */ -+#define ATM_VF_META 128 /* SVC socket isn't used for normal data -+ traffic and doesn't depend on signaling -+ to be available */ -+ -+struct atm_vcc { -+ unsigned short flags; /* VCC flags (ATM_VF_*) */ -+ unsigned char family; /* address family; 0 if unused */ -+ unsigned char aal; /* ATM Adaption Layer */ -+ short vpi; /* VPI and VCI (types must be equal */ -+ /* with sockaddr) */ -+ int vci; -+ unsigned long aal_options; /* AAL layer options */ -+ unsigned long atm_options; /* ATM layer options */ -+ struct atm_dev *dev; /* device back pointer */ -+ struct atm_trafprm txtp,rxtp; /* traffic parameters */ -+ struct atm_qos qos; /* QOS - only valid if ATM_VF_HASQOS */ -+ unsigned long tx_quota,rx_quota; /* buffer quotas */ -+ unsigned long tx_inuse,rx_inuse; /* buffer space in use */ -+ void (*push)(struct atm_vcc *vcc,struct sk_buff *skb); -+ void (*pop)(struct atm_vcc *vcc,struct sk_buff *skb); /* optional */ -+ struct sk_buff *(*peek)(struct atm_vcc *vcc,unsigned long pdu_size, -+ __u32 (*fetch)(struct atm_vcc *vcc,int i)); -+ /* super-efficient xfers; note that */ -+ /* PDU_SIZE may be rounded */ -+ struct sk_buff *(*alloc_tx)(struct atm_vcc *vcc,unsigned int size); -+ /* TX allocation routine - can be */ -+ /* modified by protocol or by driver.*/ -+ /* NOTE: this interface will change */ -+ int (*push_oam)(struct atm_vcc *vcc,void *cell); -+ void *dev_data; /* per-device data */ -+ void *proto_data; /* per-protocol data */ -+ struct timeval timestamp; /* AAL timestamps */ -+ struct sk_buff_head recvq; /* receive queue */ -+ struct atm_aal_stats *stats; /* pointer to AAL stats group */ -+ struct wait_queue *sleep; /* if socket is busy */ -+ struct atm_vcc *prev,*next; -+ /* SVC part --- may move later */ -+ short itf; /* interface number */ -+ struct sockaddr_atmsvc local; -+ struct sockaddr_atmsvc remote; -+ void (*callback)(struct atm_vcc *vcc); -+ struct sk_buff_head listenq; -+ int backlog_quota; /* number of connection requests we */ -+ /* can still accept */ -+ int reply; -+ void *user_back; /* user backlink - not touched */ -+#ifdef CONFIG_AREQUIPA -+ struct sock *upper; /* our "master" */ -+ struct socket *sock; /* back pointer to our own socket */ -+#endif -+}; -+ -+ -+struct atm_dev_addr { -+ struct sockaddr_atmsvc addr; /* ATM address */ -+ struct atm_dev_addr *next; /* next address */ -+}; -+ -+ -+struct atm_dev { -+ const struct atmdev_ops *ops; /* device operations; NULL if unused */ -+ const struct atmphy_ops *phy; /* PHY operations, may be undefined */ -+ /* (NULL) */ -+ const char *type; /* device type name */ -+ int number; /* device index */ -+ struct atm_vcc *vccs; /* VCC table (or NULL) */ -+ struct atm_vcc *last; /* last VCC (or undefined) */ -+ void *dev_data; /* per-device data */ -+ void *phy_data; /* private PHY date */ -+ unsigned long flags; /* device flags, TBD */ -+ struct atm_dev_addr *local; /* local ATM addresses */ -+ unsigned char esi[ESI_LEN]; /* ESI ("MAC" addr) */ -+ struct atm_cirange ci_range; /* VPI/VCI range */ -+ struct atm_dev_stats stats; /* statistics */ -+/* */ int sending; -+}; -+ -+ -+/* -+ * ioctl, getsockopt, setsockopt, sg_send, and poll are optional and can -+ * be set to NULL. -+ */ -+ -+#define ATM_OF_IMMED 1 /* Attempt immediate delivery */ -+#define ATM_OF_INRATE 2 /* Attempt in-rate delivery */ -+ -+struct atmdev_ops { /* only send is required */ -+ int (*open)(struct atm_vcc *vcc,short vpi,int vci); -+ void (*close)(struct atm_vcc *vcc); -+ int (*ioctl)(struct atm_dev *dev,unsigned int cmd,unsigned long arg); -+ int (*getsockopt)(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int *optlen); -+ int (*setsockopt)(struct atm_vcc *vcc,int level,int optname, -+ char *optval,int optlen); -+ int (*send)(struct atm_vcc *vcc,struct sk_buff *skb); -+ int (*sg_send)(struct atm_vcc *vcc,unsigned long start, -+ unsigned long size); -+#if 0 /* keep the current hack for now */ -+ int (*send_iovec)(struct atm_vcc *vcc,struct iovec *iov,int size, -+ void (*discard)(struct atm_vcc *vcc,void *user),void *user); -+#endif -+ void (*poll)(struct atm_vcc *vcc,int nonblock); -+ int (*send_oam)(struct atm_vcc *vcc,void *cell,int flags); -+ void (*phy_put)(struct atm_dev *dev,unsigned char value, -+ unsigned long addr); -+ unsigned char (*phy_get)(struct atm_dev *dev,unsigned long addr); -+ void (*feedback)(struct atm_vcc *vcc,struct sk_buff *skb, -+ unsigned long start,unsigned long dest,int len); -+}; -+ -+ -+struct atmphy_ops { -+ int (*start)(struct atm_dev *dev); -+ int (*ioctl)(struct atm_dev *dev,unsigned int cmd,unsigned long arg); -+ void (*interrupt)(struct atm_dev *dev); -+}; -+ -+ -+struct atm_dev *atm_dev_register(const char *type,const struct atmdev_ops *ops, -+ unsigned long flags); -+void atm_dev_deregister(struct atm_dev *dev); -+int atm_find_ci(struct atm_vcc *vcc,short *vpi,int *vci); -+ -+#endif /* __KERNEL__ */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmsap.h Mon Jun 10 17:36:14 1996 -@@ -0,0 +1,129 @@ -+/* atmsap.h - ATM Service Access Point addressing definitions */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_ATMSAP_H -+#define _LINUX_ATMSAP_H -+ -+/* -+ * BEGIN_xx and END_xx markers are used for automatic generation of -+ * documentation. Do not change them. -+ */ -+ -+ -+/* -+ * Layer 2 protocol identifiers -+ */ -+ -+/* BEGIN_L2 */ -+#define ATM_L2_NONE 0 /* L2 not specified */ -+#define ATM_L2_ISO1745 0x01 /* Basic mode ISO 1745 */ -+#define ATM_L2_Q291 0x02 /* ITU-T Q.291 */ -+#define ATM_L2_X25_LL 0x06 /* ITU-T X.25, link layer */ -+#define ATM_L2_X25_ML 0x07 /* ITU-T X.25, multilink */ -+#define ATM_L2_LAPB 0x08 /* Extended LAPB, half-duplex */ -+#define ATM_L2_HDLC_ARM 0x09 /* HDLC ARM (ISO 4335) */ -+#define ATM_L2_HDLC_NRM 0x0a /* HDLC NRM (ISO 4335) */ -+#define ATM_L2_HDLC_ABM 0x0b /* HDLC ABM (ISO 4335) */ -+#define ATM_L2_ISO8802 0x0c /* LAN LLC (ISO 8802/2) */ -+#define ATM_L2_X75 0x0d /* ITU-T X.75, SLP */ -+#define ATM_L2_Q922 0x0e /* ITU-T Q.922 */ -+#define ATM_L2_USER 0x10 /* user-specified */ -+#define ATM_L2_ISO7776 0x11 /* ISO 7776 DTE-DTE */ -+/* END_L2 */ -+ -+ -+/* -+ * Layer 3 protocol identifiers -+ */ -+ -+/* BEGIN_L3 */ -+#define ATM_L3_NONE 0 /* L3 not specified */ -+#define ATM_L3_X25 0x06 /* ITU-T X.25, packet layer */ -+#define ATM_L3_ISO8208 0x07 /* ISO/IEC 8208 */ -+#define ATM_L3_X223 0x08 /* ITU-T X.223/ISO 8878 */ -+#define ATM_L3_ISO8473 0x09 /* ISO/IEC 8473 */ -+#define ATM_L3_T70 0x0a /* ITU-T T.70 minimum network layer */ -+#define ATM_L3_TR9577 0x0b /* ISO/IEC TR 9577 */ -+#define ATM_L3_USER 0x10 /* user-specified */ -+/* END_L3 */ -+ -+ -+/* -+ * High layer identifiers -+ */ -+ -+/* BEGIN_HL */ -+#define ATM_HL_NONE 0 /* HL not specified */ -+#define ATM_HL_ISO 0x01 /* ISO */ -+#define ATM_HL_USER 0x02 /* user-specific */ -+#if defined(UNI30) || defined(ALLOW_UNI30) -+#define ATM_HL_HLP 0x03 /* high layer profile - UNI 3.0 only */ -+#endif -+#define ATM_HL_VENDOR 0x04 /* vendor-specific application identifier */ -+/* END_HL */ -+ -+ -+/* -+ * ITU-T coded mode of operation -+ */ -+ -+/* BEGIN_IMD */ -+#define ATM_IMD_NONE 0 /* mode not specified */ -+#define ATM_IMD_NORMAL 1 /* normal mode of operation */ -+#define ATM_IMD_EXTENDED 2 /* extended mode of operation */ -+/* END_IMD */ -+ -+/* -+ * Selected ISO/IEC TR 9577 Network Layer Protocol Identifiers (NLPID) -+ */ -+ -+#define NLPID_IEEE802_1_SNAP 0x80 /* IEEE 802.1 SNAP */ -+ -+/* -+ * SAP structures -+ */ -+ -+#define ATM_MAX_HLI 7 /* maximum high-layer information length */ -+ -+ -+struct atm_blli { -+ unsigned char l2_proto; /* layer 2 protocol */ -+ union { -+ struct { -+ unsigned char mode; /* mode of operation (ATM_IMD_xxx), 0 if */ -+ /* absent */ -+ unsigned char window; /* window size (k), 1-127 (0 to omit) */ -+ } itu; /* ITU-T encoding */ -+ unsigned char user; /* user-specified l2 information */ -+ } l2; -+ unsigned char l3_proto; /* layer 3 protocol */ -+ union { -+ struct { -+ unsigned char mode; /* mode of operation (ATM_IMD_xxx), 0 if */ -+ /* absent */ -+ unsigned char def_size; /* default packet size (log2), 4-12 (0 to */ -+ /* omit) */ -+ unsigned char window;/* packet window size, 1-127 (0 to omit) */ -+ } itu; /* ITU-T ecoding */ -+ unsigned char user; /* user specified l3 information */ -+ struct { /* if l3_proto = ATM_L3_TR9577 */ -+ unsigned char ipi; /* initial protocol id */ -+ unsigned char snap[5];/* IEEE 802.1 SNAP identifier */ -+ /* (only if ipi == NLPID_IEEE802_1_SNAP) */ -+ } tr9577; -+ } l3; -+ struct atm_blli *next; /* next BLLI or NULL (undefined when used in */ -+ /* atmsvc_msg) */ -+}; -+ -+ -+struct atm_bhli { -+ unsigned char hl_type; /* high layer information type */ -+ unsigned char hl_length; /* length (only if hl_type == ATM_HL_USER || */ -+ /* hl_type == ATM_HL_ISO) */ -+ unsigned char hl_info[ATM_MAX_HLI];/* high layer information */ -+}; -+ -+#endif ---- ref/include/linux/skbuff.h Sun Jun 9 11:23:42 1996 -+++ work/include/linux/skbuff.h Wed Jul 17 19:41:04 1996 -@@ -112,6 +112,16 @@ - unsigned char *end; /* End pointer */ - void (*destructor)(struct sk_buff *); /* Destruct function */ - __u16 redirport; /* Redirect port */ -+#ifdef CONFIG_ATM -+ struct { -+ int size; /* PDU size (adapter too) */ -+ unsigned long pos; /* adapter data */ -+ struct atm_vcc *vcc; /* ATM VCC */ -+ int iovcnt; /* 0 for "normal" operation */ -+ struct timeval timestamp; /* timestamp or 0 */ -+ } atm; -+#endif -+ - }; - - #ifdef CONFIG_SKB_LARGE ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/sonet.h Mon Jun 10 17:36:15 1996 -@@ -0,0 +1,52 @@ -+/* sonet.h - SONET/SHD physical layer control */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef LINUX_SONET_H -+#define LINUX_SONET_H -+ -+struct sonet_stats { -+ long section_bip; /* section parity errors (B1) */ -+ long line_bip; /* line parity errors (B2) */ -+ long path_bip; /* path parity errors (B3) */ -+ long line_febe; /* line parity errors at remote */ -+ long path_febe; /* path parity errors at remote */ -+ long corr_hcs; /* correctable header errors */ -+ long uncorr_hcs; /* uncorrectable header errors */ -+ long tx_cells; /* cells sent */ -+ long rx_cells; /* cells received */ -+}; -+ -+#define SONET_GETSTAT _IOR('a',ATMIOC_PHYTYP,struct sonet_stats) -+ /* get statistics */ -+#define SONET_GETSTATZ _IOR('a',ATMIOC_PHYTYP+1,struct sonet_stats) -+ /* ... and zero counters */ -+#define SONET_SETDIAG _IOWR('a',ATMIOC_PHYTYP+2,int) -+ /* set error insertion */ -+#define SONET_CLRDIAG _IOWR('a',ATMIOC_PHYTYP+3,int) -+ /* clear error insertion */ -+#define SONET_GETDIAG _IOR('a',ATMIOC_PHYTYP+4,int) -+ /* query error insertion */ -+#define SONET_SETFRAMING _IO('a',ATMIOC_PHYTYP+5) -+ /* set framing mode (SONET/SDH) */ -+#define SONET_GETFRAMING _IOR('a',ATMIOC_PHYTYP+6,int) -+ /* get framing mode */ -+#define SONET_GETFRSENSE _IOR('a',ATMIOC_PHYTYP+7, \ -+ unsigned char[SONET_FRSENSE_SIZE]) /* get framing sense information */ -+ -+#define SONET_INS_SBIP 1 /* section BIP */ -+#define SONET_INS_LBIP 2 /* line BIP */ -+#define SONET_INS_PBIP 4 /* path BIP */ -+#define SONET_INS_FRAME 8 /* out of frame */ -+#define SONET_INS_LOS 16 /* set line to zero */ -+#define SONET_INS_LAIS 32 /* line alarm indication signal */ -+#define SONET_INS_PAIS 64 /* path alarm indication signal */ -+#define SONET_INS_HCS 128 /* insert HCS error */ -+ -+#define SONET_FRAME_SONET 0 /* SONET STS-3 framing */ -+#define SONET_FRAME_SDH 1 /* SDH STM-1 framing */ -+ -+#define SONET_FRSENSE_SIZE 6 /* C1[3],H1[3] (0xff for unknown) */ -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmsvc.h Fri Jul 19 14:04:50 1996 -@@ -0,0 +1,76 @@ -+/* atmsvc.h - ATM signaling kernel-demon interface definitions */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_ATMSVC_H -+#define _LINUX_ATMSVC_H -+ -+#include -+#include -+ -+ -+#define ATMSIGD_CTRL _IO('a',ATMIOC_SPECIAL) -+ /* become ATM signaling demon control socket */ -+ -+enum atmsvc_msg_type { as_catch_null,as_bind,as_establish,as_listen,as_okay, -+ as_indicate,as_close,as_itf_notify }; -+ -+struct atmsvc_msg { -+ enum atmsvc_msg_type type; -+ unsigned long vcc; -+ unsigned long listen_vcc; /* indicate */ -+ int reply; /* for okay and close: -+ * < 0: error before active -+ * (sigd has discarded ctx) -+ * ==0: success -+ * > 0: error when active (still need -+ * to close) -+ */ -+ unsigned char aal; /* AAL */ -+ struct sockaddr_atmpvc pvc; /* indicate, okay (connect) */ -+ struct sockaddr_atmsvc local; /* local SVC address */ -+ struct sockaddr_atmsvc svc; /* MUST BE BEFORE "blli", SVC address */ -+ struct atm_blli blli[1]; /* MUST BE LAST */ -+}; -+ -+/* -+ * Message contents: -+ * -+ * Message Dir vcc listen_vcc reply aal pvc --svc-- local -+ * addr *xtp addr sap *xtp addr -+ * bind K->D X - - - - - X X - - -+ * - okay D->K X - - - - - X X - - -+ * establish K->D X - - X - - X X X X -+ * - okay D->K X - - - X X - - - X -+ * listen K->D X - - X - - X X X - -+ * - okay D->K X - - - - - - - - - -+ * indicate D->K - X - - X 2 X X X - -+ * accept1 K->D X X - - - - - - - - -+ * - okay D->K X - - - - - - - - X -+ * close K->D X - - - - - - - - - -+ * close D->K X - X - - - - - - - -+ * -+ * 1 (establish) -+ * 2 same value as in svc.*xtp -+ * -+ * Note: we may have to get rid of the PVC part in indicate messages later, -+ * so it's a good idea not to depend on it too heavily. -+ */ -+ -+/* -+ * In an as_itf_update message, only the fields type and pvc.sas_addr.itf are -+ * valid. -+ */ -+ -+/* -+ * Some policy stuff for atmsigd and for net/atm/svc.c. Both have to agree on -+ * what PCR is used to request bandwidth from the device driver. net/atm/svc.c -+ * tries to do better than that, but only if there's no routing decision (i.e. -+ * if signaling only uses one ATM interface). -+ */ -+ -+#define SELECT_TOP_PCR(tp) ((tp).max_pcr && (tp).max_pcr != ATM_MAX_PCR ? \ -+ (tp).max_pcr : (tp).min_pcr) -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmioc.h Mon Jun 10 17:36:16 1996 -@@ -0,0 +1,32 @@ -+/* atmioc.h - ranges for ATM-related ioctl numbers */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_ATMIOC_H -+#define _LINUX_ATMIOC_H -+ -+#include -+ /* everybody including atmioc.h will also need _IO{,R,W,WR} */ -+ -+#define ATMIOC_PHYCOM 0x00 /* PHY device common ioctls, globally unique */ -+#define ATMIOC_PHYCOM_END 0x0f -+#define ATMIOC_PHYTYP 0x10 /* PHY dev type ioctls, unique per PHY type */ -+#define ATMIOC_PHYTYP_END 0x2f -+#define ATMIOC_PHYPRV 0x30 /* PHY dev private ioctls, unique per driver */ -+#define ATMIOC_PHYPRV_END 0x4f -+#define ATMIOC_SARCOM 0x50 /* SAR device common ioctls, globally unique */ -+#define ATMIOC_SARCOM_END 0x50 -+#define ATMIOC_SARPRV 0x60 /* SAR dev private ioctls, unique per driver */ -+#define ATMIOC_SARPRV_END 0x7f -+#define ATMIOC_ITF 0x80 /* Interface ioctls, globally unique */ -+#define ATMIOC_ITF_END 0x8f -+/* 0x90-0xbf: Reserved for future use */ -+#define ATMIOC_AREQUIPA 0xc0 /* Application requested IP over ATM, glob. u. */ -+#define ATMIOC_LANE 0xd0 /* LAN Emulation, globally unique */ -+#define ATMIOC_CLIP 0xe0 /* Classical IP over ATM control, globally u. */ -+#define ATMIOC_CLIP_END 0xef -+#define ATMIOC_SPECIAL 0xf0 /* Special-purpose controls, globally unique */ -+#define ATMIOC_SPECIAL_END 0xff -+ -+#endif ---- ref/net/Makefile Thu May 16 15:35:55 1996 -+++ work/net/Makefile Mon Jun 10 17:50:26 1996 -@@ -8,12 +8,17 @@ - # Note 2! The CFLAGS definition is now in the main makefile... - - MOD_SUB_DIRS := ipv4 --ALL_SUB_DIRS := 802 ax25 bridge core ethernet ipv4 ipx unix appletalk netrom #decnet -+ALL_SUB_DIRS := 802 atm ax25 bridge core ethernet ipv4 ipx unix appletalk \ -+ netrom #decnet - SUB_DIRS := core ethernet unix - MOD_LIST_NAME := NET_MISC_MODULES - - ifeq ($(CONFIG_NET),y) - SUB_DIRS += 802 -+endif -+ -+ifeq ($(CONFIG_ATM),y) -+SUB_DIRS += atm - endif - - ifeq ($(CONFIG_INET),y) ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/Makefile Wed Jul 17 19:31:55 1996 -@@ -0,0 +1,54 @@ -+# -+# Makefile for the ATM Protocol Families. -+# -+# Note! Dependencies are done automagically by 'make dep', which also -+# removes any old dependencies. DON'T put your own dependencies here -+# unless it's something special (ie not a .c file). -+# -+# Note 2! The CFLAGS definition is now in the main makefile... -+ -+include ../../.config -+ -+CFLAGS += -g -+ -+ifeq ($(CONFIG_ATM),y) -+ -+OBJS = common.o dev.o mmuio.o pvc.o raw.o signaling.o static.o svc.o -+ -+ifeq ($(CONFIG_ATM_ATMARP),y) -+OBJS += atmarp.o -+NEED_IPCOM = ipcommon.o -+endif -+ -+ifeq ($(CONFIG_ATM_CLIP),y) -+OBJS += clip.o -+NEED_IPCOM = ipcommon.o -+endif -+ -+ifeq ($(CONFIG_AREQUIPA),y) -+OBJS += arequipa.o -+NEED_IPCOM = ipcommon.o -+endif -+ -+OBJS += $(NEED_IPCOM) -+ -+ifeq ($(CONFIG_PROC_FS),y) -+OBJS += proc.o -+endif -+ -+ifeq ($(CONFIG_ATM_LANE),y) -+OBJS += lec.o lec_arpc.o -+endif -+ -+atm.o: $(OBJS) -+ $(LD) -r -o atm.o $(OBJS) -+ -+else -+ -+atm.o: -+ $(AR) rcs atm.o -+ -+endif -+ -+ -+include $(TOPDIR)/Rules.make ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/clip.c Wed Jul 17 18:25:56 1996 -@@ -0,0 +1,113 @@ -+/* net/atm/clip.c - Classical IP over ATM */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+ -+#include "protocols.h" -+#include "common.h" -+#include "ipcommon.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+ -+static int pvc_num = 0; -+ -+ -+/*static*/ void atm_push_clip(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ DPRINTK("clip push\n"); -+ if (!skb) { -+ printk(KERN_ALERT "ARGL!\n"); -+ unregister_netdev((struct device *) vcc->proto_data); -+ vcc->proto_data = NULL; -+ return; -+ } -+ skb->dev = vcc->proto_data; -+ ipcom_push(skb); -+} -+ -+ -+static int clip_xmit(struct sk_buff *skb,struct device *dev) -+{ -+ DPRINTK("clip xmit\n"); -+ if (!CLIP(dev)->vcc) return -ENOTCONN; /* @@@ discard skb ? */ -+ ipcom_xmit(dev,CLIP(dev)->vcc,skb); -+ CLIP(dev)->stats.tx_packets++; -+ return 0; -+} -+ -+ -+#if 0 -+static int clip_sg_xmit(struct sk_buff *skb,struct device *dev) -+{ -+/* -+struct iovec *iov; -+int i; -+ -+iov = (struct iovec *) skb->data; -+for (i = 0; i < skb->atm.iovcnt; i++) -+ printk("[%d] 0x%lx + %d\n",i,(unsigned long) iov[i].iov_base, -+ iov[i].iov_len); -+ -+ printk("clip *DIRECT* xmit (iovcnt: %d)\n",skb->atm.iovcnt); -+*/ -+ CLIP(dev)->vcc->dev->ops->send(CLIP(dev)->vcc,skb); -+ CLIP(dev)->stats.tx_packets++; -+ return 0; -+} -+#endif -+ -+ -+static int clip_init(struct device *dev) -+{ -+ ipcom_init(dev,clip_xmit,0); -+ return 0; -+} -+ -+ -+ -+int atm_init_clip(struct atm_vcc *vcc) -+{ -+ struct device *dev; -+ -+ DPRINTK("atm_init_clip\n"); -+ if (!suser()) return -EPERM; -+ vcc->aal = ATM_AAL5; -+ vcc->push = atm_push_clip; -+ vcc->peek = atm_peek_clip; -+ vcc->pop = atm_pop_clip; -+ vcc->push_oam = NULL; -+ vcc->proto_data = dev = kmalloc(sizeof(struct device)+ -+ sizeof(struct clip_priv),GFP_KERNEL); -+ if (!vcc->proto_data) return -ENOMEM; -+ memset(dev,0,sizeof(struct device)+sizeof(struct clip_priv)); -+ dev->name = CLIP(dev)->name; -+ sprintf(dev->name,"atm%d",pvc_num++); -+ dev->init = clip_init; -+ CLIP(dev)->vcc = vcc; -+ if (register_netdev(dev)) return -EIO; -+ DPRINTK("registered %s,0x%lx\n",dev->name,(unsigned long) vcc); -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/common.c Fri Jul 19 15:10:47 1996 -@@ -0,0 +1,871 @@ -+/* net/atm/common.c - ATM sockets (common part for PVC and SVC) */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include /* struct socket, struct net_proto, struct -+ proto_ops */ -+#include /* ATM stuff */ -+#include -+#include /* CLIP_*ENCAP */ -+#include /* manifest constants */ -+#include /* for ioctls */ -+#include /* SOL_SOCKET */ -+#include /* error codes */ -+#include /* suser */ -+#include /* verify_area */ -+#include -+#include /* struct timeval */ -+#include -+#include -+#include -+ -+#ifdef CONFIG_AREQUIPA -+#include -+#endif -+ -+#ifdef CONFIG_ATM_LANE -+#include -+#include "lec.h" -+#include "lec_arpc.h" -+#endif -+ -+#include "static.h" /* atm_find_dev */ -+#include "common.h" /* prototypes */ -+#include "protocols.h" /* atm_init_ */ -+#include "tunable.h" /* tunable parameters */ -+#include "atmarp.h" /* for clip_create */ -+#include "signaling.h" /* for WAITING and sigd_attach */ -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+static struct sk_buff *alloc_tx(struct atm_vcc *vcc,unsigned int size) -+{ -+ return alloc_skb(size,GFP_KERNEL); -+} -+ -+ -+int atm_create(struct socket *sock,int protocol) -+{ -+ struct atm_vcc *vcc; -+ int error; -+ -+ ATM_SD(sock) = NULL; -+ if (sock->type == SOCK_STREAM) return -EINVAL; -+ if (!(vcc = alloc_atm_vcc())) return -ENOMEM; -+#ifdef CONFIG_AREQUIPA -+ vcc->upper = NULL; -+ vcc->sock = sock; -+#endif -+ vcc->flags = 0; -+ vcc->dev = NULL; -+ vcc->family = sock->ops->family; -+ vcc->alloc_tx = alloc_tx; -+ vcc->callback = NULL; -+ memset(&vcc->local,0,sizeof(struct sockaddr_atmsvc)); -+ memset(&vcc->remote,0,sizeof(struct sockaddr_atmsvc)); -+ vcc->tx_quota = ATM_RXBQ_DEF*1024; -+ vcc->rx_quota = ATM_TXBQ_DEF*1024; -+ vcc->tx_inuse = vcc->rx_inuse = 0; -+ switch (protocol) { -+ /* -+ * Note: ATM_AAL0 also covers the "0 for default" case, -+ * although some people may not like that default ;-) -+ */ -+ case ATM_AAL0: -+ error = atm_init_aal0(vcc); -+ break; -+ case ATM_AAL34: -+ error = atm_init_aal34(vcc); -+ break; -+ case ATM_AAL5: -+ error = atm_init_aal5(vcc); -+ break; -+ default: -+ error = -EPROTOTYPE; -+ } -+ if (error) { -+ free_atm_vcc(vcc); -+ return error; -+ } -+ vcc->vpi = vcc->vci = 0; /* no VCI/VPI yet */ -+ vcc->atm_options = vcc->aal_options = 0; -+ vcc->timestamp.tv_sec = vcc->timestamp.tv_usec = 0; -+ vcc->sleep = NULL; -+ skb_queue_head_init(&vcc->recvq); -+ skb_queue_head_init(&vcc->listenq); -+ ATM_SD(sock) = vcc; -+ return 0; -+} -+ -+ -+int atm_release_vcc(struct atm_vcc *vcc,int free_vcc) -+{ -+ struct sk_buff *skb; -+ -+ vcc->flags &= ~ATM_VF_READY; -+ if (vcc->dev) { -+ if (vcc->dev->ops->close) vcc->dev->ops->close(vcc); -+ if (vcc->push) vcc->push(vcc,NULL); /* atmarpd has no push */ -+ while ((skb = skb_dequeue(&vcc->recvq))) -+ kfree_skb(skb,FREE_READ); -+ if (vcc->prev) vcc->prev->next = vcc->next; -+ else vcc->dev->vccs = vcc->next; -+ if (vcc->next) vcc->next->prev = vcc->prev; -+ else vcc->dev->last = vcc->prev; -+ } -+ if (free_vcc) free_atm_vcc(vcc); -+ return 0; -+} -+ -+ -+extern void atm_push_clip(struct atm_vcc *vcc,struct sk_buff *skb); -+ -+ -+int atm_release(struct socket *sock,struct socket *peer) -+{ -+ struct atm_vcc *vcc; -+ -+ vcc = ATM_SD(sock); -+ if (!vcc -+#ifdef CONFIG_ATM_CLIP -+ || (vcc->push == atm_push_clip && (vcc->vpi || vcc->vci)) -+#endif -+ ) -+ return 0; /* ugly */ -+ return atm_release_vcc(vcc,1); -+} -+ -+ -+static int adjust_tp(struct atm_trafprm *tp,unsigned char aal) -+{ -+ if (!tp->class) return 0; -+ if (tp->class != ATM_UBR && !tp->min_pcr && !tp->max_pcr) -+ return -EINVAL; -+ if (!tp->max_sdu) -+ switch (aal) { -+ case ATM_AAL0: -+ tp->max_sdu = ATM_CELL_SIZE-1; -+ break; -+ case ATM_AAL34: -+ tp->max_sdu = ATM_MAX_AAL34_PDU; -+ break; -+ default: -+ printk(KERN_WARNING "ATM: AAL problems ... " -+ "(%d)\n",aal); -+ case ATM_AAL5: -+ tp->max_sdu = ATM_MAX_AAL5_PDU; -+ } -+ if (!tp->max_cdv) tp->max_cdv = ATM_MAX_CDV; -+ return 0; -+} -+ -+ -+static int check_ci(struct atm_vcc *vcc,short vpi,int vci) -+{ -+ struct atm_vcc *walk; -+ -+ for (walk = vcc->dev->vccs; walk; walk = walk->next) -+ if ((walk->flags & ATM_VF_ADDR) && walk->vpi == vpi && -+ walk->vci == vci && ((walk->txtp.class != ATM_NONE && -+ vcc->txtp.class != ATM_NONE) || (walk->rxtp.class != -+ ATM_NONE && vcc->rxtp.class != ATM_NONE))) -+ return -EADDRINUSE; -+ /* allow VCCs with same VPI/VCI iff they don't collide on -+ TX/RX (but we may refuse such sharing for other reasons, -+ e.g. if protocol requires to have both channels) */ -+ return 0; -+} -+ -+ -+int atm_find_ci(struct atm_vcc *vcc,short *vpi,int *vci) -+{ -+ static short p = 0; /* poor man's per-device cache */ -+ static int c = 0; -+ short old_p; -+ int old_c; -+ -+ if (*vpi != ATM_VPI_ANY && *vci != ATM_VCI_ANY) -+ return check_ci(vcc,*vpi,*vci); -+ /* last scan may have left values out of bounds for current device */ -+ if (*vpi != ATM_VPI_ANY) p = *vpi; -+ else if (p >= 1 << vcc->dev->ci_range.vpi_bits) p = 0; -+ if (*vci != ATM_VCI_ANY) c = *vci; -+ else if (c < ATM_NOT_RSV_VCI || c >= 1 << vcc->dev->ci_range.vci_bits) -+ c = ATM_NOT_RSV_VCI; -+ old_p = p; -+ old_c = c; -+ do { -+ if (!check_ci(vcc,p,c)) { -+ *vpi = p; -+ *vci = c; -+ return 0; -+ } -+ if (*vci == ATM_VCI_ANY) { -+ c++; -+ if (c >= 1 << vcc->dev->ci_range.vci_bits) -+ c = ATM_NOT_RSV_VCI; -+ } -+ if ((c == ATM_NOT_RSV_VCI || *vci != ATM_VCI_ANY) && -+ *vpi == ATM_VPI_ANY) { -+ p++; -+ if (p >= 1 << vcc->dev->ci_range.vpi_bits) p = 0; -+ } -+ } -+ while (old_p != p || old_c != c); -+ return -EADDRINUSE; -+} -+ -+ -+static int atm_do_connect(struct atm_vcc *vcc,int itf,int vpi,int vci) -+{ -+ volatile struct atm_dev *dev; /* need volatile for sequence */ -+ int error; -+ -+ if (itf >= MAX_ATM_ITF) return -EINVAL; -+ dev = &atm_dev[itf]; -+ if (!dev->ops) return -ENODEV; -+ if ((vpi != ATM_VPI_UNSPEC && vpi >> dev->ci_range.vpi_bits) || -+ (vci != ATM_VCI_UNSPEC && vci >> dev->ci_range.vci_bits)) -+ return -EINVAL; -+ if (vci > 0 && vci < ATM_NOT_RSV_VCI && !suser()) return -EPERM; -+ switch (vcc->aal) { -+ case ATM_AAL0: -+ vcc->stats = &((struct atm_dev *) dev)->stats.aal0; -+ break; -+ case ATM_AAL34: -+ vcc->stats = &((struct atm_dev *) dev)->stats.aal34; -+ break; -+ case ATM_AAL5: -+ vcc->stats = &((struct atm_dev *) dev)->stats.aal5; -+ break; -+ default: -+ printk(KERN_WARNING "%s(itf %d): unsupported AAL " -+ "(%d)\n",vcc->dev->type,vcc->dev->number,vcc->aal); -+ return -EINVAL; -+ } -+ error = adjust_tp(&vcc->txtp,vcc->aal); -+ if (!error) error = adjust_tp(&vcc->rxtp,vcc->aal); -+ if (error) return error; -+ vcc->dev = (struct atm_dev *) dev; -+ DPRINTK("VCC %d.%d, AAL %d\n",vpi,vci,vcc->aal); -+ DPRINTK(" TX: %d, PCR %d..%d, SDU %d\n",vcc->txtp.class, -+ vcc->txtp.min_pcr,vcc->txtp.max_pcr,vcc->txtp.max_sdu); -+ DPRINTK(" RX: %d, PCR %d..%d, SDU %d\n",vcc->rxtp.class, -+ vcc->rxtp.min_pcr,vcc->rxtp.max_pcr,vcc->rxtp.max_sdu); -+ if (dev->ops->open) { -+ error = dev->ops->open(vcc,vpi,vci); -+ if (error) { -+ vcc->dev = NULL; -+ return error; -+ } -+ } -+ vcc->prev = dev->last; -+ vcc->next = NULL; -+ if (!dev->vccs) dev->vccs = vcc; -+ else dev->last->next = vcc; -+ dev->last = vcc; -+ return 0; -+} -+ -+ -+int atm_connect(struct socket *sock,int itf,short vpi,int vci) -+{ -+ struct atm_vcc *vcc; -+ int error; -+ -+ DPRINTK("atm_connect (vpi %d, vci %d)\n",vpi,vci); -+ if (sock->state == SS_CONNECTED) return -EISCONN; -+ if (sock->state != SS_UNCONNECTED) return -EINVAL; -+ if (!(vpi || vci)) return -EINVAL; -+ vcc = ATM_SD(sock); -+ if (vpi != ATM_VPI_UNSPEC && vci != ATM_VCI_UNSPEC) -+ vcc->flags &= ~ATM_VF_PARTIAL; -+ else if (vcc->flags & ATM_VF_PARTIAL) return -EINVAL; -+ printk("atm_connect (TX: cl %d,bw %d-%d,sdu %d; RX: cl %d,bw %d-%d," -+ "sdu %d)\n",vcc->txtp.class,vcc->txtp.min_pcr,vcc->txtp.max_pcr, -+ vcc->txtp.max_sdu,vcc->rxtp.class,vcc->rxtp.min_pcr, -+ vcc->rxtp.max_pcr,vcc->rxtp.max_sdu); -+ if (vcc->txtp.class == ATM_ANYCLASS || vcc->rxtp.class == ATM_ANYCLASS) -+ return -EINVAL; -+ if (itf != ATM_ITF_ANY) error = atm_do_connect(vcc,itf,vpi,vci); -+ else { -+ int i; -+ -+ error = -ENODEV; -+ for (i = 0; i < MAX_ATM_ITF; i++) -+ if (atm_dev[i].ops) -+ if (!(error = atm_do_connect(vcc,i,vpi,vci))) -+ break; -+ } -+ if (error) return error; -+ if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC) -+ vcc->flags |= ATM_VF_PARTIAL; -+ else sock->state = SS_CONNECTED; -+ return 0; -+} -+ -+ -+int atm_recvmsg(struct socket *sock,struct msghdr *m,int total_len, -+ int nonblock,int flags,int *addr_len) -+{ -+ struct atm_vcc *vcc; -+ struct sk_buff *skb; -+ unsigned long cpu_flags; -+ int eff_len; -+ -+ void *buff; -+ int size; -+ -+ if (sock->state != SS_CONNECTED || flags || m->msg_name) -+ return -EINVAL; -+ if (m->msg_iovlen != 1) return -ENOSYS; /* fix this later @@@ */ -+ buff = m->msg_iov->iov_base; -+ size = m->msg_iov->iov_len; -+ /* verify_area is done by net/socket.c */ -+ vcc = ATM_SD(sock); -+ if (vcc->dev->ops->poll && (vcc->flags & ATM_VF_READY)) -+ while (1) { -+ vcc->dev->ops->poll(vcc,nonblock); -+ if (current->signal & ~current->blocked) -+ return -ERESTARTSYS; -+ if (skb_peek(&vcc->recvq)) break; -+ if (nonblock) return -EAGAIN; -+ } -+ save_flags(cpu_flags); -+ cli(); -+ while (!(skb = skb_dequeue(&vcc->recvq))) { -+ if (vcc->flags & ATM_VF_RELEASED) return vcc->reply; -+ if (!(vcc->flags & ATM_VF_READY)) return 0; -+ if (nonblock) { -+ restore_flags(cpu_flags); -+ return -EAGAIN; -+ } -+ interruptible_sleep_on(&vcc->sleep); -+ if (current->signal & ~current->blocked) { -+ restore_flags(cpu_flags); -+ return -ERESTARTSYS; -+ } -+ } -+ restore_flags(cpu_flags); -+ vcc->timestamp = skb->atm.timestamp; -+ eff_len = skb->len > size ? size : skb->len; -+ if (vcc->dev->ops->feedback) -+ vcc->dev->ops->feedback(vcc,skb,(unsigned long) skb->data, -+ (unsigned long) buff,eff_len); -+#ifdef CONFIG_MMU_HACKS -+ mmucp_tofs((unsigned long) buff,eff_len,skb,(unsigned long) skb->data); -+#else -+#ifdef DUMP_PACKETS -+ if (vcc->vci==5 || vcc->vci >32) { -+ char buf[300]; -+ int i; -+ -+ for(i=0;i<99 && i < skb->len;i++) { -+ sprintf(buf+i*3,"%2.2x ", -+ 0xff&skb->data[i]); -+ } -+ printk("recv %d:%s\n",vcc->vci,buf); -+ } -+#endif -+ memcpy_tofs(buff,skb->data,eff_len); -+ kfree_skb(skb,FREE_READ); -+#endif -+ return eff_len; -+} -+ -+ -+int atm_sendmsg(struct socket *sock,struct msghdr *m,int total_len, -+ int nonblock,int flags) -+{ -+ struct atm_vcc *vcc; -+ struct sk_buff *skb; -+ int eff; -+ -+ const void *buff; -+ int size; -+ -+ if (sock->state != SS_CONNECTED || flags || m->msg_name) -+ return -EINVAL; -+ if (m->msg_iovlen != 1) return -ENOSYS; /* fix this later @@@ */ -+ buff = m->msg_iov->iov_base; -+ size = m->msg_iov->iov_len; -+ vcc = ATM_SD(sock); -+ if (vcc->flags & ATM_VF_RELEASED) return vcc->reply; -+ if (!(vcc->flags & ATM_VF_READY)) return -EPIPE; -+ if (!size) return 0; -+ /* verify_area is done by net/socket.c */ -+#ifdef CONFIG_MMU_HACKS -+ if (vcc->dev->ops->sg_send && vcc->dev->ops->sg_send(vcc, -+ (unsigned long) buff,size)) { -+ int res,max_iov; -+ -+ max_iov = 2+size/PAGE_SIZE; -+ /* -+ * Doesn't use alloc_tx yet - this will change later. @@@ -+ */ -+ while (!(skb = alloc_skb(sizeof(struct iovec)*max_iov, -+ GFP_KERNEL))) { -+ if (nonblock) return -EAGAIN; -+ interruptible_sleep_on(&vcc->sleep); -+ if (current->signal & ~current->blocked) -+ return -ERESTARTSYS; -+ } -+ skb->free = 1; -+ skb->len = size; -+ res = lock_user((unsigned long) buff,size,max_iov, -+ (struct iovec *) skb->data); -+ if (res < 0) { -+ kfree_skb(skb,FREE_WRITE); -+ if (res != -EAGAIN) return res; -+ } -+ else { -+ DPRINTK("res is %d\n",res); -+ skb->atm.iovcnt = res; -+ skb_device_lock(skb); -+ vcc->dev->ops->send(vcc,skb); -+ /* FIXME: security: may send up to 3 "garbage" bytes */ -+ return size; -+ } -+ } -+#endif -+ eff = (size+3) & ~3; /* align to word boundary */ -+ while (size+vcc->tx_inuse+ATM_PDU_OVHD > vcc->tx_quota || -+ !(skb = vcc->alloc_tx(vcc,eff))) { -+ if (nonblock) return -EAGAIN; -+ interruptible_sleep_on(&vcc->sleep); -+ if (current->signal & ~current->blocked) -+ return -ERESTARTSYS; -+ if (vcc->flags & ATM_VF_RELEASED) return vcc->reply; -+ if (!(vcc->flags & ATM_VF_READY)) return -EPIPE; -+ } -+ skb->free = 1; -+ skb->len = size; -+ skb->atm.iovcnt = 0; -+ memcpy_fromfs(skb->data,buff,size); -+ if (eff != size) memset(skb->data+size,0,eff-size); -+#if 0 /* experimental */ -+ vcc->dev->sending = 1; -+#endif -+ skb_device_lock(skb); -+#ifdef DUMP_PACKETS -+ if (vcc->vci==5 || vcc->vci >32) { -+ char buf[300]; -+ int i; -+ -+ for(i=0;i<99 && i < skb->len;i++) { -+ sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]); -+ } -+ printk("send %d:%s\n",vcc->vci,buf); -+ } -+#endif -+ vcc->dev->ops->send(vcc,skb); -+#if 0 /* experimental */ -+ while (vcc->dev->sending) sleep_on(&vcc->sleep); -+#endif -+ return size; -+} -+ -+ -+int atm_select(struct socket *sock,int sel_type,select_table *wait) -+{ -+ struct atm_vcc *vcc; -+ -+ vcc = ATM_SD(sock); -+ switch(sel_type) { -+ case SEL_IN: -+ if (vcc->dev && vcc->dev->ops->poll) -+ vcc->dev->ops->poll(ATM_SD(sock),1); -+ if (sock->state == SS_CONNECTING) break; -+ if (!skb_peek(&vcc->recvq) && -+ !skb_peek(&vcc->listenq) && -+ !(vcc->flags & ATM_VF_RELEASED)) break; -+ if (vcc->dev && vcc->dev->ops->poll) return 0; -+ return 1; -+ case SEL_OUT: -+ if (sock->state == SS_CONNECTING) break; -+ if (vcc->txtp.class == ATM_NONE) return 1; -+ if (vcc->txtp.max_sdu+vcc->tx_inuse+ATM_PDU_OVHD > -+ vcc->tx_quota) break; -+ return 1; -+ case SEL_EX: -+ if (sock->state != SS_CONNECTING) return 0; -+ if (vcc->reply == WAITING) break; -+ return 1; -+ } -+ select_wait(&vcc->sleep,wait); -+ return 0; -+} -+ -+ -+ -+static int fetch_stats(struct atm_dev *dev,struct atm_dev_stats *arg,int zero) -+{ -+ unsigned long flags; -+ -+ save_flags(flags); -+ cli(); -+ if (arg) -+ memcpy_tofs(arg,&dev->stats,sizeof(struct atm_dev_stats)); -+ if (zero) -+ memset(&dev->stats,0,sizeof(struct atm_dev_stats)); -+ restore_flags(flags); -+ return 0; -+} -+ -+ -+extern int clip_ioctl(void *dev,void *rq,int cmd); /* @@@ lie and cheat ... */ -+ -+ -+#ifdef CONFIG_AREQUIPA -+ -+/* @@@ stolen from net/socket.c - should be in a common header file */ -+ -+ -+struct socket *sockfd_lookup(int fd) -+{ -+ struct file *file; -+ struct inode *inode; -+ -+ if (fd < 0 || fd >= NR_OPEN || !(file = current->files->fd[fd])) -+ return NULL; -+ inode = file->f_inode; -+ if (!inode || !inode->i_sock) return NULL; -+ return &inode->u.socket_i; -+} -+ -+#endif -+ -+ -+int atm_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg) -+{ -+ struct atm_dev *dev; -+ unsigned long eff_arg; -+ int rsize,wsize,len; -+ int error; -+ -+ rsize = wsize = 0; -+ switch (cmd) { -+ case ATM_GETNAMES: -+ { -+ struct atm_iobuf *buf; -+ -+ error = verify_area(VERIFY_READ,(void *) arg, -+ sizeof(struct atm_iobuf)); -+ if (error) return error; -+ buf = (struct atm_iobuf *) arg; -+ error = verify_area(VERIFY_WRITE, -+ (void *) get_fs_long(&buf->buffer), -+ get_fs_long(&buf->length)); -+ if (error) return error; -+ error = verify_area(VERIFY_WRITE, -+ (void *) &buf->length,sizeof(int)); -+ if (error) return error; -+ return atm_dev_list((void *) get_fs_long(&buf-> -+ buffer),&buf->length); -+ } -+ case SIOCGSTAMP: /* borrowed from IP */ -+ if (!ATM_SD(sock)->timestamp.tv_sec) return -ENOENT; -+ error = verify_area(VERIFY_WRITE,(void *) arg, -+ sizeof(struct timeval)); -+ if (error) return error; -+ memcpy_tofs((void *) arg,&ATM_SD(sock)->timestamp, -+ sizeof(struct timeval)); -+ return 0; -+ case ATMSIGD_CTRL: -+ if (!suser()) return -EPERM; -+ error = sigd_attach(ATM_SD(sock)); -+ if (!error) sock->state = SS_CONNECTED; -+ return error; -+#ifdef CONFIG_ATM_CLIP -+ case CLIP_PVC: -+ if (!suser()) return -EPERM; -+ return atm_init_clip(ATM_SD(sock)); -+ case CLIP_NULENCAP: -+ case CLIP_LLCENCAP: -+ if (!suser()) return -EPERM; -+ return clip_ioctl(ATM_SD(sock)->proto_data,NULL,cmd); -+ /* rather crude hack ... */ -+#endif -+#ifdef CONFIG_ATM_ATMARP -+ case SIOCMKCLIP: -+ if (!suser()) return -EPERM; -+ return clip_create(arg); -+ case ATMARPD_CTRL: -+ if (!suser()) return -EPERM; -+ error = atm_init_atmarp(ATM_SD(sock)); -+ if (!error) sock->state = SS_CONNECTED; -+ return error; -+ case ATMARP_MKIP: -+ if (!suser()) return -EPERM; -+ return atmarp_mkip(ATM_SD(sock),arg); -+ case ATMARP_SETENTRY: -+ if (!suser()) return -EPERM; -+ return atmarp_setentry(ATM_SD(sock),arg); -+ case ATMARP_ENCAP: -+ if (!suser()) return -EPERM; -+ return atmarp_encap(ATM_SD(sock),arg); -+#endif -+#ifdef CONFIG_AREQUIPA -+ case AREQUIPA_PRESET: -+ { -+ struct socket *upper; -+ -+ if (!(upper = sockfd_lookup(arg))) -+ return -ENOTSOCK; -+ if (upper->ops->family != PF_INET) -+ return -EPROTOTYPE; -+ return arequipa_preset(sock, -+ (struct sock *) upper->data); -+ } -+ case AREQUIPA_INCOMING: -+ return arequipa_incoming(sock); -+#endif -+#ifdef CONFIG_ATM_LANE -+ case ATMLEC_CTRL: -+ if (!suser()) return -EPERM; -+ error = lecd_attach(ATM_SD(sock)); -+ if (!error) sock->state = SS_CONNECTED; -+ return error; -+ case ATMLEC_MCAST: -+ if (!suser()) return -EPERM; -+ return lec_mcast_attach(ATM_SD(sock)); -+ case ATMLEC_DATA: -+ if (!suser()) return -EPERM; -+ return lec_vcc_attach(ATM_SD(sock), (void*)arg); -+#endif -+ case ATM_GETTYPE: -+ wsize = -1; /* special - don't check length */ -+ break; -+ case ATM_GETESI: -+ wsize = ESI_LEN; -+ break; -+ case ATM_GETSTATZ: -+ if (!suser()) return -EPERM; -+ /* fall through */ -+ case ATM_GETSTAT: -+ wsize = sizeof(struct atm_dev_stats); -+ break; -+ case ATM_GETCIRANGE: -+ wsize = sizeof(struct atm_cirange); -+ break; -+ case ATM_SETCIRANGE: -+ if (!suser()) return -EPERM; -+ rsize = sizeof(struct atm_cirange); -+ break; -+ case SONET_GETSTATZ: -+ if (!suser()) return -EPERM; -+ /* fall through */ -+ case SONET_GETSTAT: -+ wsize = sizeof(struct sonet_stats); -+ break; -+ case SONET_GETDIAG: -+ wsize = sizeof(int); -+ break; -+ case SONET_SETDIAG: -+ case SONET_CLRDIAG: -+ if (!suser()) return -EPERM; -+ rsize = sizeof(int); -+ break; -+ case SONET_SETFRAMING: -+ rsize = sizeof(int); -+ break; -+ case SONET_GETFRAMING: -+ wsize = sizeof(int); -+ break; -+ case SONET_GETFRSENSE: -+ wsize = SONET_FRSENSE_SIZE; -+ break; -+ default: -+ wsize = -1; /* just in case ... */ -+ } -+ error = verify_area(VERIFY_READ,(void *) arg, -+ sizeof(struct atmif_sioc)); -+ if (error) return error; -+ if (wsize) { -+ error = verify_area(VERIFY_WRITE,(void *) arg, -+ sizeof(struct atmif_sioc)); -+ if (error) return error; -+ } -+ if (!(dev = atm_find_dev(get_fs_long(&((struct atmif_sioc *) arg)-> -+ number)))) return -ENODEV; -+ len = get_fs_long(&((struct atmif_sioc *) arg)->length); -+ eff_arg = get_fs_long(&((struct atmif_sioc *) arg)->arg); -+ if (!eff_arg && (rsize || wsize)) return -EINVAL; -+ if (rsize > 0) { -+ if (len != rsize) return -EINVAL; -+ error = verify_area(VERIFY_READ,(void *) eff_arg,len); -+ if (error) return error; -+ } -+ if (wsize > 0) { -+ if (len != wsize) return -EINVAL; -+ error = verify_area(VERIFY_WRITE,(void *) eff_arg,len); -+ if (error) return error; -+ put_fs_long(wsize,&((struct atmif_sioc *) arg)->length); -+ } -+ switch (cmd) { -+ case ATM_GETTYPE: -+ { -+ int length; -+ -+ length = strlen(dev->type); -+ if (len type, -+ length+1); -+ put_fs_long(length, -+ &((struct atmif_sioc *) arg)->length); -+ return length; -+ } -+ case ATM_GETESI: -+ memcpy_tofs((void *) eff_arg,dev->esi,ESI_LEN); -+ return wsize; -+ case ATM_GETSTATZ: -+ case ATM_GETSTAT: -+ error = fetch_stats(dev,(void *) eff_arg, -+ cmd == ATM_GETSTATZ); -+ return error < 0 ? error : wsize; -+ case ATM_GETCIRANGE: -+ memcpy_tofs((void *) eff_arg,&dev->ci_range, -+ sizeof(struct atm_cirange)); -+ return wsize; -+ default: -+ if (!dev->ops->ioctl) return -EINVAL; -+ error = dev->ops->ioctl(dev,cmd,eff_arg); -+ if (error >= 0) -+ put_fs_long(len, -+ &((struct atmif_sioc *) arg)->length); -+ return error; -+ } -+} -+ -+ -+int atm_setsockopt(struct socket *sock,int level,int optname, -+ char *optval,int optlen) -+{ -+ struct atm_vcc *vcc; -+ int error; -+ -+ error = verify_area(VERIFY_READ,optval,optlen); -+ if (error) return -EINVAL; -+ vcc = ATM_SD(sock); -+ if (level == SOL_SOCKET) { -+ unsigned long value; -+ -+ switch (optname) { -+ case SO_SNDBUF: -+ if (optlen != sizeof(value)) return -EINVAL; -+ value = get_fs_long(optval); -+ if (!value) value = ATM_TXBQ_DEF; -+ if (value > ATM_TXBQ_MAX) value = ATM_TXBQ_MAX; -+ vcc->tx_quota = value*1024; -+ return 0; -+ case SO_RCVBUF: -+ if (optlen != sizeof(value)) return -EINVAL; -+ value = get_fs_long(optval); -+ if (!value) value = ATM_RXBQ_DEF; -+ if (value > ATM_RXBQ_MAX) value = ATM_RXBQ_MAX; -+ vcc->rx_quota = value*1024; -+ return 0; -+ default: -+ return -EINVAL; -+ } -+ } -+ if (level == SOL_ATM) { -+ switch (optname) { -+ case SO_ATMQOS: -+ if (optlen != sizeof(struct atm_qos)) -+ return -EINVAL; -+ if (vcc->flags & ATM_VF_HASQOS) return -EINVAL; -+ memcpy_fromfs(&vcc->qos,optval,optlen); -+ vcc->flags |= ATM_VF_HASQOS; -+ return 0; -+ default: -+ break; -+ } -+ } -+ if (!vcc->dev || !vcc->dev->ops->setsockopt) return -EINVAL; -+ return vcc->dev->ops->setsockopt(vcc,level,optname,optval,optlen); -+} -+ -+ -+static int putsockopt(void *data,int len,char *optval,int *optlen) -+{ -+ int error; -+ -+ if (get_fs_long(optlen) < len) return -EINVAL; -+ put_fs_long(len,optlen); -+ error = verify_area(VERIFY_WRITE,optval,len); -+ if (error) return error; -+ memcpy_tofs(optval,data,len); -+ return 0; -+} -+ -+ -+int atm_getsockopt(struct socket *sock,int level,int optname, -+ char *optval,int *optlen) -+{ -+ struct atm_vcc *vcc; -+ int error; -+ -+ error = verify_area(VERIFY_READ,optlen,sizeof(*optlen)); /* paranoia? */ -+ if (error) return error; -+ error = verify_area(VERIFY_WRITE,optlen,sizeof(*optlen)); -+ if (error) return error; -+ vcc = ATM_SD(sock); -+ switch (level) { -+ case SOL_SOCKET: -+ switch (optname) { -+ case SO_SNDBUF: -+ return putsockopt(&vcc->tx_quota, -+ sizeof(unsigned long),optval, -+ optlen); -+ case SO_RCVBUF: -+ return putsockopt(&vcc->rx_quota, -+ sizeof(unsigned long),optval, -+ optlen); -+ case SO_BCTXOPT: -+ case SO_BCRXOPT: -+ level = SOL_AAL; /* cheat */ -+ break; -+ default: -+ return -EINVAL; -+ } -+ /* fall through */ -+ case SOL_AAL: -+ switch (optname) { -+ case SO_AALTYPE: -+ return putsockopt(&vcc->aal, -+ sizeof(unsigned char),optval, -+ optlen); -+ default: -+ break; -+ } -+ break; -+ case SOL_ATM: -+ switch (optname) { -+ case SO_ATMQOS: -+ if (!(vcc->flags & ATM_VF_HASQOS)) -+ return -EINVAL; -+ return putsockopt(&vcc->qos, -+ sizeof(struct atm_qos),optval, -+ optlen); -+ default: -+ break; -+ } -+ /* fall through */ -+ default: -+ break; -+ } -+ if (!vcc->dev || !vcc->dev->ops->getsockopt) return -EINVAL; -+ return vcc->dev->ops->getsockopt(vcc,level,optname,optval,optlen); -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/common.h Wed Jul 17 19:58:02 1996 -@@ -0,0 +1,32 @@ -+/* net/atm/common.h - ATM sockets (common part for PVC and SVC) */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_COMMON_H -+#define NET_ATM_COMMON_H -+ -+#include -+ -+int atm_create(struct socket *sock,int protocol); -+int atm_release(struct socket *sock,struct socket *peer); -+int atm_connect(struct socket *sock,int itf,short vpi,int vci); -+int atm_recvmsg(struct socket *sock,struct msghdr *m,int total_len, -+ int nonblock,int flags,int *addr_len); -+int atm_sendmsg(struct socket *sock,struct msghdr *m,int total_len, -+ int nonblock,int flags); -+int atm_select(struct socket *sock,int sel_type,select_table *wait); -+int atm_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg); -+int atm_setsockopt(struct socket *sock,int level,int optname,char *optval, -+ int optlen); -+int atm_getsockopt(struct socket *sock,int level,int optname,char *optval, -+ int *optlen); -+ -+int atm_release_vcc(struct atm_vcc *vcc,int free_vcc); -+ -+/* SVC */ -+ -+int copy_svc_addr(struct sockaddr_atmsvc *to,struct sockaddr_atmsvc *from); -+void svc_callback(struct atm_vcc *vcc); -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/dev.c Mon Jun 10 17:36:19 1996 -@@ -0,0 +1,38 @@ -+/* net/atm/dev.c - ATM device registeration */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+ -+#include "static.h" -+ -+ -+struct atm_dev *atm_dev_register(const char *type,const struct atmdev_ops *ops, -+ unsigned long flags) -+{ -+ volatile struct atm_dev *dev; /* need volatile to ensure sequence */ -+ -+ dev = alloc_atm_dev(type); -+ if (!dev) { -+ printk(KERN_ERR "atm_dev_register: no space for dev %s\n", -+ type); -+ return NULL; -+ } -+ dev->number = 0; -+ while (atm_find_dev(dev->number)) dev->number++; -+ dev->vccs = dev->last = NULL; -+ dev->dev_data = NULL; -+ dev->ops = ops; -+ dev->flags = flags; -+ memset((void *) &dev->stats,0,sizeof(struct atm_dev_stats)); -+ return (struct atm_dev *) dev; -+} -+ -+ -+void atm_dev_deregister(struct atm_dev *dev) -+{ -+ free_atm_dev(dev); -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/pvc.c Thu Jul 18 21:05:13 1996 -@@ -0,0 +1,172 @@ -+/* net/atm/pvc.c - ATM PVC sockets */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include /* struct socket, struct net_proto, -+ struct proto_ops */ -+#include /* ATM stuff */ -+#include /* ATM devices */ -+#include /* Classical IP over ATM */ -+#include /* error codes */ -+#include /* printk */ -+#include -+#ifdef CONFIG_AREQUIPA -+#include -+#endif -+ -+#include "static.h" /* static data ... */ -+#include "common.h" /* common for PVCs and SVCs */ -+ -+#ifndef NULL -+#define NULL 0 -+#endif -+ -+ -+static int pvc_dup(struct socket *newsock,struct socket *oldsock) -+{ -+ return -EOPNOTSUPP; -+} -+ -+ -+static int pvc_shutdown(struct socket *sock,int how) -+{ -+ return -EOPNOTSUPP; -+} -+ -+ -+static int pvc_bind(struct socket *sock,struct sockaddr *sockaddr, -+ int sockaddr_len) -+{ -+ struct sockaddr_atmpvc *addr; -+ struct atm_vcc *vcc; -+ /*int error;*/ -+ -+ if (sockaddr_len != sizeof(struct sockaddr_atmpvc)) return -EINVAL; -+ addr = (struct sockaddr_atmpvc *) sockaddr; -+ if (addr->sap_family != AF_ATMPVC) return -EAFNOSUPPORT; -+ vcc = ATM_SD(sock); -+ if (vcc->flags & ATM_VF_PARTIAL) { -+ if (vcc->vpi != ATM_VPI_UNSPEC) addr->sap_addr.vpi = vcc->vpi; -+ if (vcc->vci != ATM_VCI_UNSPEC) addr->sap_addr.vci = vcc->vci; -+ } -+ else if (vcc->flags & ATM_VF_HASQOS) { -+ vcc->txtp = vcc->qos.txtp; -+ vcc->rxtp = vcc->qos.rxtp; -+ } -+ else { -+ vcc->txtp = addr->sap_txtp; -+ vcc->rxtp = addr->sap_rxtp; -+ } -+ return atm_connect(sock,addr->sap_addr.itf,addr->sap_addr.vpi, -+ addr->sap_addr.vci); -+} -+ -+ -+static int pvc_connect(struct socket *sock,struct sockaddr *sockaddr, -+ int sockaddr_len,int flags) -+{ -+ return pvc_bind(sock,sockaddr,sockaddr_len); -+} -+ -+ -+static int pvc_listen(struct socket *sock,int backlog) -+{ -+ return -EOPNOTSUPP; -+} -+ -+ -+static int pvc_accept(struct socket *sock,struct socket *newsock,int flags) -+{ -+ return -EOPNOTSUPP; -+} -+ -+ -+static int pvc_getname(struct socket *sock,struct sockaddr *sockaddr, -+ int *sockaddr_len,int peer) -+{ -+ struct sockaddr_atmpvc *addr; -+ struct atm_vcc *vcc; -+ -+#if 0 /* add some sanity checks later ... @@@ */ -+ if (sock->state != SS_CONNECTED) return -EINVAL; -+#endif -+ if (*sockaddr_len < sizeof(struct sockaddr_atmpvc)) return -EINVAL; -+ *sockaddr_len = sizeof(struct sockaddr_atmpvc); -+ addr = (struct sockaddr_atmpvc *) sockaddr; -+ vcc = ATM_SD(sock); -+ addr->sap_family = AF_ATMPVC; -+ addr->sap_addr.itf = vcc->dev->number; -+ addr->sap_addr.vpi = vcc->vpi; -+ addr->sap_addr.vci = vcc->vci; -+ memcpy(&addr->sap_txtp,&vcc->txtp,sizeof(struct atm_trafprm)); -+ memcpy(&addr->sap_rxtp,&vcc->rxtp,sizeof(struct atm_trafprm)); -+ return 0; -+} -+ -+ -+static int pvc_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg) -+{ -+ /* put PVC-specific code here */ -+ return atm_ioctl(sock,cmd,arg); -+} -+ -+ -+static int pvc_setsockopt(struct socket *sock,int level,int optname, -+ char *optval,int optlen) -+{ -+ /* put PVC-specific code here */ -+ return atm_setsockopt(sock,level,optname,optval,optlen); -+} -+ -+ -+static int pvc_getsockopt(struct socket *sock,int level,int optname, -+ char *optval,int *optlen) -+{ -+ /* put PVC-specific code here */ -+ return atm_getsockopt(sock,level,optname,optval,optlen); -+} -+ -+ -+static struct proto_ops pvc_proto_ops = { -+ PF_ATMPVC, -+ atm_create, -+ pvc_dup, -+ atm_release, -+ pvc_bind, -+ pvc_connect, -+ NULL, /* no socketpair */ -+ pvc_accept, -+ pvc_getname, -+ atm_select, -+ pvc_ioctl, -+ pvc_listen, -+ pvc_shutdown, -+ pvc_setsockopt, -+ pvc_getsockopt, -+ NULL, /* no fcntl */ -+ atm_sendmsg, -+ atm_recvmsg -+}; -+ -+ -+/* -+ * Initialize the ATM PVC protocol family -+ */ -+ -+ -+extern int atmdev_init(void); -+ -+ -+void atmpvc_proto_init(struct net_proto *pro) -+{ -+ atm_static_init(); -+ if (sock_register(pvc_proto_ops.family,&pvc_proto_ops) < 0) { -+ printk(KERN_ERR "ATMPVC: can't register"); -+ return; -+ } -+#ifdef CONFIG_AREQUIPA -+ (void) atm_init_arequipa(); -+#endif -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/static.c Fri Jul 19 15:21:05 1996 -@@ -0,0 +1,114 @@ -+/* net/atm/static.c - Staticly allocated resources */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include /* for get_fs_long and put_fs_long */ -+ -+#include "static.h" -+ -+ -+#ifndef NULL -+#define NULL 0 -+#endif -+ -+ -+struct atm_dev atm_dev[MAX_ATM_ITF]; -+struct atm_vcc atm_vcc[MAX_ATM_VCC]; -+ -+ -+void atm_static_init(void) -+{ -+ int i; -+ -+ for (i = 0; i < MAX_ATM_ITF; i++) atm_dev[i].ops = NULL; -+ for (i = 0; i < MAX_ATM_VCC; i++) atm_vcc[i].family = 0; -+} -+ -+ -+struct atm_dev *alloc_atm_dev(const char *type) -+{ -+ static int curr_dev = 0; -+ int last_dev; -+ -+ last_dev = curr_dev; -+ do { -+ if (!atm_dev[curr_dev].ops) { -+ memset(&atm_dev[curr_dev],0,sizeof(struct atm_dev)); -+ atm_dev[curr_dev].type = type; -+ return atm_dev+curr_dev; -+ } -+ if (++curr_dev == MAX_ATM_ITF) curr_dev = 0; -+ } -+ while (last_dev != curr_dev); -+ return NULL; -+} -+ -+ -+struct atm_vcc *alloc_atm_vcc(void) -+{ -+ static int curr_vcc = 0; -+ int last_vcc; -+ -+ last_vcc = curr_vcc; -+ do { -+ if (!atm_vcc[curr_vcc].family) return atm_vcc+curr_vcc; -+ if (++curr_vcc == MAX_ATM_VCC) curr_vcc = 0; -+ } -+ while (last_vcc != curr_vcc); -+ return NULL; -+} -+ -+ -+void free_atm_dev(struct atm_dev *dev) -+{ -+ dev->ops = NULL; -+} -+ -+ -+void free_atm_vcc(struct atm_vcc *vcc) -+{ -+ vcc->family = 0; -+} -+ -+ -+struct atm_dev *atm_find_dev(int number) -+{ -+ int i; -+ -+ for (i = 0; i < MAX_ATM_ITF; i++) -+ if (atm_dev[i].ops && atm_dev[i].number == number) -+ return &atm_dev[i]; -+ return NULL; -+} -+ -+ -+int atm_dev_list(int *buffer,int *u_length) -+{ -+ int length,left,i; -+ -+ length = get_fs_long(u_length); -+ left = length/sizeof(int); -+ if (!left) return -EINVAL; -+ for (i = 0; i < MAX_ATM_ITF; i++) -+ if (atm_dev[i].ops) { -+ if (!left) break; -+ put_fs_long(atm_dev[i].number,buffer); -+ buffer++; -+ left--; -+ } -+ put_fs_long(length-(length/sizeof(int)-left)*sizeof(int),u_length); -+ return length/sizeof(int)-left; -+} -+ -+ -+void for_all_vccs(void (*fn)(struct atm_vcc *vcc)) -+{ -+ int i; -+ -+ for (i = 0; i < MAX_ATM_VCC; i++) -+ if (atm_vcc[i].family) fn(atm_vcc+i); -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/static.h Fri Jul 19 15:10:11 1996 -@@ -0,0 +1,29 @@ -+/* net/atm/static.h - Staticly allocated resources */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_STATIC_H -+#define NET_ATM_STATIC_H -+ -+#include -+ -+ -+/* -+ * This is evil ... -+ */ -+ -+extern struct atm_dev atm_dev[MAX_ATM_ITF]; -+extern struct atm_vcc atm_vcc[MAX_ATM_VCC]; -+ -+ -+void atm_static_init(void); -+struct atm_dev *alloc_atm_dev(const char *type); -+struct atm_vcc *alloc_atm_vcc(void); -+void free_atm_dev(struct atm_dev *dev); -+void free_atm_vcc(struct atm_vcc *vcc); -+struct atm_dev *atm_find_dev(int number); -+int atm_dev_list(int *buffer,int *u_length); -+void for_all_vccs(void (*fn)(struct atm_vcc *vcc)); -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/svc.c Thu Jul 4 19:50:34 1996 -@@ -0,0 +1,625 @@ -+/* net/atm/svc.c - ATM SVC sockets */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include /* struct socket, struct net_proto, -+ struct proto_ops */ -+#include /* error codes */ -+#include /* printk */ -+#include -+#include -+#include /* jiffies and HZ */ -+#include /* O_NONBLOCK */ -+#include /* ATM stuff */ -+#include -+#include -+#include -+ -+#include "static.h" -+#include "common.h" /* common for PVCs and SVCs */ -+#include "signaling.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+/* -+ * Note: since all this is still nicely synchronized with the signaling demon, -+ * there's no need to protect sleep loops with clis. If signaling is -+ * moved into the kernel, that would change. -+ */ -+ -+ -+void svc_callback(struct atm_vcc *vcc) -+{ -+ wake_up(&vcc->sleep); -+} -+ -+ -+static int svc_create(struct socket *sock,int protocol) -+{ -+ int error; -+ -+ error = atm_create(sock,protocol); -+ if (error) return error; -+ ATM_SD(sock)->callback = svc_callback; -+ return 0; -+} -+ -+ -+static int svc_dup(struct socket *newsock,struct socket *oldsock) -+{ -+ return svc_create(newsock,ATM_SD(oldsock)->aal); -+} -+ -+ -+static int svc_shutdown(struct socket *sock,int how) -+{ -+ return -EOPNOTSUPP; -+} -+ -+ -+static void svc_disconnect(struct atm_vcc *vcc) -+{ -+ struct sk_buff *skb; -+ -+ DPRINTK("svc_disconnect\n"); -+ if (vcc->flags & ATM_VF_REGIS) { -+ sigd_enq(vcc,as_close,NULL,NULL,NULL); -+ while (!(vcc->flags & ATM_VF_RELEASED) && sigd) -+ sleep_on(&vcc->sleep); -+ } -+ while ((skb = skb_dequeue(&vcc->listenq))) { -+ vcc->flags &= ~ATM_VF_RELEASED; -+ DPRINTK("LISTEN REL\n"); -+ sigd_enq(NULL,as_close,vcc,NULL,NULL); /* reject */ -+ while (!(vcc->flags & ATM_VF_RELEASED) && sigd) -+ sleep_on(&vcc->sleep); -+ dev_kfree_skb(skb,FREE_WRITE); -+ } -+ vcc->flags &= ~(ATM_VF_REGIS | ATM_VF_RELEASED); /* may retry later */ -+} -+ -+ -+static int svc_release(struct socket *sock,struct socket *peer) -+{ -+ DPRINTK("svc_release\n"); -+ if (!ATM_SD(sock)) return 0; -+ ATM_SD(sock)->flags &= ~ATM_VF_READY; -+ atm_release_vcc(ATM_SD(sock),0); -+ svc_disconnect(ATM_SD(sock)); -+ /* VCC pointer is used as a reference, so we must not free it -+ (thereby subjecting it to re-use) before all pending connections -+ are closed */ -+ free_atm_vcc(ATM_SD(sock)); -+ return 0; -+} -+ -+ -+int copy_svc_addr(struct sockaddr_atmsvc *to,struct sockaddr_atmsvc *from) -+{ -+ struct atm_blli *walk,**link,*next; -+ int error,bllis; -+ -+ *to = *from; -+ link = &to->sas_addr.blli; -+ error = bllis = 0; -+ for (walk = from->sas_addr.blli; walk; walk = (struct atm_blli *) -+ get_fs_long((unsigned long) &walk->next)) { -+ if (++bllis > ATM_MAX_BLLI) { -+ error = -E2BIG; -+ break; -+ } -+ *link = kmalloc(sizeof(struct atm_blli),GFP_KERNEL); -+ if (!*link) { -+ error = -ENOMEM; -+ break; -+ } -+ error = verify_area(VERIFY_READ,walk,sizeof(struct atm_blli)); -+ /* kmalloc may swap out user pages */ -+ if (error) break; -+ memcpy_fromfs(*link,walk,sizeof(struct atm_blli)); -+ link = &(*link)->next; -+ } -+ *link = NULL; -+ if (!error) return 0; -+ for (walk = to->sas_addr.blli; walk; walk = next) { -+ next = walk->next; -+ kfree(walk); -+ } -+ return error; -+} -+ -+ -+static int svc_bind(struct socket *sock,struct sockaddr *sockaddr, -+ int sockaddr_len) -+{ -+ struct sockaddr_atmsvc *addr; -+ struct atm_vcc *vcc; -+ int error; -+ -+ if (sockaddr_len != sizeof(struct sockaddr_atmsvc)) return -EINVAL; -+ if (sock->state == SS_CONNECTED) return -EISCONN; -+ if (sock->state != SS_UNCONNECTED) return -EINVAL; -+ addr = (struct sockaddr_atmsvc *) sockaddr; -+ if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT; -+ vcc = ATM_SD(sock); -+ vcc->flags &= ~ATM_VF_BOUND; /* failing rebind will kill old binding */ -+ /* @@@ check memory (de)allocation on rebind */ -+ if (vcc->flags & ATM_VF_HASQOS) { -+ addr->sas_txtp = vcc->qos.txtp; -+ addr->sas_rxtp = vcc->qos.rxtp; -+ } -+ error = copy_svc_addr(&vcc->local,addr); -+ if (error) return error; -+ vcc->reply = WAITING; -+ sigd_enq(vcc,as_bind,NULL,NULL,&vcc->local); -+ while (vcc->reply == WAITING && sigd) sleep_on(&vcc->sleep); -+ vcc->flags &= ~ATM_VF_REGIS; /* doesn't count */ -+ if (!sigd) return -EUNATCH; /* good code ? @@@ */ -+ if (!vcc->reply) vcc->flags |= ATM_VF_BOUND; -+ return vcc->reply; -+} -+ -+ -+static int svc_connect(struct socket *sock,struct sockaddr *sockaddr, -+ int sockaddr_len,int flags) -+{ -+ struct sockaddr_atmsvc *addr; -+ struct atm_vcc *vcc; -+ int error; -+ -+ DPRINTK("svc_connect\n"); -+ if (sockaddr_len != sizeof(struct sockaddr_atmsvc)) return -EINVAL; -+ if (sock->state == SS_CONNECTED) return -EISCONN; -+ vcc = ATM_SD(sock); -+ if (sock->state == SS_CONNECTING) { -+ if (vcc->reply == WAITING) return -EALREADY; -+ sock->state = SS_UNCONNECTED; -+ if (vcc->reply) return vcc->reply; -+ } -+ else { -+ if (sock->state != SS_UNCONNECTED) return -EINVAL; -+ addr = (struct sockaddr_atmsvc *) sockaddr; -+ if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT; -+ if (vcc->flags & ATM_VF_HASQOS) { -+ addr->sas_txtp = vcc->qos.txtp; -+ addr->sas_rxtp = vcc->qos.rxtp; -+ } -+ if (addr->sas_txtp.class == ATM_ANYCLASS || -+ addr->sas_rxtp.class == ATM_ANYCLASS) return -EINVAL; -+ if (!addr->sas_txtp.class && !addr->sas_rxtp.class) -+ return -EINVAL; -+ error = copy_svc_addr(&vcc->remote,addr); -+ if (error) return error; -+ vcc->reply = WAITING; -+ sigd_enq(vcc,as_establish,NULL,NULL,&vcc->remote); -+ if (flags & O_NONBLOCK) { -+ sock->state = SS_CONNECTING; -+ return -EINPROGRESS; -+ } -+ while (vcc->reply == WAITING && sigd) { -+ interruptible_sleep_on(&vcc->sleep); -+ if (current->signal & ~current->blocked) { -+ DPRINTK("*ABORT*\n"); -+ /* -+ * This is tricky: -+ * Kernel -------close------> Demon -+ * Kernel <-----close(0)----- Demon -+ * or -+ * Kernel -------close------> Demon -+ * Kernel <--close(error)---- Demon -+ * or -+ * Kernel -------close------> Demon -+ * Kernel <------okay-------- Demon -+ * Kernel <-----close(0)----- Demon -+ */ -+ vcc->flags &= ~ATM_VF_RELEASED; -+ sigd_enq(vcc,as_close,NULL,NULL,NULL); -+ while (vcc->reply == WAITING && sigd) -+ sleep_on(&vcc->sleep); -+ if (!vcc->reply) -+ while (!(vcc->flags & ATM_VF_RELEASED) -+ && sigd) sleep_on(&vcc->sleep); -+ vcc->flags &= ~(ATM_VF_REGIS | ATM_VF_RELEASED); -+ /* we're gone now but may connect later */ -+ return -EINTR; -+ } -+ } -+ if (!sigd) return -EUNATCH; -+ if (vcc->reply) return vcc->reply; -+ } -+/* -+ * Not supported yet -+ * -+ * #ifndef CONFIG_SINGLE_SIGITF -+ */ -+ vcc->txtp.max_pcr = SELECT_TOP_PCR(vcc->txtp); -+ vcc->txtp.min_pcr = 0; -+/* -+ * #endif -+ */ -+ if (!(error = atm_connect(sock,vcc->itf,vcc->vpi,vcc->vci))) -+ sock->state = SS_CONNECTED; -+ else (void) svc_disconnect(ATM_SD(sock)); -+ return error; -+} -+ -+ -+static int svc_listen(struct socket *sock,int backlog) -+{ -+ struct atm_vcc *vcc; -+ -+ DPRINTK("svc_listen\n"); -+ /* let server handle listen on unbound sockets */ -+ vcc = ATM_SD(sock); -+ vcc->reply = WAITING; -+ sigd_enq(vcc,as_listen,NULL,NULL,&vcc->local); -+ while (vcc->reply == WAITING && sigd) sleep_on(&vcc->sleep); -+ if (!sigd) return -EUNATCH; -+ vcc->flags |= ATM_VF_LISTEN; -+ vcc->backlog_quota = backlog > 0 ? backlog : ATM_BACKLOG_DEFAULT; -+ return vcc->reply; -+} -+ -+ -+static int svc_accept(struct socket *sock,struct socket *newsock,int flags) -+{ -+ struct sk_buff *skb; -+ struct atmsvc_msg *msg; -+ struct atm_vcc *old_vcc,*new_vcc; -+ int error; -+ -+ DPRINTK("svc_accept\n"); -+ old_vcc = ATM_SD(sock); -+ new_vcc = ATM_SD(newsock); -+ while (1) { -+ while (!(skb = skb_dequeue(&old_vcc->listenq)) && sigd) { -+ if (flags & O_NONBLOCK) return 0; /* not -EAGAIN ? */ -+ interruptible_sleep_on(&old_vcc->sleep); -+ if (current->signal & ~current->blocked) -+ return -ERESTARTSYS; -+ } -+ /* should try to atm_connect now and possibly send a close on -+ error */ -+ /* wait should be short, so we ignore the non-blocking flag */ -+ new_vcc->reply = WAITING; -+ sigd_enq(new_vcc,as_establish,old_vcc,NULL,NULL); -+ while (new_vcc->reply == WAITING && sigd) -+ sleep_on(&new_vcc->sleep); -+ if (!sigd) return -EUNATCH; -+ old_vcc->backlog_quota++; -+ if (!new_vcc->reply) break; -+ dev_kfree_skb(skb,FREE_WRITE); -+ } -+ if (!sigd) return -EUNATCH; -+ msg = (struct atmsvc_msg *) skb->data; -+ new_vcc->txtp = msg->pvc.sap_txtp; -+ new_vcc->rxtp = msg->pvc.sap_rxtp; -+ new_vcc->remote = msg->svc; -+ /* copy BLLI @@@ */ -+ new_vcc->remote.sas_addr.blli = NULL; -+ error = atm_connect(newsock,msg->pvc.sap_addr.itf,msg->pvc.sap_addr.vpi, -+ msg->pvc.sap_addr.vci); -+ dev_kfree_skb(skb,FREE_WRITE); -+ if (error) { -+ (void) svc_disconnect(ATM_SD(newsock)); -+ /* @@@ or should we try additional connections just until -+ we'd block ? (then we MUST return) */ -+ return error == -EAGAIN ? -EBUSY : error; -+ } -+ newsock->state = SS_CONNECTED; -+ return 0; -+} -+ -+ -+static int svc_getname(struct socket *sock,struct sockaddr *sockaddr, -+ int *sockaddr_len,int peer) -+{ -+ struct sockaddr_atmsvc *addr; -+ -+ /* this will be fun ... we have: txtp/rxtp, public and private -+ address, bhli and possibly a lot of bllis. Now address buffers -+ are static ... argl */ -+ /* The solution: use pointers to link bllis */ -+ /* naturally, we still need some place to put all those nasty -+ little bllis ... */ -+#if 0 -+ /* sigh ... */ -+ if (*sockaddr_len < sizeof(struct sockaddr_atmsvc)) return -EINVAL; -+#endif -+ *sockaddr_len = sizeof(struct sockaddr_atmsvc); -+ addr = (struct sockaddr_atmsvc *) sockaddr; -+ memcpy(addr,peer ? &ATM_SD(sock)->remote : &ATM_SD(sock)->local, -+ sizeof(struct sockaddr_atmsvc)); -+ addr->sas_addr.blli = NULL; /* @@@ no - copy it */ -+ memcpy(&addr->sas_txtp,&ATM_SD(sock)->txtp,sizeof(struct atm_trafprm)); -+ memcpy(&addr->sas_rxtp,&ATM_SD(sock)->rxtp,sizeof(struct atm_trafprm)); -+ return 0; -+} -+ -+ -+static int check_addr(struct sockaddr_atmsvc *addr) -+{ -+ int i; -+ -+ if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT; -+ if (!*addr->sas_addr.prv) -+ if (!*addr->sas_addr.pub) return -EINVAL; -+ else return 0; -+ for (i = 1; i < ATM_E164_LEN+1; i++) -+ if (!addr->sas_addr.prv[i]) return 0; -+ return -EINVAL; -+} -+ -+ -+static int identical(struct sockaddr_atmsvc *a,struct sockaddr_atmsvc *b) -+{ -+ if (*a->sas_addr.prv) -+ if (memcmp(a->sas_addr.prv,b->sas_addr.prv,ATM_ESA_LEN)) -+ return 0; -+ if (!*a->sas_addr.pub) return !*b->sas_addr.pub; -+ if (!*b->sas_addr.pub) return 0; -+ return !strcmp(a->sas_addr.pub,b->sas_addr.pub); -+} -+ -+ -+/* -+ * Avoid modification of any list of local interfaces while reading it -+ * (which may involve page faults and therefore rescheduling) -+ */ -+ -+ -+static volatile int local_lock = 0; -+static struct wait_queue *local_wait = NULL; -+ -+ -+static void lock_local(void) -+{ -+ while (local_lock) sleep_on(&local_wait); -+ local_lock = 1; -+} -+ -+ -+static void unlock_local(void) -+{ -+ local_lock = 0; -+ wake_up(&local_wait); -+} -+ -+ -+static void notify_sigd(struct atm_dev *dev) -+{ -+ struct sockaddr_atmpvc pvc; -+ -+ pvc.sap_addr.itf = dev->number; -+ sigd_enq(NULL,as_itf_notify,NULL,&pvc,NULL); -+} -+ -+ -+static void reset_addr(struct atm_dev *dev) -+{ -+ struct atm_dev_addr *this; -+ -+ lock_local(); -+ while (dev->local) { -+ this = dev->local; -+ dev->local = this->next; -+ kfree(this); -+ } -+ unlock_local(); -+ notify_sigd(dev); -+} -+ -+ -+static int add_addr(struct atm_dev *dev,struct sockaddr_atmsvc *addr) -+{ -+ struct atm_dev_addr **walk; -+ -+ lock_local(); -+ for (walk = &dev->local; *walk; walk = &(*walk)->next) -+ if (identical(&(*walk)->addr,addr)) { -+ unlock_local(); -+ return -EEXIST; -+ } -+ *walk = kmalloc(sizeof(struct atm_dev_addr),GFP_KERNEL); -+ if (!*walk) { -+ unlock_local(); -+ return -ENOMEM; -+ } -+ (*walk)->addr = *addr; -+ (*walk)->next = NULL; -+ unlock_local(); -+ notify_sigd(dev); -+ return 0; -+} -+ -+ -+static int del_addr(struct atm_dev *dev,struct sockaddr_atmsvc *addr) -+{ -+ struct atm_dev_addr **walk,*this; -+ -+ lock_local(); -+ for (walk = &dev->local; *walk; walk = &(*walk)->next) -+ if (identical(&(*walk)->addr,addr)) break; -+ if (!*walk) { -+ unlock_local(); -+ return -ENOENT; -+ } -+ this = *walk; -+ *walk = this->next; -+ kfree(this); -+ unlock_local(); -+ notify_sigd(dev); -+ return 0; -+} -+ -+ -+static int get_addr(struct atm_dev *dev,struct sockaddr_atmsvc *buf,int size) -+{ -+ struct atm_dev_addr *walk; -+ int total; -+ -+ lock_local(); -+ total = 0; -+ for (walk = dev->local; walk; walk = walk->next) { -+ total += sizeof(struct sockaddr_atmsvc); -+ if (total > size) { -+ unlock_local(); -+ return -E2BIG; -+ } -+ memcpy_tofs(buf,&walk->addr,sizeof(struct sockaddr_atmsvc)); -+ buf++; -+ } -+ unlock_local(); -+ return total; -+} -+ -+ -+static int svc_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg) -+{ -+ struct atm_dev *dev; -+ void *buf; -+ int rsize,wsize,len; -+ int error; -+ -+ rsize = wsize = 0; -+ switch (cmd) { -+ case SIOCGIFATMADDR: -+ wsize = sizeof(struct sockaddr_atmsvc); -+ break; -+ case SIOCSIFATMADDR: -+ case ATM_ADDADDR: -+ case ATM_DELADDR: -+ rsize = sizeof(struct sockaddr_atmsvc); -+ case ATM_RSTADDR: -+ if (!suser()) return -EPERM; -+ break; -+ case ATM_GETADDR: -+ wsize = -1; -+ break; -+ default: -+ return atm_ioctl(sock,cmd,arg); -+ } -+ error = verify_area(VERIFY_READ,(void *) arg, -+ sizeof(struct atmif_sioc)); -+ if (error) return error; -+ if (wsize) { -+ error = verify_area(VERIFY_WRITE,(void *) arg, -+ sizeof(struct atmif_sioc)); -+ if (error) return error; -+ } -+ if (!(dev = atm_find_dev(get_fs_long(&((struct atmif_sioc *) arg)-> -+ number)))) return -ENODEV; -+ len = get_fs_long(&((struct atmif_sioc *) arg)->length); -+ buf = (void *) get_fs_long(&((struct atmif_sioc *) arg)->arg); -+ if (cmd == SIOCSIFATMADDR && !buf) rsize = 0; /* @@@ */ -+ if (!buf && (rsize || wsize)) return -EINVAL; -+ if (rsize > 0) { -+ if (len != rsize) return -EINVAL; -+ error = verify_area(VERIFY_READ,buf,len); -+ if (error) return error; -+ } -+ if (wsize > 0) { -+ if (len != wsize) return -EINVAL; -+ error = verify_area(VERIFY_WRITE,buf,len); -+ if (error) return error; -+ put_fs_long(wsize,&((struct atmif_sioc *) arg)->length); -+ } -+ switch (cmd) { -+ case SIOCGIFATMADDR: -+ { -+ struct sockaddr_atmsvc addr; -+ -+ memset(&addr,0,sizeof(addr)); -+ memcpy_tofs((struct sockaddr_atmsvc *) buf, -+ dev->local ? &dev->local->addr : &addr, -+ sizeof(struct sockaddr_atmsvc)); -+ return wsize; -+ } -+ case ATM_RSTADDR: -+ reset_addr(dev); -+ return 0; -+ case SIOCSIFATMADDR: /* OBSOLETE - REMOVE WHEN ILMID UPDATED */ -+ reset_addr(dev); -+ if (!buf) return 0; -+ cmd = ATM_ADDADDR; -+ /* fall through */ -+ case ATM_ADDADDR: -+ case ATM_DELADDR: -+ { -+ struct sockaddr_atmsvc addr; -+ -+ memcpy_fromfs(&addr,buf,sizeof(addr)); -+ error = check_addr(&addr); -+ if (error) return error; -+ if (cmd == ATM_ADDADDR) -+ return add_addr(dev,&addr); -+ else return del_addr(dev,&addr); -+ } -+ case ATM_GETADDR: -+ error = get_addr(dev,buf,len); -+ if (error < 0) return error; -+ put_fs_long(error, -+ &((struct atmif_sioc *) arg)->length); -+ return error; -+ } -+ return -EINVAL; /* actually, we're in trouble if we end up here ... */ -+} -+ -+ -+static int svc_setsockopt(struct socket *sock,int level,int optname, -+ char *optval,int optlen) -+{ -+ /* stuff for SVCs */ -+ return atm_setsockopt(sock,level,optname,optval,optlen); -+} -+ -+ -+static int svc_getsockopt(struct socket *sock,int level,int optname, -+ char *optval,int *optlen) -+{ -+ /* stuff for SVCs */ -+ return atm_getsockopt(sock,level,optname,optval,optlen); -+} -+ -+ -+static struct proto_ops svc_proto_ops = { -+ PF_ATMSVC, -+ svc_create, -+ svc_dup, -+ svc_release, -+ svc_bind, -+ svc_connect, -+ NULL, /* no socketpair */ -+ svc_accept, -+ svc_getname, -+ atm_select, -+ svc_ioctl, -+ svc_listen, -+ svc_shutdown, -+ svc_setsockopt, -+ svc_getsockopt, -+ NULL, /* no fcntl */ -+ atm_sendmsg, -+ atm_recvmsg -+}; -+ -+ -+/* -+ * Initialize the ATM SVC protocol family -+ */ -+ -+void atmsvc_proto_init(struct net_proto *pro) -+{ -+ if (sock_register(svc_proto_ops.family,&svc_proto_ops) < 0) { -+ printk(KERN_ERR "ATMSVC: can't register"); -+ return; -+ } -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/signaling.c Fri Jul 12 17:05:22 1996 -@@ -0,0 +1,238 @@ -+/* net/atm/signaling.c - ATM signaling */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include /* error codes */ -+#include /* printk, suser */ -+#include -+#include -+#include /* jiffies and HZ */ -+#include /* ATM stuff */ -+#include -+#include -+#include -+ -+#include "static.h" -+#include "signaling.h" -+ -+ -+#undef WAIT_FOR_DEMON /* #define this if system calls on SVC sockets -+ should block until the demon runs. -+ Danger: may cause nasty hangs if the demon -+ crashes. */ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+struct atm_vcc *sigd = NULL; -+static struct wait_queue *sigd_sleep = NULL; -+ -+ -+static int sigd_send(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ struct atmsvc_msg *msg; -+ -+ msg = (struct atmsvc_msg *) skb->data; -+ DPRINTK("sigd_send %d (0x%lx)\n",(int) msg->type,msg->vcc); -+ vcc = (struct atm_vcc *) msg->vcc; -+ if (!vcc) vcc = (struct atm_vcc *) msg->listen_vcc; -+ switch (msg->type) { -+ case as_okay: -+ vcc->reply = msg->reply; -+ if (!*vcc->local.sas_addr.prv && -+ !*vcc->local.sas_addr.pub) { -+ vcc->local.sas_family = AF_ATMSVC; -+ memcpy(vcc->local.sas_addr.prv, -+ msg->local.sas_addr.prv,ATM_ESA_LEN); -+ memcpy(vcc->local.sas_addr.pub, -+ msg->local.sas_addr.pub,ATM_E164_LEN+1); -+ } -+ if (vcc->vpi || vcc->vci) break; -+ vcc->itf = msg->pvc.sap_addr.itf; -+ vcc->vpi = msg->pvc.sap_addr.vpi; -+ vcc->vci = msg->pvc.sap_addr.vci; -+ vcc->txtp = msg->pvc.sap_txtp; -+ vcc->rxtp = msg->pvc.sap_rxtp; -+ break; -+ case as_indicate: -+ DPRINTK("as_indicate!!!\n"); -+ if (!vcc->backlog_quota) { -+ sigd_enq(0,as_close,(struct atm_vcc *) -+ msg->listen_vcc,NULL,NULL); -+ return 0; -+ } -+ vcc->backlog_quota--; -+ skb_queue_tail(&vcc->listenq,skb); -+ if (vcc->callback) { -+ DPRINTK("waking vcc->sleep 0x%lx\n", -+ (unsigned long) &vcc->sleep); -+ vcc->callback(vcc); -+ } -+ return 0; -+ case as_close: -+ if (msg->reply < 0) { -+ vcc->flags &= ~ATM_VF_REGIS; -+ vcc->reply = msg->reply; -+ } -+ else { -+ vcc->flags |= ATM_VF_RELEASED; -+ vcc->reply = -msg->reply; -+ } -+ vcc->flags &= ~ATM_VF_READY; -+ break; -+ default: -+ printk(KERN_ALERT "sigd_send: bad message type %d\n", -+ (int) msg->type); -+ return -EINVAL; -+ } -+ if (vcc->callback) vcc->callback(vcc); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return 0; -+} -+ -+ -+static void _sigd_enq(struct atm_vcc *vcc,enum atmsvc_msg_type type, -+ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, -+ const struct sockaddr_atmsvc *svc,int atomic) -+{ -+ struct sk_buff *skb; -+ struct atmsvc_msg *msg; -+ struct atm_blli *walk; -+ int size,i; -+#ifdef WAIT_FOR_DEMON -+ static unsigned long silence = 0; -+#endif -+ -+ DPRINTK("sigd_enq %d (0x%lx)\n",(int) type,(unsigned long) vcc); -+ size = sizeof(struct atmsvc_msg)-sizeof(struct atm_blli); -+ if (svc) -+ for (walk = svc->sas_addr.blli; walk; walk = walk->next) -+ size += sizeof(struct atm_blli); -+ if (!atomic) while (!(skb = alloc_skb(size,GFP_KERNEL))) schedule(); -+ else if (!(skb = alloc_skb(size,GFP_ATOMIC))) { -+ printk(KERN_ALERT "sigd_enq: no memory for message\n"); -+ return; -+ } -+ skb->free = 1; -+ skb->len = size; -+ msg = (struct atmsvc_msg *) skb->data; -+ msg->type = type; -+ msg->vcc = (unsigned long) vcc; -+ msg->listen_vcc = (unsigned long) listen_vcc; -+ msg->aal = vcc ? vcc->aal : 0; -+ if (!svc) msg->svc.sas_family = 0; -+ else { -+ msg->svc = *svc; -+ i = 0; -+ for (walk = svc->sas_addr.blli; walk; walk = walk->next) -+ msg->blli[i++] = *walk; -+ } -+ if (vcc) msg->local = vcc->local; -+ if (!pvc) memset(&msg->pvc,0,sizeof(msg->pvc)); -+ else msg->pvc = *pvc; -+ while (!sigd) { -+#ifdef WAIT_FOR_DEMON -+/* -+ * Don't ever enable this as Arequipa depends on being able to send a -+ * message to the signaling demon from an interrupt. -+ */ -+ if (silence < jiffies) { -+ printk(KERN_INFO "atmsvc: waiting for signaling demon " -+ "...\n"); -+ silence = jiffies+30*HZ; -+ } -+ sleep_on(&sigd_sleep); -+#else -+ printk(KERN_WARNING "atmsvc: no signaling demon\n"); -+ kfree_skb(skb,FREE_READ); -+ return; -+#endif -+ } -+ skb_queue_tail(&sigd->recvq,skb); -+ wake_up(&sigd->sleep); -+ if (vcc) vcc->flags |= ATM_VF_REGIS; -+} -+ -+ -+void sigd_enq(struct atm_vcc *vcc,enum atmsvc_msg_type type, -+ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, -+ const struct sockaddr_atmsvc *svc) -+{ -+ _sigd_enq(vcc,type,listen_vcc,pvc,svc,0); -+} -+ -+ -+void sigd_enq_atomic(struct atm_vcc *vcc,enum atmsvc_msg_type type, -+ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, -+ const struct sockaddr_atmsvc *svc) -+{ -+ _sigd_enq(vcc,type,listen_vcc,pvc,svc,1); -+} -+ -+ -+static void trigger(struct atm_vcc *vcc) -+{ -+ if (vcc->family == PF_ATMSVC && !(vcc->flags & ATM_VF_META)) { -+ vcc->flags |= ATM_VF_RELEASED; -+ vcc->reply = -EUNATCH; -+ wake_up(&vcc->sleep); -+ } -+} -+ -+ -+static void sigd_close(struct atm_vcc *vcc) -+{ -+ struct sk_buff *skb; -+ -+ DPRINTK("sigd_close\n"); -+ sigd = NULL; -+ if (skb_peek(&vcc->recvq)) -+ printk(KERN_ERR "sigd_close: closing with requests pending\n"); -+ while ((skb = skb_dequeue(&vcc->recvq))) kfree_skb(skb,FREE_READ); -+ for_all_vccs(trigger); -+} -+ -+ -+static struct atmdev_ops sigd_dev_ops = { -+ NULL, /* no open */ -+ sigd_close, /* close */ -+ NULL, /* no ioctl */ -+ NULL, /* no getsockopt */ -+ NULL, /* no setsockopt */ -+ sigd_send, /* send */ -+ NULL, /* no sg_send */ -+ NULL, /* no poll */ -+ NULL, /* no phy_put */ -+ NULL, /* no phy_get */ -+ NULL /* no feedback */ -+}; -+ -+ -+static struct atm_dev sigd_dev = { -+ &sigd_dev_ops, -+ NULL, /* no PHY */ -+ "sig", /* type */ -+ 999, /* dummy device number */ -+ NULL,NULL, /* pretend not to have any VCCs */ -+ NULL,NULL, /* no data */ -+ 0, /* no flags */ -+ NULL, /* no local address */ -+ { 0 } /* no ESI, no statistics */ -+}; -+ -+ -+int sigd_attach(struct atm_vcc *vcc) -+{ -+ if (sigd) return -EADDRINUSE; -+ DPRINTK("sigd_attach\n"); -+ sigd = vcc; -+ vcc->dev = &sigd_dev; -+ vcc->flags |= ATM_VF_READY | ATM_VF_META; -+ wake_up(&sigd_sleep); -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/signaling.h Fri Jul 19 15:10:11 1996 -@@ -0,0 +1,28 @@ -+/* net/atm/signaling.h - ATM signaling */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_SIGNALING_H -+#define NET_ATM_SIGNALING_H -+ -+#include -+#include -+#include -+ -+ -+#define WAITING 1 /* for reply: 0: no error, < 0: error, ... */ -+ -+ -+extern struct atm_vcc *sigd; /* needed in svc_release */ -+ -+ -+void sigd_enq(struct atm_vcc *vcc,enum atmsvc_msg_type type, -+ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, -+ const struct sockaddr_atmsvc *svc); -+void sigd_enq_atomic(struct atm_vcc *vcc,enum atmsvc_msg_type type, -+ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, -+ const struct sockaddr_atmsvc *svc); -+int sigd_attach(struct atm_vcc *vcc); -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/atmarp.c Wed Jul 17 18:01:27 1996 -@@ -0,0 +1,603 @@ -+/* atmarp.c - RFC1577 ATM ARP */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include /* for UINT_MAX */ -+#include -+#include -+#include -+#include -+#include /* for some manifest constants */ -+#include -+#include -+#include -+#include -+#include -+#include /* for net/route.h */ -+#include /* for struct sockaddr_in */ -+#include /* for struct rtable and ip_rt_route */ -+#include /* for HZ */ -+#include /* for htons etc. */ -+ -+ -+/* -+ * WARNING: This code will eventually become full ATMARP support as defined in -+ * RFC1577 (actually, the plan is to move on quickly to RFC1577+), but -+ * right now it's certainly full of bugs and severe design errors. -+ * Don't use it as a reference for anything. -+ */ -+ -+ -+#include "common.h" -+#include "protocols.h" /* for atm_push_raw */ -+#include "ipcommon.h" -+#include "atmarp.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+/* -+ * Relation between address/subddress and private/public address: -+ * -+ * Caller Called Address Subaddress -+ * ----------- ----------------------- -------------- ---------- -+ * private same private net private - -+ * public-only private via public public (E.164) private -+ * private net public UNI public (NSAP) - -+ * -+ * See also: ATM Forum UNI 3.0 (or 3.1), Annex A -+ */ -+ -+ -+struct device *clip_devs = NULL; -+struct atm_vcc *atmarpd = NULL; -+static struct wait_queue *atmarpd_sleep = NULL; -+static struct timer_list idle_timer = { NULL, NULL, 0L, 0L, NULL }; -+static int start_timer = 1; -+ -+ -+#define WAITING 1 /* see also signaling.h */ -+ -+ -+static int atmarpd_send(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ struct atmarp_ctrl *ctrl; -+ -+ ctrl = (struct atmarp_ctrl *) skb->data; -+ if (ctrl->magic != ATMARP_CTRL_MAGIC) { -+ printk(KERN_ALERT "atmarpd_send: bad magic 0x%x\n", -+ ctrl->magic); -+ return -EPROTO; -+ } -+ if (ctrl->type != act_complete) { -+ printk(KERN_ALERT "atmarpd_send: bad type 0x%x\n",ctrl->type); -+ return -EPROTO; -+ } -+ if (!ctrl->reply) { -+ printk(KERN_ALERT "atmarpd_send: no reply\n"); -+ return -EPROTO; -+ } -+ *ctrl->reply = ctrl->arg; -+ wake_up(&atmarpd_sleep); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return 0; -+} -+ -+ -+static int send_demon(enum atmarp_ctrl_type type,int itf,unsigned long arg, -+ void *data,int length) -+{ -+ struct atmarp_ctrl *ctrl; -+ struct sk_buff *skb; -+ int size,need_reply; -+ volatile int reply; -+ -+ DPRINTK("send_demon(%d)\n",type); -+ if (!atmarpd) return -EUNATCH; -+ size = sizeof(struct atmarp_ctrl)+(data ? length : 0); -+ skb = alloc_skb(size,GFP_ATOMIC); -+ if (!skb) return -ENOMEM; -+ skb->free = 1; -+ skb->len = size; -+ need_reply = type == act_ioctl || type == act_create; -+ ctrl = (struct atmarp_ctrl *) skb->data; -+ ctrl->magic = ATMARP_CTRL_MAGIC; -+ ctrl->type = type; -+ ctrl->reply = need_reply ? &reply : NULL; -+ ctrl->itf_num = itf; -+ ctrl->arg = arg; -+ if (data) memcpy(ctrl->data,data,length); -+ reply = WAITING; -+ skb_queue_tail(&atmarpd->recvq,skb); -+ wake_up(&atmarpd->sleep); -+ if (!need_reply) return 0; -+ while (reply == WAITING && atmarpd) sleep_on(&atmarpd_sleep); -+ return atmarpd ? reply : -EUNATCH; -+} -+ -+ -+static void remove(struct atmarp_entry *entry) /* @@@ ugly ! */ -+{ -+ struct atmarp_entry **walk; -+ -+ for (walk = &PRIV(entry->dev)->table; *walk; walk = &(*walk)->next) -+ if (*walk == entry) { -+ *walk = entry->next; -+ return; -+ } -+ printk(KERN_CRIT "ATMARP: remove failed (0x%08lx)\n", -+ (unsigned long) entry); -+} -+ -+ -+static inline void time_out_entry(struct atmarp_entry **entry) -+{ -+ struct atmarp_entry *next; -+ -+ DPRINTK("VC TIMED OUT\n"); -+ if ((*entry)->vcc) { -+ (*entry)->vcc->flags |= ATM_VF_RELEASED; -+ (*entry)->vcc->flags &= ~ATM_VF_READY; -+ } -+ else { -+ if ((*entry)->queued) { -+ dev_kfree_skb((*entry)->queued,FREE_WRITE); -+ DPRINTK("discarding queued skb\n"); -+ } -+ else printk(KERN_CRIT "atmarp: weird - incomplete entry, but " -+ "nothing queued\n"); -+ next = (*entry)->next; -+ kfree(*entry); -+ *entry = next; -+ } -+} -+ -+ -+static void idle_timer_check(unsigned long dummy) -+{ -+ struct device *itf; -+ struct atmarp_entry **entry; -+ unsigned long expire; -+ -+ idle_timer.expires = UINT_MAX; -+ for (itf = clip_devs; itf; itf = PRIV(itf)->next) -+ for (entry = &PRIV(itf)->table; *entry; -+ entry = &(*entry)->next) -+ if ((*entry)->idle_timeout) { -+ expire = (*entry)->last_use+(*entry)-> -+ idle_timeout; -+ if (expire < jiffies) { -+ time_out_entry(entry); -+ if (!*entry) break; -+ } -+ else if (expire < idle_timer.expires) -+ idle_timer.expires = expire; -+ } -+ if (idle_timer.expires < jiffies+CLIP_CHECK_INTERVAL*HZ) -+ idle_timer.expires = jiffies+CLIP_CHECK_INTERVAL*HZ; -+ del_timer(&idle_timer); -+ add_timer(&idle_timer); -+} -+ -+ -+static void atm_push_ip(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+#if 0 -+ DPRINTK("clip push\n"); -+#endif -+ if (!skb) { -+ DPRINTK("removing AE\n"); -+ AE(vcc)->old_push(vcc,NULL); -+ if (AE(vcc)->ip) remove(AE(vcc)); -+ kfree(AE(vcc)); -+ return; -+ } -+ AE(vcc)->last_use = jiffies; -+ skb->dev = AE(vcc)->dev; -+ skb->mac.raw = skb->data; -+ if (!skb->dev->hard_header_len) skb->protocol = htons(ETH_P_IP); -+ else if (skb->len < RFC1483LLC_LEN || memcmp(skb->data,llc_oui, -+ sizeof(llc_oui))) skb->protocol = 0; -+ /* probably wrong encap ... */ -+ else { -+ skb->protocol = ((unsigned short *) skb->data)[3]; -+ skb_pull(skb,RFC1483LLC_LEN); -+ if (vcc && skb->protocol == htons(ETH_P_ARP)) { -+ PRIV(skb->dev)->stats.rx_packets++; -+ atm_push_raw(vcc,skb); -+ return; -+ } -+ } -+ PRIV(skb->dev)->stats.rx_packets++; -+ netif_rx(skb); -+} -+ -+ -+static struct atmarp_entry *new_entry(int timeout) -+{ -+ struct atmarp_entry *entry; -+ -+ entry = kmalloc(sizeof(struct atmarp_entry),GFP_ATOMIC); -+ if (!entry) return NULL; -+ entry->ip = 0; -+ entry->vcc = NULL; -+ entry->encap = 1; -+ entry->dev = clip_devs; -+ entry->old_push = NULL; -+ entry->last_use = jiffies; -+ entry->idle_timeout = timeout*HZ; -+ entry->queued = NULL; -+ entry->next = NULL; -+ return entry; -+} -+ -+ -+static void attach_entry(struct atm_vcc *vcc,struct atmarp_entry *entry) -+{ -+ AE(vcc) = entry; -+ entry->old_push = vcc->push; -+ vcc->push = atm_push_ip; -+ entry->vcc = vcc; -+} -+ -+ -+static int clip_hard_header(struct sk_buff *skb,struct device *dev, -+ unsigned short type,void *daddr,void *saddr,unsigned len) -+{ -+ void *here; -+ -+ here = skb_push(skb,dev->hard_header_len); -+ memcpy(here,llc_oui,sizeof(llc_oui)); -+ ((unsigned short *) here)[3] = htons(type); -+ return -RFC1483LLC_LEN; -+} -+ -+ -+static int clip_rebuild_header(void *buff,struct device *dev,unsigned long dst, -+ struct sk_buff *skb) -+{ -+#if 0 -+ void *here; -+ -+ here = skb->data; /*skb_push(skb,dev->hard_header_len);*/ -+ memcpy(here,llc_oui,sizeof(llc_oui)); -+ ((unsigned short *) here)[3] = htons(ETH_P_IP); -+#endif -+ return 0; -+} -+ -+ -+static int clip_xmit(struct sk_buff *skb,struct device *dev) -+{ -+ struct atmarp_entry *entry; -+ -+#if 0 -+ int i; -+ DPRINTK("new clip_xmit (0x%x)\n",skb->raddr); -+/*(int *) 0xffff0000 = 42;*/ -+for (i = 0; i < skb->len; i++) printk("%02X ",skb->data[i]); -+printk("\n"); -+#endif -+ for (entry = PRIV(dev)->table; entry; entry = entry->next) -+ if (entry->ip == skb->raddr) break; -+ if (!entry) { -+ DPRINTK("no entry - queuing\n"); -+ send_demon(act_need,PRIV(dev)->number,skb->raddr,NULL,0); -+ entry = new_entry(ATMARP_RETRY_DELAY); -+ entry->queued = skb; -+ entry->ip = skb->raddr; -+ entry->next = PRIV(dev)->table; -+ PRIV(dev)->table = entry; -+ idle_timer_check(0); -+ return 0; -+ } -+ if (!entry->vcc || !(entry->vcc->flags & ATM_VF_READY)) { -+ DPRINTK("not found - discarding\n"); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return 0; -+ /* Should return -EHOSTUNREACH, but then it will retry -+ forever, so we just discard the packet. */ -+ } -+ if (!entry->encap) skb_push(skb,RFC1483LLC_LEN); -+ /* assumes that we'll never attempt to xmit the same packet -+ twice @@@ */ -+ else { -+ memcpy((void *) skb->data,llc_oui,sizeof(llc_oui)); -+ ((unsigned short *) skb->data)[3] = htons(ETH_P_IP); -+ } -+ skb->atm.iovcnt = 0; -+ AE(entry->vcc)->last_use = jiffies; -+ entry->vcc->dev->ops->send(entry->vcc,skb); -+ PRIV(dev)->stats.tx_packets++; -+ return 0; -+} -+ -+ -+static struct enet_statistics *atm_clip_get_stats(struct device *dev) -+{ -+ return &PRIV(dev)->stats; -+} -+ -+ -+int atmarp_mkip(struct atm_vcc *vcc,int timeout) -+{ -+ struct atmarp_entry *entry; -+ -+ DPRINTK("MKIP\n"); -+ entry = new_entry(timeout); -+ if (!entry) return -ENOMEM; -+ attach_entry(vcc,entry); -+ idle_timer_check(0); -+ return 0; -+} -+ -+ -+int atmarp_setentry(struct atm_vcc *vcc,unsigned long ip) -+{ -+ struct atmarp_entry **walk,**next,*succ; -+ struct rtable *route; -+ struct sk_buff *queued; -+ -+ DPRINTK("SETENTRY 0x%lx\n",ip); -+ if (vcc->push != atm_push_ip) { -+ printk(KERN_WARNING "atmarp_setentry: VCC has no ARP entry\n"); -+ return -EBADF; -+ } -+ if (!ip) { -+ if (!AE(vcc)->ip) { -+ printk(KERN_ERR "hiding hidden ATMARP entry\n"); -+ return 0; -+ } -+ DPRINTK("setentry: remove\n"); -+ remove(AE(vcc)); -+ AE(vcc)->ip = 0; -+ return 0; -+ } -+ DPRINTK("setentry: route\n"); -+ route = ip_rt_route(ip,1); -+ if (!route) return -EHOSTUNREACH; -+ AE(vcc)->dev = route->rt_dev; -+ if (AE(vcc)->ip) { -+ DPRINTK("setentry: update\n"); -+ DPRINTK("(updating)\n"); -+ AE(vcc)->ip = ip; -+ return 0; -+ } -+ DPRINTK("setentry: add\n"); -+ queued = NULL; -+ for (walk = &PRIV(AE(vcc)->dev)->table; *walk; walk = next) { -+ next = &(*walk)->next; -+ if ((*walk)->ip == ip) { -+ if ((*walk)->vcc) continue; -+ /* more than one VC to dest */ -+ if ((*walk)->queued) { -+ DPRINTK("setentry: flushing\n"); -+ if (queued) -+ printk(KERN_CRIT "atmarp: bad news - " -+ "more than one skb queued\n"); -+ queued = (*walk)->queued; -+ } -+ succ = (*walk)->next; -+ kfree(*walk); -+ *walk = succ; -+ next = walk; -+ continue; -+ } -+ } -+ DPRINTK("(adding)\n"); -+ AE(vcc)->ip = ip; -+ AE(vcc)->next = PRIV(AE(vcc)->dev)->table; -+ PRIV(AE(vcc)->dev)->table = AE(vcc); -+ if (queued) clip_xmit(queued,route->rt_dev); -+ return 0; -+} -+ -+ -+int atmarp_encap(struct atm_vcc *vcc,int mode) -+{ -+ AE(vcc)->encap = mode; -+ return 0; -+} -+ -+ -+static int atmarp_ioctl(struct device *dev,unsigned int cmd,void *arg) -+{ -+ struct atmarpreq req; -+ __u32 *ip; -+ int error; -+ -+ DPRINTK("atmarp_ioctl\n"); -+ error = verify_area(VERIFY_READ,arg,sizeof(struct atmarpreq)); -+ if (error) return error; -+ memcpy_fromfs(&req,arg,sizeof(struct atmarpreq)); -+ if (req.arp_pa.sa_family != AF_INET) return -EPFNOSUPPORT; -+ ip = &((struct sockaddr_in *) &req.arp_pa)->sin_addr.s_addr; -+ if (!(*ip & ~dev->pa_mask) && !(req.arp_flags & ATF_ARPSRV)) -+ return -EINVAL; -+ switch (cmd) { -+ case SIOCSARP: -+ case SIOCDARP: -+ case SIOCGARP: -+ return send_demon(act_ioctl,PRIV(dev)->number,cmd,&req, -+ sizeof(struct atmarpreq)); -+ /* @@@ get will need special treatment */ -+ default: -+ return -EINVAL; -+ } -+ return 0; -+} -+ -+ -+static int clip_open(struct device *dev) -+{ -+ DPRINTK("clip_open called\n"); -+ return 0; -+} -+ -+ -+static int clip_stop(struct device *dev) -+{ -+ DPRINTK("clip_stop\n"); -+ /* @@@ just kill it on error ? */ -+ return 0; -+} -+ -+ -+static int clip_init(struct device *dev) -+{ -+ DPRINTK("init %s\n",dev->name); -+ dev->hard_start_xmit = clip_xmit; -+ /* sg_xmit ... */ -+ dev->open = clip_open; -+ dev->stop = clip_stop; -+ ether_setup(dev); -+ dev->tbusy = 0; /* @@@ check */ -+ dev->hard_header = clip_hard_header; -+ dev->do_ioctl = NULL; -+ dev->ip_arp = atmarp_ioctl; -+ dev->rebuild_header = clip_rebuild_header; -+ dev->get_stats = atm_clip_get_stats; -+ dev->hard_header_len = RFC1483LLC_LEN; -+ dev->flags &= ~(IFF_BROADCAST | IFF_MULTICAST); -+ dev->flags |= IFF_NOARP; /* we do our own ARP ... */ -+ dev->mtu = RFC1626_MTU; -+ return send_demon(act_create,PRIV(dev)->number,0,NULL,0); -+} -+ -+ -+int clip_create(int number) /* remove by downing */ -+{ -+ struct device *dev,*walk; -+ -+ if (number != -1) { -+ for (walk = clip_devs; walk; walk = PRIV(walk)->next) -+ if (PRIV(walk)->number == number) return -EEXIST; -+ } -+ else { -+ number = 0; -+ for (walk = clip_devs; walk; walk = PRIV(walk)->next) -+ if (PRIV(walk)->number >= number) -+ number = PRIV(walk)->number+1; -+ } -+ dev = kmalloc(sizeof(struct device)+sizeof(struct atmarp_priv), -+ GFP_KERNEL); -+ if (!dev) return -ENOMEM; -+ memset(dev,0,sizeof(struct device)+sizeof(struct atmarp_priv)); -+ dev->name = PRIV(dev)->name; -+ sprintf(dev->name,"atm%d",number); -+ dev->init = clip_init; -+ if (register_netdev(dev)) return -EIO; /* free dev ? */ -+ PRIV(dev)->number = number; -+ PRIV(dev)->table = NULL; -+ PRIV(dev)->next = clip_devs; -+ clip_devs = dev; -+ DPRINTK("registered (net:%s)\n",dev->name); -+ return number; -+} -+ -+ -+static int clip_device_event(struct notifier_block *this,unsigned long event, -+ void *dev) -+{ -+ /* ignore non-CLIP devices */ -+ if (((struct device *) dev)->init != clip_init) return NOTIFY_DONE; -+ switch (event) { -+ case NETDEV_UP: -+ (void) send_demon(act_up,PRIV(dev)->number,0,NULL,0); -+ break; -+ case NETDEV_DOWN: -+ DPRINTK("clip_device_event NETDEV_DOWN\n"); -+ (void) send_demon(act_down,PRIV(dev)->number,0,NULL,0); -+ break; -+ case NETDEV_REBOOT: -+ /* ignore */ -+ break; -+ default: -+ printk(KERN_ERR "clip_device_event: unknown event " -+ "%ld\n",event); -+ break; -+ } -+ return NOTIFY_DONE; -+} -+ -+ -+static struct notifier_block clip_dev_notifier = { -+ clip_device_event, -+ NULL, -+ 0 -+}; -+ -+ -+static void atmarpd_close(struct atm_vcc *vcc) -+{ -+ struct sk_buff *skb; -+ -+ DPRINTK("atmarpd_close\n"); -+ atmarpd = NULL; /* assumed to be atomic */ -+ barrier(); -+ unregister_netdevice_notifier(&clip_dev_notifier); -+ wake_up(&atmarpd_sleep); -+ if (skb_peek(&vcc->recvq)) -+ printk(KERN_ERR "atmarpd_close: closing with requests " -+ "pending\n"); -+ while ((skb = skb_dequeue(&vcc->recvq))) kfree_skb(skb,FREE_READ); -+ DPRINTK("(done)\n"); -+} -+ -+ -+static struct atmdev_ops atmarpd_dev_ops = { -+ NULL, /* no open */ -+ atmarpd_close, /* close */ -+ NULL, /* no ioctl */ -+ NULL, /* no getsockopt */ -+ NULL, /* no setsockopt */ -+ atmarpd_send, /* no send */ -+ NULL, /* no sg_send */ -+ NULL, /* no poll */ -+ NULL, /* no phy_put */ -+ NULL, /* no phy_get */ -+ NULL /* no feedback */ -+}; -+ -+static struct atm_dev atmarpd_dev = { -+ &atmarpd_dev_ops, -+ NULL, /* no PHY */ -+ "arpd", /* type */ -+ 999, /* dummy device number */ -+ NULL,NULL, /* pretend not to have any VCCs */ -+ NULL,NULL, /* no data */ -+ 0, /* no flags */ -+ NULL, /* no local address */ -+ { 0 } /* no ESI, no statistics */ -+}; -+ -+ -+int atm_init_atmarp(struct atm_vcc *vcc) -+{ -+ if (atmarpd) return -EADDRINUSE; -+ if (start_timer) { -+ start_timer = 0; -+ idle_timer.expires = jiffies+CLIP_CHECK_INTERVAL*HZ; -+ idle_timer.function = idle_timer_check; -+ add_timer(&idle_timer); -+ } -+ atmarpd = vcc; -+ vcc->flags |= ATM_VF_READY | ATM_VF_META; -+ /* allow replies and avoid getting closed if signaling dies */ -+ vcc->dev = &atmarpd_dev; -+ vcc->aal = ATM_AAL5; /* lie */ -+ vcc->push = NULL; -+ vcc->peek = NULL; /* crash */ -+ vcc->pop = NULL; /* crash */ -+ vcc->push_oam = NULL; /* crash */ -+ register_netdevice_notifier(&clip_dev_notifier); -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/atmarp.h Fri Jul 19 15:10:11 1996 -@@ -0,0 +1,54 @@ -+/* net/atm/atmarp.h - RFC1577 ATM ARP */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_ATMARP_H -+#define NET_ATM_ATMARP_H -+ -+#include -+#include -+#include -+#include -+#include -+ -+ -+#define PRIV(dev) ((struct atmarp_priv *) ((struct device *) (dev)+1)) -+#define AE(vcc) ((struct atmarp_entry *) (vcc->user_back)) -+ -+ -+struct atmarp_entry { -+ unsigned long ip; /* IP address, 0 if none */ -+ struct atm_vcc *vcc; /* active VCC */ -+ unsigned char encap; /* 0: NULL, 1: LLC/SNAP */ -+ struct device *dev; /* device back pointer */ -+ void (*old_push)(struct atm_vcc *vcc,struct sk_buff *skb); -+ /* keep old push fn for detaching */ -+ unsigned long last_use; /* last send or receive operation */ -+ unsigned long idle_timeout; /* keep open idle for so many jiffies*/ -+ struct sk_buff *queued; /* queue one skb when resolving */ -+ struct atmarp_entry *next; /* ugly linked list ... */ -+}; -+ -+/* Entry is PVC iff vcc && vcc->family == AF_ATMPVC */ -+ -+ -+struct atmarp_priv { -+ struct atmarp_entry *table; /* ARP table */ -+ char name[8]; /* interface name */ -+ int number; /* for convenience ... */ -+ struct enet_statistics stats; -+ struct device *next; /* next CLIP interface */ -+}; -+ -+ -+extern struct device *clip_devs; -+extern struct atm_vcc *atmarpd; /* ugly */ -+ -+ -+int clip_create(int number); -+int atmarp_mkip(struct atm_vcc *vcc,int timeout); -+int atmarp_setentry(struct atm_vcc *vcc,unsigned long ip); -+int atmarp_encap(struct atm_vcc *vcc,int mode); -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/ipcommon.h Wed Jul 17 18:27:22 1996 -@@ -0,0 +1,65 @@ -+/* net/atm/ipcommon.h - Common items for all ways of doing IP over ATM */ -+ -+/* Written 1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_IPCOMMON_H -+#define NET_ATM_IPCOMMON_H -+ -+ -+#include -+#include -+#include -+#include -+#include -+ -+ -+extern const unsigned char llc_oui[6]; -+ -+ -+#define CLIP(dev) ((struct clip_priv *) ((struct device *) (dev)+1)) -+ -+ -+struct clip_priv { -+ char name[8]; -+ struct atm_vcc *vcc; -+ struct enet_statistics stats; -+}; -+ -+ -+static inline void ipcom_push(struct sk_buff *skb) -+{ -+ skb->mac.raw = skb->data; -+ if (!skb->dev->hard_header_len) skb->protocol = htons(ETH_P_IP); -+ else if (skb->len < RFC1483LLC_LEN || memcmp(skb->data,llc_oui, -+ sizeof(llc_oui))) skb->protocol = 0; -+ /* probably wrong encap ... */ -+ else { -+ skb->protocol = ((unsigned short *) skb->data)[3]; -+ skb_pull(skb,RFC1483LLC_LEN); -+ } -+ CLIP(skb->dev)->stats.rx_packets++; -+ netif_rx(skb); -+} -+ -+ -+static inline void ipcom_xmit(struct device *dev,struct atm_vcc *vcc, -+ struct sk_buff *skb) -+{ -+ if (dev->hard_header_len) { -+ memcpy(skb->data,llc_oui,sizeof(llc_oui)); -+ ((unsigned short *) skb->data)[3] = htons(ETH_P_IP); /* hack */ -+ } -+ skb->atm.iovcnt = 0; -+ vcc->dev->ops->send(vcc,skb); -+} -+ -+ -+struct sk_buff *atm_peek_clip(struct atm_vcc *vcc,unsigned long pdu_size, -+ __u32 (*fetch)(struct atm_vcc *vcc,int i)); -+void atm_pop_clip(struct atm_vcc *vcc,struct sk_buff *skb); -+void ipcom_init(struct device *dev, -+ int (*hard_start_xmit)(struct sk_buff *skb,struct device *dev), -+ unsigned short extra_flags); -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/ipcommon.c Thu Jul 18 11:58:30 1996 -@@ -0,0 +1,173 @@ -+/* net/atm/ipcommon.c - Common items for all ways of doing IP over ATM */ -+ -+/* Written 1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+ -+#include "common.h" -+#include "ipcommon.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+const unsigned char llc_oui[] = { -+ 0xaa, /* DSAP: non-ISO */ -+ 0xaa, /* SSAP: non-ISO */ -+ 0x03, /* Ctrl: Unnumbered Information Command PDU */ -+ 0x00, /* OUI: EtherType */ -+ 0x00, -+ 0x00 }; -+ -+ -+static int clip_hard_header(struct sk_buff *skb,struct device *dev, -+ unsigned short type,void *daddr,void *saddr,unsigned len) -+{ -+ void *here; -+ -+ if (!dev->hard_header_len) return 0; /* just in case ... */ -+ here = skb_push(skb,dev->hard_header_len); -+ memcpy(here,llc_oui,sizeof(llc_oui)); -+ ((unsigned short *) here)[3] = htons(type); -+ return -RFC1483LLC_LEN; -+} -+ -+ -+static int clip_rebuild_header(void *buff,struct device *dev,unsigned long dst, -+ struct sk_buff *skb) -+{ -+ /* no ARP with this type of IP over ATM */ -+ return 0; -+} -+ -+ -+struct sk_buff *atm_peek_clip(struct atm_vcc *vcc,unsigned long pdu_size, -+ __u32 (*fetch)(struct atm_vcc *vcc,int i)) -+{ -+ struct sk_buff *skb; -+ int header_size; -+ -+ /* TODO: check against buffer quota (should even check against upper -+ layer protocol socket quota) */ -+ header_size = 0; -+ if (fetch && pdu_size > 28) { /* > IP+UDP header */ -+ unsigned long type; -+ -+/* doesn't work yet */ -+type = ntohl(fetch(vcc,2)); -+/*printk("type is 0x%08lx\n",type);*/ -+ type = ntohl(fetch(vcc,2)) & 0xff0000; -+ if (type == IPPROTO_UDP << 8) header_size = 28; /* bytes */ -+ else if (type == IPPROTO_TCP << 8) header_size = 40; /* bytes */ -+ } -+ if (!header_size) skb = alloc_skb((pdu_size+3) & ~3,GFP_ATOMIC); -+ else { -+ skb = alloc_skb(((pdu_size+3) & ~3)+PAGE_SIZE+header_size-1, -+ GFP_ATOMIC); -+ if (skb) { -+ DPRINTK("data before: 0x%lx\n", -+ (unsigned long) skb->data); -+ skb->data = (unsigned char *) (((unsigned long) skb-> -+ data+header_size+PAGE_SIZE-1) & ~(PAGE_SIZE-1))- -+ header_size; -+ DPRINTK("data after: 0x%lx\n", -+ (unsigned long) skb->data); -+ } -+ } -+ if (!skb) { -+ CLIP(vcc->proto_data)->stats.rx_dropped++; -+ vcc->stats->rx_drop++; -+ } -+ return skb; -+} -+ -+ -+void atm_pop_clip(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+#ifdef CONFIG_MMU_HACKS -+ if (skb->atm.iovcnt) -+ unlock_user(skb->atm.iovcnt-1,(struct iovec *) skb->data+1); -+#endif -+/*printk("popping (r:%d,w:%d)\n",skb->sk->rmem_alloc,skb->sk->wmem_alloc);*/ -+ dev_kfree_skb(skb,FREE_WRITE); -+} -+ -+ -+ -+static struct enet_statistics *atm_clip_get_stats(struct device *dev) -+{ -+ return &CLIP(dev)->stats; -+} -+ -+ -+/*@@@static*/ int clip_ioctl(struct device *dev,struct ifreq *rq,int cmd) -+{ -+ if (!suser()) return -EPERM; -+ switch (cmd) { -+ case CLIP_NULENCAP: -+#if 0 -+ dev->type = ARPHDR_ATMNULL; -+#endif -+ dev->hard_header_len = 0; -+ return 0; -+ case CLIP_LLCENCAP: -+#if 0 -+ dev->type = ARPHDR_ATMLLC; -+#endif -+ dev->hard_header_len = RFC1483LLC_LEN; -+ return 0; -+ default: -+ return -EOPNOTSUPP; -+ } -+} -+ -+ -+static int clip_stop(struct device *dev) -+{ -+ DPRINTK("DOWN! (%s,0x%lx)\n",dev->name,(unsigned long) CLIP(dev)->vcc); -+ atm_release_vcc(CLIP(dev)->vcc,1); -+ return 0; -+} -+ -+ -+void ipcom_init(struct device *dev, -+ int (*hard_start_xmit)(struct sk_buff *skb,struct device *dev), -+ unsigned short extra_flags) -+{ -+ DPRINTK("ipcom_init\n"); -+ DPRINTK("configuring %s\n",dev->name); -+ dev->hard_start_xmit = hard_start_xmit; -+#if 0 -+#ifdef CONFIG_MMU_HACKS -+ dev->sg_xmit = clip_sg_xmit; -+#else -+ dev->sg_xmit = NULL; -+#endif -+#endif -+ dev->stop = clip_stop; -+ ether_setup(dev); -+ dev->tbusy = 0; /* @@@ check */ -+ dev->hard_header = clip_hard_header; -+ dev->do_ioctl = clip_ioctl; -+ dev->rebuild_header = clip_rebuild_header; -+ dev->get_stats = atm_clip_get_stats; -+ dev->hard_header_len = RFC1483LLC_LEN; -+ dev->flags |= IFF_NOARP | IFF_POINTOPOINT | extra_flags; -+#if 0 -+ dev->type = ARPHDR_ATMLLC; -+#endif -+ dev->mtu = RFC1626_MTU; -+ memset(&CLIP(dev)->stats,0,sizeof(struct enet_statistics)); -+ -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/arequipa.c Wed Jul 17 18:32:16 1996 -@@ -0,0 +1,258 @@ -+/* net/atm/arequipa.c - Application requested IP over ATM */ -+ -+/* Written 1996 by Jean-Michel Pittet and Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include /* cli and such */ -+ -+#include "protocols.h" -+#include "signaling.h" /* for indirect closing, see below */ -+#include "common.h" -+#include "ipcommon.h" -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+struct device *arequipa_dev = NULL; -+ /* must use a different null value if skb->dev can ever be NULL */ -+ -+struct rtable arequipa_rt = { -+ NULL, /* rt_next */ -+ 0L, /* rt_dst */ -+ 0L, /* rt_src */ -+ 0L, /* rt_gateway */ -+ 2, /* rt_refcnt */ -+ 1, /* rt_use */ -+ 0, /* rt_window */ -+ 0L, /* rt_lastuse */ -+ NULL, /* rt_hh */ -+ NULL, /* rt_dev */ -+ RTF_UP, /* rt_flags */ -+ RFC1626_MTU, /* rt_mtu */ -+ 0, /* rt_irtt */ -+ 0 /* rt_tos */ -+}; -+ -+ -+/* -+ * Closing is tricky. Since we may be in an interrupt when executing -+ * arequipa_close, we can't just go and call close_fp. So what we do it instead -+ * is to ask signaling nicely to close the SVC. Signaling does its job and then -+ * comes back to close us (in arequipa_callback). Now we're in a process -+ * context and can sleep, etc. -+ */ -+ -+int arequipa_close(struct sock *upper) -+{ -+ struct socket *lower; -+ unsigned long flags; -+ -+ DPRINTK("arequipa_close\n"); -+ if (!(lower = upper->arequipa)) return -ENOTCONN; -+ save_flags(flags); -+ cli(); -+ upper->arequipa = NULL; -+ ATM_SD(lower)->upper = NULL; -+ restore_flags(flags); -+ sigd_enq_atomic(ATM_SD(lower),as_close,NULL,NULL,NULL); -+ ATM_SD(lower)->flags &= ~ATM_VF_REGIS; -+ return 0; -+} -+ -+ -+ -+static void arequipa_callback(struct atm_vcc *vcc) -+{ -+ DPRINTK("arequipa_callback\n"); -+ svc_callback(vcc); -+ if (!(vcc->flags & ATM_VF_RELEASED)) return; -+ vcc->callback = svc_callback; /* paranoia ... */ -+ if (vcc->upper) { -+ if (!vcc->upper->arequipa) -+ printk("arequipa_callback: upper pretends not to " -+ "use Arequipa\n"); -+ ip_rt_put(vcc->upper->ip_route_cache); -+ vcc->upper->ip_route_cache = NULL; -+ vcc->upper->arequipa = NULL; -+ vcc->callback = svc_callback; -+ } -+ close_fp(vcc->sock->file); -+ return; -+} -+ -+ -+static int check_aq_vcc(struct socket *lower) -+{ -+ if (lower->ops->family != PF_ATMSVC) return -EPROTOTYPE; -+ /* no PVCs, because we need to be closed by a 3rd party */ -+ if (lower->state != SS_CONNECTED) return -ENOTCONN; -+ if (ATM_SD(lower)->aal != ATM_AAL5) return -EPROTONOSUPPORT; -+ return 0; -+} -+ -+ -+/*static*/ void atm_push_arequipa(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ if (!skb) return; /* it's okay to close Arequipa VCs */ -+ /*DPRINTK("arequipa push(%ld)\n",skb->len);*/ -+ skb->dev = arequipa_dev; -+ ipcom_push(skb); -+} -+ -+ -+static void make_aq_vcc(struct socket *lower) -+{ -+ struct atm_vcc *vcc; -+ unsigned long flags; -+ -+ save_flags(flags); -+ cli(); -+ vcc = ATM_SD(lower); -+ vcc->pop = atm_pop_clip; -+ vcc->callback = arequipa_callback; -+ vcc->push = atm_push_arequipa; -+ vcc->peek = atm_peek_clip; -+ vcc->push_oam = NULL; -+ restore_flags(flags); -+ lower->file->f_count++; -+} -+ -+ -+int arequipa_attach(struct socket *lower,struct sock *upper) -+{ -+ struct rtable *rt; -+ int error; -+ -+ if (upper->arequipa) { -+ printk(KERN_WARNING "arequipa_attach: upper already uses " -+ "Arequipa\n"); -+ return -EISCONN; -+ } -+ error = check_aq_vcc(lower); -+ if (error) return error; -+ if (ATM_SD(lower)->upper) { -+ printk(KERN_WARNING "arequipa_attach: lower is already " -+ "attached\n"); -+ return -EISCONN; -+ } -+ DPRINTK("arequipa_attach %p (i_count=%d,f_count=%d)\n",upper, -+ lower->inode->i_count,lower->file->f_count); -+ upper->arequipa = lower; -+ ATM_SD(lower)->upper = upper; -+ rt = upper->ip_route_cache; /* revalidate cache */ -+ upper->ip_route_cache = NULL; -+ set_rt_cache(upper,rt); -+ return 0; -+} -+ -+ -+int arequipa_expect(struct sock *upper,int on) -+{ -+ DPRINTK("arequipa_expect %d\n",on); -+ if (on) { -+ if (upper->aq_route) return 0; -+ upper->aq_route = kmalloc(sizeof(struct rtable),GFP_KERNEL); -+ return upper->aq_route ? 0 : -ENOMEM; -+ } -+ if (!upper->aq_route) return 0; -+ if (upper->arequipa) return -EBUSY; -+ kfree(upper->aq_route); -+ upper->aq_route = NULL; -+ return 0; -+} -+ -+ -+int arequipa_preset(struct socket *lower,struct sock *upper) -+{ -+ int error; -+ -+ error = arequipa_expect(upper,1); -+ if (error) return error; -+ error = arequipa_attach(lower,upper); -+ if (!error) make_aq_vcc(lower); -+ return error; -+} -+ -+ -+int arequipa_incoming(struct socket *lower) -+{ -+ int error; -+ -+ if (!suser()) return -EPERM; -+ error = check_aq_vcc(lower); -+ if (error) return error; -+ ATM_SD(lower)->upper = NULL; -+ make_aq_vcc(lower); -+ DPRINTK("aq_incoming %d\n",lower->file->f_count); -+ return 0; -+} -+ -+ -+static int arequipa_xmit(struct sk_buff *skb,struct device *dev) -+{ -+ struct atm_vcc *vcc; -+ -+ /*DPRINTK("arequipa xmit\n");*/ -+ if (!skb->sk || !skb->sk->arequipa || -+ !ATM_SD(skb->sk->arequipa)) { -+ printk("arequipa_xmit: discarding orphaned packets\n"); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return 0; -+ } -+ vcc = ATM_SD(skb->sk->arequipa); -+ if (!(vcc->flags & ATM_VF_READY)) { -+ printk("arequipa_xmit: not ready\n"); -+ dev_kfree_skb(skb,FREE_WRITE); -+ return 0; -+ } -+ ipcom_xmit(arequipa_dev,vcc,skb); -+ CLIP(arequipa_dev)->stats.tx_packets++; -+ return 0; -+} -+ -+ -+static int arequipa_init(struct device *dev) -+{ -+ ipcom_init(dev,arequipa_xmit,IFF_UP); -+ dev->pa_addr = 0x01020304; -+ dev->pa_mask = ~0L; -+ dev->pa_alen = 4; -+ return 0; -+} -+ -+ -+int atm_init_arequipa(void) -+{ -+ DPRINTK("atm_init_arequipa\n"); -+ if (!suser()) return -EPERM; -+ arequipa_dev = kmalloc(sizeof(struct device)+sizeof(struct clip_priv), -+ GFP_KERNEL); -+ if (!arequipa_dev) return -ENOMEM; -+ arequipa_rt.rt_dev = arequipa_dev; -+ memset(arequipa_dev,0,sizeof(struct device)+sizeof(struct clip_priv)); -+ arequipa_dev->name = "arequipa"; -+ arequipa_dev->init = arequipa_init; -+ arequipa_init(arequipa_dev); -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/tunable.h Mon Jun 10 17:36:24 1996 -@@ -0,0 +1,24 @@ -+/* net/atm/tunable.h - Tunable parameters of ATM support */ -+ -+/* Written 1995 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_TUNABLE_H -+#define NET_ATM_TUNABLE_H -+ -+#if 0 -+/* this is just a reminder - TTS is a device-specific parameter and shall be -+ used inside device drivers only */ -+#define ATM_TTS 1000 /* worst-case time to service of device -+ drivers, in microseconds */ -+#endif -+ -+#define ATM_RXBQ_DEF 64 /* default RX buffer quota, in kB */ -+#define ATM_TXBQ_DEF 64 /* default TX buffer quota, in kB */ -+#define ATM_RXBQ_MAX 1024 /* RX buffer quota limit, in kB */ -+#define ATM_TXBQ_MAX 1024 /* TX buffer quota limit, in kB */ -+ -+#define ATM_PDU_OVHD 0 /* number of bytes to charge against buffer -+ quota per PDU */ -+ -+#endif ---- ref/net/ipv4/af_inet.c Fri Jun 7 09:14:29 1996 -+++ work/net/ipv4/af_inet.c Mon Jun 10 17:51:57 1996 -@@ -105,6 +105,14 @@ - #include - #endif - -+#ifdef CONFIG_ATM_TCP -+#include -+int (*atmtcp_attach_hook)(struct socket *sock) = NULL; -+#endif -+#ifdef CONFIG_AREQUIPA -+#include -+#endif -+ - #define min(a,b) ((a)<(b)?(a):(b)) - - extern struct proto packet_prot; -@@ -415,6 +423,10 @@ - - if (sk->rmem_alloc == 0 && sk->wmem_alloc == 0) - { -+#ifdef CONFIG_AREQUIPA -+ if (sk->arequipa) arequipa_close(sk); -+ if (sk->aq_route) kfree_s(sk->aq_route,sizeof(struct rtable)); -+#endif - if(sk->opt) - kfree(sk->opt); - ip_rt_put(sk->ip_route_cache); -@@ -662,6 +674,10 @@ - sk_free(sk); - return(-ESOCKTNOSUPPORT); - } -+#ifdef CONFIG_AREQUIPA -+ sk->arequipa = NULL; -+ sk->aq_route = NULL; -+#endif - sk->socket = sock; - #ifdef CONFIG_TCP_NAGLE_OFF - sk->nonagle = 1; -@@ -1334,7 +1350,18 @@ - return((*dlci_ioctl_hook)(cmd, (void *) arg)); - #endif - return -ENOPKG; -- -+#ifdef CONFIG_ATM_TCP -+ case SIOCSIFATMTCP: -+ if (atmtcp_attach_hook) -+ return atmtcp_attach_hook(sock); -+ return -EINVAL; -+#endif -+#ifdef CONFIG_AREQUIPA -+ case AREQUIPA_EXPECT: -+ return arequipa_expect(sk,arg); -+ case AREQUIPA_CLOSE: -+ return arequipa_close(sk); -+#endif - default: - if ((cmd >= SIOCDEVPRIVATE) && - (cmd <= (SIOCDEVPRIVATE + 15))) ---- ref/net/protocols.c Sat Mar 30 12:20:34 1996 -+++ work/net/protocols.c Mon Jun 10 17:52:25 1996 -@@ -42,6 +42,10 @@ - #include - extern void rif_init(struct net_proto *); - #endif -+#ifdef CONFIG_ATM -+#include -+#endif -+ - /* - * Protocol Table - */ -@@ -73,6 +77,10 @@ - #endif - #ifdef CONFIG_ATALK - { "DDP", atalk_proto_init }, /* Netatalk Appletalk driver */ -+#endif -+#ifdef CONFIG_ATM -+ { "ATMPVC", atmpvc_proto_init }, -+ { "ATMSVC", atmsvc_proto_init }, - #endif - { NULL, NULL } /* End marker */ - }; ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/mmuio.c Mon Jun 10 18:21:54 1996 -@@ -0,0 +1,474 @@ -+/* net/atm/mmuio.c - MMU-supported high-speed I/O */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+ -+ -+#ifdef CONFIG_MMU_HACKS -+ -+#define invalidate flush_tlb_all /* @@@ improve this */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+ -+#include -+ -+#include -+ -+#include /* needed to include net/sock.h */ -+#include -+ -+ -+/* #define MAX_SC_LOCKS 3 */ -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+#ifndef CONFIG_MMU_HACKS_DEBUG -+ -+#define EVENT(s,a,b,c) DPRINTK(s,a,b,c) -+ -+static void event_dump(void) {} -+ -+#else -+ -+/* -+ * Very extensive activity logging. Greatly improves bug detection speed but -+ * costs a few Mbps if enabled. -+ */ -+ -+#define EV 64 -+ -+static const char *ev[EV]; -+ -+static unsigned long ev_a[EV],ev_b[EV],ev_c[EV]; -+static int ec = 0; -+ -+ -+static void EVENT(const char *s,unsigned long a,unsigned long b,unsigned long c) -+{ -+ ev[ec] = s; -+ ev_a[ec] = a; -+ ev_b[ec] = b; -+ ev_c[ec] = c; -+ ec = (ec+1) % EV; -+} -+ -+ -+static void event_dump(void) -+{ -+ int n,i; -+ -+ printk(KERN_NOTICE "----- Event dump follows -----\n"); -+ for (n = 0; n < EV; n++) { -+ i = (ec+n) % EV; -+ printk(KERN_NOTICE); -+ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i],ev_c[i]); -+ } -+ printk(KERN_NOTICE "----- Event dump ends here -----\n"); -+} -+ -+ -+#endif /* CONFIG_MMU_HACKS_DEBUG */ -+ -+/* -+ * Helper functions to walk through page tables. If CREATE is set, they add -+ * new entries if needed to reach a given PTE. PTEs are never created. If -+ * CREATE is not set, *PMD and *PTE might become NULL while passing unavailable -+ * memory regions. -+ */ -+ -+ -+static inline int mmu_resolve(unsigned long addr,pgd_t **pgd,pmd_t **pmd, -+ pte_t **pte,int create) -+{ -+ *pgd = pgd_offset(current->mm,addr); -+ *pmd = create ? pmd_alloc(*pgd,addr) : pmd_offset(*pgd,addr); -+ if (!*pmd) { -+ if (create) invalidate(); -+ *pte = NULL; -+ return -ENOMEM; -+ } -+ *pte = create ? pte_alloc(*pmd,addr) : pte_offset(*pmd,addr); -+ if (*pte) return 0; -+ if (create) invalidate(); -+ return -ENOMEM; -+} -+ -+ -+static inline int mmu_step(unsigned long addr,pgd_t **pgd,pmd_t **pmd, -+ pte_t **pte,int create) -+{ -+ if (addr & (PTRS_PER_PTE*PAGE_SIZE-1)) { -+ if (*pte) (*pte)++; -+ } -+ else { -+ if (addr & (PTRS_PER_PMD*PTRS_PER_PTE*PAGE_SIZE-1)) { -+ if (*pmd) (*pmd)++; -+ } -+ else { -+ (*pgd)++; -+ *pmd = create ? pmd_alloc(*pgd,addr) : -+ pmd_offset(*pgd,addr); -+ if (!*pmd) { -+ if (create) invalidate(); -+ *pte = NULL; -+ return -ENOMEM; -+ } -+ } -+ *pte = create ? pte_alloc(*pmd,addr) : pte_offset(*pmd,addr); -+ if (!*pte) { -+ if (create) invalidate(); -+ return -ENOMEM; -+ } -+ } -+ return 0; -+} -+ -+ -+/* -+ * Removes a range of pages belonging to the current process. This helps to -+ * avoid undesirable copying when COW or swapped-out pages are overwritten in -+ * one sweep. -+ */ -+ -+ -+void free_range(unsigned long start,unsigned long size) -+{ -+ pgd_t *pgd; -+ pmd_t *pmd; -+ pte_t *pte; -+ unsigned long end; -+ -+ end = (start+size) & ~(PAGE_SIZE-1); -+ start = (start+PAGE_SIZE-1) & ~(PAGE_SIZE-1); -+ if (start <= end) return; -+ (void) mmu_resolve(start,&pgd,&pmd,&pte,0); -+ while (1) { -+ if (pte && !pte_none(*pte)) { -+ pte_t old_page; -+ -+ old_page = *pte; -+ pte_clear(pte); -+ if (!pte_present(old_page)) -+ swap_free(pte_val(old_page)); -+ else { -+ current->mm->rss--; -+ free_page(pte_page(old_page)); -+ } -+ } -+ if ((start += PAGE_SIZE) >= end) break; -+ (void) mmu_step(start,&pgd,&pmd,&pte,0); -+ } -+ invalidate(); -+} -+ -+ -+/* -+ * Copies data by mapping kernel pages into the current process. If the data is -+ * mis-aligned or if no whole pages can be copied, ordinary memory-to-memory -+ * copies are done. -+ * -+ * TODO: Speed improvement: if copying "almost" a page, don't copy from kernel -+ * to user, but still map the kernel page and copy the user data instead. -+ * This may also reduce the number of bad COW/swap activity. -+ * -+ */ -+ -+ -+struct page_descriptor { -+ struct page_descriptor *next; -+ struct block_header *firstfree; -+ int order; -+ int nfree; -+}; -+ -+ -+/* -+ * Since we always work on "big" buffers (>= one memory page), kmalloc's -+ * page sharing doesn't get in the way. -+ */ -+ -+ -+extern volatile unsigned long net_skbcount; -+ -+ -+static void free_around(struct sk_buff *skb,unsigned long start, -+ unsigned long end) -+{ -+ struct page_descriptor *dsc; -+ unsigned long order,first,last; -+ -+ net_skbcount--; -+ /* FIXME: should also update kmalloc counters @@@ */ -+ dsc = (struct page_descriptor *) ((unsigned long) skb->head & -+ PAGE_MASK); -+ order = dsc->order; -+ order = order < 7 ? 0 : order-7; -+ first = (unsigned long) dsc; -+ last = first+(PAGE_SIZE << order); -+ if (mem_map[MAP_NR(first)].count != 1) { -+ printk(KERN_CRIT "free_around: mem_map[%ld].count is 0x%x\n", -+ MAP_NR(first),mem_map[MAP_NR(first)].count); -+ event_dump(); -+ return; -+ } -+ while (first < last) { -+ mem_map[MAP_NR(first)].count = 1; -+ if (first < start || first >= end) free_page(first); -+ first += PAGE_SIZE; -+ } -+} -+ -+ -+/* fixme: what if reading into shared memory region ? */ -+void mmucp_tofs(unsigned long user,unsigned long size,struct sk_buff *skb, -+ unsigned long kernel) -+{ -+ unsigned long extra; -+ pgd_t *pgd; -+ pmd_t *pmd; -+ pte_t *pte; -+ int error; -+ unsigned long hole_start; -+ -+ if (size > skb->len) size = skb->len; -+ EVENT("mmucp_tofs 0x%lx to 0x%lx+%ld\n",kernel,user,size); -+ if (skb->prev || skb->next || skb->lock || skb->users > 1) { -+ memcpy_tofs((void *) user,(void *) kernel,size); -+ return; -+ } -+ if (((kernel^user) & (PAGE_SIZE-1)) || size < PAGE_SIZE) { -+ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel,size); -+ memcpy_tofs((void *) user,(void *) kernel,size); -+ kfree_skb(skb,FREE_READ); -+ return; -+ } -+ if ((extra = -user & (PAGE_SIZE-1))) { -+ if ((size -= extra) < PAGE_SIZE) { -+ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel, -+ size+extra); -+ memcpy_tofs((void *) user,(void *) kernel,size+extra); -+ kfree_skb(skb,FREE_READ); -+ return; -+ } -+ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel,size); -+ memcpy_tofs((void *) user,(void *) kernel,extra); -+ user += extra; -+ kernel += extra; -+ } -+ if ((error = mmu_resolve(user,&pgd,&pmd,&pte,1)) < 0) { -+ invalidate(); -+ oom(current); -+ return; -+ } -+ hole_start = kernel; -+ while (1) { -+ pte_t old_page; -+ -+ if (mem_map[MAP_NR(pte_page(*pte))].count > 1) { -+ EVENT("memcpy(0x%lx,0x%lx,PAGE_SIZE);\n",user,kernel,0); -+ memcpy_tofs((void *) user,(void *) kernel,PAGE_SIZE); -+ } -+ else { -+ old_page = *pte; -+ pte_clear(pte); -+ if (!pte_none(old_page)) -+ if (!pte_present(old_page)) -+ swap_free(pte_val(old_page)); -+ else { -+ current->mm->rss--; -+ free_page(pte_page(old_page)); -+ } -+ mem_map[MAP_NR(kernel)].count = 1; -+ /* Page is now owned only by user. */ -+ *pte = mk_pte(kernel,PAGE_SHARED); -+ *pte = pte_mkdirty(*pte); -+ EVENT("mapped 0x%lx at 0x%lx\n",kernel,user,0); -+ current->mm->rss++; -+ } -+ user += PAGE_SIZE; -+ kernel += PAGE_SIZE; -+ if ((size -= PAGE_SIZE) < PAGE_SIZE) break; -+ if ((error = mmu_step(user,&pgd,&pmd,&pte,1)) < 0) { -+ kernel -= PAGE_SIZE; /* back off */ -+ size = 0; -+ oom(current); -+ break; -+ } -+ } -+ if (size) { -+ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel,size); -+ memcpy_tofs((void *) user,(void *) kernel,size); -+ } -+ invalidate(); -+ /* use skb code for all the administrative overhead */ -+ skb->count++; -+ kfree_skb(skb,FREE_READ); -+ if (skb->count == 1) free_around(skb,hole_start,kernel); -+ else { -+ printk(KERN_CRIT "mmu_tofs: skb->count == %d\n",skb->count); -+ event_dump(); -+ } -+} -+ -+ -+/* -+ * Fault user pages (current process) in physical memory, lock them there, -+ * and set them COW so that they stay around even if the user process tries -+ * to scribble over them. The locked physical page ranges are recorded in the -+ * scatter-gather vector IOV. -+ * -+ * FIXME: Should check user's physical memory size limit. -+ */ -+ -+ -+int lock_user(unsigned long start,unsigned long size,int iov_max, -+ struct iovec *iov) -+{ -+ struct vm_area_struct *vma; -+ unsigned long end,last,from,page; -+ unsigned long flags; -+ pgd_t *pgd; -+ pmd_t *pmd; -+ pte_t *pte; -+ int iovcnt,error; -+ -+ EVENT("lock_user: %ld@0x%lx\n",size,start,0); -+ end = start+size; -+ if (start >= end) return 0; -+ for (vma = find_vma(current,start); vma; vma = vma->vm_next) -+ if (vma->vm_flags & (VM_SHARED | VM_SHM)) return -EAGAIN; -+ else if (vma->vm_end >= end) break; -+ iovcnt = 0; -+ if ((error = mmu_resolve(start,&pgd,&pmd,&pte,1)) < 0) return error; -+ last = from = 0; -+ while (1) { -+ mem_map_t *map; -+ -+ EVENT("<0x%lx|0x%lx|0x%lx>\n",(unsigned long) pgd, -+ (unsigned long) pmd,(unsigned long) pte); -+ EVENT("0x%lx,0x%lx,%d\n",start,end,iovcnt); -+ if (pte_none(*pte) || !pte_present(*pte)) { -+ struct vm_area_struct *vma; -+ -+ EVENT("handling missing page\n",0,0,0); -+ if (!(vma = find_vma(current,start))) { -+ printk(KERN_CRIT "lock_user: VMA (0x%lx) not " -+ "found",start); -+ event_dump(); -+ return -EINVAL; -+ } -+ do_no_page(current,vma,start,vma->vm_flags & VM_WRITE); -+ } -+ page = pte_page(*pte); -+ EVENT("got page 0x%lx\n",page,0,0); -+ if (!page) { -+ printk(KERN_ERR "lock_user: Gnorf, no page\n"); -+ event_dump(); -+ return -EINVAL; -+ } -+ map = mem_map+MAP_NR(page); -+ if (map->reserved) { -+ printk(KERN_ERR "lock_user: reserved\n"); -+ event_dump(); -+ return -EINVAL; -+ } -+ if (!map->locked && PageSingleCopy(map)) -+ printk(KERN_CRIT "strange, !l && u\n"); -+ save_flags(flags); -+ cli(); -+ while (map->locked /* && SC = 0 or SC = max */) { -+ EVENT("Waiting for page ...\n",0,0,0); -+ wait_on_page(map); -+ } -+ if (!map->locked) { -+ map->count++; -+ map->locked = 1; -+ *pte = pte_wrprotect(*pte); -+ } -+ set_bit(PG_single_copy,&map->flags); -+ restore_flags(flags); -+ if (!last) { -+ from = page+(start & (PAGE_SIZE-1)); -+ start &= ~(PAGE_SIZE-1); -+ } -+ else if (page != last+PAGE_SIZE) { -+ if (iovcnt >= iov_max) return -ENOSPC; -+ iov->iov_base = (caddr_t) from; -+ iov->iov_len = last+PAGE_SIZE-from; -+ EVENT("putting ... last=0x%lx,from=0x%lx\n", -+ last,from,0); -+ iovcnt++; -+ iov++; -+ from = page; -+ } -+ last = page; -+ if ((start += PAGE_SIZE) >= end) break; -+ if ((error = mmu_step(start,&pgd,&pmd,&pte,1)) < 0) -+ return error; -+ } -+ invalidate(); -+ if (iovcnt >= iov_max) return -ENOSPC; -+ iov->iov_base = (caddr_t) from; -+ iov->iov_len = last+(end & (PAGE_SIZE-1))-from; -+ if (start == end) iov->iov_len += PAGE_SIZE; -+/* -+for (i = 0; i <= iovcnt; i++) -+ printk("iov[%d].iov_base = 0x%lx\niov[%d].iov_len = 0x%lx\n", -+i,(unsigned long) iov[i-iovcnt].iov_base,i,iov[i-iovcnt].iov_len); -+*/ -+ return iovcnt+1; -+} -+ -+ -+/* -+ * Release user pages locked with lock_user. wrprotect isn't cleared, so we'll -+ * get a few extra protection faults (COW handling doesn't copy pages that are -+ * not shared), but that shouldn't do any harm. -+ */ -+ -+ -+void unlock_user(int iovcnt,struct iovec *iov) -+{ -+ unsigned long walk,end; -+ -+ while (iovcnt--) { -+ end = (unsigned long) iov->iov_base+iov->iov_len; -+ for (walk = (unsigned long) iov->iov_base & ~(PAGE_SIZE-1); -+ walk < end; walk += PAGE_SIZE) { -+ mem_map_t *map; -+ -+ map = mem_map+MAP_NR(walk); -+ if (!clear_bit(PG_single_copy,&map->flags)) -+ printk(KERN_CRIT "unlock_user: returning " -+ "unlocked page\n"); -+ /* -- if last lock is gone */ -+ EVENT("returning page 0x%08lx\n",walk,0,0); -+ map->locked = 0; -+ wake_up(&map->wait); -+ free_page(walk); -+ /* -- endif */ -+ } -+ iov++; -+ } -+} -+ -+#endif ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/mmuio.h Wed Jul 17 19:58:01 1996 -@@ -0,0 +1,25 @@ -+/* mmuio.h - MMU-supported high-speed I/O */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_MMUIO_H -+#define _LINUX_MMUIO_H -+ -+#include -+ -+#ifdef CONFIG_MMU_HACKS -+ -+#include -+#include -+ -+void free_range(unsigned long start,unsigned long size); -+void mmucp_tofs(unsigned long user,unsigned long size,struct sk_buff *skb, -+ unsigned long kernel); -+int lock_user(unsigned long start,unsigned long size,int iov_max, -+ struct iovec *iov); -+void unlock_user(int iovcnt,struct iovec *iov); -+ -+#endif -+ -+#endif ---- ref/include/linux/mm.h Sun Jun 9 11:23:32 1996 -+++ work/include/linux/mm.h Wed Jul 17 19:40:54 1996 -@@ -142,6 +142,7 @@ - #define PG_decr_after 5 - #define PG_swap_unlock_after 6 - #define PG_DMA 7 -+#define PG_single_copy 8 /* page is locked for single copy */ - #define PG_reserved 31 - - /* Make it prettier to test the above... */ -@@ -154,6 +155,7 @@ - #define PageDecrAfter(page) (test_bit(PG_decr_after, &(page)->flags)) - #define PageSwapUnlockAfter(page) (test_bit(PG_swap_unlock_after, &(page)->flags)) - #define PageDMA(page) (test_bit(PG_DMA, &(page)->flags)) -+#define PageSingleCopy(page) (test_bit(PG_single_copy, &(page)->flags)) - #define PageReserved(page) (test_bit(PG_reserved, &(page)->flags)) - - /* ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/raw.c Fri Jul 12 16:01:03 1996 -@@ -0,0 +1,128 @@ -+/* net/atm/raw.c - Raw AAL0 and AAL5 transports */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+ -+#include "protocols.h" -+#include "tunable.h" /* tunable parameters */ -+ -+ -+#if 0 -+#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) -+#else -+#define DPRINTK(format,args...) -+#endif -+ -+ -+/* -+ * SKB == NULL indicates that the link is being closed -+ */ -+ -+void atm_push_raw(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+ if (skb) { -+ skb_queue_tail(&vcc->recvq,skb); -+ wake_up(&vcc->sleep); -+ } -+} -+ -+ -+/* -+ * A return value of NULL means to discard the PDU -+ */ -+ -+ -+static struct sk_buff *atm_peek_aal0(struct atm_vcc *vcc,unsigned long pdu_size, -+ __u32 (*fetch)(struct atm_vcc *vcc,int i)) -+{ -+ struct sk_buff *skb; -+ -+ if (pdu_size+vcc->rx_inuse+ATM_PDU_OVHD <= vcc->rx_quota) { -+ skb = alloc_skb(pdu_size,GFP_ATOMIC); -+ if (skb) return skb; -+ } -+ vcc->stats->rx_drop++; -+ return NULL; -+} -+ -+ -+/* -+ * atm_peek_aal5 is currently also used for AAL3/4 -+ */ -+ -+ -+static struct sk_buff *atm_peek_aal5(struct atm_vcc *vcc,unsigned long pdu_size, -+ __u32 (*fetch)(struct atm_vcc *vcc,int i)) -+{ -+ struct sk_buff *skb; -+ -+ if (pdu_size+vcc->rx_inuse+ATM_PDU_OVHD <= vcc->rx_quota) { -+ skb = alloc_skb(((pdu_size+3) & ~3)+PAGE_SIZE-1,GFP_ATOMIC); -+ if (skb) { -+ skb->data = (unsigned char *) -+ (((unsigned long) skb->data+PAGE_SIZE-1) & -+ ~(PAGE_SIZE-1)); -+DPRINTK("PEEK: data at 0x%lx\n",(unsigned long) skb->data); -+ return skb; -+ } -+ } -+ vcc->stats->rx_drop++; -+ return NULL; -+} -+ -+ -+static void atm_pop_raw(struct atm_vcc *vcc,struct sk_buff *skb) -+{ -+#ifdef CONFIG_MMU_HACKS -+ if (skb->atm.iovcnt) -+ unlock_user(skb->atm.iovcnt,(struct iovec *) skb->data); -+#endif -+ dev_kfree_skb(skb,FREE_WRITE); -+#if 0 /* experimental */ -+if (vcc->dev->sending != 1) printk("sending == %d !!!\n",vcc->dev->sending); -+ vcc->dev->sending--; -+#endif -+ wake_up(&vcc->sleep); -+} -+ -+ -+int atm_init_aal0(struct atm_vcc *vcc) -+{ -+ vcc->aal = ATM_AAL0; -+ vcc->push = atm_push_raw; -+ vcc->peek = atm_peek_aal0; -+ vcc->pop = atm_pop_raw; -+ vcc->push_oam = NULL; -+ return 0; -+} -+ -+ -+int atm_init_aal34(struct atm_vcc *vcc) -+{ -+ vcc->aal = ATM_AAL34; -+ vcc->push = atm_push_raw; -+ vcc->peek = atm_peek_aal5; /* same procedure */ -+ vcc->pop = atm_pop_raw; -+ vcc->push_oam = NULL; -+ return 0; -+} -+ -+ -+int atm_init_aal5(struct atm_vcc *vcc) -+{ -+ vcc->aal = ATM_AAL5; -+ vcc->push = atm_push_raw; -+ vcc->peek = atm_peek_aal5; -+ vcc->pop = atm_pop_raw; -+ vcc->push_oam = NULL; -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/protocols.h Mon Jun 10 17:36:28 1996 -@@ -0,0 +1,17 @@ -+/* net/atm/protocols.h - ATM protocol handler entry points */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef NET_ATM_PROTOCOLS_H -+#define NET_ATM_PROTOCOLS_H -+ -+void atm_push_raw(struct atm_vcc *vcc,struct sk_buff *skb); -+ -+int atm_init_aal0(struct atm_vcc *vcc); /* "raw" AAL0 */ -+int atm_init_aal34(struct atm_vcc *vcc);/* "raw" AAL3/4 transport */ -+int atm_init_aal5(struct atm_vcc *vcc); /* "raw" AAL5 transport */ -+int atm_init_clip(struct atm_vcc *vcc); /* Classical IP over ATM (RFC1577) */ -+int atm_init_atmarp(struct atm_vcc *vcc);/* ATM ARP */ -+ -+#endif ---- ref/include/linux/netdevice.h Sun Jun 9 11:25:36 1996 -+++ work/include/linux/netdevice.h Wed Jul 17 19:41:04 1996 -@@ -182,6 +182,8 @@ - int (*set_mac_address)(struct device *dev, void *addr); - #define HAVE_PRIVATE_IOCTL - int (*do_ioctl)(struct device *dev, struct ifreq *ifr, int cmd); -+ int (*ip_arp)(struct device *dev,unsigned int cmd, -+ void *arg); - #define HAVE_SET_CONFIG - int (*set_config)(struct device *dev, struct ifmap *map); - #define HAVE_HEADER_CACHE -@@ -284,6 +286,8 @@ - /* These functions live elsewhere (drivers/net/net_init.c, but related) */ - - extern void ether_setup(struct device *dev); -+extern int ether_arp(struct device *dev,unsigned int cmd, -+ void *arg); - extern void tr_setup(struct device *dev); - extern int ether_config(struct device *dev, struct ifmap *map); - /* Support for loadable net-drivers */ ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmarp.h Wed Jul 17 19:58:01 1996 -@@ -0,0 +1,98 @@ -+/* atmarp.h - ATM ARP protocol and kernel-demon interface definitions */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_ATMARP_H -+#define _LINUX_ATMARP_H -+ -+#include -+#include -+#include -+ -+ -+/* RFC 1577 ATM ARP header */ -+ -+struct atmarphdr { -+ unsigned short ar_hrd; /* Hardware type */ -+ unsigned short ar_pro; /* Protocol type */ -+ unsigned char ar_shtl;/* Type & length of source ATM number (q) */ -+ unsigned char ar_sstl;/* Type & length of source ATM subaddress (r) */ -+ unsigned short ar_op; /* Operation code (request, reply, or NAK) */ -+ unsigned char ar_spln;/* Length of source protocol address (s) */ -+ unsigned char ar_thtl;/* Type & length of target ATM number (x) */ -+ unsigned char ar_tstl;/* Type & length of target ATM subaddress (y) */ -+ unsigned char ar_tpln;/* Length of target protocol address (z) */ -+ /* ar_sha, at_ssa, ar_spa, ar_tha, ar_tsa, ar_tpa */ -+ unsigned char data[1]; -+}; -+ -+#define TL_LEN 0x3f /* ATMARP Type/Length field structure */ -+#define TL_E164 0x40 -+ -+ -+#define ATF_NULL 0x040 /* use NULL encapsulation */ -+#define ATF_ARPSRV 0x080 /* entry describes ARP server */ -+ -+ -+#define MAX_ATMARP_SIZE (sizeof(struct atmarphdr)-1+2*(ATM_E164_LEN+ \ -+ ATM_ESA_LEN+4)) -+ -+#define ATMARP_RETRY_DELAY 30 /* request next resolution or forget -+ NAK after 30 sec - should go into -+ atmclip.h */ -+ -+/* These really ought to go into include/linux/if_arp.h */ -+ -+/* ARP protocol HARDWARE identifiers. */ -+#define ARPHRD_ATM 19 /* ATM Forum */ -+ -+/* ARP protocol opcodes. */ -+#define ARPOP_InREQUEST 8 /* InARP request */ -+#define ARPOP_InREPLY 9 /* InARP reply */ -+#define ARPOP_NAK 10 /* (ATM)ARP NAK */ -+ -+ -+#define ATMARPD_CTRL _IO('a',ATMIOC_CLIP+1) /* become atmarpd ctrl sock */ -+#define ATMARP_MKIP _IO('a',ATMIOC_CLIP+2) /* attach socket to IP */ -+#define ATMARP_SETENTRY _IO('a',ATMIOC_CLIP+3) /* fill or hide ARP entry */ -+#define ATMARP_ENCAP _IO('a',ATMIOC_CLIP+5) /* change encapsulation */ -+ -+/* ATMARP ioctl request. */ -+struct atmarpreq { -+ struct sockaddr arp_pa; /* protocol address */ -+ struct sockaddr_atmsvc arp_ha; /* PVC or SVC address */ -+ struct atm_qos arp_qos; /* requested QOS */ -+ int arp_flags; /* flags */ -+}; -+ -+ -+struct atmarp_arpsioc { -+ struct sockaddr pa; /* protocol address */ -+ int aa_len; /* size of ATM address */ -+ struct sockaddr_atmsvc aa; /* SVC address */ -+}; -+ -+ -+#define ATMARP_CTRL_MAGIC 0xac /* put this into the magic byte */ -+ -+enum atmarp_ctrl_type { -+ act_invalid, /* catch uninitialized structures */ -+ act_need, /* need address resolution */ -+ act_create, /* interface has been created */ -+ act_up, /* interface is coming up */ -+ act_down, /* interface is going down */ -+ act_ioctl, /* ioctl follows */ -+ act_complete /* demon indicates completion */ -+}; -+ -+struct atmarp_ctrl { -+ unsigned char magic; /* constant */ -+ enum atmarp_ctrl_type type; /* message type */ -+ volatile int *reply; /* reply address, NULL is asynch */ -+ int itf_num;/* interface number (if present) */ -+ unsigned long arg; /* argument, e.g. IP address */ -+ unsigned char data[1];/*optional data */ -+}; -+ -+#endif ---- ref/net/ipv4/udp.c Tue Jun 4 14:34:43 1996 -+++ work/net/ipv4/udp.c Mon Jun 10 19:11:22 1996 -@@ -109,6 +109,11 @@ - #include - #include - -+#ifdef CONFIG_AREQUIPA -+#include -+#include -+#endif -+ - /* - * Snmp MIB for the UDP layer - */ -@@ -616,7 +621,7 @@ - sk->dummy_th.dest = usin->sin_port; - sk->state = TCP_ESTABLISHED; - udp_cache_zap(); -- sk->ip_route_cache = rt; -+ set_rt_cache(sk,rt); - return(0); - } - -@@ -655,6 +660,12 @@ - - static inline void udp_deliver(struct sock *sk, struct sk_buff *skb) - { -+#ifdef CONFIG_AREQUIPA -+ if (skb->dev == arequipa_dev && !sk->arequipa && sk->aq_route) { -+ if (!sk->ip_route_cache) printk("WNG: no route\n"); -+ (void) arequipa_attach(skb->atm.vcc->sock,sk); -+ } -+#endif - skb->sk = sk; - - if (sk->users) { ---- ref/net/ipv4/tcp.c Sat Jun 8 11:09:09 1996 -+++ work/net/ipv4/tcp.c Wed Jul 17 19:39:31 1996 -@@ -1926,6 +1926,11 @@ - * Put in the IP header and routing stuff. - */ - -+#ifdef CONFIG_AREQUIPA -+ ip_rt_put(sk->ip_route_cache); -+ set_rt_cache(sk,ip_rt_route(sk->daddr,sk->localroute)); -+#endif -+ - tmp = sk->prot->build_header(buff, sk->saddr, sk->daddr, &dev, - IPPROTO_TCP, sk->opt, MAX_SYN_SIZE,sk->ip_tos,sk->ip_ttl,&sk->ip_route_cache); - if (tmp < 0) ---- ref/include/linux/proc_fs.h Sun Jun 9 11:23:42 1996 -+++ work/include/linux/proc_fs.h Wed Jul 17 19:41:04 1996 -@@ -34,6 +34,7 @@ - PROC_KSYMS, - PROC_DMA, - PROC_IOPORTS, -+ PROC_ATM, - #ifdef __SMP_PROF__ - PROC_SMP_PROF, - #endif -@@ -148,6 +149,16 @@ - #define PROC_DYNAMIC_FIRST 4096 - #define PROC_NDYNAMIC 4096 - -+enum atm_directory_inos { -+ PROC_ATM_DEVICES = 384, -+ PROC_ATM_ARP, -+ PROC_ATM_LEC, -+ PROC_ATM_SVC, -+ PROC_ATM_PVC, -+ PROC_ATM_AREQUIPA, -+ PROC_ATM_LAST -+}; -+ - #define PROC_SUPER_MAGIC 0x9fa0 - - /* -@@ -187,6 +198,7 @@ - extern struct proc_dir_entry proc_root; - extern struct proc_dir_entry proc_net; - extern struct proc_dir_entry proc_scsi; -+extern struct proc_dir_entry proc_atm; - extern struct proc_dir_entry proc_sys; - extern struct proc_dir_entry proc_pid; - extern struct proc_dir_entry proc_pid_fd; -@@ -275,5 +287,6 @@ - extern struct inode_operations proc_kmsg_inode_operations; - extern struct inode_operations proc_link_inode_operations; - extern struct inode_operations proc_fd_inode_operations; -+extern struct inode_operations proc_atm_inode_operations; - - #endif ---- ref/fs/proc/root.c Tue Apr 30 12:09:45 1996 -+++ work/fs/proc/root.c Mon Jun 10 17:36:31 1996 -@@ -15,6 +15,10 @@ - #include - #include - -+ -+extern void atm_proc_init(void); -+ -+ - /* - * Offset of the first process in the /proc root directory.. - */ -@@ -148,6 +152,16 @@ - NULL, NULL /* parent, subdir */ - }; - -+struct proc_dir_entry proc_atm = { -+ PROC_ATM, 3, "atm", -+ S_IFDIR | S_IRUGO | S_IXUGO, 2, 0, 0, -+ 0, &proc_dir_inode_operations, -+ NULL, NULL, -+ NULL, -+ &proc_root, NULL -+}; -+ -+ - int proc_register(struct proc_dir_entry * dir, struct proc_dir_entry * dp) - { - dp->next = dir->subdir; -@@ -296,6 +310,11 @@ - proc_register(&proc_root, &proc_net); - proc_register(&proc_root, &proc_scsi); - proc_register(&proc_root, &proc_sys_root); -+ -+#ifdef CONFIG_ATM -+ proc_register(&proc_root, &proc_atm); -+ atm_proc_init(); -+#endif - - #ifdef CONFIG_DEBUG_MALLOC - proc_register(&proc_root, &(struct proc_dir_entry) { ---- ref/fs/proc/inode.c Thu Apr 25 15:32:45 1996 -+++ work/fs/proc/inode.c Mon Jun 10 17:36:32 1996 -@@ -4,6 +4,7 @@ - * Copyright (C) 1991, 1992 Linus Torvalds - */ - -+#include - #include - #include - #include -@@ -161,6 +162,14 @@ - return; - } - -+#ifdef CONFIG_ATM -+ if (ino >= PROC_ATM_DEVICES && ino < PROC_ATM_LAST) { -+ inode->i_mode = S_IFREG | S_IRUGO; -+ inode->i_op = &proc_atm_inode_operations; -+ return; -+ } -+#endif -+ - if (!pid) { - switch (ino) { - case PROC_KMSG: -@@ -175,6 +184,13 @@ - inode->i_nlink = 2; - inode->i_op = &proc_scsi_inode_operations; - break; -+#ifdef CONFIG_ATM -+ case PROC_ATM: -+ inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO; -+ inode->i_nlink = 2; -+ inode->i_op = &proc_atm_inode_operations; -+ break; -+#endif - case PROC_KCORE: - inode->i_mode = S_IFREG | S_IRUSR; - inode->i_op = &proc_kcore_inode_operations; ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/proc.c Mon Jun 10 18:25:55 1996 -@@ -0,0 +1,479 @@ -+/* net/atm/proc.c - ATM /proc interface */ -+ -+/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ -+ -+ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include /* for HZ */ -+ -+#include "static.h" /* ugly */ -+#include "signaling.h" /* to get sigd - ugly too */ -+#include "atmarp.h" -+ -+#ifdef CONFIG_ATM_LANE -+#include "lec_arpc.h" -+extern struct lec_arp_table *lec_arp_tables[LEC_ARP_TABLE_SIZE]; -+extern struct lec_arp_table *lec_arp_empty_ones; -+extern struct lec_arp_table *lec_no_forward; -+#endif -+ -+#ifdef CONFIG_AREQUIPA -+void atm_push_arequipa(struct atm_vcc *vcc,struct sk_buff *skb); -+#endif -+ -+/*extern void eni_proc(int i,char *buf); - not yet @@@ */ -+extern void atm_push_clip(struct atm_vcc *vcc,struct sk_buff *skb); -+ -+ -+static int atm_header(ino_t ino,char *buf) -+{ -+ switch (ino) { -+ case PROC_ATM_DEVICES: -+ sprintf(buf,"Itf Type ESI/\"MAC\"addr " -+ "AAL(TX,err,RX,err,drop) ...\n"); -+ break; -+ case PROC_ATM_ARP: -+ sprintf(buf,"IPitf TypeEncp Idle IP address " -+ "ATM address\n"); -+ break; -+ case PROC_ATM_SVC: -+ sprintf(buf,"Itf VPI VCI State Remote\n"); -+ break; -+ case PROC_ATM_PVC: -+ sprintf(buf,"Itf VPI VCI AAL RX(PCR,Class) " -+ "TX(PCR,Class)\n"); -+ break; -+#ifdef CONFIG_ATM_LANE -+ case PROC_ATM_LEC: -+ sprintf(buf," MAC ATM destination Status Flags VPI/VCI Recv VPI/VCI\n"); -+ break; -+#endif -+#ifdef CONFIG_AREQUIPA -+ case PROC_ATM_AREQUIPA: -+ sprintf(buf,"Itf VPI VCI State Socket\n"); -+ break; -+#endif -+ default: -+ return -EINVAL; -+ } -+ return strlen(buf); -+} -+ -+ -+static void add_stats(char *buf,const char *aal, -+ const struct atm_aal_stats *stats) -+{ -+ sprintf(strchr(buf,0),"%s ( %ld %ld %ld %ld %ld )",aal,stats->tx, -+ stats->tx_err,stats->rx,stats->rx_err,stats->rx_drop); -+} -+ -+ -+static void dev_info(const struct atm_dev *dev,char *buf) -+{ -+ int off,i; -+ -+ off = sprintf(buf,"%3d %-8s",dev->number,dev->type); -+ for (i = 0; i < ESI_LEN; i++) -+ off += sprintf(buf+off,"%02x",dev->esi[i]); -+ strcat(buf," "); -+ add_stats(buf,"0",&dev->stats.aal0); -+ strcat(buf," "); -+ add_stats(buf,"5",&dev->stats.aal5); -+ strcat(buf,"\n"); -+} -+ -+ -+#ifdef CONFIG_ATM_ATMARP -+ -+ -+static int svc_addr(char *buf,struct sockaddr_atmsvc *addr) -+{ -+ static int code[] = { 1,2,10,6,1,0 }; -+ static int e164[] = { 1,8,4,6,1,0 }; -+ int *fields; -+ int len,i,j,pos; -+ -+ len = 0; -+ if (*addr->sas_addr.pub) { -+ strcpy(buf,addr->sas_addr.pub); -+ len = strlen(addr->sas_addr.pub); -+ buf += len; -+ if (*addr->sas_addr.pub) { -+ *buf += '+'; -+ len++; -+ } -+ } -+ else if (!*addr->sas_addr.prv) { -+ strcpy(buf,"(none)"); -+ return strlen(buf); -+ } -+ if (*addr->sas_addr.prv) { -+ len += 44; -+ pos = 0; -+ fields = *addr->sas_addr.prv == ATM_AFI_E164 ? e164 : code; -+ for (i = 0; fields[i]; i++) { -+ for (j = fields[i]; j; j--) { -+ sprintf(buf,"%02X",addr->sas_addr.prv[pos++]); -+ buf += 2; -+ } -+ if (fields[i+1]) *buf++ = '.'; -+ } -+ } -+ return len; -+} -+ -+ -+static void atmarp_info(struct device *dev,struct atmarp_entry *entry, -+ char *buf) -+{ -+ unsigned char *ip; -+ int svc,off,ip_len; -+ -+ svc = !entry->vcc || entry->vcc->family == AF_ATMSVC; -+ off = sprintf(buf,"%-6s%-4s%-4s%5ld ",dev->name,svc ? "SVC" : "PVC", -+ entry->encap ? "LLC" : "NULL",(jiffies-entry->last_use)/HZ); -+ ip = (unsigned char *) &entry->ip; -+ ip_len = sprintf(buf+off,"%d.%d.%d.%d",ip[0],ip[1],ip[2],ip[3]); -+ off += ip_len; -+ while (ip_len++ < 16) buf[off++] = ' '; -+ if (!entry->vcc) strcpy(buf+off,"(incomplete)\n"); -+ else if (!svc) -+ sprintf(buf+off,"%d.%d.%d\n",entry->vcc->dev->number, -+ entry->vcc->vpi,entry->vcc->vci); -+ else { -+ off += svc_addr(buf+off,&entry->vcc->remote); -+ strcpy(buf+off,"\n"); -+ } -+} -+ -+ -+#endif -+ -+ -+static void pvc_info(struct atm_vcc *vcc,char *buf) -+{ -+ static const char *class_name[] = { "off","UBR","CBR","VBR","ABR" }; -+ static const char *aal_name[] = { -+ "0", "1", "2", "3/4", /* 0- 3 */ -+ "???", "5", "???", "???" };/* 4- 7 */ -+ int off; -+ -+ off = sprintf(buf,"%3d %3d %5d %-3s %7d %-5s %7d %-6s", -+ vcc->dev->number,vcc->vpi,vcc->vci, -+ vcc->aal >= sizeof(aal_name)/sizeof(aal_name[0]) ? "err" : -+ aal_name[vcc->aal],vcc->rxtp.min_pcr,class_name[vcc->rxtp.class], -+ vcc->txtp.min_pcr,class_name[vcc->txtp.class]); -+#ifdef CONFIG_ATM_CLIP -+ if (vcc->push == atm_push_clip) { -+ struct device *dev; -+ -+ dev = (struct device *) vcc->proto_data; -+ off += sprintf(buf+off,"CLIP, Itf:%s, Encap:",dev->name); -+ if (dev->hard_header_len == RFC1483LLC_LEN) -+ off += sprintf(buf+off,"LLC/SNAP"); -+ else if (dev->hard_header_len == 0) -+ off += sprintf(buf+off,"None"); -+ else off += sprintf(buf+off,"Unknown"); -+ } -+#endif -+ strcpy(buf+off,"\n"); -+} -+ -+ -+static const char *vcc_state(struct atm_vcc *vcc) -+{ -+ if (vcc->flags & ATM_VF_READY) return "CONNECTED"; -+ if (vcc->flags & ATM_VF_RELEASED) return "CLOSING"; -+ if (vcc->flags & ATM_VF_LISTEN) return "LISTEN"; -+ if (vcc->flags & ATM_VF_REGIS) return "INUSE"; -+ if (vcc->flags & ATM_VF_BOUND) return "BOUND"; -+ return "IDLE"; -+} -+ -+ -+static void svc_info(struct atm_vcc *vcc,char *buf) -+{ -+ char *here; -+ int i; -+ -+ if (!vcc->dev) sprintf(buf,"Unassigned "); -+ else sprintf(buf,"%3d %3d %5d ",vcc->dev->number,vcc->vpi,vcc->vci); -+ here = strchr(buf,0); -+ here += sprintf(here,"%-10s ",vcc == sigd ? "Signaling" : -+#ifdef CONFIG_ATM_ATMARP -+ vcc == atmarpd ? "ATMARPctrl" : -+#endif -+ vcc_state(vcc)); -+ here += sprintf(here,"%s%s",vcc->remote.sas_addr.pub, -+ *vcc->remote.sas_addr.pub && *vcc->remote.sas_addr.prv ? "+" : ""); -+ if (*vcc->remote.sas_addr.prv) -+ for (i = 0; i < ATM_ESA_LEN; i++) -+ here += sprintf(here,"%02x", -+ vcc->remote.sas_addr.prv[i]); -+ strcat(here,"\n"); -+} -+ -+ -+#ifdef CONFIG_AREQUIPA -+ -+ -+static const char *arequipa_state(const struct atm_vcc *vcc) -+{ -+ if (!(vcc->flags & ATM_VF_REGIS)) return "DOOMED"; -+ if (vcc->upper) return "ATTACHED"; -+ return "DANGLING"; -+} -+ -+ -+static void arequipa_info(struct atm_vcc *vcc,char *buf) -+{ -+ char *here; -+ -+ if (!vcc->dev) sprintf(buf,"Unassigned "); -+ else sprintf(buf,"%3d %3d %5d ",vcc->dev->number,vcc->vpi,vcc->vci); -+ here = strchr(buf,0); -+ here += sprintf(here,"%-8s ",arequipa_state(vcc)); -+ if (vcc->upper) -+ here += sprintf(here,"%ld",vcc->upper->socket && -+ SOCK_INODE(vcc->upper->socket) ? -+ SOCK_INODE(vcc->upper->socket)->i_ino : 0); -+ strcat(here,"\n"); -+} -+ -+ -+#endif -+ -+ -+#ifdef CONFIG_ATM_LANE -+static char* -+lec_arp_get_status_string(unsigned char status) -+{ -+ switch(status) { -+ case ESI_UNKNOWN: -+ return "ESI_UNKNOWN "; -+ case ESI_ARP_PENDING: -+ return "ESI_ARP_PENDING "; -+ case ESI_VC_PENDING: -+ return "ESI_VC_PENDING "; -+ case ESI_FLUSH_PENDING: -+ return "ESI_FLUSH_PENDING "; -+ case ESI_FORWARD_DIRECT: -+ return "ESI_FORWARD_DIRECT"; -+ default: -+ return " "; -+ } -+} -+ -+static void -+lec_info(struct lec_arp_table *entry, char *buf) -+{ -+ int j, offset=0; -+ -+ -+ for(j=0;jmac_addr[j]); -+ } -+ offset+=sprintf(buf+offset, " "); -+ for(j=0;jatm_addr[j]); -+ } -+ offset+=sprintf(buf+offset, " %s %4.4x", -+ lec_arp_get_status_string(entry->status), -+ entry->flags&0xffff); -+ if (entry->vcc) { -+ offset+=sprintf(buf+offset, "%3d %3d ", entry->vcc->vpi, -+ entry->vcc->vci); -+ } -+ if (entry->recv_vcc) { -+ offset+=sprintf(buf+offset, " %3d %3d", -+ entry->recv_vcc->vpi, entry->recv_vcc->vci); -+ } -+ -+ sprintf(buf+offset,"\n"); -+} -+#endif -+ -+ -+static int atm_info(ino_t ino,loff_t *pos,char *buf) -+{ -+ switch (ino) { -+ case PROC_ATM_DEVICES: -+ while (*pos <= MAX_ATM_ITF) -+ if (atm_dev[*pos-1].ops) break; -+ else (*pos)++; -+ if (*pos > MAX_ATM_ITF) return 0; -+ dev_info(atm_dev+*pos-1,buf); -+ break; -+#ifdef CONFIG_ATM_ATMARP -+ case PROC_ATM_ARP: -+ { -+ struct device *dev; -+ struct atmarp_entry *entry; -+ int count; -+ -+ count = *pos; -+ for (dev = clip_devs; dev; -+ dev = PRIV(dev)->next) -+ for (entry = PRIV(dev)->table; entry; -+ entry = entry->next) -+ if (!--count) { -+ atmarp_info(dev,entry, -+ buf); -+ return strlen(buf); -+ } -+ return 0; -+ } -+ return 0; -+#endif -+ case PROC_ATM_SVC: -+ while (*pos <= MAX_ATM_VCC) -+ if (atm_vcc[*pos-1].family == PF_ATMSVC) break; -+ else (*pos)++; -+ if (*pos > MAX_ATM_VCC) return 0; -+ svc_info(atm_vcc+*pos-1,buf); -+ break; -+ case PROC_ATM_PVC: -+ while (*pos <= MAX_ATM_VCC) -+ if (atm_vcc[*pos-1].family == PF_ATMPVC && -+ atm_vcc[*pos-1].dev) break; -+ else (*pos)++; -+ if (*pos > MAX_ATM_VCC) return 0; -+ pvc_info(atm_vcc+*pos-1,buf); -+ break; -+#ifdef CONFIG_AREQUIPA -+ case PROC_ATM_AREQUIPA: -+ while (*pos <= MAX_ATM_VCC) -+ if (atm_vcc[*pos-1].family == PF_ATMSVC && -+ atm_vcc[*pos-1].push == atm_push_arequipa) -+ break; -+ else (*pos)++; -+ if (*pos > MAX_ATM_VCC) return 0; -+ arequipa_info(atm_vcc+*pos-1,buf); -+ break; -+#endif -+#ifdef CONFIG_ATM_LANE -+ case PROC_ATM_LEC: -+ { -+ struct lec_arp_table *entry; -+ int i, count; -+ -+ count = *pos; -+ for(i=0;inext) { -+ if (!--count) { -+ lec_info(entry, buf); -+ return strlen(buf); -+ } -+ } -+ for(entry=lec_arp_empty_ones; -+ entry; entry=entry->next) { -+ if (!--count) { -+ lec_info(entry, buf); -+ return strlen(buf); -+ } -+ } -+ for(entry=lec_no_forward; -+ entry; entry=entry->next) { -+ if (!--count) { -+ lec_info(entry, buf); -+ return strlen(buf); -+ } -+ } -+ return 0; -+ } -+#endif -+ default: -+ return -EINVAL; -+ } -+ return strlen(buf); -+} -+ -+ -+static int proc_atm_read(struct inode *inode,struct file *file,char *buf, -+ int count) -+{ -+ unsigned long page; -+ int length; -+ -+ if (count < 0) return -EINVAL; -+ page = get_free_page(GFP_KERNEL); -+ if (!page) return -ENOMEM; -+ if (file->f_pos) -+ length = atm_info(inode->i_ino,&file->f_pos,(char *) page); -+ else length = atm_header(inode->i_ino,(char *) page); -+ if (length > count) length = -EINVAL; -+ if (length >= 0) { -+ memcpy_tofs(buf,(char *) page,length); -+ file->f_pos++; -+ } -+ free_page(page); -+ return length; -+} -+ -+ -+static struct file_operations proc_atm_operations = { -+ NULL, /* lseek */ -+ proc_atm_read, /* read */ -+ NULL, /* write */ -+ NULL, /* readdir */ -+ NULL, /* select */ -+ NULL, /* ioctl */ -+ NULL, /* mmap */ -+ NULL, /* no special open code */ -+ NULL, /* no special release */ -+ NULL /* can't fsync */ -+}; -+ -+struct inode_operations proc_atm_inode_operations = { -+ &proc_atm_operations, /* default ATM directory file-ops */ -+ NULL, /* create */ -+ NULL, /* lookup */ -+ NULL, /* link */ -+ NULL, /* unlink */ -+ NULL, /* symlink */ -+ NULL, /* mkdir */ -+ NULL, /* rmdir */ -+ NULL, /* mknod */ -+ NULL, /* rename */ -+ NULL, /* readlink */ -+ NULL, /* follow_link */ -+ NULL, /* readpage */ -+ NULL, /* writepage */ -+ NULL, /* bmap */ -+ NULL, /* truncate */ -+ NULL /* permission */ -+}; -+ -+ -+#define FILE(ino,name,len) &proc_atm, \ -+ (&(struct proc_dir_entry) { ino, len, name, \ -+ S_IFREG | S_IRUGO, 1, 0, 0, 0, &proc_atm_inode_operations, NULL }) -+ -+ -+void atm_proc_init(void) -+{ -+ proc_register(FILE(PROC_ATM_DEVICES,"devices",7)); -+ proc_register(FILE(PROC_ATM_ARP,"arp",3)); -+ proc_register(FILE(PROC_ATM_SVC,"svc",3)); -+ proc_register(FILE(PROC_ATM_PVC,"pvc",3)); -+#ifdef CONFIG_ATM_LANE -+ proc_register(FILE(PROC_ATM_LEC,"lec",3)); -+#endif -+#ifdef CONFIG_AREQUIPA -+ proc_register(FILE(PROC_ATM_AREQUIPA,"arequipa",8)); -+#endif -+} ---- ref/drivers/char/console.c Wed May 15 08:06:55 1996 -+++ work/drivers/char/console.c Mon Jun 10 17:36:33 1996 -@@ -1972,6 +1972,43 @@ - } - } - -+ -+static unsigned long tty_base = 0; -+ -+ -+static void put_scon(char ch) -+{ -+ unsigned long flags; -+ -+ while (1) { -+ while (!(inb_p(tty_base+5) & 0x20)); -+ save_flags(flags); -+ cli(); -+ if (inb_p(tty_base+5) & 0x20) break; -+ restore_flags(flags); -+ } -+ outb_p(ch,tty_base); -+ restore_flags(flags); -+} -+ -+ -+static void print_scon(const char *str) -+{ -+ if (!tty_base) return; -+ while (*str) { -+ if (*str == '\n') put_scon('\r'); -+ put_scon(*str++); -+ } -+} -+ -+ -+void serial_console_setup(char *str,int *ints) -+{ -+ if (ints[0] != 1 || ints[1] < 0 || ints[1] > 3) return; -+ tty_base = ((unsigned short *) 0x400)[ints[1]]; -+} -+ -+ - /* - * unsigned long con_init(unsigned long); - * -@@ -2090,6 +2127,11 @@ - display_desc, video_num_columns, video_num_lines, - MIN_NR_CONSOLES, (MIN_NR_CONSOLES == 1) ? "" : "s", - MAX_NR_CONSOLES); -+ -+ if (tty_base) { -+ register_console(print_scon); -+ return kmem_start; -+ } - - /* - * can't register TGA yet, because PCI bus probe has *not* taken ---- ref/init/main.c Mon May 20 19:33:57 1996 -+++ work/init/main.c Mon Jun 10 17:36:34 1996 -@@ -172,6 +172,8 @@ - #endif - - -+void serial_console_setup(char *str,int *ints); -+ - #if defined(CONFIG_SYSVIPC) || defined(CONFIG_KERNELD) - extern void ipc_init(void); - #endif -@@ -409,6 +411,7 @@ - #ifdef CONFIG_BAYCOM - { "baycom=", baycom_setup }, - #endif -+ { "scon=", serial_console_setup }, - { 0, 0 } - }; - ---- ref/drivers/block/genhd.c Sun May 19 12:29:22 1996 -+++ work/drivers/block/genhd.c Thu Jul 18 21:05:07 1996 -@@ -52,6 +52,7 @@ - extern int blk_dev_init(void); - extern int scsi_dev_init(void); - extern int net_dev_init(void); -+extern int atmdev_init(void); - - /* - * disk_name() is used by genhd.c and md.c. -@@ -654,6 +655,9 @@ - #endif - #ifdef CONFIG_INET - net_dev_init(); -+#endif -+#ifdef CONFIG_ATM -+ (void) atmdev_init(); - #endif - console_map_init(); - ---- ref/drivers/net/net_init.c Mon Mar 25 07:58:21 1996 -+++ work/drivers/net/net_init.c Mon Jun 10 17:36:34 1996 -@@ -170,6 +170,7 @@ - dev->set_mac_address = eth_mac_addr; - dev->header_cache_bind = eth_header_cache_bind; - dev->header_cache_update= eth_header_cache_update; -+ dev->ip_arp = ether_arp; - - dev->type = ARPHRD_ETHER; - dev->hard_header_len = ETH_HLEN; ---- ref/drivers/net/eql.c Mon May 6 11:26:08 1996 -+++ work/drivers/net/eql.c Mon Jun 10 17:36:35 1996 -@@ -248,6 +248,7 @@ - dev->open = eql_open; - dev->stop = eql_close; - dev->do_ioctl = eql_ioctl; -+ dev->ip_arp = ether_arp; - dev->hard_start_xmit = eql_slave_xmit; - dev->get_stats = eql_get_stats; - ---- ref/drivers/net/pi2.c Fri Mar 1 06:50:45 1996 -+++ work/drivers/net/pi2.c Mon Jun 10 17:36:37 1996 -@@ -1414,6 +1414,7 @@ - dev->open = pi_open; - dev->stop = pi_close; - dev->do_ioctl = pi_ioctl; -+ dev->ip_arp = ether_arp; - dev->hard_start_xmit = pi_send_packet; - dev->get_stats = pi_get_stats; - ---- ref/drivers/net/ppp.c Wed May 29 06:32:38 1996 -+++ work/drivers/net/ppp.c Mon Jun 10 17:36:38 1996 -@@ -399,6 +399,7 @@ - dev->stop = ppp_dev_close; - dev->get_stats = ppp_dev_stats; - dev->do_ioctl = ppp_dev_ioctl; -+ dev->ip_arp = ether_arp; - dev->addr_len = 0; - dev->tx_queue_len = 10; - dev->type = ARPHRD_PPP; ---- ref/net/ipv4/arp.c Wed Jun 5 13:42:27 1996 -+++ work/net/ipv4/arp.c Mon Jun 10 17:36:38 1996 -@@ -2165,7 +2165,7 @@ - * Handle an ARP layer I/O control request. - */ - --int arp_ioctl(unsigned int cmd, void *arg) -+static int do_arp_ioctl(unsigned int cmd, void *arg) - { - int err; - struct arpreq r; -@@ -2176,12 +2176,7 @@ - { - case SIOCDARP: - case SIOCSARP: -- if (!suser()) -- return -EPERM; - case SIOCGARP: -- err = verify_area(VERIFY_READ, arg, sizeof(struct arpreq)); -- if (err) -- return err; - memcpy_fromfs(&r, arg, sizeof(struct arpreq)); - break; - case OLD_SIOCDARP: -@@ -2370,6 +2365,47 @@ - - - -+int ether_arp(struct device *dev,unsigned int cmd,void *arg) -+{ -+ return do_arp_ioctl(cmd,arg); -+} -+ -+ -+int arp_ioctl(unsigned int cmd,void *arg) -+{ -+ struct arpreq req; -+ struct rtable *route; -+ int error; -+ -+ switch (cmd) { -+ case SIOCSARP: -+ case SIOCDARP: -+ if (!suser()) return -EPERM; -+ /* fall through */ -+ case SIOCGARP: -+ error = verify_area(VERIFY_READ,arg,sizeof(req)); -+ if (error) return error; -+ memcpy_fromfs(&req,arg,sizeof(req)); -+ if (req.arp_pa.sa_family != AF_INET) -+ return -EPFNOSUPPORT; -+ break; -+ default: -+ /* Here's the deal: unknown ioctls are passed, but -+ their request structure _must_ begin with a struct -+ sockaddr. */ -+ error = verify_area(VERIFY_READ,arg, -+ sizeof(struct sockaddr)); -+ if (error) return error; -+ memcpy_fromfs(&req.arp_pa,arg,sizeof(struct sockaddr)); -+ } -+ route = ip_rt_route(((struct sockaddr_in *) &req.arp_pa)->sin_addr. -+ s_addr,1); -+ if (!route) return -EHOSTUNREACH; -+ if (!route->rt_dev->ip_arp) return -EINVAL; -+ return route->rt_dev->ip_arp(route->rt_dev,cmd,arg); -+} -+ -+ - /* - * Called once on startup. - */ ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/atmlec.h Wed Jul 17 19:58:02 1996 -@@ -0,0 +1,58 @@ -+/* -+ * -+ * ATM Lan Emulation Daemon vs. driver interface -+ * -+ * carnil@cs.tut.fi -+ * -+ */ -+ -+#ifndef _ATMLEC_H_ -+#define _ATMLEC_H_ -+ -+#include -+#include -+#include -+/* ATM lec daemon control socket */ -+#define ATMLEC_CTRL _IO('a',ATMIOC_LANE) -+#define ATMLEC_DATA _IO('a',ATMIOC_LANE+1) -+#define ATMLEC_MCAST _IO('a',ATMIOC_LANE+2) -+ -+typedef enum { l_set_mac_addr, l_del_mac_addr, -+ l_flush_xmt, l_svc_setup, -+ l_add_permanent, l_addr_delete, -+ l_topology_change, l_flush_complete, -+ l_arp_update, l_reset, l_config, -+ l_flush_tran_id, l_set_lecid, -+ l_arp_xmt } atmlec_msg_type; -+#define ATMLEC_MSG_TYPE_MAX l_arp_xmt -+ -+struct atmlec_config_msg { -+ unsigned int maximum_unknown_frame_count; -+ unsigned long max_unknown_frame_time; -+ unsigned short max_retry_count; -+ unsigned long aging_time; -+ unsigned long forward_delay_time; -+ unsigned long arp_response_time; -+ unsigned long flush_timeout; -+ unsigned long path_switching_delay; -+}; -+ -+struct atmlec_msg { -+ atmlec_msg_type type; -+ union { -+ struct { -+ unsigned char mac_addr[ETH_ALEN]; -+ unsigned char atm_addr[ATM_ESA_LEN]; -+ unsigned long flag;/* Topology_change flag, -+ remoteflag, permanent flag, -+ lecid, transaction id */ -+ } normal; -+ struct atmlec_config_msg config; -+ } content; -+}; -+ -+struct atmlec_ioc { -+ unsigned char atm_addr[ATM_ESA_LEN]; -+ unsigned char receive; /* 1= receive vcc, 0 = send_vcc */ -+}; -+#endif /* _ATMLEC_H_ */ ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/lec.c Thu Jul 11 13:11:56 1996 -@@ -0,0 +1,588 @@ -+/* -+ * lec.c: Lan Emulation driver -+ * Marko Kiiskila carnil@cs.tut.fi -+ * -+ */ -+ -+#include -+ -+/* We are ethernet device */ -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+#include -+ -+/* And atm device */ -+#include -+#include -+ -+#include "lec.h" -+#include "lec_arpc.h" -+ -+#define DPRINTK(format,args...) -+ -+struct atm_vcc *lecd = NULL; -+ -+#define DUMP_PACKETS 0 /* 0 = None, -+ * 1 = 30 first bytes -+ * 2 = Whole packet -+ */ -+ -+static int lec_open(struct device *dev); -+static int lec_send_packet(struct sk_buff *skb, struct device *dev); -+static int lec_close(struct device *dev); -+static struct enet_statistics *lec_get_stats(struct device *dev); -+static int lec_init(struct device *dev); -+ -+static char myname[] = "lec0"; -+ -+extern struct lec_arp_table *lec_arp_empty_ones; -+ -+/* Have we register_netdev() yet? */ -+unsigned char registered = 0; -+ -+static struct device dev_lec = { -+ myname, -+ 0, 0, /* rmem_end, rmem_start */ -+ 0, 0, /* mem_end, mem_start */ -+ 0, 0, /* base_addr, irq */ -+ 0, 0, /* start, interrupt */ -+ 0, NULL, /* tbusy, *next */ -+ lec_init /* Initialization func */ -+}; -+ -+struct lec_priv { -+ struct enet_statistics stats; -+ unsigned short lecid; /* Lecid of this client */ -+}; -+ -+/* -+ * Open/initialize the netdevice. This is called (in the current kernel) -+ * sometime after booting when the 'ifconfig' program is run. -+ * -+ * This routine should set everything up anew at each open, even -+ * registers that "should" only need to be set once at boot, so that -+ * there is non-reboot way to recover if something goes wrong. -+ */ -+ -+static int -+lec_open(struct device *dev) -+{ -+ struct lec_priv *priv = (struct lec_priv *)dev->priv; -+ -+ dev->tbusy = 0; -+ dev->start = 1; -+ dev->interrupt = 1; -+ if (priv) -+ memset(&priv->stats,0,sizeof(struct enet_statistics)); -+ -+ return 0; -+} -+ -+static int -+lec_send_packet(struct sk_buff *skb, struct device *dev) -+{ -+ struct lec_priv *priv = (struct lec_priv *)dev->priv; -+ struct lecdatahdr_8023 *lec_h; -+ struct atm_vcc *send_vcc; -+#if DUMP_PACKETS > 0 -+ char buf[300]; -+ int i=0; -+#endif /* DUMP_PACKETS >0 */ -+ -+ DPRINTK("Lec_send_packet called\n"); -+ if (!lecd) { -+ printk("LEC:No lecd attached\n"); -+ if (priv) -+ priv->stats.tx_errors++; -+ return -EUNATCH; -+ } -+ if (dev->tbusy) { -+ /* -+ * If we get here, some higher level has decided we are broken. -+ * There should really be a "kick me" function call instead. -+ */ -+ printk(KERN_WARNING "%s: transmit timed out.\n", dev->name); -+ dev->tbusy=0; -+ } -+ /* -+ * If some higher layer thinks we've missed an tx-done interrupt -+ * we are passed NULL. Caution: dev_tint() handles the cli()/sti() -+ * itself. -+ */ -+ if (skb == NULL) { -+ dev_tint(dev); -+ return 0; -+ } -+ /* -+ * Block a timer-based transmit from overlapping. This could better be -+ * done with atomic_swap(1, dev->tbusy), but set_bit() works as well. -+ */ -+ -+ if (set_bit(0, (void*)&dev->tbusy) != 0) { -+ printk(KERN_WARNING "%s: Transmitter access conflict.\n", -+ dev->name); -+ } else { -+ DPRINTK("skbuff head:%lx data:%lx tail:%lx end:%lx\n", -+ (long)skb->head, (long)skb->data, (long)skb->tail, -+ (long)skb->end); -+ -+ /* Put le header to place */ -+ lec_h = (struct lecdatahdr_8023*)skb->data; -+ lec_h->le_header = htons(priv->lecid); -+ -+#if DUMP_PACKETS > 0 -+ printk("LEC: send datalen:%ld lecid:%4.4x\n", -+ skb->len, priv->lecid); -+#if DUMP_PACKETS >= 2 -+ for(i=0;ilen && i <99;i++) { -+ sprintf(buf+i*3,"%2.2x ",0xff&skb->data[i]); -+ } -+#elif DUMP_PACKETS >= 1 -+ for(i=0;ilen && i < 30;i++) { -+ sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]); -+ } -+#endif /* DUMP_PACKETS >= 1 */ -+ if (i==skb->len) -+ printk("%s\n",buf); -+ else -+ printk("%s...\n",buf); -+#endif /* DUMP_PACKETS > 0 */ -+ /* Send to right vcc */ -+ send_vcc = lec_arp_resolve(lec_h->h_dest); -+ if (!send_vcc || !(send_vcc->flags & ATM_VF_READY)) { -+ if (priv) -+ priv->stats.tx_errors++; -+ DPRINTK("LEC:lec_send_packet: dropping ..\n"); -+ dev_kfree_skb(skb, FREE_WRITE); -+ return 0; -+ } else { -+#if DUMP_PACKETS > 0 -+ printk("LEC:sending to vpi:%d vci:%d\n", -+ send_vcc->vpi, send_vcc->vci); -+#endif /* DUMP_PACKETS > 0 */ -+ /* Minimum ethernet-frame size */ -+ if (skb->len <62) -+ skb->len = 62; -+ skb->atm.iovcnt = 0; -+ send_vcc->dev->ops->send(send_vcc, skb); -+ if (priv) -+ priv->stats.tx_packets++; -+ } -+ } -+ /* Should we wait for card's device driver to notify us? */ -+ dev->tbusy=0; -+ -+ return 0; -+} -+ -+/* The inverse routine to net_open(). */ -+static int -+lec_close(struct device *dev) -+{ -+ dev->tbusy = 1; -+ dev->start = 0; -+ return 0; -+} -+ -+/* -+ * Get the current statistics. -+ * This may be called with the card open or closed. -+ */ -+static struct enet_statistics * -+lec_get_stats(struct device *dev) -+{ -+ struct lec_priv *priv = (struct lec_priv *)dev->priv; -+ -+ return (struct enet_statistics *)&priv->stats; -+} -+ -+int -+lec_hard_header(struct sk_buff *skb, struct device *dev, -+ unsigned short type, void *daddr, void *saddr, -+ unsigned len) -+{ -+ struct lec_priv *priv = (struct lec_priv *)dev->priv; -+ struct lecdatahdr_8023 *hdr = -+ (struct lecdatahdr_8023 *)skb_push(skb, LEC_HEADER_LEN); -+ -+ /* Set lecid header */ -+ if (priv) -+ hdr->le_header = htons(priv->lecid); -+ else -+ hdr->le_header = 0; -+ -+ /* Set the protocol type. */ -+ if(type!=ETH_P_802_3) -+ hdr->h_type = htons(type); -+ else -+ hdr->h_type = htons(len); -+ -+ /* Source hw address */ -+ if (saddr) -+ memcpy(hdr->h_source, saddr, dev->addr_len); -+ else -+ memcpy(hdr->h_source, dev->dev_addr, dev->addr_len); -+ -+ /* Destination addr */ -+ if (daddr) { -+ memcpy(hdr->h_dest, daddr, dev->addr_len); -+ hdr->le_header = 0; -+ return dev->hard_header_len; -+ } -+ return -dev->hard_header_len; -+} -+ -+int -+lec_rebuild_header(void *buff, struct device *dev, unsigned long dst, -+ struct sk_buff *skb) -+{ -+ struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023*)buff; -+ -+ /* -+ * Only ARP/IP is currently supported -+ */ -+ if (hdr->h_type != htons(ETH_P_IP)) { -+ printk(KERN_DEBUG "%s: unable to resolve type %X addresses.\n", -+ dev->name,(int)hdr->h_type); -+ memcpy(hdr->h_source, dev->dev_addr, dev->addr_len); -+ return 0; -+ } -+ /* -+ * Try and get ARP to resolve the header. -+ */ -+#ifdef CONFIG_INET -+ return arp_find(hdr->h_dest, dst, dev, dev->pa_addr, skb)? 1 : 0; -+#else -+ return 0; -+#endif -+} -+ -+/* -+ * Upper level calls this function to bind hardware header cache entry. -+ * If the call is successful, then corresponding Address Resolution Protocol -+ * (maybe, not ARP) takes responsibility for updating cache content. -+ */ -+void -+lec_header_cache_bind(struct hh_cache ** hhp, struct device *dev, -+ unsigned short htype, __u32 daddr) -+{ -+ struct hh_cache *hh; -+ -+ if (htype != ETH_P_IP) { -+ printk("eth_header_cache_bind: %04x cache is not implemented\n", -+ htype); -+ return; -+ } -+ if (arp_bind_cache(hhp, dev, htype, daddr)) -+ return; -+ if ((hh=*hhp) != NULL) { -+ memcpy(hh->hh_data+8, dev->dev_addr, ETH_ALEN); -+ hh->hh_data[14] = htype>>8; -+ hh->hh_data[15] = htype&0xFF; -+ } -+} -+ -+/* -+ * Called by Address Resolution module to notify changes in address. -+ */ -+void -+lec_header_cache_update(struct hh_cache *hh, struct device *dev, -+ unsigned char *haddr) -+{ -+ if (hh->hh_type != ETH_P_IP) { -+ printk("lec_header_cache_update: %04x cache is not implemented\n", -+ hh->hh_type); -+ return; -+ } -+ memcpy(hh->hh_data+2, haddr, ETH_ALEN); -+ hh->hh_uptodate = 1; -+} -+ -+static int -+lec_atm_send(struct atm_vcc *vcc, struct sk_buff *skb) -+{ -+ struct lec_priv *priv = (struct lec_priv *)dev_lec.priv; -+ struct atmlec_msg *mesg; -+ int i; -+ -+ mesg = (struct atmlec_msg *)skb->data; -+ switch(mesg->type) { -+ case l_set_mac_addr: -+ for (i=0;i<6;i++) { -+ dev_lec.dev_addr[i] = mesg->content.normal.mac_addr[i]; -+ } -+ break; -+ case l_del_mac_addr: -+ for(i=0;i<6;i++) { -+ dev_lec.dev_addr[i] = 0; -+ } -+ break; -+ case l_add_permanent: -+ lec_add_permanent(mesg->content.normal.mac_addr, -+ mesg->content.normal.atm_addr); -+ break; -+ case l_addr_delete: -+ lec_addr_delete(mesg->content.normal.atm_addr, -+ mesg->content.normal.flag); -+ break; -+ case l_topology_change: -+ lec_topology_flag_change_set(mesg->content.normal.flag); -+ break; -+ case l_flush_complete: -+ lec_flush_complete(mesg->content.normal.atm_addr, -+ mesg->content.normal.flag); -+ break; -+ case l_arp_update: -+ lec_arp_update(mesg->content.normal.mac_addr, -+ mesg->content.normal.atm_addr, -+ mesg->content.normal.flag); -+ break; -+ case l_reset: -+ lec_reset(); -+ break; -+ case l_config: -+ lec_config(&mesg->content.config); -+ break; -+ case l_flush_tran_id: -+ lec_set_flush_tran_id(mesg->content.normal.mac_addr, -+ mesg->content.normal.flag); -+ break; -+ case l_set_lecid: -+ if (priv) -+ priv->lecid = (unsigned short)(0xffff&mesg->content.normal.flag); -+ break; -+ default: -+ printk("LEC: Unknown message type %d\n",mesg->type); -+ dev_kfree_skb(skb, FREE_WRITE); -+ return -EINVAL; -+ } -+ dev_kfree_skb(skb, FREE_WRITE); -+ return 0; -+} -+ -+static void -+lec_atm_close(struct atm_vcc *vcc) -+{ -+ struct sk_buff *skb; -+ -+ lecd = NULL; -+ /* Do something needful? */ -+ -+ dev_lec.tbusy = 1; -+ dev_lec.start = 0; -+ -+ lec_arp_destroy(); -+ -+#if 0 -+ unregister_netdev(&dev_lec); -+ /* Should we do this? */ -+ if (priv) { -+ kfree_s(priv, sizeof(struct lec_priv)); -+ dev_lec.priv = NULL; -+ } -+#endif -+ if (skb_peek(&vcc->recvq)) -+ printk("LEC lec_atm_close: closing with messages pending\n"); -+ while ((skb = skb_dequeue(&vcc->recvq))) -+ dev_kfree_skb(skb,FREE_READ); -+ -+ printk("LEC: Shut down!\n"); -+} -+ -+static struct atmdev_ops lecdev_ops = { -+ NULL, /*open*/ -+ lec_atm_close, /*close*/ -+ NULL, /*ioctl*/ -+ NULL, /*getsockopt */ -+ NULL, /*setsockopt */ -+ lec_atm_send, /*send */ -+ NULL, /*sg_send */ -+ NULL, /*poll */ -+ NULL, /*phy_put*/ -+ NULL, /*phy_get*/ -+ NULL /*feedback*/ -+}; -+ -+static struct atm_dev lecatm_dev = { -+ &lecdev_ops, -+ NULL, /*PHY*/ -+ "lec", /*type*/ -+ 999, /*dummy device number*/ -+ NULL,NULL, /*no VCCs*/ -+ NULL,NULL, /*no data*/ -+ 0, /*no flags*/ -+ NULL, /* no local address*/ -+ { 0 } /*no ESI, no statistics */ -+}; -+ -+int -+send_to_lecd(atmlec_msg_type type, unsigned char *mac_addr, -+ unsigned char *atm_addr) -+{ -+ struct sk_buff *skb; -+ struct atmlec_msg *mesg; -+ -+ if (!lecd) { -+ return -1; -+ } -+ skb = alloc_skb(sizeof(struct atmlec_msg), GFP_ATOMIC); -+ if (!skb) -+ return -1; -+ skb->free = 1; -+ skb->len = sizeof(struct atmlec_msg); -+ mesg = (struct atmlec_msg *)skb->data; -+ mesg->type = type; -+ if (mac_addr) -+ memcpy(&mesg->content.normal.mac_addr, mac_addr, ETH_ALEN); -+ if (atm_addr) -+ memcpy(&mesg->content.normal.atm_addr, atm_addr, ATM_ESA_LEN); -+ -+ skb_queue_tail(&lecd->recvq, skb); -+ wake_up(&lecd->sleep); -+ return 0; -+} -+ -+static int -+lec_init(struct device *dev) -+{ -+ dev->priv = kmalloc(sizeof(struct lec_priv), GFP_KERNEL); -+ if (dev->priv == NULL) -+ return -ENOMEM; -+ -+ memset(dev->priv,0,sizeof(struct lec_priv)); -+ -+ ether_setup(dev); -+ dev->open = lec_open; -+ dev->stop = lec_close; -+ dev->hard_start_xmit = lec_send_packet; -+ dev->hard_header_len = LEC_HEADER_LEN; -+ -+ dev->hard_header = lec_hard_header; -+ dev->rebuild_header = lec_rebuild_header; -+ dev->header_cache_bind = lec_header_cache_bind; -+ dev->header_cache_update= lec_header_cache_update; -+ -+ dev->get_stats = lec_get_stats; -+ dev->set_multicast_list = NULL; -+ dev->do_ioctl = NULL; -+ printk("LEC: Initialized!\n"); -+ return 0; -+} -+ -+static unsigned char lec_ctrl_magic[] = { -+ 0xff, -+ 0x00, -+ 0x01, -+ 0x01 }; -+ -+void -+lec_push(struct atm_vcc *vcc, struct sk_buff *skb) -+{ -+ struct lec_priv *priv = (struct lec_priv *)dev_lec.priv; -+ struct lecdatahdr_8023 *hdr; -+#if DUMP_PACKETS >0 -+ int i=0; -+ char buf[300]; -+ -+ printk("LEC: lec_push vcc vpi:%d vci:%d\n",vcc->vpi, vcc->vci); -+#endif -+ if (!skb) { -+ DPRINTK("LEC: null skb\n"); -+ lec_vcc_close(vcc); -+ return; -+ } -+#if DUMP_PACKETS > 0 -+ printk("LEC: rcv datalen:%ld lecid:%4.4x\n", skb->len, priv->lecid); -+#if DUMP_PACKETS >= 2 -+ for(i=0;ilen && i <99;i++) { -+ sprintf(buf+i*3,"%2.2x ",0xff&skb->data[i]); -+ } -+#elif DUMP_PACKETS >= 1 -+ for(i=0;ilen && i < 30;i++) { -+ sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]); -+ } -+#endif /* DUMP_PACKETS >= 1 */ -+ if (i==skb->len) -+ printk("%s\n",buf); -+ else -+ printk("%s...\n",buf); -+#endif /* DUMP_PACKETS > 0 */ -+ if (memcmp(skb->data, lec_ctrl_magic, 4) ==0) { /* Control frame, to daemon*/ -+ DPRINTK("LEC: To daemon\n"); -+ skb_queue_tail(&vcc->recvq, skb); -+ wake_up(&vcc->sleep); -+ } else { /* Data frame, queue to protocol handlers */ -+ hdr = (struct lecdatahdr_8023 *)skb->data; -+ if (hdr->le_header == htons(priv->lecid) || -+ !lecd) { /* Probably looping back, or if lecd is missing, -+ lecd has gone down */ -+ DPRINTK("Ignoring loopback frame...\n"); -+ dev_kfree_skb(skb, FREE_READ); -+ return; -+ } -+ if (lec_arp_empty_ones) { /* FILTER DATA!!!! */ -+ lec_arp_check_empties(vcc, skb); -+ } -+ skb->dev = &dev_lec; -+ skb->mac.raw = (unsigned char *)skb->data; -+ skb->mac.ethernet = (struct ethhdr *)skb_pull(skb, 2); -+ if (*hdr->h_dest&1) { -+ if (memcmp(hdr->h_dest,dev_lec.broadcast, ETH_ALEN)==0) -+ skb->pkt_type=PACKET_BROADCAST; -+ else -+ skb->pkt_type=PACKET_MULTICAST; -+ } else if (dev_lec.flags&(IFF_PROMISC|IFF_ALLMULTI)) { -+ if (memcmp(hdr->h_dest,dev_lec.dev_addr, ETH_ALEN)) -+ skb->pkt_type=PACKET_OTHERHOST; -+ } -+ if (ntohs(hdr->h_type)>=1536) -+ skb->protocol = hdr->h_type; -+ else -+ skb->protocol = htons(ETH_P_802_2); -+ skb->h.raw = skb_pull(skb, ETH_HLEN); -+ netif_rx(skb); -+ if (priv) -+ priv->stats.rx_packets++; -+ } -+} -+ -+int -+lec_vcc_attach(struct atm_vcc *vcc, void *arg) -+{ -+ struct atmlec_ioc ioc_data; -+ -+ /* Lecd must be up in this case */ -+ memcpy_fromfs(&ioc_data, arg, sizeof(struct atmlec_ioc)); -+ lec_vcc_added(&ioc_data, vcc, vcc->push); -+ vcc->push = lec_push; -+ return 0; -+} -+ -+/* Initialize device. */ -+int -+lecd_attach(struct atm_vcc *vcc) -+{ -+ int result; -+ -+ if (lecd) { -+ printk("LEC: Lecd already contacted\n"); -+ return -EADDRINUSE; -+ } -+ -+ lec_arp_init(); -+ if (!registered) { -+ registered = 1; -+ if ((result =register_netdev(&dev_lec)) != 0) -+ return result; -+ } -+ lecd = vcc; -+ vcc->dev = &lecatm_dev; -+ vcc->flags |= ATM_VF_READY; -+ -+ return 0; -+} ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/lec.h Fri Jul 19 15:10:11 1996 -@@ -0,0 +1,53 @@ -+/* -+ * -+ * Lan Emulation client header file -+ * -+ * Marko Kiiskila carnil@cs.tut.fi -+ * -+ */ -+ -+#ifndef _LEC_H_ -+#define _LEC_H_ -+ -+#include -+#include -+ -+#define LEC_HEADER_LEN 16 -+ -+struct lecdatahdr_8023 { -+ unsigned short le_header; -+ unsigned char h_dest[ETH_ALEN]; -+ unsigned char h_source[ETH_ALEN]; -+ unsigned short h_type; -+}; -+ -+struct lecdatahdr_8025 { -+ unsigned short le_header; -+ unsigned char ac_pad; -+ unsigned char fc; -+ unsigned char h_dst[ETH_ALEN]; -+ unsigned char h_source[ETH_ALEN]; -+}; -+ -+/* -+ * ATM LAN Emulation supports both LLC & Dix Ethernet EtherType -+ * frames. -+ * 1. Dix Ethernet EtherType frames encoded by placing EtherType -+ * field in h_type field. Data follows immediatelly after header. -+ * 2. LLC Data frames whose total length, including LLC field and data, -+ * but not padding required to meet the minimum data frame length, -+ * is less than 1536(0x0600) MUST be encoded by placing that length -+ * in the the h_type field. The LLC field follows header immediatelly. -+ * 3. LLC data frames longer than this maximum MUST be encoded by placing -+ * the value 0 in the h_type field. -+ * -+ */ -+ -+int lecd_attach(struct atm_vcc *vcc); -+int lec_vcc_attach(struct atm_vcc *vcc, void *arg); -+int make_lec(struct atm_vcc *vcc); -+int send_to_lecd(atmlec_msg_type type, unsigned char *mac_addr, -+ unsigned char *atm_addr); -+void lec_push(struct atm_vcc *vcc, struct sk_buff *skb); -+#endif _LEC_H_ -+ ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/lec_arpc.c Thu Jul 11 13:11:57 1996 -@@ -0,0 +1,1090 @@ -+#include -+#include -+#include -+#include -+#include -+#include -+ -+#include -+ -+#include "lec.h" -+#include "lec_arpc.h" -+ -+#define DPRINTK(format,args...) -+#define DEBUG_ARP_TABLE 0 -+ -+struct lec_arp_table *lec_arp_tables[LEC_ARP_TABLE_SIZE] = -+{ NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, /* At least this gets */ -+ NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL}; /* initialized */ -+ -+/* Used for storing VCC's that don't have a MAC address attached yet */ -+struct lec_arp_table *lec_arp_empty_ones = NULL; -+ -+/* Used for storing VCC's (and forward packets from) which are to -+ age out by not using them to forward packets. -+ This is because to some LE clients there will be 2 VCCs. Only -+ one of them gets used. */ -+struct lec_arp_table *lec_no_forward = NULL; -+ -+static atomic_t lec_arp_lock_var = 0; -+ -+struct atm_vcc *mcast_vcc = NULL; -+ -+#define LEC_ARP_REFRESH_INTERVAL (3*HZ) -+ -+static void lec_arp_check_expire(unsigned long dumle); -+static __inline__ void lec_arp_expire_arp(unsigned long dumb); -+static void lec_clear_all(void); -+void dump_arp_table(void); -+ -+static struct timer_list lec_arp_timer = -+{ NULL,NULL, LEC_ARP_REFRESH_INTERVAL, 0L, &lec_arp_check_expire }; -+static unsigned char lec_freeze; -+ -+/* C10 */ -+static unsigned int lec_maximum_unknown_frame_count = 1; -+/* Within the period of time defined by this variable, the client will send -+ no more than C10 frames to BUS for a given unicast destination. (C11) */ -+static unsigned long lec_max_unknown_frame_time = (1*HZ); -+/* If no traffic has been sent in this vcc for this period of time, -+ vcc will be torn down (C12)*/ -+static unsigned long lec_vcc_timeout_period = (1200*HZ); -+/* An LE Client MUST not retry an LE_ARP_REQUEST for a -+ given frame's LAN Destination more than maximum retry count times, -+ after the first LEC_ARP_REQUEST (C13)*/ -+static unsigned short lec_max_retry_count = 1; -+/* Max time the client will maintain an entry in its arp cache in -+ absence of a verification of that relationship (C17)*/ -+static unsigned long lec_aging_time = (300*HZ); -+/* Max time the client will maintain an entry in cache when -+ topology change flag is true (C18) */ -+static unsigned long lec_forward_delay_time = (15*HZ); -+/* Topology change flag (C19)*/ -+static int lec_topology_change = 0; -+/* Max time the client expects an LE_ARP_REQUEST/LE_ARP_RESPONSE -+ cycle to take (C20)*/ -+static unsigned long lec_arp_response_time = (1*HZ); -+/* Time limit ot wait to receive an LE_FLUSH_RESPONSE after the -+ LE_FLUSH_REQUEST has been sent before taking recover action. (C21)*/ -+static unsigned long lec_flush_timeout = (4*HZ); -+/* The time since sending a frame to the bus after which the -+ LE Client may assume that the frame has been either discarded or -+ delivered to the recipient (C22) */ -+static unsigned long lec_path_switching_delay = (6*HZ); -+ -+/* -+ * Arp table funcs -+ */ -+ -+#define HASH(ch) (ch & (LEC_ARP_TABLE_SIZE -1)) -+ -+static __inline__ void -+lec_arp_lock(void) -+{ -+ atomic_inc(&lec_arp_lock_var); -+} -+ -+static __inline__ void -+lec_arp_unlock(void) -+{ -+ atomic_dec(&lec_arp_lock_var); -+} -+ -+/* -+ * Initialization of arp-cache -+ */ -+void -+lec_arp_init(void) -+{ -+ unsigned short i; -+ -+ for (i=0;ivcc) { -+ entry->vcc->push = entry->old_push; -+ entry->vcc->flags |= ATM_VF_RELEASED; -+ entry->vcc->flags &= ~ATM_VF_READY; -+ entry->vcc = NULL; -+ } -+ if (entry->recv_vcc) { -+ entry->recv_vcc->push = entry->old_recv_push; -+ entry->recv_vcc->flags |= ATM_VF_RELEASED; -+ entry->recv_vcc->flags &= ~ATM_VF_READY; -+ entry->recv_vcc = NULL; -+ } -+} -+ -+/* -+ * Insert entry to lec_arp_table -+ */ -+static __inline__ void -+lec_arp_put(struct lec_arp_table *to_put) -+{ -+ unsigned short place; -+ unsigned long flags; -+ -+ save_flags(flags); -+ cli(); -+ -+ place = HASH(to_put->mac_addr[ETH_ALEN-1]); -+ to_put->next = lec_arp_tables[place]; -+ lec_arp_tables[place] = to_put; -+ -+ restore_flags(flags); -+ DPRINTK("LEC_ARP: Added entry:%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n", -+ 0xff&to_put->mac_addr[0], 0xff&to_put->mac_addr[1], -+ 0xff&to_put->mac_addr[2], 0xff&to_put->mac_addr[3], -+ 0xff&to_put->mac_addr[4], 0xff&to_put->mac_addr[5]); -+ dump_arp_table(); -+} -+ -+/* -+ * Remove entry from lec_arp_table -+ */ -+static __inline__ int -+lec_arp_remove(struct lec_arp_table *to_remove) -+{ -+ unsigned short place; -+ struct lec_arp_table *tmp; -+ unsigned long flags; -+ int remove_vcc=1; -+ -+ save_flags(flags); -+ cli(); -+ -+ if (!to_remove) { -+ restore_flags(flags); -+ return -1; -+ } -+ place = HASH(to_remove->mac_addr[ETH_ALEN-1]); -+ tmp = lec_arp_tables[place]; -+ if (tmp == to_remove) { -+ lec_arp_tables[place] = tmp->next; -+ } else { -+ while(tmp && tmp->next != to_remove) { -+ tmp = tmp->next; -+ } -+ if (!tmp) {/* Entry was not found */ -+ restore_flags(flags); -+ return -1; -+ } -+ } -+ tmp->next = to_remove->next; -+ del_timer(&to_remove->timer); -+ -+ /* If this is the only MAC connected to this VCC, also tear down -+ the VCC */ -+ if (to_remove->status >= ESI_FLUSH_PENDING) { -+ /* -+ * ESI_FLUSH_PENDING, ESI_FORWARD_DIRECT -+ */ -+ for(place=0;placenext){ -+ if (memcmp(tmp->atm_addr, to_remove->atm_addr, -+ ATM_ESA_LEN)==0) { -+ remove_vcc=0; -+ break; -+ } -+ } -+ } -+ if (remove_vcc) -+ lec_arp_clear_vccs(to_remove); -+ } -+ restore_flags(flags); -+ -+ DPRINTK("LEC_ARP: Removed entry:%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n", -+ 0xff&to_remove->mac_addr[0], 0xff&to_remove->mac_addr[1], -+ 0xff&to_remove->mac_addr[2], 0xff&to_remove->mac_addr[3], -+ 0xff&to_remove->mac_addr[4], 0xff&to_remove->mac_addr[5]); -+ -+ dump_arp_table(); -+ return 0; -+} -+ -+#if DEBUG_ARP_TABLE -+static char* -+get_status_string(unsigned char st) -+{ -+ switch(st) { -+ case ESI_UNKNOWN: -+ return "ESI_UNKNOWN"; -+ case ESI_ARP_PENDING: -+ return "ESI_ARP_PENDING"; -+ case ESI_VC_PENDING: -+ return "ESI_VC_PENDING"; -+ case ESI_FLUSH_PENDING: -+ return "ESI_FLUSH_PENDING"; -+ case ESI_FORWARD_DIRECT: -+ return "ESI_FORWARD_DIRECT"; -+ default: -+ return ""; -+ } -+} -+#endif -+ -+void -+dump_arp_table(void) -+{ -+#if DEBUG_ARP_TABLE -+ int i,j, offset; -+ struct lec_arp_table *rulla; -+ char buf[512]; -+ -+ printk("Dump:\n"); -+ for (i=0;imac_addr[j]&0xff); -+ } -+ offset +=sprintf(buf+offset,"Atm:"); -+ for(j=0;jatm_addr[j]&0xff); -+ } -+ offset+=sprintf(buf+offset, -+ "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ", -+ rulla->vcc?rulla->vcc->vpi:0, -+ rulla->vcc?rulla->vcc->vci:0, -+ rulla->recv_vcc?rulla->recv_vcc->vpi:0, -+ rulla->recv_vcc?rulla->recv_vcc->vci:0, -+ rulla->last_used, -+ rulla->timestamp, rulla->no_tries); -+ offset+=sprintf(buf+offset, -+ "Flags:%x, Packets_flooded:%x, Status: %s ", -+ rulla->flags, rulla->packets_flooded, -+ get_status_string(rulla->status)); -+ offset+=sprintf(buf+offset,"->%p\n",rulla->next); -+ rulla = rulla->next; -+ } -+ printk("%s",buf); -+ } -+ rulla = lec_arp_empty_ones; -+ if (rulla) -+ printk("Empty ones\n"); -+ while(rulla) { -+ offset=0; -+ offset += sprintf(buf+offset,"Mac:"); -+ for(j=0;jmac_addr[j]&0xff); -+ } -+ offset +=sprintf(buf+offset,"Atm:"); -+ for(j=0;jatm_addr[j]&0xff); -+ } -+ offset+=sprintf(buf+offset, -+ "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ", -+ rulla->vcc?rulla->vcc->vpi:0, -+ rulla->vcc?rulla->vcc->vci:0, -+ rulla->recv_vcc?rulla->recv_vcc->vpi:0, -+ rulla->recv_vcc?rulla->recv_vcc->vci:0, -+ rulla->last_used, -+ rulla->timestamp, rulla->no_tries); -+ offset+=sprintf(buf+offset, -+ "Flags:%x, Packets_flooded:%x, Status: %s ", -+ rulla->flags, rulla->packets_flooded, -+ get_status_string(rulla->status)); -+ offset+=sprintf(buf+offset,"->%lx\n",(long)rulla->next); -+ rulla = rulla->next; -+ printk("%s",buf); -+ } -+#endif -+} -+ -+ -+/* -+ * Find entry by mac_address -+ */ -+static __inline__ struct lec_arp_table* -+lec_arp_find(unsigned char *mac_addr) -+{ -+ unsigned short place; -+ struct lec_arp_table *to_return; -+ -+ DPRINTK("LEC_ARP: lec_arp_find :%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n", -+ mac_addr[0]&0xff, mac_addr[1]&0xff, mac_addr[2]&0xff, -+ mac_addr[3]&0xff, mac_addr[4]&0xff, mac_addr[5]&0xff); -+ lec_arp_lock(); -+ place = HASH(mac_addr[ETH_ALEN-1]); -+ -+ to_return = lec_arp_tables[place]; -+ while(to_return) { -+ if (memcmp(mac_addr, to_return->mac_addr, ETH_ALEN) == 0) { -+ to_return->last_used = jiffies; -+ lec_arp_unlock(); -+ return to_return; -+ } -+ to_return = to_return->next; -+ } -+ lec_arp_unlock(); -+ return NULL; -+} -+ -+static struct lec_arp_table* -+make_entry(unsigned char *mac_addr) -+{ -+ struct lec_arp_table *to_return; -+ -+ to_return=(struct lec_arp_table *)kmalloc(sizeof(struct lec_arp_table), -+ GFP_ATOMIC); -+ if (!to_return) { -+ printk("LEC: Arp entry kmalloc failed\n"); -+ return NULL; -+ } -+ memset(to_return,0,sizeof(struct lec_arp_table)); -+ memcpy(to_return->mac_addr, mac_addr, ETH_ALEN); -+ to_return->timer.function = lec_arp_expire_arp; -+ to_return->timer.data = (unsigned long)to_return; -+ return to_return; -+} -+ -+/* -+ * -+ * Arp sent timer expired -+ * -+ */ -+static void -+lec_arp_expire_arp(unsigned long data) -+{ -+ struct lec_arp_table *entry; -+ -+ entry = (struct lec_arp_table *)data; -+ del_timer(&entry->timer); -+ -+ if (entry->status == ESI_ARP_PENDING) { -+ send_to_lecd(l_arp_xmt, entry->mac_addr, NULL); -+ entry->no_tries++; -+ if(entry->no_tries <= lec_max_retry_count) { -+ entry->timer.expires = jiffies + (1*HZ); -+ add_timer(&entry->timer); -+ } else -+ /* For safety */ -+ entry->timer.next = entry->timer.prev = NULL; -+ } -+} -+ -+/* -+ * -+ * Unknown/unused vcc expire, remove associated entry -+ * -+ */ -+static void -+lec_arp_expire_vcc(unsigned long data) -+{ -+ struct lec_arp_table *to_remove = (struct lec_arp_table*)data; -+ struct lec_arp_table *entry = NULL; -+ -+ del_timer(&to_remove->timer); -+ -+ DPRINTK("LEC_ARP: lec_arp_expire_vcc vpi:%d vci:%d\n", -+ to_remove->vcc?to_remove->vcc->vpi:0, -+ to_remove->vcc?to_remove->vcc->vci:0); -+ if (to_remove == lec_arp_empty_ones) -+ lec_arp_empty_ones = to_remove->next; -+ else { -+ entry = lec_arp_empty_ones; -+ while (entry && entry->next != to_remove) -+ entry = entry->next; -+ if (entry) -+ entry->next = to_remove->next; -+ } -+ if (!entry) -+ if (to_remove == lec_no_forward) { -+ lec_no_forward = to_remove->next; -+ } else { -+ entry = lec_no_forward; -+ while (entry && entry->next != to_remove) -+ entry = entry->next; -+ if (entry) -+ entry->next = to_remove->next; -+ } -+ lec_arp_clear_vccs(to_remove); -+ kfree_s(to_remove, sizeof(struct lec_arp_table)); -+} -+ -+/* -+ * Expire entries. -+ * 1. Re-set timer -+ * 2. For each entry, delete entries that have aged past the age limit. -+ * 3. For each entry, depending on the status of the entry, perform -+ * the following maintenance. -+ * a. If status is ESI_VC_PENDING or ESI_ARP_PENDING then if the -+ * tick_count is above the max_unknown_frame_time, clear -+ * the tick_count to zero and clear the packets_flooded counter -+ * to zero. This supports the packet rate limit per address -+ * while flooding unknowns. -+ * b. If the status is ESI_FLUSH_PENDING and the tick_count is greater -+ * than or equal to the path_switching_delay, change the status -+ * to ESI_FORWARD_DIRECT. This causes the flush period to end -+ * regardless of the progress of the flush protocol. -+ */ -+static void -+lec_arp_check_expire(unsigned long dumle) -+{ -+ struct lec_arp_table *entry, *next; -+ unsigned long now; -+ unsigned long time_to_check; -+ int i; -+ -+ del_timer(&lec_arp_timer); -+ -+ DPRINTK("lec_arp_check_expire\n"); -+ if (!lec_arp_lock_var) { -+ lec_arp_lock(); -+ now = jiffies; -+ for(i=0;iflags) & LEC_REMOTE_FLAG && -+ lec_topology_change) -+ time_to_check = lec_forward_delay_time; -+ else -+ time_to_check = lec_aging_time; -+ -+ if((now-entry->last_used > time_to_check) && -+ !(entry->flags & LEC_PERMANENT_FLAG)) { -+ /* Remove entry */ -+ printk("LEC:Remove entry1\n"); -+ del_timer(&entry->timer); -+ next = entry->next; -+ lec_arp_remove(entry); -+ kfree_s(entry, -+ sizeof(struct lec_arp_table)); -+ entry = next; -+ } else { -+ /* Something else */ -+ if ((entry->status == ESI_VC_PENDING || -+ entry->status == ESI_ARP_PENDING) -+ && -+ now-entry->timestamp >= -+ lec_max_unknown_frame_time) { -+ entry->timestamp = jiffies; -+ entry->packets_flooded = 0; -+ } -+ if (entry->status == ESI_FLUSH_PENDING -+ && -+ now-entry->timestamp >= -+ lec_path_switching_delay) { -+ entry->last_used = jiffies; -+ entry->status = -+ ESI_FORWARD_DIRECT; -+ } -+ entry = entry->next; -+ } -+ } -+ } -+ lec_arp_unlock(); -+ } -+ lec_arp_timer.expires = jiffies + LEC_ARP_REFRESH_INTERVAL; -+ if (!lec_freeze) -+ add_timer(&lec_arp_timer); -+} -+ -+/* -+ * Remove all entries -+ */ -+static void -+lec_clear_all(void) -+{ -+ struct lec_arp_table *entry, *next; -+ unsigned long flags; -+ int i; -+ -+ save_flags(flags); -+ cli(); -+ -+ for (i=0;inext; -+ lec_arp_remove(entry); -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ } -+ } -+ entry = lec_arp_empty_ones; -+ while(entry) { -+ next = entry->next; -+ del_timer(&entry->timer); -+ lec_arp_clear_vccs(entry); -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ entry = next; -+ } -+ lec_arp_empty_ones = NULL; -+ entry = lec_no_forward; -+ while(entry) { -+ next = entry->next; -+ del_timer(&entry->timer); -+ lec_arp_clear_vccs(entry); -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ entry = next; -+ } -+ lec_no_forward = NULL; -+ mcast_vcc = NULL; /* To make sure... */ -+ memset(lec_arp_tables, 0, -+ sizeof(struct lec_arp_table*)*LEC_ARP_TABLE_SIZE); -+ restore_flags(flags); -+} -+ -+/* -+ * Remove all entries not marked permanent -+ */ -+void -+lec_reset(void) -+{ -+ int i; -+ struct lec_arp_table *entry, *next; -+ -+ lec_arp_lock(); -+ -+ printk("lec_reset\n"); -+ for(i=0;inext; -+ if (!(entry->flags & LEC_PERMANENT_FLAG)) { -+ lec_arp_remove(entry); -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ } -+ } -+ } -+ lec_arp_unlock(); -+} -+ -+/* -+ * Try to find vcc where mac_address is attached. -+ * -+ */ -+struct atm_vcc* -+lec_arp_resolve(unsigned char *mac_to_find) -+{ -+ struct lec_arp_table *entry; -+ -+ if (mac_to_find[0]&0x01) { -+ return mcast_vcc; -+ } -+ entry = lec_arp_find(mac_to_find); -+ -+ if (entry) { -+ if (entry->status == ESI_FORWARD_DIRECT) { -+ /* Connection Ok */ -+ return entry->vcc; -+ } -+ if (entry->status == ESI_UNKNOWN) { -+ /* We want arp-request to be sent */ -+ entry->status = ESI_ARP_PENDING; -+ entry->timestamp = jiffies; -+ entry->no_tries = 1; -+ entry->packets_flooded=1; -+ send_to_lecd(l_arp_xmt, mac_to_find, NULL); -+ del_timer(&entry->timer); -+ entry->timer.expires = jiffies + (1*HZ); -+ entry->timer.function = lec_arp_expire_arp; -+ add_timer(&entry->timer); -+ return mcast_vcc; -+ } -+ /* Data direct VC not yet set up, check to see if the unknown -+ frame count is greater than the limit. If the limit has -+ not been reached, allow the caller to send packet to -+ BUS. */ -+ if (entry->packets_flooded < lec_maximum_unknown_frame_count) { -+ entry->packets_flooded++; -+ DPRINTK("LEC_ARP: Flooding..\n"); -+ return mcast_vcc; -+ } -+ return NULL; -+ } else { -+ /* No matching entry was found */ -+ entry = make_entry(mac_to_find); -+ DPRINTK("LEC_ARP: Making entry\n"); -+ if (!entry) { -+ return mcast_vcc; -+ } -+ entry->packets_flooded =1; -+ entry->status = ESI_ARP_PENDING; -+ entry->no_tries = 1; -+ entry->last_used = entry->timestamp = jiffies; -+ send_to_lecd(l_arp_xmt, mac_to_find, NULL); -+ -+ entry->timer.expires = jiffies + (1*HZ); -+ add_timer(&entry->timer); -+ lec_arp_put(entry); -+ return mcast_vcc; -+ } -+} -+ -+/* -+ * Add permanent entry to arp table. -+ */ -+struct lec_arp_table* -+lec_add_permanent(unsigned char *mac_addr, unsigned char *atmaddr) -+{ -+ struct lec_arp_table *to_add; -+ -+ to_add = make_entry(mac_addr); -+ if (!to_add) { -+ return NULL; -+ } -+ memcpy(to_add->atm_addr, atmaddr, ATM_ESA_LEN); -+ to_add->flags |= LEC_PERMANENT_FLAG; -+ to_add->last_used = jiffies; -+ /* Connection forming must be started */ -+ send_to_lecd(l_svc_setup, NULL, atmaddr); -+ lec_arp_lock(); -+ lec_arp_put(to_add); -+ lec_arp_unlock(); -+ return to_add; -+} -+ -+int -+lec_addr_delete(unsigned char *atm_addr, unsigned long permanent) -+{ -+ struct lec_arp_table *entry, *next; -+ int i; -+ -+ lec_arp_lock(); -+ printk("lec_addr_delete\n"); -+ for(i=0;inext; -+ if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN) -+ && (permanent || -+ !(entry->flags & LEC_PERMANENT_FLAG))) -+ lec_arp_remove(entry); -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ lec_arp_unlock(); -+ return 0; -+ } -+ } -+ lec_arp_unlock(); -+ return -1; -+} -+ -+/* -+ * Notifies: Response to arp_request (atm_addr != NULL) -+ */ -+void -+lec_arp_update(unsigned char *mac_addr, -+ unsigned char *atm_addr, -+ unsigned long remoteflag) -+{ -+ struct lec_arp_table *entry, *tmp; -+ int i; -+ -+ lec_arp_lock(); -+ -+ if (lec_arp_empty_ones) { -+ entry = lec_arp_empty_ones; -+ if (!memcmp(entry->atm_addr, atm_addr, ATM_ESA_LEN)) { -+ lec_arp_empty_ones = entry->next; -+ } else { -+ while(entry->next && memcmp(entry->next->atm_addr, -+ atm_addr, ATM_ESA_LEN)) -+ entry = entry->next; -+ if (entry->next) { -+ tmp = entry; -+ entry = entry->next; -+ tmp->next = entry->next; -+ } else -+ entry = NULL; -+ -+ } -+ if (entry) { -+ del_timer(&entry->timer); -+ tmp = lec_arp_find(mac_addr); -+ if (tmp) { -+ del_timer(&tmp->timer); -+ tmp->status = ESI_FORWARD_DIRECT; -+ memcpy(tmp->atm_addr, atm_addr, ATM_ESA_LEN); -+ tmp->vcc = entry->vcc; -+ tmp->old_push = entry->old_push; -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ entry=tmp; -+ } else { -+ entry->status = ESI_FORWARD_DIRECT; -+ memcpy(entry->mac_addr, mac_addr, ETH_ALEN); -+ lec_arp_put(tmp); -+ } -+ if (remoteflag) -+ entry->flags|=LEC_REMOTE_FLAG; -+ else -+ entry->flags&=~LEC_REMOTE_FLAG; -+ lec_arp_unlock(); -+ return; -+ } -+ } -+ entry = lec_arp_find(mac_addr); -+ if (!entry) { -+ entry = make_entry(mac_addr); -+ memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN); -+ entry->status = ESI_UNKNOWN; -+ lec_arp_put(entry); -+ /* Temporary, changes before end of function */ -+ } -+ memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN); -+ del_timer(&entry->timer); -+ for(i=0;inext) { -+ if (entry != tmp && -+ !memcmp(tmp->atm_addr, atm_addr, -+ ATM_ESA_LEN)) { -+ /* Vcc to this host exists */ -+ if (tmp->status > ESI_VC_PENDING) { -+ /* -+ * ESI_FLUSH_PENDING, -+ * ESI_FORWARD_DIRECT -+ */ -+ entry->vcc = tmp->vcc; -+ entry->old_push=tmp->old_push; -+ } -+ entry->status=tmp->status; -+ break; -+ } -+ } -+ } -+ if (remoteflag) -+ entry->flags|=LEC_REMOTE_FLAG; -+ else -+ entry->flags&=~LEC_REMOTE_FLAG; -+ if (entry->status == ESI_ARP_PENDING || -+ entry->status == ESI_UNKNOWN) { -+ entry->status = ESI_VC_PENDING; -+ send_to_lecd(l_svc_setup, NULL, atm_addr); -+ } -+ lec_arp_unlock(); -+} -+ -+/* -+ * Notifies: Vcc setup ready -+ */ -+void -+lec_vcc_added(struct atmlec_ioc *ioc_data, -+ struct atm_vcc *vcc, -+ void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb)) -+{ -+ struct lec_arp_table *entry; -+ int i, found_entry=0; -+ unsigned char bus_mac[ETH_ALEN] = { 0xff, 0xff, 0xff, 0xff, 0xff,0xff}; -+ -+ lec_arp_lock(); -+ if (ioc_data->receive == 2) { -+ /* Vcc for BUS distribute */ -+ DPRINTK("LEC_ARP: Attaching mcast distribute\n"); -+ entry = lec_arp_find(bus_mac); -+ if (!entry) { -+ printk("LEC_ARP: Multicast entry not found!\n"); -+ lec_arp_unlock(); -+ return; -+ } -+ memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); -+ entry->recv_vcc = vcc; -+ entry->old_recv_push = old_push; -+ lec_arp_unlock(); -+ return; -+ } else if (ioc_data->receive == 1) { -+ /* Vcc which we don't want to make default vcc, attach it -+ anyway. */ -+ DPRINTK("LEC_ARP:Attaching data direct, not default :%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", -+ ioc_data->atm_addr[0],ioc_data->atm_addr[1], -+ ioc_data->atm_addr[2],ioc_data->atm_addr[3], -+ ioc_data->atm_addr[4],ioc_data->atm_addr[5], -+ ioc_data->atm_addr[6],ioc_data->atm_addr[7], -+ ioc_data->atm_addr[8],ioc_data->atm_addr[9], -+ ioc_data->atm_addr[10],ioc_data->atm_addr[11], -+ ioc_data->atm_addr[12],ioc_data->atm_addr[13], -+ ioc_data->atm_addr[14],ioc_data->atm_addr[15], -+ ioc_data->atm_addr[16],ioc_data->atm_addr[17], -+ ioc_data->atm_addr[18],ioc_data->atm_addr[19]); -+ entry = make_entry(bus_mac); -+ memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); -+ memset(entry->mac_addr, 0, ETH_ALEN); -+ entry->recv_vcc = vcc; -+ entry->old_recv_push = old_push; -+ entry->status = ESI_UNKNOWN; -+ entry->timer.expires = jiffies + lec_vcc_timeout_period; -+ entry->timer.function = lec_arp_expire_vcc; -+ entry->next = lec_no_forward; -+ lec_no_forward = entry; -+ lec_arp_unlock(); -+ return; -+ } -+ DPRINTK("LEC_ARP:Attaching data direct, default:%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", -+ ioc_data->atm_addr[0],ioc_data->atm_addr[1], -+ ioc_data->atm_addr[2],ioc_data->atm_addr[3], -+ ioc_data->atm_addr[4],ioc_data->atm_addr[5], -+ ioc_data->atm_addr[6],ioc_data->atm_addr[7], -+ ioc_data->atm_addr[8],ioc_data->atm_addr[9], -+ ioc_data->atm_addr[10],ioc_data->atm_addr[11], -+ ioc_data->atm_addr[12],ioc_data->atm_addr[13], -+ ioc_data->atm_addr[14],ioc_data->atm_addr[15], -+ ioc_data->atm_addr[16],ioc_data->atm_addr[17], -+ ioc_data->atm_addr[18],ioc_data->atm_addr[19]); -+ for (i=0;inext) { -+ if (memcmp(ioc_data->atm_addr, entry->atm_addr, -+ ATM_ESA_LEN)==0) { -+ DPRINTK("LEC_ARP: Attaching data direct\n"); -+ DPRINTK("Currently -> Vcc: %d, Rvcc:%d\n", -+ entry->vcc?entry->vcc->vci:0, -+ entry->recv_vcc?entry->recv_vcc:0); -+ found_entry=1; -+ del_timer(&entry->timer); -+ if (vcc) { -+ lec_arp_clear_vccs(entry); -+ } -+ entry->vcc = vcc; -+ entry->old_push = old_push; -+ if (entry->status == ESI_VC_PENDING) { -+ if (lec_maximum_unknown_frame_count==0) -+ entry->status = -+ ESI_FORWARD_DIRECT; -+ else { -+ entry->timestamp = jiffies; -+ entry->status = -+ ESI_FLUSH_PENDING; -+ send_to_lecd(l_flush_xmt, -+ entry->mac_addr, -+ entry->atm_addr); -+ } -+ } else { -+ /* They were forming a connection -+ to us, and we to them. Our -+ ATM address is numerically lower -+ than theirs, so we make connection -+ we formed into default VCC (8.1.11). -+ Connection they made gets torn -+ down. This might confuse some -+ clients. Can be changed if -+ someone reports trouble... */ -+ ; -+ } -+ } -+ } -+ } -+ if (found_entry) { -+ lec_arp_unlock(); -+ dump_arp_table(); -+ return; -+ } -+ /* Not found, snatch address from first data packet that arrives from -+ this vcc */ -+ entry = make_entry(bus_mac); -+ entry->vcc = vcc; -+ entry->old_push = old_push; -+ memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); -+ memset(entry->mac_addr, 0, ETH_ALEN); -+ entry->status = ESI_UNKNOWN; -+ entry->next = lec_arp_empty_ones; -+ lec_arp_empty_ones = entry; -+ entry->timer.expires = jiffies + lec_vcc_timeout_period; -+ entry->timer.function = lec_arp_expire_vcc; -+ add_timer(&entry->timer); -+ lec_arp_unlock(); -+} -+ -+void -+lec_flush_complete(unsigned char *atm_addr, unsigned long tran_id) -+{ -+ struct lec_arp_table *entry; -+ int i; -+ -+ for (i=0;inext) { -+ if (memcmp(atm_addr, entry->atm_addr,ATM_ESA_LEN)==0 && -+ entry->flush_tran_id == tran_id) { -+ entry->status = ESI_FORWARD_DIRECT; -+ return; -+ } -+ } -+ } -+ printk("LEC_ARP: Flush_complete: entry not found : %2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", -+ 0xff&atm_addr[0],0xff&atm_addr[1],0xff&atm_addr[2], -+ 0xff&atm_addr[3],0xff&atm_addr[4],0xff&atm_addr[5], -+ 0xff&atm_addr[6],0xff&atm_addr[7],0xff&atm_addr[8], -+ 0xff&atm_addr[9],0xff&atm_addr[10],0xff&atm_addr[11], -+ 0xff&atm_addr[12],0xff&atm_addr[13],0xff&atm_addr[14], -+ 0xff&atm_addr[15],0xff&atm_addr[16],0xff&atm_addr[17], -+ 0xff&atm_addr[18],0xff&atm_addr[19]); -+} -+ -+void -+lec_topology_flag_change_set(unsigned long topology_change_flag) -+{ -+ lec_topology_change = topology_change_flag; -+} -+ -+void -+lec_set_flush_tran_id(unsigned char *mac_addr, unsigned long tran_id) -+{ -+ struct lec_arp_table *entry; -+ -+ entry = lec_arp_find(mac_addr); -+ if (!entry) { -+ printk("LEC_ARP: Set_flush_tran_id: entry not found\n"); -+ return; -+ } -+ entry->flush_tran_id = tran_id; -+} -+ -+int -+lec_mcast_attach(struct atm_vcc *vcc) -+{ -+ unsigned char mac_addr[] = { -+ 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }; -+ struct lec_arp_table *to_add; -+ -+ lec_arp_lock(); -+ to_add = make_entry(mac_addr); -+ if (!to_add) -+ return -ENOMEM; -+ to_add->status = ESI_FORWARD_DIRECT; -+ to_add->flags |= LEC_PERMANENT_FLAG; -+ to_add->vcc = vcc; -+ to_add->old_push = vcc->push; -+ vcc->push = lec_push; -+ mcast_vcc = vcc; -+ lec_arp_put(to_add); -+ lec_arp_unlock(); -+ return 0; -+} -+ -+void -+lec_config(struct atmlec_config_msg *conf) -+{ -+ lec_maximum_unknown_frame_count = conf->maximum_unknown_frame_count; -+ lec_max_unknown_frame_time = (conf->max_unknown_frame_time*HZ); -+ lec_max_retry_count = conf->max_retry_count; -+ lec_aging_time = (conf->aging_time*HZ); -+ lec_forward_delay_time = (conf->forward_delay_time*HZ); -+ lec_arp_response_time = (conf->arp_response_time*HZ); -+ lec_flush_timeout = (conf->flush_timeout*HZ); -+ lec_path_switching_delay = (conf->path_switching_delay*HZ); -+} -+ -+void -+lec_vcc_close(struct atm_vcc *vcc) -+{ -+ struct lec_arp_table *entry, *next; -+ int i; -+ -+ DPRINTK("LEC_ARP: lec_vcc_close vpi:%d vci:%d\n",vcc->vpi,vcc->vci); -+ dump_arp_table(); -+ lec_arp_lock(); -+ for(i=0;inext; -+ if (vcc == entry->vcc) { -+ lec_arp_remove(entry); -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ if (mcast_vcc == vcc) { -+ mcast_vcc = NULL; -+ } -+ } else if (vcc == entry->recv_vcc) { -+ /* Bus distribution closed */ -+ mcast_vcc = NULL; -+ lec_arp_remove(entry); -+ lec_arp_unlock(); -+ vcc->push(vcc, NULL); -+ return; -+ } -+ } -+ } -+ entry=lec_arp_empty_ones; -+ while(entry && entry->vcc==vcc) { -+ lec_arp_clear_vccs(entry); -+ lec_arp_empty_ones=entry->next; -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ entry=lec_arp_empty_ones; -+ } -+ for(;entry!=NULL;entry=next) { -+ next=entry->next; -+ if (vcc == next->vcc) { -+ lec_arp_clear_vccs(next); -+ entry->next = next->next; -+ kfree_s(next, sizeof(struct lec_arp_table)); -+ } -+ } -+ entry=lec_no_forward; -+ while(entry && entry->recv_vcc==vcc) { -+ lec_arp_clear_vccs(entry); -+ lec_no_forward=entry->next; -+ kfree_s(entry, sizeof(struct lec_arp_table)); -+ entry=lec_no_forward; -+ } -+ for(;entry!=NULL;entry=next) { -+ next=entry->next; -+ if (vcc == next->recv_vcc) { -+ lec_arp_clear_vccs(next); -+ entry->next = next->next; -+ kfree_s(next, sizeof(struct lec_arp_table)); -+ } -+ } -+ lec_arp_unlock(); -+} -+ -+void -+lec_arp_check_empties(struct atm_vcc *vcc, struct sk_buff *skb) -+{ -+ struct lec_arp_table *entry, *prev; -+ struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023 *)skb->data; -+ -+ lec_arp_lock(); -+ entry = lec_arp_empty_ones; -+ if (vcc == entry->vcc) { -+ del_timer(&entry->timer); -+ memcpy(entry->mac_addr, hdr->h_source, ETH_ALEN); -+ entry->status = ESI_FORWARD_DIRECT; -+ lec_arp_empty_ones = entry->next; -+ /* We might have got an entry */ -+ if ((prev=lec_arp_find(hdr->h_source))) { -+ lec_arp_remove(prev); -+ kfree_s(prev, sizeof(struct lec_arp_table)); -+ } -+ lec_arp_put(entry); -+ lec_arp_unlock(); -+ return; -+ } -+ prev = entry; -+ entry = entry->next; -+ while (entry && entry->vcc != vcc) { -+ prev= entry; -+ entry = entry->next; -+ } -+ if (!entry) { -+ DPRINTK("LEC_ARP: Arp_check_empties: entry not found!\n"); -+ lec_arp_unlock(); -+ return; -+ } -+ del_timer(&entry->timer); -+ memcpy(entry->mac_addr, hdr->h_source, ETH_ALEN); -+ entry->status = ESI_FORWARD_DIRECT; -+ prev->next = entry->next; -+ if ((prev = lec_arp_find(hdr->h_source))) { -+ lec_arp_remove(prev); -+ kfree_s(prev, sizeof(struct lec_arp_table)); -+ } -+ lec_arp_put(entry); -+ lec_arp_unlock(); -+} -+ ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/net/atm/lec_arpc.h Fri Jul 19 15:10:11 1996 -@@ -0,0 +1,104 @@ -+/* -+ * Lec arp cache -+ * Marko Kiiskila carnil@cs.tut.fi -+ * -+ */ -+#ifndef _LEC_ARP_H -+#define _LEC_ARP_H -+#include -+#include -+#include -+#include -+ -+struct lec_arp_table { -+ struct lec_arp_table *next; /* Linked entry list */ -+ unsigned char atm_addr[ATM_ESA_LEN]; /* Atm address */ -+ unsigned char mac_addr[ETH_ALEN]; /* Mac address */ -+ struct atm_vcc *vcc; /* Vcc this entry is attached */ -+ struct atm_vcc *recv_vcc; /* Vcc we receive data from */ -+ void (*old_push)(struct atm_vcc *vcc,struct sk_buff *skb); -+ /* Push that leads to daemon */ -+ void (*old_recv_push)(struct atm_vcc *vcc, struct sk_buff *skb); -+ /* Push that leads to daemon */ -+ void (*old_close)(struct atm_vcc *vcc); -+ /* We want to see when this -+ * vcc gets closed */ -+ unsigned long last_used; /* For expiry */ -+ unsigned long timestamp; /* Used for various timestamping -+ * things: -+ * 1. FLUSH started -+ * (status=ESI_FLUSH_PENDING) -+ * 2. Counting to -+ * max_unknown_frame_time -+ * (status=ESI_ARP_PENDING|| -+ * status=ESI_VC_PENDING) -+ */ -+ unsigned char no_tries; /* No of times arp retry has been -+ tried */ -+ unsigned char status; /* Status of this entry */ -+ unsigned short flags; /* Flags for this entry */ -+ unsigned short packets_flooded; /* Data packets flooded */ -+ unsigned long flush_tran_id; /* Transaction id in flush protocol */ -+ struct timer_list timer; /* Arping timer */ -+}; -+ -+/* Status fields */ -+#define ESI_UNKNOWN 0 /* -+ * Next packet sent to this mac address -+ * causes ARP-request to be sent -+ */ -+#define ESI_ARP_PENDING 1 /* -+ * There is no ATM address associated with this -+ * 48-bit address. The LE-ARP protocol is in -+ * progress. -+ */ -+#define ESI_VC_PENDING 2 /* -+ * There is a valid ATM address associated with -+ * this 48-bit address but there is no VC set -+ * up to that ATM address. The signaling -+ * protocol is in process. -+ */ -+#define ESI_FLUSH_PENDING 4 /* -+ * The LEC has been notified of the FLUSH_START -+ * status and it is assumed that the flush -+ * protocol is in process. -+ */ -+#define ESI_FORWARD_DIRECT 5 /* -+ * Either the Path Switching Delay (C22) has -+ * elapsed or the LEC has notified the Mapping -+ * that the flush protocol has completed. In -+ * either case, it is safe to forward packets -+ * to this address via the data direct VC. -+ */ -+ -+/* Flag values */ -+#define LEC_REMOTE_FLAG 0x0001 -+#define LEC_PERMANENT_FLAG 0x0002 -+ -+/* Hash table size */ -+#define LEC_ARP_TABLE_SIZE 16 -+ -+/* Protos */ -+void lec_reset(void); -+void lec_arp_init(void); -+int lec_mcast_attach(struct atm_vcc *vcc); -+void lec_arp_destroy(void); -+void lec_vcc_close(struct atm_vcc *vcc); -+ -+struct atm_vcc *lec_arp_resolve(unsigned char *mac_to_addr); -+void lec_vcc_added(struct atmlec_ioc *ioc_data, struct atm_vcc *vcc, -+ void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb)); -+void lec_arp_check_empties(struct atm_vcc *vcc, struct sk_buff *skb); -+struct lec_arp_table *lec_add_permanent(unsigned char *mac_addr, -+ unsigned char *atmaddr); -+int lec_addr_delete(unsigned char *mac_addr, unsigned long permanent); -+void lec_topology_flag_change_set(unsigned long topology_change_flag); -+void lec_flush_complete(unsigned char *atm_addr, unsigned long tran_id); -+void lec_arp_update(unsigned char *mac_addr, unsigned char *atm_addr, -+ unsigned long remoteflag); -+void lec_set_flush_tran_id(unsigned char *mac_addr, unsigned long tran_id); -+void lec_config(struct atmlec_config_msg *conf); -+void lec_arp_check(unsigned char *to_check); -+void lec_proc_info(char *buf); -+ -+#endif ---- ref/include/net/route.h Sun Jun 9 11:28:48 1996 -+++ work/include/net/route.h Wed Jul 17 19:56:48 1996 -@@ -26,6 +26,7 @@ - #define _ROUTE_H - - #include -+#include - - /* - * 0 - no debugging messages -@@ -158,11 +159,17 @@ - #endif - #endif - -+ - extern __inline__ struct rtable * ip_check_route(struct rtable ** rp, - __u32 daddr, int local) - { - struct rtable * rt = *rp; - -+#ifdef CONFIG_AREQUIPA -+ extern struct device *arequipa_dev; -+ -+ if (rt && rt->rt_dev == arequipa_dev) return rt; -+#endif - if (!rt || rt->rt_dst != daddr || !(rt->rt_flags&RTF_UP) - || ((local==1)^((rt->rt_flags&RTF_LOCAL) != 0))) - { -@@ -172,6 +179,35 @@ - } - return rt; - } -+ -+ -+extern __inline__ void set_rt_cache(struct sock *sk,struct rtable *rt) -+{ -+#ifndef CONFIG_AREQUIPA -+ sk->ip_route_cache = rt; -+#else -+ extern struct rtable arequipa_rt; -+ -+ if (!sk->arequipa) { -+ sk->ip_route_cache = rt; -+ return; -+ } -+ if (!sk->aq_route) { -+ printk(KERN_CRIT "set_rt_cache: !sk->aq_route\n"); -+ sk->ip_route_cache = rt; -+ return; -+ } -+#if 0 /* only needed if preloading the route cache for Arequipa */ -+ if (sk->ip_route_cache) ip_rt_put(sk->ip_route_cache); -+#endif -+ sk->ip_route_cache = NULL; -+ if (!rt) return; -+ *sk->aq_route = arequipa_rt; -+ sk->ip_route_cache = sk->aq_route; -+ sk->aq_route->rt_src = rt->rt_src; -+ ip_rt_put(rt); -+#endif -+} - - - #endif /* _ROUTE_H */ ---- ref/include/net/sock.h Sun Jun 9 11:25:41 1996 -+++ work/include/net/sock.h Wed Jul 17 19:41:04 1996 -@@ -301,7 +301,13 @@ - int ip_mc_loop; /* Loopback */ - char ip_mc_name[MAX_ADDR_LEN];/* Multicast device name */ - struct ip_mc_socklist *ip_mc_list; /* Group array */ --#endif -+#endif -+#ifdef CONFIG_AREQUIPA -+ struct socket *arequipa; /* dedicated link layer socket, -+ NULL if not connected */ -+ struct rtable *aq_route; /* buffer for fake route, NULL -+ if neither present nor expect */ -+#endif - - /* - * This part is used for the timeout functions (timer.c). ---- /dev/null Fri Jul 19 15:27:12 1996 -+++ work/include/linux/arequipa.h Wed Jul 17 19:58:01 1996 -@@ -0,0 +1,39 @@ -+/* arequipa.h - Arequipa interface definitions */ -+ -+/* Written 1996 by Jean-Michel Pittet and Werner Almesberger, EPFL LRC */ -+ -+ -+#ifndef _LINUX_AREQUIPA_H -+#define _LINUX_AREQUIPA_H -+ -+#include -+ -+ -+#define AREQUIPA_PRESET _IO('a',ATMIOC_AREQUIPA) -+#define AREQUIPA_INCOMING _IO('a',ATMIOC_AREQUIPA+1) -+#define AREQUIPA_EXPECT _IO('a',ATMIOC_AREQUIPA+2) -+#define AREQUIPA_CLOSE _IO('a',ATMIOC_AREQUIPA+3) -+ -+ -+#ifdef __KERNEL__ -+ -+#include -+#include -+#include -+#include -+ -+ -+/* extern struct rtable arequipa_rt; - not needed */ -+extern struct device *arequipa_dev; -+ -+int atm_init_arequipa(void); -+int arequipa_attach(struct socket *lower,struct sock *upper); -+ -+int arequipa_preset(struct socket *lower,struct sock *upper); -+int arequipa_expect(struct sock *upper,int on); -+int arequipa_incoming(struct socket *lower); -+int arequipa_close(struct sock *upper); -+ -+#endif /* __KERNEL__ */ -+ -+#endif ---- ref/net/socket.c Thu Jun 6 20:22:25 1996 -+++ work/net/socket.c Mon Jun 10 18:30:51 1996 -@@ -778,7 +778,7 @@ - sock_release(newsock); - return(-EINVAL); - } -- sock->file=current->files->fd[fd]; -+ newsock->file=current->files->fd[fd]; - - if (upeer_sockaddr) - { ---- ref/net/ipv4/tcp_input.c Sun Jun 9 10:39:09 1996 -+++ work/net/ipv4/tcp_input.c Mon Jun 10 17:36:44 1996 -@@ -33,6 +33,11 @@ - #include - #include - -+#ifdef CONFIG_AREQUIPA -+#include -+#include -+#endif -+ - /* - * Policy code extracted so it's now separate - */ -@@ -415,6 +420,24 @@ - return; - } - } -+#ifdef CONFIG_AREQUIPA -+ newsk->arequipa = NULL; -+ if (sk->aq_route) { -+ newsk->aq_route = kmalloc(sizeof(struct rtable),GFP_ATOMIC); -+ if (newsk->aq_route) { -+ if (dev == arequipa_dev) -+ (void) arequipa_attach(skb->atm.vcc->sock, -+ newsk); -+ } -+ else { -+ if (sk->opt) kfree(sk->opt); -+ kfree_s(newsk,sizeof(*sk)); -+ tcp_statistics.TcpAttemptFails++; -+ kfree_skb(skb,FREE_READ); -+ return; -+ } -+ } -+#endif - skb_queue_head_init(&newsk->write_queue); - skb_queue_head_init(&newsk->receive_queue); - newsk->send_head = NULL; -@@ -516,7 +539,7 @@ - */ - - rt = ip_rt_route(newsk->opt && newsk->opt->srr ? newsk->opt->faddr : saddr, 0); -- newsk->ip_route_cache = rt; -+ set_rt_cache(newsk,rt); - - if(rt!=NULL && (rt->rt_flags&RTF_WINDOW)) - newsk->window_clamp = rt->rt_window; -@@ -1771,6 +1794,12 @@ - skb->free = 1; - skb->saddr = daddr; - skb->daddr = saddr; -+ -+#ifdef CONFIG_AREQUIPA -+ if (dev == arequipa_dev && !sk->arequipa && sk->aq_route && -+ sk->state == TCP_ESTABLISHED) -+ (void) arequipa_attach(skb->atm.vcc->sock,sk); -+#endif - - /* - * We may need to add it to the backlog here. diff -ur --new-file old/atm/atm.patch new/atm/atm.patch --- old/atm/atm.patch Thu Jan 1 01:00:00 1970 +++ new/atm/atm.patch Wed Jul 31 19:45:24 1996 @@ -0,0 +1,16143 @@ +--- ref/Makefile Fri Jun 7 10:55:00 1996 ++++ work/Makefile Mon Jun 10 17:41:25 1996 +@@ -126,6 +126,10 @@ + + DRIVERS := $(DRIVERS) drivers/net/net.a + ++ifdef CONFIG_ATM ++DRIVERS := $(DRIVERS) drivers/atm/atm.a ++endif ++ + ifdef CONFIG_CD_NO_IDESCSI + DRIVERS := $(DRIVERS) drivers/cdrom/cdrom.a + endif +@@ -288,6 +292,7 @@ + if [ -f SCSI_MODULES ]; then inst_mod SCSI_MODULES scsi; fi; \ + if [ -f FS_MODULES ]; then inst_mod FS_MODULES fs; fi; \ + if [ -f CDROM_MODULES ]; then inst_mod CDROM_MODULES cdrom; fi; \ ++ if [ -f ATM_MODULES ]; then inst_mod ATM_MODULES atm; fi; \ + \ + ls *.o > .allmods; \ + echo $$MODULES | tr ' ' '\n' | sort | comm -23 .allmods - > .misc; \ +--- ref/Documentation/Configure.help Fri Jun 7 15:28:46 1996 ++++ work/Documentation/Configure.help Wed Jul 31 19:23:00 1996 +@@ -1164,6 +1164,101 @@ + you can read some network related routing information from that + file. Everything you write to that file will be discarded. + ++Asynchronous Transfer Mode (ATM) ++CONFIG_ATM ++ You are likely to want to enable this. ++ ++Enable single-copy ++CONFIG_MMU_HACKS ++ Single-copy avoids intermediate buffering of AAL5 PDUs when using the ++ native ATM API. Enabling single-copy may lead to significant throughput ++ improvements. Note that single-copy probably still has bugs, so ++ enabling it may de-stabilize the system. ++ ++Extended debugging for single-copy ++CONFIG_MMU_HACKS_DEBUG ++ Extended debugging records various events and displays that list when ++ an inconsistency is detected. This mechanism is faster than generally ++ using printks, but still has some impact on performance. Enable this ++ if you suspect problems with single-copy. ++ ++Classical IP over ATM with ATMARP ++CONFIG_ATM_ATMARP ++ Classical IP over ATM for PVCs and SVCs, supporting InARP and ATMARP. ++ This interface is younger than the old "CLIP" interface (next item) ++ and it may therefore still have some bugs. In the future, it will ++ replace the old interface entirely. ++ ++Classical IP over ATM for PVCs (obsolete) ++CONFIG_ATM_CLIP ++ Classical IP over ATM for PVCs only and without InARP. This interface ++ is obsolete and will be removed in later versions of ATM on Linux, as ++ soon as ATMARP is fully mature. ++ ++Application REQUested IP over ATM ++CONFIG_AREQUIPA ++ Arequipa is an experimental mechanism to create short-cut ATM SVCs for ++ IP traffic. See ++ ftp://lrcftp.epfl.ch/pub/arequipa/draft-almesberger-arequipa-01.txt ++ for details. ++ ++LANE support ++CONFIG_ATM_LANE ++ Lan Emulation emulates services of existing LANs across an ATM network. ++ Client in Linux currently supports only one virtual LAN, and it has ++ not been tested in environment which uses other than DIX Ethernet- ++ data frames, i.e. Appletalk, IPX support has not been tested. ++ Specification for LANE can be found from ATM Forum's specification ++ LAN Emulation Over ATM - Version 1.0. ++ ++ATM over TCP ++CONFIG_ATM_TCP ++ ATM over TCP driver. Useful for doing some simple experiments with the ++ native ATM socket API, but not for many other things. You don't need ++ this is you have a "real" ATM card. ++ ++Efficient Networks ENI155P ++CONFIG_ATM_ENI ++ Driver for the Efficient Networks ENI155p series 155 Mbps ATM adapters. ++ Both, the C and S variants (512kB and 2MB ob-board RAM, respectively), ++ and the FPGA and the ASIC Tonga versions of the board are supported. ++ The driver works with MMF (-MF) and UTP-5 (-U5) adapters. ++ ++Enable extended debugging ++CONFIG_ATM_ENI_DEBUG ++ Extended debugging records various events and displays that list when ++ an inconsistency is detected. This mechanism is faster than generally ++ using printks, but still has some impact on performance. Note that ++ extended debugging may create certain race conditions itself. Enable ++ this ONLY if you suspect problems with the driver. ++ ++ZeitNet ZN1221/ZN1225 ++CONFIG_ATM_ZATM ++ Driver for the ZeitNet ZN1221 (MMF) and ZN1225 (UTP-5) 155 Mbps ATM ++ adapters. ++ ++Enable extended debugging ++CONFIG_ATM_ZATM_DEBUG ++ Extended debugging records various events and displays that list when ++ an inconsistency is detected. This mechanism is faster than generally ++ using printks, but still has some impact on performance. Note that ++ extended debugging may create certain race conditions itself. Enable ++ this ONLY if you suspect problems with the driver. ++ ++Rolfs TI TNETA1570 ++CONFIG_ATM_TNETA1570 ++ Driver for the TNETA1570 155 Mbps ATM adapter, both developed by Rolf ++ Fiedler at TU Chemnitz, see also ++ ftp://ftp.infotech.tu-chemnitz.de/pub/linux-atm ++ ++Enable extended debugging ++CONFIG_ATM_TNETA1570_DEBUG ++ Extended debugging records various events and displays that list when ++ an inconsistency is detected. This mechanism is faster than generally ++ using printks, but still has some impact on performance. Note that ++ extended debugging may create certain race conditions itself. Enable ++ this ONLY if you suspect problems with the driver. ++ + SCSI support? + CONFIG_SCSI + If you want to use a SCSI harddisk, SCSI tapedrive, SCSI CDROM or +--- ref/kernel/ksyms.c Wed May 29 15:42:27 1996 ++++ work/kernel/ksyms.c Mon Jun 10 17:43:08 1996 +@@ -62,6 +62,9 @@ + #ifdef __SMP__ + #include + #endif ++#ifdef CONFIG_ATM ++#include ++#endif + + extern char *get_options(char *str, int *ints); + extern void set_device_ro(int dev,int flag); +@@ -76,6 +79,10 @@ + + extern void hard_reset_now(void); + ++#ifdef CONFIG_ATM_TCP ++extern int (*atmtcp_attach_hook)(struct socket *sock); ++#endif ++ + struct symbol_table symbol_table = { + #include + #ifdef MODVERSIONS +@@ -348,7 +355,16 @@ + #ifdef CONFIG_BLK_DEV_MD + X(disk_name), /* for md.c */ + #endif +- ++ ++#ifdef CONFIG_ATM ++ X(atm_dev_register), ++ X(atm_dev_deregister), ++ X(atm_find_ci), ++#endif ++#ifdef CONFIG_ATM_TCP ++ X(atmtcp_attach_hook), ++#endif ++ + /* binfmt_aout */ + X(get_write_access), + X(put_write_access), +--- ref/arch/i386/config.in Mon May 13 06:17:23 1996 ++++ work/arch/i386/config.in Mon Jun 10 17:36:00 1996 +@@ -72,6 +72,10 @@ + endmenu + fi + ++if [ "$CONFIG_ATM" = "y" ]; then ++ source drivers/atm/Config.in ++fi ++ + mainmenu_option next_comment + comment 'ISDN subsystem' + +--- ref/arch/sparc/config.in Thu Apr 25 12:22:05 1996 ++++ work/arch/sparc/config.in Thu Jul 11 13:50:26 1996 +@@ -100,6 +100,12 @@ + endmenu + fi + ++if [ "$CONFIG_ATM" = "y" ]; then ++ if [ "$CONFIG_INET" = "y" ]; then ++ tristate 'ATM over TCP' CONFIG_ATM_TCP n ++ fi ++fi ++ + source fs/Config.in + + mainmenu_option next_comment +--- ref/drivers/Makefile Mon Apr 22 09:59:39 1996 ++++ work/drivers/Makefile Mon Jun 10 17:44:29 1996 +@@ -9,7 +9,7 @@ + + SUB_DIRS := block char net #streams + MOD_SUB_DIRS := $(SUB_DIRS) +-ALL_SUB_DIRS := $(SUB_DIRS) pci sbus scsi sound cdrom isdn ++ALL_SUB_DIRS := $(SUB_DIRS) atm pci sbus scsi sound cdrom isdn + + ifdef CONFIG_PCI + SUB_DIRS += pci +@@ -50,6 +50,11 @@ + ifeq ($(CONFIG_ISDN),m) + MOD_SUB_DIRS += isdn + endif ++endif ++ ++ifdef CONFIG_ATM ++SUB_DIRS += atm ++MOD_SUB_DIRS += atm + endif + + ifeq ($(CONFIG_AP1000),y) +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/Config.in Wed Jul 17 21:59:55 1996 +@@ -0,0 +1,21 @@ ++# ++# ATM device configuration ++# ++comment 'ATM drivers' ++if [ "$CONFIG_INET" = "y" ]; then ++ tristate 'ATM over TCP' CONFIG_ATM_TCP n ++fi ++if [ "$CONFIG_PCI" = "y" ]; then ++ tristate 'Efficient Networks ENI155P' CONFIG_ATM_ENI y ++ if [ ! "$CONFIG_ATM_ENI" = "n" ]; then ++ bool ' Enable extended debugging' CONFIG_ATM_ENI_DEBUG n ++ fi ++ tristate 'ZeitNet ZN1221/ZN1225' CONFIG_ATM_ZATM y ++ if [ ! "$CONFIG_ATM_ZATM" = "n" ]; then ++ bool ' Enable extended debugging' CONFIG_ATM_ZATM_DEBUG n ++ fi ++ bool 'Rolfs TI TNETA1570' CONFIG_ATM_TNETA1570 y ++ if [ "$CONFIG_ATM_TNETA1570" = "y" ]; then ++ bool ' Enable extended debugging' CONFIG_ATM_TNETA1570_DEBUG n ++ fi ++fi +--- ref/net/Config.in Wed Jun 5 13:42:27 1996 ++++ work/net/Config.in Wed Jul 31 18:57:53 1996 +@@ -27,4 +27,17 @@ + if [ "$CONFIG_NETLINK" = "y" ]; then + bool 'Routing messages' CONFIG_RTNETLINK + fi ++bool 'Asynchronous Transfer Mode (ATM)' CONFIG_ATM y ++if [ "$CONFIG_ATM" = "y" ]; then ++ bool ' Enable single-copy' CONFIG_MMU_HACKS n ++ if [ "$CONFIG_MMU_HACKS" = "y" ]; then ++ bool ' Extended debugging for single-copy' CONFIG_MMU_HACKS_DEBUG y ++ fi ++ if [ "$CONFIG_INET" = "y" ]; then ++ bool ' Classical IP over ATM with ATMARP' CONFIG_ATM_ATMARP y ++ bool ' Classical IP over ATM for PVCs (obsolete)' CONFIG_ATM_CLIP n ++ bool ' Application REQUested IP over ATM' CONFIG_AREQUIPA y ++ fi ++ bool ' LANE support' CONFIG_ATM_LANE y ++fi + endmenu +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/Makefile Thu Jul 18 20:51:29 1996 +@@ -0,0 +1,38 @@ ++# File: drivers/atm/Makefile ++# ++# Makefile for the Linux network (ATM) device drivers. ++# ++ ++L_TARGET := atm.a ++L_OBJS := atmdev_init.o ++M_OBJS := ++ ++include ../../.config ++ ++ifeq ($(CONFIG_ATM_ENI),y) ++L_OBJS += eni.o suni.o ++endif ++ ++ifeq ($(CONFIG_ATM_ZATM),y) ++L_OBJS += zatm.o uPD98402.o ++endif ++ ++ifeq ($(CONFIG_ATM_TNETA1570),y) ++L_OBJS += tneta1570.o suni.o ++endif ++ ++ifeq ($(CONFIG_ATM_FORE200),y) ++L_OBJS += fore200.o ++endif ++ ++ifeq ($(CONFIG_ATM_TCP),y) ++L_OBJS += atmtcp.o ++else ++ ifeq ($(CONFIG_ATM_TCP),m) ++ M_OBJS += atmtcp.o ++ endif ++endif ++ ++EXTRA_CFLAGS=-g ++ ++include $(TOPDIR)/Rules.make +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/atmdev_init.c Thu Jul 18 20:50:30 1996 +@@ -0,0 +1,47 @@ ++/* drivers/atm/atmdev_init.c - ATM device driver initialization */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++ ++ ++#ifdef CONFIG_ATM_ENI ++extern int eni_detect(void); ++#endif ++#ifdef CONFIG_ATM_ZATM ++extern int zatm_detect(void); ++#endif ++#ifdef CONFIG_ATM_TNETA1570 ++extern int tneta1570_detect(void); ++#endif ++#ifdef CONFIG_ATM_FORE200 ++extern int fore200_detect(void); ++#endif ++#ifdef CONFIG_ATM_TCP ++extern int atmtcp_init(void); ++#endif ++ ++ ++int atmdev_init(void) ++{ ++ int devs; ++ ++ devs = 0; ++#ifdef CONFIG_ATM_ENI ++ devs += eni_detect(); ++#endif ++#ifdef CONFIG_ATM_ZATM ++ devs += zatm_detect(); ++#endif ++#ifdef CONFIG_ATM_TNETA1570 ++ devs += tneta1570_detect(); ++#endif ++#ifdef CONFIG_ATM_FORE200 ++ devs += fore200_detect(); ++#endif ++#ifdef CONFIG_ATM_TCP ++ devs += atmtcp_init(); ++#endif ++ return devs; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/atmtcp.c Thu Jul 4 17:05:57 1996 +@@ -0,0 +1,316 @@ ++/* drivers/atm/atmtcp.c - ATM over TCP "device" driver */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++/* Various enhancements 1996 by Ronald A. McCormick */ ++ ++ ++#include ++#include /* printk */ ++#include /* verify_area */ ++#include ++#include ++#include ++#include ++#include ++#include /* xtime */ ++#include /* set_fs, get_fs, ... */ ++#include /* ntohs, htons */ ++ ++ ++#define DEV_LABEL "atmtcp" ++ ++ ++#define MAX_VPI_BITS 8 ++#define MAX_VCI_BITS 16 ++ ++ ++#define PRIV(c) ((struct private *) ((c)->dev_data)) ++ ++ ++extern int (*atmtcp_attach_hook)(struct socket *sock); ++ ++ ++/* BIG BUG: we can never get rid of an ATMTCP interface @@@ */ ++ ++ ++/* ++ * correct compilation of this is implementation-dependent ! ++ */ ++ ++struct atmtcp_hdr { ++ unsigned short vpi; ++ unsigned short vci; ++ unsigned short length; /* ... of data part */ ++}; ++ ++struct private { ++ struct atm_dev *dev; /* device back pointer */ ++ struct socket *sock; /* file descriptor */ ++}; ++ ++ ++static int atmtcp_open(struct atm_vcc *vcc,short vpi,int vci) ++{ ++ int error; ++ ++ error = atm_find_ci(vcc,&vpi,&vci); ++ if (error) return error; ++ vcc->vpi = vpi; ++ vcc->vci = vci; ++ if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC) return 0; ++#ifdef DEBUG ++ printk(KERN_DEBUG DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number, ++ vcc->vpi,vcc->vci); ++#endif ++ vcc->flags |= ATM_VF_ADDR | ATM_VF_READY; ++ return 0; ++} ++ ++ ++int atmtcp_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) ++{ ++ if (cmd == ATM_SETCIRANGE) { ++ struct atm_cirange ci; ++ struct atm_vcc *walk; ++ ++ memcpy_fromfs(&ci,(void *) arg,sizeof(struct atm_cirange)); ++ if (ci.vpi_bits == ATM_CI_MAX) ci.vpi_bits = MAX_VPI_BITS; ++ if (ci.vci_bits == ATM_CI_MAX) ci.vci_bits = MAX_VCI_BITS; ++ if (ci.vpi_bits > MAX_VPI_BITS || ci.vpi_bits < 0 || ++ ci.vci_bits > MAX_VCI_BITS || ci.vci_bits < 0) ++ return -EINVAL; ++/* ++ * should all this checking be done in net/atm ? ++ */ ++ for (walk = dev->vccs; walk; walk = walk->next) ++ if ((walk->vpi >> ci.vpi_bits) || ++ (walk->vci >> ci.vci_bits)) return -EBUSY; ++ dev->ci_range = ci; ++ return 0; ++ } ++ return -EINVAL; ++} ++ ++ ++ ++static int do_recv(struct socket *sock,unsigned char *ubuf,int size, ++ int nonblock) ++{ ++ struct iovec iov; ++ struct msghdr msg; ++ ++ iov.iov_base = ubuf; ++ iov.iov_len = size; ++ ++ msg.msg_name = NULL; ++ msg.msg_namelen = 0; ++ msg.msg_control = NULL; ++ msg.msg_iov = &iov; ++ msg.msg_iovlen = 1; ++ ++ return sock->ops->recvmsg(sock,&msg,size,nonblock,0,NULL); ++} ++ ++ ++static int do_send(struct socket *sock,const void *buff,int len,int nonblock) ++{ ++ struct iovec iov; ++ struct msghdr msg; ++ ++ iov.iov_base = (void *)buff; ++ iov.iov_len = len; ++ ++ msg.msg_name = NULL; ++ msg.msg_namelen = 0; ++ msg.msg_control = NULL; ++ msg.msg_iov = &iov; ++ msg.msg_iovlen = 1; ++ ++ return sock->ops->sendmsg(sock,&msg,len,nonblock,0); ++} ++ ++ ++static int atmtcp_setsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int optlen) ++{ ++ return -EINVAL; ++} ++ ++ ++static int atmtcp_send(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ struct atmtcp_hdr hdr; ++ unsigned long old_fs; ++ int len,size; ++ void *pos; ++ ++ if (!PRIV(vcc->dev)->sock) { ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ hdr.vpi = htons(vcc->vpi); ++ hdr.vci = htons(vcc->vci); ++ old_fs = get_fs(); ++ set_fs(get_ds()); ++ hdr.length = htons(skb->len); ++ size = do_send(PRIV(vcc->dev)->sock,(char *) &hdr,sizeof(hdr),0); ++ if (size <= 0) { ++ printk(KERN_WARNING "atmtcp_send: PDU lost; errno = %d\n", ++ -size); ++ dev_kfree_skb(skb,FREE_WRITE); ++ set_fs(old_fs); ++ vcc->stats->tx_err++; ++ return size; ++ } ++ pos = skb->data; ++ len = skb->len; ++ while (len) { ++ size = do_send(PRIV(vcc->dev)->sock,pos,len,0); ++ if (size < 0 && size != -EAGAIN) { ++ printk(KERN_ERR "atmtcp_send: link failure; errno = " ++ "%d\n",-size); ++ dev_kfree_skb(skb,FREE_WRITE); ++ set_fs(old_fs); ++ vcc->stats->tx_err++; ++ return size; ++ } ++ if (size > 0) { ++ len -= size; ++ pos += size; ++ } ++ } ++ dev_kfree_skb(skb,FREE_WRITE); ++ set_fs(old_fs); ++ vcc->stats->tx++; ++ return 0; ++} ++ ++ ++static void atmtcp_poll(struct atm_vcc *vcc,int nonblock) ++{ ++ struct atm_dev *dev; ++ struct atm_vcc *walk; ++ struct sk_buff *skb; ++ struct atmtcp_hdr hdr; ++ unsigned long old_fs; ++ int size,left; ++ void *pos; ++ ++ if (!(dev = vcc->dev) || !PRIV(dev)->sock) return; ++ if (skb_peek(&vcc->recvq)) nonblock = 1; ++ old_fs = get_fs(); ++ set_fs(get_ds()); ++ while ((size = do_recv(PRIV(dev)->sock,(char*) &hdr,sizeof(hdr), ++ nonblock) == sizeof(hdr))) { ++ if (!(skb = vcc->peek(vcc,ntohs(hdr.length),NULL))) { ++ printk(KERN_WARNING "atmtcp_poll: peek reject (%d)\n", ++ ntohs(hdr.length)); ++ break; ++ } ++ skb->atm.timestamp = xtime; ++ skb->len = ntohs(hdr.length); ++ skb->free = 1; ++ skb->atm.iovcnt = 0; ++ pos = skb->data; ++ for (left = ntohs(hdr.length); left; left -= size) { ++ size = do_recv(PRIV(dev)->sock,pos,left,0); ++ if (size == -EAGAIN) size = 0; ++ if (size < 0) { ++ printk(KERN_ERR "atmtcp_poll: bad read: %d\n", ++ size); ++ vcc->stats->rx_err++; ++ break; ++ } ++ pos += size; ++ } ++ for (walk = dev->vccs; walk; walk = walk->next) ++ if (walk->vpi == ntohs(hdr.vpi) && walk->vci == ++ ntohs(hdr.vci)) break; ++ if (walk) { ++ skb_queue_tail(&walk->recvq,skb); ++ wake_up(&walk->sleep); ++ nonblock = 1; ++ vcc->stats->rx++; ++ } ++ else { ++ printk(KERN_ERR "atmtcp_poll: bad label %d.%d at itf " ++ "%d\n",ntohs(hdr.vpi),ntohs(hdr.vci),dev->number); ++ kfree_skb(skb,FREE_READ); ++ vcc->stats->rx_err++; ++ } ++ } ++ set_fs(old_fs); ++ if (size > 0 && size != sizeof(hdr)) { ++ printk(KERN_ERR "atmtcp_poll: bad header (%d)\n",size); ++ vcc->stats->rx_err++; ++ } ++} ++ ++ ++static struct atmdev_ops ops = { ++ atmtcp_open, ++ NULL, /* no close */ ++ atmtcp_ioctl, ++ NULL, /* no getsockopt */ ++ atmtcp_setsockopt, ++ atmtcp_send, ++ NULL, /* no direct writes */ ++ atmtcp_poll, ++ NULL, /* no send_oam */ ++ NULL, /* no phy_put */ ++ NULL, /* no phy_get */ ++ NULL /* no feedback */ ++}; ++ ++ ++int atmtcp_attach(struct socket *sock) ++{ ++ struct private *dsc; ++ ++ if (!suser()) return -EPERM; ++ dsc = kmalloc(sizeof(struct private),GFP_KERNEL); ++ if (!dsc) return -ENOMEM; ++ dsc->dev = atm_dev_register(DEV_LABEL,&ops,0); ++ if (!dsc->dev) { ++ kfree(dsc); ++ return -EBUSY; ++ } ++ dsc->dev->dev_data = dsc; ++ dsc->dev->ci_range.vpi_bits = MAX_VPI_BITS; ++ dsc->dev->ci_range.vci_bits = MAX_VCI_BITS; ++ sock->inode->i_count++; ++ dsc->sock = sock; ++ printk(KERN_NOTICE DEV_LABEL "(itf %d): ready\n",dsc->dev->number); ++ MOD_INC_USE_COUNT; ++ return dsc->dev->number; ++} ++ ++ ++int atmtcp_init(void) ++{ ++ printk(KERN_NOTICE DEV_LABEL ": ready (dynamic device creation)\n"); ++ atmtcp_attach_hook = atmtcp_attach; ++ return 1; ++} ++ ++ ++#ifdef MODULE ++ ++int init_module(void) ++{ ++ (void) atmtcp_init(); ++ return 0; ++} ++ ++ ++void cleanup_module(void) ++{ ++ /* ++ * We currently have no means to detach ATM devices. That'll follow ++ * a bit later. (Needs careful usage tracking and open/close ++ * interlocking.) ++ */ ++ atmtcp_attach_hook = NULL; ++} ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/eni.c Tue Jul 30 16:32:24 1996 +@@ -0,0 +1,1954 @@ ++/* drivers/atm/eni.c - Efficient Networks ENI155P device driver */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include /* for xtime */ ++#include ++#include ++#include ++#include ++#include ++ ++#include "tonga.h" ++#include "midway.h" ++#include "suni.h" ++#include "eni.h" ++ ++ ++/* ++ * TODO: ++ * ++ * Show stoppers ++ * none ++ * ++ * Major ++ * - test ASIC Tonga support ++ * ++ * Minor ++ * - OAM support ++ * - fix bugs listed below ++ */ ++ ++/* ++ * KNOWN BUGS: ++ * ++ * - may run into JK-JK bug and deadlock ++ * - should allocate UBR channel first ++ * - ATM DD interface doesn't support double connect(2) yet ++ * - buffer space allocation algorithm is stupid ++ * (RX: should be maxSDU+maxdelay*rate ++ * TX: should be maxSDU+min(maxSDU,maxdelay*rate) ) ++ * - adapter memory may fragment badly ++ * - ATM DD interface doesn't know about CLP ++ * - doesn't support OAM cells ++ * - buddy implementation is hyper-inefficient ++ * - eni_put_free may hang if not putting memory fragments that _complete_ ++ * 2^n block ++ * - keeps IRQ even if initialization fails ++ */ ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++#ifndef CONFIG_ATM_ENI_DEBUG ++ ++ ++#define NULLCHECK(x) ++ ++#define EVENT(s,a,b) ++ ++ ++static void event_dump(void) ++{ ++} ++ ++ ++#else ++ ++ ++/* ++ * NULL pointer checking ++ */ ++ ++#define NULLCHECK(x) \ ++ if ((unsigned long) (x) < 0x30) printk(KERN_CRIT #x "==0x%x\n", (int) (x)) ++ ++/* ++ * Very extensive activity logging. Greatly improves bug detection speed but ++ * costs a few Mbps if enabled. ++ */ ++ ++#define EV 64 ++ ++static const char *ev[EV]; ++static unsigned long ev_a[EV],ev_b[EV]; ++static int ec = 0; ++ ++ ++static void EVENT(const char *s,unsigned long a,unsigned long b) ++{ ++ ev[ec] = s; ++ ev_a[ec] = a; ++ ev_b[ec] = b; ++ ec = (ec+1) % EV; ++} ++ ++ ++static void event_dump(void) ++{ ++ int n,i; ++ ++ for (n = 0; n < EV; n++) { ++ i = (ec+n) % EV; ++ printk(KERN_NOTICE); ++ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); ++ } ++} ++ ++ ++#endif /* CONFIG_ATM_ENI_DEBUG */ ++ ++ ++/* ++ * NExx must not be equal at end ++ * EExx may be equal at end ++ * xxPJOK verify validity of pointer jumps ++ * xxPMOK operating on a circular buffer of "c" words ++ */ ++ ++#define NEPJOK(a0,a1,b) \ ++ ((a0) < (a1) ? (b) <= (a0) || (b) > (a1) : (b) <= (a0) && (b) > (a1)) ++#define EEPJOK(a0,a1,b) \ ++ ((a0) < (a1) ? (b) < (a0) || (b) >= (a1) : (b) < (a0) && (b) >= (a1)) ++#define NEPMOK(a0,d,b,c) NEPJOK(a0,(a0+d) & (c-1),b) ++#define EEPMOK(a0,d,b,c) EEPJOK(a0,(a0+d) & (c-1),b) ++ ++ ++static int tx_complete = 0,dma_complete = 0,queued = 0,requeued = 0, ++ backlogged = 0,rx_enqueued = 0,rx_dequeued = 0,pushed = 0,submitted = 0, ++ putting = 0; ++ ++static struct atm_dev *eni_boards = NULL; ++ ++ ++/*-------------------------------- utilities --------------------------------*/ ++ ++ ++static void dump_mem(struct eni_dev *eni_dev) ++{ ++ int i; ++ ++ for (i = 0; i < eni_dev->free_len; i++) ++ printk(KERN_DEBUG " %d: 0x%lx %d\n",i, ++ eni_dev->free_list[i].start, ++ 1 << eni_dev->free_list[i].order); ++} ++ ++ ++static void dump(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ ++ int i; ++ ++ eni_dev = ENI_DEV(dev); ++ printk(KERN_NOTICE "Free memory\n"); ++ dump_mem(eni_dev); ++ printk(KERN_NOTICE "TX buffers\n"); ++ for (i = 0; i < NR_CHAN; i++) ++ if (eni_dev->tx[i].send) ++ printk(KERN_NOTICE " TX %d @ 0x%08lx: %ld\n",i, ++ (unsigned long) eni_dev->tx[i].send, ++ eni_dev->tx[i].words*4); ++ printk(KERN_NOTICE "RX buffers\n"); ++ for (i = 0; i < 1024; i++) ++ if (eni_dev->rx_map[i] && ENI_VCC(eni_dev->rx_map[i])->rx) ++ printk(KERN_NOTICE " RX %d @ 0x%08lx: %ld\n",i, ++ (unsigned long) ENI_VCC(eni_dev->rx_map[i])->recv, ++ ENI_VCC(eni_dev->rx_map[i])->words*4); ++ printk(KERN_NOTICE "----\n"); ++} ++ ++ ++static void eni_put_free(struct eni_dev *eni_dev,unsigned long start, ++ unsigned long size) ++{ ++ struct eni_free *list; ++ int len,order; ++ ++ DPRINTK("init 0x%lx+%ld(0x%lx)\n",start,size,size); ++ start += eni_dev->base_diff; ++ list = eni_dev->free_list; ++ len = eni_dev->free_len; ++ while (size) { ++ if (len >= eni_dev->free_list_size) { ++ printk(KERN_CRIT "eni_put_free overflow (0x%lx,%ld)\n", ++ start,size); ++ break; ++ } ++ for (order = 0; !((start | size) & (1 << order)); order++); ++ if (MID_MIN_BUF_SIZE > (1 << order)) { ++ printk(KERN_CRIT "eni_put_free: order %d too small\n", ++ order); ++ break; ++ } ++ list[len].start = start; ++ list[len].order = order; ++ len++; ++ start += 1 << order; ++ size -= 1 << order; ++ } ++ eni_dev->free_len = len; ++ /*dump_mem(eni_dev);*/ ++} ++ ++ ++static unsigned long eni_alloc_mem(struct eni_dev *eni_dev,unsigned long *size) ++{ ++ struct eni_free *list; ++ unsigned long start; ++ int len,i,order,best_order,index; ++ ++ list = eni_dev->free_list; ++ len = eni_dev->free_len; ++ if (*size < MID_MIN_BUF_SIZE) *size = MID_MIN_BUF_SIZE; ++ if (*size > MID_MAX_BUF_SIZE) return 0; ++ for (order = 0; (1 << order) < *size; order++); ++ DPRINTK("trying: %ld->%d\n",*size,order); ++ best_order = 65; /* we don't have more than 2^64 of anything ... */ ++ index = 0; /* silence GCC */ ++ for (i = 0; i < len; i++) ++ if (list[i].order == order) { ++ best_order = order; ++ index = i; ++ break; ++ } ++ else if (best_order > list[i].order && list[i].order > order) { ++ best_order = list[i].order; ++ index = i; ++ } ++ if (best_order == 65) return 0; ++ start = list[index].start-eni_dev->base_diff; ++ list[index] = list[--len]; ++ eni_dev->free_len = len; ++ *size = 1 << order; ++ eni_put_free(eni_dev,start+*size,(1 << best_order)-*size); ++ DPRINTK("%ld bytes (order %d) at 0x%lx\n",*size,order,start); ++ for (i = (*size >> 2)-1; i >= 0; i--) /* never leak data */ ++ ((unsigned long *) start)[i] = 0; ++ /*dump_mem(eni_dev);*/ ++ return start; ++} ++ ++ ++static void eni_free_mem(struct eni_dev *eni_dev,unsigned long start, ++ unsigned long size) ++{ ++ struct eni_free *list; ++ int len,i,order; ++ ++ start += eni_dev->base_diff; ++ list = eni_dev->free_list; ++ len = eni_dev->free_len; ++ for (order = -1; size; order++) size >>= 1; ++ DPRINTK("eni_free_mem: 0x%lx+0x%lx (order %d)\n",start,size,order); ++ for (i = 0; i < len; i++) ++ if (list[i].start == (start^(1 << order)) && ++ list[i].order == order) { ++ DPRINTK("match[%d]: 0x%lx/0x%lx(0x%x), %d/%d\n",i, ++ list[i].start,start,1 << order,list[i].order,order); ++ list[i] = list[--len]; ++ start &= ~(1 << order); ++ order++; ++ i = -1; ++ continue; ++ } ++ if (len >= eni_dev->free_list_size) { ++ printk(KERN_ALERT "eni_free_mem overflow (0x%lx,%d)\n",start, ++ order); ++ return; ++ } ++ list[len].start = start; ++ list[len].order = order; ++ eni_dev->free_len = len+1; ++ /*dump_mem(eni_dev);*/ ++} ++ ++ ++/*----------------------------------- RX ------------------------------------*/ ++ ++ ++#define ENI_VCC_NOS ((struct atm_vcc *) 1) ++ ++ ++static __u32 fetch(struct atm_vcc *vcc,int i) ++{ ++ return ntohl(ENI_VCC(vcc)->recv[(ENI_VCC(vcc)->descr+i+1) & ++ (ENI_VCC(vcc)->words-1)]); /* ^ skip descr */ ++} ++ ++ ++static void rx_ident_err(struct atm_vcc *vcc) ++{ ++ struct atm_dev *dev; ++ struct eni_vcc *eni_vcc; ++ ++ dev = vcc->dev; ++ /* immediately halt adapter */ ++ ENI_DEV(dev)->reg[MID_MC_S] &= ~(MID_DMA_ENABLE | MID_TX_ENABLE | ++ MID_RX_ENABLE); ++ /* dump useful information */ ++ eni_vcc = ENI_VCC(vcc); ++ printk(KERN_ALERT DEV_LABEL "(itf %d): driver error - RX ident " ++ "mismatch\n",dev->number); ++ printk(KERN_ALERT " VCI %d, rxing %d, words %ld\n",vcc->vci, ++ eni_vcc->rxing,eni_vcc->words); ++ printk(KERN_ALERT " host descr 0x%08lx, rx pos 0x%08lx, descr value " ++ "0x%08lx\n",eni_vcc->descr,eni_vcc->rx_pos, ++ eni_vcc->recv[eni_vcc->descr]); ++ printk(KERN_ALERT " last 0x%08lx, servicing %d\n", ++ (unsigned long) eni_vcc->last,eni_vcc->servicing); ++ EVENT("---dump ends here---\n",0,0); ++ printk(KERN_NOTICE "---recent events---\n"); ++ event_dump(); ++ ENI_DEV(dev)->fast = NULL; /* really stop it */ ++ ENI_DEV(dev)->slow = NULL; ++ skb_queue_head_init(&ENI_DEV(dev)->rx_queue); ++} ++ ++ ++static int do_rx_dma(struct atm_vcc *vcc,struct sk_buff *skb, ++ unsigned long skip,unsigned long size,unsigned long eff) ++{ ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ unsigned long dma_rd,dma_wr; ++ unsigned long dma[RX_DMA_BUF*2]; ++ unsigned long paddr,here; ++ int i,j; ++ ++ eni_dev = ENI_DEV(vcc->dev); ++ eni_vcc = ENI_VCC(vcc); ++ paddr = 0; /* GCC, shut up */ ++ if (skb) { ++ paddr = (unsigned long) skb->data; ++ if (paddr & 3) ++ printk(KERN_CRIT DEV_LABEL "(itf %d): VCI %d has " ++ "mis-aligned RX data (0x%lx)\n",vcc->dev->number, ++ vcc->vci,paddr); ++ skb->atm.size = size+skip; ++ /* PDU plus descriptor */ ++ skb->atm.vcc = vcc; ++ } ++ j = 0; ++ if ((eff && skip) || 1) { /* @@@ actually, skip is always == 1 ... */ ++ here = (eni_vcc->descr+skip) & (eni_vcc->words-1); ++ dma[j++] = (here << MID_DMA_COUNT_SHIFT) | (vcc->vci ++ << MID_DMA_VCI_SHIFT) | MID_DT_JK; ++ j++; ++ } ++ here = (eni_vcc->descr+size+skip) & (eni_vcc->words-1); ++ if (!eff) size += skip; ++ else { ++ unsigned long words; ++ ++ if (!size) { ++ DPRINTK("strange things happen ...\n"); ++ EVENT("strange things happen ... (skip=%ld,eff=%ld)\n", ++ size,eff); ++ } ++ words = eff; ++ if (paddr & 15) { ++ unsigned long init; ++ ++ init = 4-((paddr & 15) >> 2); ++ if (init > words) init = words; ++ dma[j++] = MID_DT_WORD | (init << MID_DMA_COUNT_SHIFT) | ++ (vcc->vci << MID_DMA_VCI_SHIFT); ++ dma[j++] = paddr; ++ paddr += init << 2; ++ words -= init; ++ } ++ if (words & ~7) { ++#if 0 /* works with *some* PCI chipsets ... */ ++ dma[j++] = MID_DT_8W | ((words >> 3) << ++ MID_DMA_COUNT_SHIFT) | (vcc->vci << ++ MID_DMA_VCI_SHIFT); ++ dma[j++] = paddr; ++ paddr += (words & ~7) << 2; ++ words &= 7; ++#else ++ dma[j++] = MID_DT_4W | ((words >> 2) << ++ MID_DMA_COUNT_SHIFT) | (vcc->vci << ++ MID_DMA_VCI_SHIFT); ++ dma[j++] = paddr; ++ paddr += (words & ~3) << 2; ++ words &= 3; ++#endif ++ } ++ if (words) { ++ dma[j++] = MID_DT_WORD | (words << MID_DMA_COUNT_SHIFT) ++ | (vcc->vci << MID_DMA_VCI_SHIFT); ++ dma[j++] = paddr; ++ } ++ } ++ if (size != eff) { ++ dma[j++] = (here << MID_DMA_COUNT_SHIFT) | ++ (vcc->vci << MID_DMA_VCI_SHIFT) | MID_DT_JK; ++ j++; ++ } ++ if (!j || j > 2*RX_DMA_BUF) { ++ printk(KERN_CRIT DEV_LABEL "!j or j too big!!!\n"); ++ if (skb) kfree_skb(skb,FREE_READ); ++ return -1; ++ } ++ dma[j-2] |= MID_DMA_END; ++ j = j >> 1; ++ dma_wr = eni_dev->reg[MID_DMA_WR_RX]; ++ dma_rd = eni_dev->reg[MID_DMA_RD_RX]; ++ if (!NEPMOK(dma_wr,j+j+1,dma_rd,NR_DMA_RX)) { /* @@@ +1 is ugly */ ++ printk(KERN_WARNING DEV_LABEL "(itf %d): RX DMA full\n", ++ vcc->dev->number); ++ if (skb) kfree_skb(skb,FREE_READ); ++ return -1; ++ } ++ for (i = 0; i < j; i++) { ++ eni_dev->rx_dma[dma_wr*2] = dma[i*2]; ++ eni_dev->rx_dma[dma_wr*2+1] = dma[i*2+1]; ++ dma_wr = (dma_wr+1) & (NR_DMA_RX-1); ++ } ++ if (skb) { ++ skb->atm.pos = eni_vcc->descr+size+1; ++ skb_queue_tail(&eni_dev->rx_queue,skb); ++eni_vcc->last = skb; ++rx_enqueued++; ++ } ++ eni_vcc->descr = here; ++ eni_dev->reg[MID_DMA_WR_RX] = dma_wr; ++ return 0; ++} ++ ++ ++static void discard(struct atm_vcc *vcc,unsigned long size) ++{ ++ struct eni_vcc *eni_vcc; ++ ++ eni_vcc = ENI_VCC(vcc); ++ EVENT("discard (size=%ld)\n",size,0); ++ while (do_rx_dma(vcc,NULL,1,size,0)) EVENT("BUSY LOOP",0,0); ++ /* could do a full fallback, but that might be more expensive */ ++ if (eni_vcc->rxing) eni_vcc->last->atm.pos += size+1; ++ else eni_vcc->rx_pos = (eni_vcc->rx_pos+size+1) & (eni_vcc->words-1); ++} ++ ++ ++/* ++ * TODO: should check whether direct copies (without DMA setup, dequeuing on ++ * interrupt, etc.) aren't much faster for AAL0 ++ */ ++ ++static int rx_aal0(struct atm_vcc *vcc) ++{ ++ struct eni_vcc *eni_vcc; ++ unsigned long descr; ++ unsigned long length; ++ struct sk_buff *skb; ++ ++ DPRINTK(">rx_aal0\n"); ++ eni_vcc = ENI_VCC(vcc); ++ descr = eni_vcc->recv[eni_vcc->descr]; ++ if ((descr & MID_RED_IDEN) != (MID_RED_RX_ID << MID_RED_SHIFT)) { ++ rx_ident_err(vcc); ++ return 1; ++ } ++ if (descr & MID_RED_T) { ++ DPRINTK(DEV_LABEL "(itf %d): trashing empty cell\n", ++ vcc->dev->number); ++ length = 0; ++ vcc->stats->rx_err++; ++ } ++ else { ++ length = ATM_CELL_SIZE-1; /* no HEC */ ++ } ++ if (!length) skb = NULL; ++ else skb = vcc->peek(vcc,length,fetch); ++ if (!skb) { ++ discard(vcc,length >> 2); ++ return 0; ++ } ++ skb->free = 1; /* not very useful ... */ ++ skb->len = length; ++ skb->atm.timestamp = eni_vcc->timestamp; ++ DPRINTK("got len %ld\n",length); ++ if (do_rx_dma(vcc,skb,1,length >> 2,length >> 2)) return 1; ++ eni_vcc->rxing++; ++ return 0; ++} ++ ++ ++static int rx_aal5(struct atm_vcc *vcc) ++{ ++ struct eni_vcc *eni_vcc; ++ unsigned long descr; ++ unsigned long size,eff,length; ++ struct sk_buff *skb; ++ ++ EVENT("rx_aal5\n",0,0); ++ DPRINTK(">rx_aal5\n"); ++ eni_vcc = ENI_VCC(vcc); ++ descr = eni_vcc->recv[eni_vcc->descr]; ++ if ((descr & MID_RED_IDEN) != (MID_RED_RX_ID << MID_RED_SHIFT)) { ++ rx_ident_err(vcc); ++ return 1; ++ } ++ if (descr & (MID_RED_T | MID_RED_CRC_ERR)) { ++ if (descr & MID_RED_T) { ++ EVENT("empty cell (descr=0x%08lx)\n",descr,0); ++ DPRINTK(DEV_LABEL "(itf %d): trashing empty cell\n", ++ vcc->dev->number); ++ size = 0; ++ } ++ else { ++ static unsigned long silence = 0; ++ ++ if (jiffies > silence) { ++ printk(KERN_WARNING DEV_LABEL "(itf %d): " ++ "discarding PDU(s) with CRC error\n", ++ vcc->dev->number); ++ silence = jiffies+2*HZ; ++ } ++ size = (descr & MID_RED_COUNT)*(ATM_CELL_PAYLOAD >> 2); ++ EVENT("CRC error (descr=0x%08lx,size=%ld)\n",descr, ++ size); ++ } ++ eff = length = 0; ++ vcc->stats->rx_err++; ++ } ++ else { ++ size = (descr & MID_RED_COUNT)*(ATM_CELL_PAYLOAD >> 2); ++ DPRINTK("size=%ld\n",size); ++ length = eni_vcc->recv[(eni_vcc->descr+size-1) & ++ (eni_vcc->words-1)] & 0xffff; /* -trailer(2)+header(1) */ ++ if (length && length <= (size << 2)-8 && length <= ++ ATM_MAX_AAL5_PDU) eff = (length+3) >> 2; ++ else { /* ^ trailer length (8) */ ++ EVENT("bad PDU (descr=0x08%lx,length=%ld)\n",descr, ++ length); ++ printk(KERN_ERR DEV_LABEL "(itf %d): bad AAL5 PDU " ++ "(VCI=%d,length=%ld,size=%ld (descr 0x%lx))\n", ++ vcc->dev->number,vcc->vci,length,size << 2,descr); ++#if 0 ++printk("0x%lx[0x%lx] (0x%lx,%ld) size %ld len %ld\n", ++ (unsigned long) eni_vcc->recv,eni_vcc->descr,(unsigned long) eni_vcc, ++ eni_vcc->words,size << 2,length); ++#endif ++ length = eff = 0; ++ vcc->stats->rx_err++; ++ } ++ } ++ if (!eff) skb = NULL; ++ else { ++ skb = vcc->peek(vcc,eff << 2,fetch); ++ if (!skb) { ++ EVENT("peek reject (eff << 2=%ld)\n",eff << 2,0); ++ DPRINTK(DEV_LABEL "(itf %d): peek reject for %ld " ++ "bytes\n",vcc->dev->number,eff << 2); ++ } ++ } ++ if (!skb) { ++ discard(vcc,size); ++ return 0; ++ } ++ skb->free = 1; /* not very useful ... */ ++ skb->len = length; ++ DPRINTK("got len %ld\n",length); ++ if (do_rx_dma(vcc,skb,1,size,eff)) return 1; ++ eni_vcc->rxing++; ++ return 0; ++} ++ ++ ++static inline int rx_vcc(struct atm_vcc *vcc) ++{ ++ volatile unsigned long *vci_dsc; ++ struct eni_vcc *eni_vcc; ++ unsigned long tmp; ++ ++ eni_vcc = ENI_VCC(vcc); ++ vci_dsc = ENI_DEV(vcc->dev)->vci+vcc->vci*4; ++ EVENT("rx_vcc(1)\n",0,0); ++ while (eni_vcc->descr != (tmp = (vci_dsc[1] & MID_VCI_DESCR) >> ++ MID_VCI_DESCR_SHIFT)) { ++ EVENT("rx_vcc(2: host dsc=0x%lx, nic dsc=0x%lx)\n", ++ eni_vcc->descr,tmp); ++ DPRINTK("CB_DESCR %ld REG_DESCR %ld\n",ENI_VCC(vcc)->descr, ++ ((vci_dsc[1] & MID_VCI_DESCR) >> MID_VCI_DESCR_SHIFT)); ++ if (ENI_VCC(vcc)->rx(vcc)) return 1; ++ } ++ /* clear IN_SERVICE flag */ ++ vci_dsc[0] &= ~MID_VCI_IN_SERVICE; ++ /* ++ * If new data has arrived between evaluating the while condition and ++ * clearing IN_SERVICE, we wouldn't be notified until additional data ++ * follows. So we have to loop again to be sure. ++ */ ++ EVENT("rx_vcc(3)\n",0,0); ++ while (ENI_VCC(vcc)->descr != (tmp = (vci_dsc[1] & MID_VCI_DESCR) >> ++ MID_VCI_DESCR_SHIFT)) { ++ EVENT("rx_vcc(4: host dsc=0x%lx, nic dsc=0x%lx)\n", ++ eni_vcc->descr,tmp); ++ DPRINTK("CB_DESCR %ld REG_DESCR %ld\n",ENI_VCC(vcc)->descr, ++ ((vci_dsc[1] & MID_VCI_DESCR) >> MID_VCI_DESCR_SHIFT)); ++ if (ENI_VCC(vcc)->rx(vcc)) return 1; ++ } ++ return 0; ++} ++ ++ ++static void poll_rx(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ struct atm_vcc *curr; ++ ++ eni_dev = ENI_DEV(dev); ++ while ((curr = eni_dev->fast)) { ++ EVENT("poll_tx.fast\n",0,0); ++ if (rx_vcc(curr)) return; ++ eni_dev->fast = ENI_VCC(curr)->next; ++ ENI_VCC(curr)->next = ENI_VCC_NOS; ++ ENI_VCC(curr)->servicing--; ++ } ++ while ((curr = eni_dev->slow)) { ++ EVENT("poll_tx.slow\n",0,0); ++ if (rx_vcc(curr)) return; ++ eni_dev->slow = ENI_VCC(curr)->next; ++ ENI_VCC(curr)->next = ENI_VCC_NOS; ++ ENI_VCC(curr)->servicing--; ++ } ++} ++ ++ ++static void get_service(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ struct atm_vcc *vcc; ++ unsigned long vci; ++ ++ DPRINTK(">get_service\n"); ++ eni_dev = ENI_DEV(dev); ++ while (eni_dev->reg[MID_SERV_WRITE] != eni_dev->serv_read) { ++ vci = eni_dev->service[eni_dev->serv_read]; ++ eni_dev->serv_read = (eni_dev->serv_read+1) & (NR_SERVICE-1); ++ vcc = eni_dev->rx_map[vci & 1023]; ++ if (!vcc) { ++ printk(KERN_CRIT DEV_LABEL "(itf %d): VCI %ld not " ++ "found\n",dev->number,vci); ++ continue; /* nasty but we try to go on anyway */ ++ /* @@@ nope, doesn't work */ ++ } ++ EVENT("getting from service\n",0,0); ++ if (ENI_VCC(vcc)->next != ENI_VCC_NOS) { ++ EVENT("double service\n",0,0); ++ DPRINTK("Grr, servicing VCC %ld twice\n",vci); ++ continue; ++ } ++ ENI_VCC(vcc)->timestamp = xtime; ++ ENI_VCC(vcc)->next = NULL; ++ if (vcc->qos.rxtp.traffic_class == ATM_CBR) { ++ if (eni_dev->fast) ++ ENI_VCC(eni_dev->last_fast)->next = vcc; ++ else eni_dev->fast = vcc; ++ eni_dev->last_fast = vcc; ++ } ++ else { ++ if (eni_dev->slow) ++ ENI_VCC(eni_dev->last_slow)->next = vcc; ++ else eni_dev->slow = vcc; ++ eni_dev->last_slow = vcc; ++ } ++putting++; ++ ENI_VCC(vcc)->servicing++; ++ } ++} ++ ++ ++static void dequeue_rx(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ struct atm_vcc *vcc; ++ struct sk_buff *skb; ++ volatile unsigned long *vci_dsc; ++ int first; ++ ++ eni_dev = ENI_DEV(dev); ++ first = 1; ++ while (1) { ++ skb = skb_dequeue(&eni_dev->rx_queue); ++ if (!skb) { ++ if (first) { ++ DPRINTK(DEV_LABEL "(itf %d): RX but not " ++ "rxing\n",dev->number); ++ EVENT("nothing to dequeue\n",0,0); ++ } ++ break; ++ } ++ EVENT("dequeued (size=%d,pos=0x%lx)\n",skb->atm.size, ++ skb->atm.pos); ++/*printk("DMA@0x%X\n",eni_dev->reg[MID_DMA_ADDR]);*/ ++rx_dequeued++; ++ vcc = skb->atm.vcc; ++ eni_vcc = ENI_VCC(vcc); ++ first = 0; ++ vci_dsc = eni_dev->vci+(vcc->vci << 2); ++ if (!EEPMOK(eni_vcc->rx_pos,skb->atm.size,(vci_dsc[1] & ++ MID_VCI_READ) >> MID_VCI_READ_SHIFT,eni_vcc->words)) { ++ EVENT("requeuing\n",0,0); ++ skb_queue_head(&eni_dev->rx_queue,skb); ++ break; ++ } ++ eni_vcc->rxing--; ++ eni_vcc->rx_pos = skb->atm.pos & (eni_vcc->words-1); ++ if (!skb->len) kfree_skb(skb,FREE_READ); ++ else { ++ EVENT("pushing (len=%d)\n",skb->len,0); ++ if (vcc->aal == ATM_AAL0) ++ *(unsigned long *) skb->data = ++ ntohl(*(unsigned long *) skb->data); ++ vcc->push(vcc,skb); ++ pushed++; ++ } ++ vcc->stats->rx++; ++ } ++ wake_up(&eni_dev->rx_wait); ++} ++ ++ ++static int open_rx_first(struct atm_vcc *vcc) ++{ ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ unsigned long size; ++ ++ DPRINTK("open_rx_first\n"); ++ eni_dev = ENI_DEV(vcc->dev); ++ eni_vcc = ENI_VCC(vcc); ++ eni_vcc->rx = NULL; ++ if (vcc->qos.rxtp.traffic_class == ATM_NONE) return 0; ++ size = vcc->qos.rxtp.max_sdu*3; /* @@@ improve this */ ++ eni_vcc->recv = (volatile unsigned long *) eni_alloc_mem(eni_dev,&size); ++ DPRINTK("rx at 0x%lx\n",(unsigned long) eni_vcc->recv); ++ eni_vcc->words = size >> 2; ++ if (!eni_vcc->recv) return -ENOBUFS; ++ eni_vcc->rx = vcc->aal == ATM_AAL5 ? rx_aal5 : rx_aal0; ++ eni_vcc->descr = 0; ++ eni_vcc->rx_pos = 0; ++ eni_vcc->rxing = 0; ++ eni_vcc->servicing = 0; ++ eni_vcc->next = ENI_VCC_NOS; ++ return 0; ++} ++ ++ ++static int open_rx_second(struct atm_vcc *vcc) ++{ ++ volatile unsigned long *here; ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ unsigned long size; ++ int order; ++ ++ DPRINTK("open_rx_second\n"); ++ eni_dev = ENI_DEV(vcc->dev); ++ eni_vcc = ENI_VCC(vcc); ++ if (!eni_vcc->rx) return 0; ++ /* set up VCI descriptor */ ++ here = eni_dev->vci+(vcc->vci << 2); ++ DPRINTK("loc 0x%x\n",eni_vcc->recv-eni_dev->ram); ++ size = eni_vcc->words >> 8; ++ for (order = -1; size; order++) size >>= 1; ++ here[1] = 0; /* descr, read = 0 */ ++ here[2] = 0; /* write, state, count = 0 */ ++ if (eni_dev->rx_map[vcc->vci]) ++ printk(KERN_CRIT DEV_LABEL "(itf %d): BUG - VCI %d already " ++ "in use\n",vcc->dev->number,vcc->vci); ++ eni_dev->rx_map[vcc->vci] = vcc; /* now it counts */ ++ here[0] = ((vcc->aal != ATM_AAL5 ? MID_MODE_RAW : MID_MODE_AAL5) << ++ MID_VCI_MODE_SHIFT) | MID_VCI_PTI_MODE | ++ (((eni_vcc->recv-eni_dev->ram) >> MID_LOC_SKIP) << ++ MID_VCI_LOCATION_SHIFT) | (order << MID_VCI_SIZE_SHIFT); ++ return 0; ++} ++ ++ ++static void close_rx(struct atm_vcc *vcc) ++{ ++ volatile unsigned long *here; ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ unsigned long flags,tmp; ++ ++ eni_vcc = ENI_VCC(vcc); ++ if (!eni_vcc->rx) return; ++ eni_dev = ENI_DEV(vcc->dev); ++ if (vcc->vpi != ATM_VPI_UNSPEC && vcc->vci != ATM_VCI_UNSPEC) { ++ here = eni_dev->vci+(vcc->vci << 2); ++ /* block receiver */ ++ *here = (*here & ~MID_VCI_MODE) | (MID_MODE_TRASH << ++ MID_VCI_MODE_SHIFT); ++ /* wait for receiver to become idle */ ++ udelay(27); ++ /* discard pending cell */ ++ *here &= ~MID_VCI_IN_SERVICE; ++ /* don't accept any new ones */ ++ eni_dev->rx_map[vcc->vci] = NULL; ++ /* wait for RX queue to drain */ ++ DPRINTK("eni_close: waiting for RX ...\n"); ++ EVENT("RX closing\n",0,0); ++ save_flags(flags); ++ cli(); ++ while (eni_vcc->rxing || eni_vcc->servicing) { ++ EVENT("drain PDUs (rx %ld, serv %ld)\n",eni_vcc->rxing, ++ eni_vcc->servicing); ++ printk(KERN_INFO "%d+%d RX left\n",eni_vcc->servicing, ++ eni_vcc->rxing); ++ sleep_on(&eni_dev->rx_wait); ++ } ++ while (eni_vcc->rx_pos != (tmp = eni_dev->vci[vcc->vci*4+1] & ++ MID_VCI_READ) >> MID_VCI_READ_SHIFT) { ++ EVENT("drain discard (host 0x%lx, nic 0x%lx)\n", ++ eni_vcc->rx_pos,tmp); ++ printk(KERN_INFO "draining RX: host 0x%lx, nic 0x%lx\n", ++ eni_vcc->rx_pos,tmp); ++ sleep_on(&eni_dev->rx_wait); ++ } ++ restore_flags(flags); ++ } ++ eni_free_mem(eni_dev,(unsigned long) eni_vcc->recv, ++ eni_vcc->words << 2); ++ eni_vcc->rx = NULL; ++} ++ ++ ++static int start_rx(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ ++ eni_dev = ENI_DEV(dev); ++ eni_dev->rx_map = (struct atm_vcc **) get_free_page(GFP_KERNEL); ++ if (!eni_dev->rx_map) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): couldn't get free page\n", ++ dev->number); ++ free_page((unsigned long) eni_dev->free_list); ++ return -ENOMEM; ++ } ++ memset(eni_dev->rx_map,0,PAGE_SIZE); ++ eni_dev->fast = eni_dev->last_fast = NULL; ++ eni_dev->slow = eni_dev->last_slow = NULL; ++ eni_dev->rx_wait = NULL; ++ skb_queue_head_init(&eni_dev->rx_queue); ++ eni_dev->serv_read = eni_dev->reg[MID_SERV_WRITE]; ++ eni_dev->reg[MID_DMA_WR_RX] = 0; ++ return 0; ++} ++ ++ ++/*----------------------------------- TX ------------------------------------*/ ++ ++ ++enum enq_res { enq_ok,enq_next,enq_jam }; ++ ++ ++static inline void put_dma(int chan,unsigned long *dma,int *j, ++ unsigned long paddr,unsigned long size) ++{ ++ unsigned long init; ++ ++ DPRINTK("put_dma: 0x%lx+0x%lx\n",paddr,size); ++ EVENT("put_dma: 0x%lx+0x%lx\n",paddr,size); ++ if (paddr & 3) ++ printk(KERN_ERR "put_dma: unaligned addr (0x%lx)\n",paddr); ++#if 0 /* don't complain - all cases that pass are handled somewhere else */ ++ if (size & 3) ++ printk(KERN_ERR "put_dma: unaligned size (0x%lx)\n",size); ++#endif ++ size = (size+3) >> 2; ++/* fixme: extra DMA descr when misaligned short PDU @@@ */ ++ if (paddr & 31) { ++ init = 8-((paddr & 31) >> 2); ++ if (init > size) init = size; ++ dma[(*j)++] = MID_DT_WORD | (init << MID_DMA_COUNT_SHIFT) | ++ (chan << MID_DMA_CHAN_SHIFT); ++ dma[(*j)++] = paddr; ++ paddr += init << 2; ++ size -= init; ++ } ++ if (size & ~7) { ++ dma[(*j)++] = MID_DT_8W | ((size >> 3) << MID_DMA_COUNT_SHIFT) ++ | (chan << MID_DMA_CHAN_SHIFT); ++ dma[(*j)++] = paddr; ++ paddr += (size & ~7) << 2; ++ size &= 7; ++ } ++ if (size) { ++ dma[(*j)++] = MID_DT_WORD | (size << MID_DMA_COUNT_SHIFT) | ++ (chan << MID_DMA_CHAN_SHIFT); ++ dma[(*j)++] = paddr; ++ } ++} ++ ++ ++static enum enq_res do_tx(struct sk_buff *skb) ++{ ++ struct atm_vcc *vcc; ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ struct eni_tx *tx; ++ unsigned long dma_rd,dma_wr; ++ unsigned long dma[TX_DMA_BUF*2]; ++ unsigned long size; /* in words */ ++ int aal5,dma_size,i,j; ++ ++ DPRINTK(">do_tx\n"); ++ NULLCHECK(skb); ++ EVENT("do_tx: skb=0x%lx, %d bytes\n",(unsigned long) skb,skb->len); ++ vcc = skb->atm.vcc; ++ NULLCHECK(vcc); ++ eni_dev = ENI_DEV(vcc->dev); ++ NULLCHECK(eni_dev); ++ eni_vcc = ENI_VCC(vcc); ++ tx = eni_vcc->tx; ++ NULLCHECK(tx); ++ if ((unsigned long) skb->data & 3) ++ printk(KERN_ERR DEV_LABEL "(itf %d): VCI %d has mis-aligned " ++ "TX data\n",vcc->dev->number,vcc->vci); ++ /* ++ * Potential future IP speedup: make hard_header big enough to put ++ * segmentation descriptor directly into PDU. Saves: 4 slave writes, ++ * 1 DMA xfer & 2 DMA'ed bytes (protocol layering is for wimps :-) ++ */ ++ ++ /* check space in buffer */ ++ if (!(aal5 = vcc->aal == ATM_AAL5)) ++ size = (ATM_CELL_PAYLOAD >> 2)+TX_DESCR_SIZE; ++ /* cell without HEC plus segmentation header (includes ++ four-byte cell header) */ ++ else { ++ size = skb->len+4*AAL5_TRAILER+ATM_CELL_PAYLOAD-1; ++ /* add AAL5 trailer */ ++ size = ((size-(size % ATM_CELL_PAYLOAD)) >> 2)+TX_DESCR_SIZE; ++ /* add segmentation header */ ++ } ++ if (!NEPMOK(tx->tx_pos,size+TX_GAP, ++ eni_dev->reg[MID_TX_RDPTR(tx->index)],tx->words)) { ++ /* leave some space for "too close" */ ++ DPRINTK(DEV_LABEL "(itf %d): TX full (size %ld)\n", ++ vcc->dev->number,size); ++ return enq_next; ++ } ++ /* check DMA */ ++ dma_wr = eni_dev->reg[MID_DMA_WR_TX]; ++ dma_rd = eni_dev->reg[MID_DMA_RD_TX]; ++ dma_size = 2; /* JK for descriptor and final fill */ ++DPRINTK("iovcnt = %d\n",skb->atm.iovcnt); ++ if (!skb->atm.iovcnt) dma_size += 3; ++ else dma_size += 3*skb->atm.iovcnt; ++ if (dma_size > TX_DMA_BUF) { ++ printk(KERN_WARNING DEV_LABEL "(itf %d): needs %d DMA entries " ++ "(got only %d)\n",vcc->dev->number,dma_size,TX_DMA_BUF); ++ } ++ DPRINTK("dma_wr is %ld, tx_pos is %ld\n",dma_wr,tx->tx_pos); ++ if (dma_wr != dma_rd && ((dma_rd+NR_DMA_TX-dma_wr) & (NR_DMA_TX-1)) < ++ dma_size) { ++ printk(KERN_WARNING DEV_LABEL "(itf %d): TX DMA full\n", ++ vcc->dev->number); ++ return enq_jam; ++ } ++ /* prepare DMA queue entries */ ++ j = 0; ++ dma[j++] = (((tx->tx_pos+TX_DESCR_SIZE) & (tx->words-1)) << ++ MID_DMA_COUNT_SHIFT) | (tx->index << MID_DMA_CHAN_SHIFT) | ++ MID_DT_JK; ++ j++; ++ if (!skb->atm.iovcnt) ++ if (aal5) ++ put_dma(tx->index,dma,&j,(unsigned long) skb->data, ++ skb->len); ++ else put_dma(tx->index,dma,&j,(unsigned long) skb->data+4, ++ skb->len-4); ++ else { ++DPRINTK("doing direct send\n"); ++ for (i = 0; i < skb->atm.iovcnt; i++) ++ put_dma(tx->index,dma,&j,(unsigned long) ++ ((struct iovec *) skb->data)[i].iov_base, ++ ((struct iovec *) skb->data)[i].iov_len); ++ } ++ /* JK for AAL5 trailer - AAL0 doesn't need it, but who cares ... */ ++ dma[j++] = (((tx->tx_pos+size) & (tx->words-1)) << ++ MID_DMA_COUNT_SHIFT) | (tx->index << MID_DMA_CHAN_SHIFT) | ++ MID_DMA_END | MID_DT_JK; ++ j++; ++ DPRINTK("DMA at end: %d\n",j); ++ /* store frame */ ++ tx->send[tx->tx_pos] = (MID_SEG_TX_ID << MID_SEG_ID_SHIFT) | ++ (aal5 ? MID_SEG_AAL5 : 0) | (tx->prescaler << MID_SEG_PR_SHIFT) | ++ (tx->resolution << MID_SEG_RATE_SHIFT) | ++ (size/(ATM_CELL_PAYLOAD/4)); ++/*printk("dsc = 0x%08lx\n",tx->send[tx->tx_pos]);*/ ++ tx->send[(tx->tx_pos+1) & (tx->words-1)] = (vcc->vci << ++ MID_SEG_VCI_SHIFT) | (aal5 ? 0 : (skb->data[3] & 0xf)); ++ DPRINTK("size: %ld, len:%ld\n",size,skb->len); ++ if (aal5) ++ tx->send[(tx->tx_pos+size-AAL5_TRAILER) & (tx->words-1)] = ++ skb->len; ++ j = j >> 1; ++ for (i = 0; i < j; i++) { ++ eni_dev->tx_dma[dma_wr*2] = dma[i*2]; ++ eni_dev->tx_dma[dma_wr*2+1] = dma[i*2+1]; ++ dma_wr = (dma_wr+1) & (NR_DMA_TX-1); ++ } ++ skb->atm.pos = tx->tx_pos; ++ skb->atm.size = size; ++ ENI_VCC(vcc)->txing += size; ++ tx->tx_pos = (tx->tx_pos+size) & (tx->words-1); ++ DPRINTK("dma_wr set to %ld, tx_pos is now %ld\n",dma_wr,tx->tx_pos); ++ eni_dev->reg[MID_DMA_WR_TX] = dma_wr; ++ skb_queue_tail(&eni_dev->tx_queue,skb); ++queued++; ++ return enq_ok; ++} ++ ++ ++static void poll_tx(struct atm_dev *dev) ++{ ++ struct eni_tx *tx; ++ struct sk_buff *skb; ++ enum enq_res res; ++ int i; ++ ++ DPRINTK(">poll_tx\n"); ++ for (i = NR_CHAN-1; i >= 0; i--) { ++ tx = &ENI_DEV(dev)->tx[i]; ++ if (tx->send) ++ while ((skb = skb_dequeue(&tx->backlog))) { ++ res = do_tx(skb); ++ if (res != enq_ok) { ++ DPRINTK("re-queuing TX PDU\n"); ++ skb_queue_head(&tx->backlog,skb); ++requeued++; ++ if (res == enq_jam) return; ++ else break; ++ } ++ } ++ } ++} ++ ++ ++static void dequeue_tx(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ struct atm_vcc *vcc; ++ struct sk_buff *skb; ++ struct eni_tx *tx; ++ ++ NULLCHECK(dev); ++ eni_dev = ENI_DEV(dev); ++ NULLCHECK(eni_dev); ++ while ((skb = skb_dequeue(&eni_dev->tx_queue))) { ++ vcc = skb->atm.vcc; ++ NULLCHECK(vcc); ++ tx = ENI_VCC(vcc)->tx; ++ NULLCHECK(ENI_VCC(vcc)->tx); ++ DPRINTK("dequeue_tx: next 0x%lx curr 0x%lx\n",skb->atm.pos, ++ eni_dev->reg[MID_TX_DESCRSTART(tx->index)]); ++ if (ENI_VCC(vcc)->txing < tx->words && skb->atm.pos == ++ eni_dev->reg[MID_TX_DESCRSTART(tx->index)]) { ++ skb_queue_head(&eni_dev->tx_queue,skb); ++ break; ++ } ++ ENI_VCC(vcc)->txing -= skb->atm.size; ++ if (vcc->pop) vcc->pop(vcc,skb); ++ else dev_kfree_skb(skb,FREE_WRITE); ++ vcc->stats->tx++; ++ wake_up(&eni_dev->tx_wait); ++dma_complete++; ++ } ++} ++ ++ ++static int alloc_tx(struct eni_dev *eni_dev,int *pcr,int min,int max,int ubr) ++{ ++ static const int pre_div[] = { 4,16,128,2048 }; ++ /* 2^(((x+2)^2-(x+2))/2+1) */ ++ int i,pre,res; ++ ++ DPRINTK("in pcr: %d/%d%s\n",min,max,ubr ? " (ubr)" : ""); ++ for (i = !ubr; i < NR_CHAN; i++) ++ if (!eni_dev->tx[i].send) break; ++ if (i == NR_CHAN) return -EAGAIN; ++ if (min) ++ if (min == ATM_MAX_PCR) pre = res = 0; ++ else { ++ int div; ++ ++ for (pre = 0; pre < 3; pre++) ++ if (TS_CLOCK/pre_div[pre]/64 <= min) break; ++ div = pre_div[pre]*min; ++ DPRINTK("min div %d\n",div); ++ res = TS_CLOCK/div-1; ++ } ++ else { ++ int div; ++ ++ if (max > eni_dev->tx_bw && !ubr) max = eni_dev->tx_bw; ++ for (pre = 3; pre >= 0; pre--) ++ if (TS_CLOCK/pre_div[pre]/64 > max) break; ++ if (pre < 3) pre++; /* else fail later */ ++ div = pre_div[pre]*max; ++ DPRINTK("max div %d\n",div); ++ res = (TS_CLOCK+div-1)/div-1; ++ } ++ if (res < 0) res = 0; ++ if (res > MID_SEG_MAX_RATE) res = MID_SEG_MAX_RATE; ++ eni_dev->tx[i].prescaler = pre; ++ eni_dev->tx[i].resolution = res; ++ eni_dev->tx[i].pcr = *pcr = TS_CLOCK/pre_div[pre]/(res+1); ++ DPRINTK("out pcr: %d (%d:%d) <%d,%d>\n",*pcr,pre,res,min,max); ++ DPRINTK("got chan %d\n",i); ++ if ((min && *pcr < min) || (max && *pcr > max)) return -EINVAL; ++ if (*pcr > eni_dev->tx_bw && !ubr) return -EAGAIN; ++ return i; ++} ++ ++ ++static int open_tx_first(struct atm_vcc *vcc) ++{ ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ unsigned long size,mem; ++ int tx_ind,pcr,order; ++ ++ eni_dev = ENI_DEV(vcc->dev); ++ eni_vcc = ENI_VCC(vcc); ++ eni_vcc->tx = NULL; ++ if (vcc->qos.txtp.traffic_class == ATM_NONE) return 0; ++ eni_vcc->txing = 0; ++ if (vcc->qos.txtp.traffic_class != ATM_UBR) ++ size = vcc->qos.txtp.max_sdu*3; /* @@@ improve */ ++ else { ++ if (eni_dev->ubr) { ++ eni_vcc->tx = eni_dev->ubr; ++ return 0; ++ } ++ size = UBR_BUFFER; ++ vcc->qos.txtp.min_pcr = ATM_MAX_PCR; ++ vcc->qos.txtp.max_pcr = 0; ++ } ++ DPRINTK("get_tx\n"); ++ mem = eni_alloc_mem(eni_dev,&size); ++ if (!mem) return -ENOBUFS; ++ if ((tx_ind = alloc_tx(eni_dev,&pcr,vcc->qos.txtp.min_pcr, ++ vcc->qos.txtp.max_pcr,vcc->qos.txtp.traffic_class == ATM_UBR)) < 0) ++ { ++ eni_free_mem(eni_dev,mem,size); ++ return tx_ind; ++ } ++ if (vcc->qos.txtp.traffic_class == ATM_UBR) ++ eni_dev->ubr = &eni_dev->tx[tx_ind]; ++ else eni_dev->tx_bw -= pcr; ++ vcc->qos.txtp.min_pcr = vcc->qos.txtp.max_pcr = pcr; ++ eni_dev->tx[tx_ind].send = (volatile unsigned long *) mem; ++ eni_dev->tx[tx_ind].words = size >> 2; ++ skb_queue_head_init(&eni_dev->tx[tx_ind].backlog); ++ size >>= 10; ++ for (order = -1; size; order++) size >>= 1; ++ eni_dev->reg[MID_TX_PLACE(tx_ind)] = (order << MID_SIZE_SHIFT) | ++ ((eni_dev->tx[tx_ind].send-eni_dev->ram) >> MID_LOC_SKIP); ++ eni_dev->tx[tx_ind].tx_pos = eni_dev->reg[MID_TX_DESCRSTART(tx_ind)] & ++ MID_DESCR_START; ++/*printk("mp 0x%lx tp 0x%lx\n",(unsigned long) eni_dev->tx[tx_ind].send, ++ eni_dev->tx[tx_ind].tx_pos);*/ ++ eni_vcc->tx = &eni_dev->tx[tx_ind]; ++ return 0; ++} ++ ++ ++static int open_tx_second(struct atm_vcc *vcc) ++{ ++ return 0; /* nothing to do */ ++} ++ ++ ++static void close_tx(struct atm_vcc *vcc) ++{ ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ unsigned long flags; ++ ++ eni_vcc = ENI_VCC(vcc); ++ if (!eni_vcc->tx) return; ++ eni_dev = ENI_DEV(vcc->dev); ++ /* wait for TX queue to drain */ ++ DPRINTK("eni_close: waiting for TX ...\n"); ++ save_flags(flags); ++ cli(); ++ while (skb_peek(&eni_vcc->tx->backlog) || eni_vcc->txing) { ++ DPRINTK("%d TX left\n",eni_vcc->txing); ++ sleep_on(&eni_dev->tx_wait); ++ } ++ restore_flags(flags); ++#if 0 ++ if (skb_peek(&eni_vcc->tx->backlog)) ++ printk(KERN_CRIT DEV_LABEL "SKBs in BACKLOG !!!\n"); ++#endif ++ if (eni_vcc->tx != eni_dev->ubr) { ++ eni_free_mem(eni_dev,(unsigned long) eni_vcc->tx->send, ++ eni_vcc->tx->words << 2); ++ eni_vcc->tx->send = NULL; ++ eni_dev->tx_bw += eni_vcc->tx->pcr; ++ } ++ eni_vcc->tx = NULL; ++} ++ ++ ++static int start_tx(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ int i; ++ ++ eni_dev = ENI_DEV(dev); ++ eni_dev->lost = 0; ++ eni_dev->tx_bw = ATM_OC3_PCR; ++ eni_dev->tx_wait = NULL; ++ eni_dev->ubr = NULL; ++ skb_queue_head_init(&eni_dev->tx_queue); ++ eni_dev->reg[MID_DMA_WR_TX] = 0; ++ for (i = 0; i < NR_CHAN; i++) { ++ eni_dev->tx[i].send = NULL; ++ eni_dev->tx[i].index = i; ++ } ++ return 0; ++} ++ ++ ++/*--------------------------------- common ----------------------------------*/ ++ ++ ++static void foo(void) ++{ ++printk(KERN_INFO ++ "tx_complete=%d,dma_complete=%d,queued=%d,requeued=%d,sub=%d,\n" ++ "backlogged=%d,rx_enqueued=%d,rx_dequeued=%d,putting=%d,pushed=%d\n", ++ tx_complete,dma_complete,queued,requeued,submitted,backlogged, ++ rx_enqueued,rx_dequeued,putting,pushed); ++if (eni_boards) printk(KERN_INFO "loss: %ld\n",ENI_DEV(eni_boards)->lost); ++} ++ ++static void misc_int(struct atm_dev *dev,unsigned long reason) ++{ ++ struct eni_dev *eni_dev; ++ ++ DPRINTK(">misc_int\n"); ++ eni_dev = ENI_DEV(dev); ++ if (reason & MID_STAT_OVFL) { ++ EVENT("stat overflow\n",0,0); ++ eni_dev->lost += eni_dev->reg[MID_STAT] & MID_OVFL_TRASH; ++ } ++ if (reason & MID_SUNI_INT) { ++ EVENT("SUNI int\n",0,0); ++ dev->phy->interrupt(dev); ++ foo(); ++ } ++ if (reason & MID_TX_IDENT_MISM) { ++ printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - ident " ++ "mismatch\n",dev->number); ++ EVENT("---dump ends here---\n",0,0); ++ printk(KERN_NOTICE "---recent events---\n"); ++ event_dump(); ++ } ++ if (reason & MID_TX_DMA_OVFL) { ++ printk(KERN_CRIT DEV_LABEL "(itf %d): driver error - DMA " ++ "overflow\n",dev->number); ++ EVENT("---dump ends here---\n",0,0); ++ printk(KERN_NOTICE "---recent events---\n"); ++ event_dump(); ++ } ++} ++ ++ ++static void eni_int(int irq,void *dev_id,struct pt_regs *regs) ++{ ++ struct atm_dev *dev; ++ struct eni_dev *eni_dev; ++ unsigned long reason; ++ ++ DPRINTK(">eni_int\n"); ++ dev = dev_id; ++ eni_dev = ENI_DEV(dev); ++ while ((reason = eni_dev->reg[MID_ISA])) { ++ DPRINTK(DEV_LABEL ": int 0x%lx\n",reason); ++ if (reason & MID_RX_DMA_COMPLETE) { ++ EVENT("INT: RX DMA complete, starting dequeue_rx\n", ++ 0,0); ++ dequeue_rx(dev); ++ EVENT("dequeue_rx done, starting poll_rx\n",0,0); ++ poll_rx(dev); ++ EVENT("poll_rx done\n",0,0); ++ /* poll_tx ? */ ++ } ++ if (reason & MID_SERVICE) { ++ EVENT("INT: service, starting get_service\n",0,0); ++ get_service(dev); ++ EVENT("get_service done, starting poll_rx\n",0,0); ++ poll_rx(dev); ++ EVENT("poll_rx done\n",0,0); ++ } ++ if (reason & MID_TX_DMA_COMPLETE) { ++ EVENT("INT: TX DMA COMPLETE\n",0,0); ++ dequeue_tx(dev); ++ } ++ if (reason & MID_TX_COMPLETE) { ++ EVENT("INT: TX COMPLETE\n",0,0); ++tx_complete++; ++ wake_up(&eni_dev->tx_wait); ++ poll_tx(dev); ++ /* poll_rx ? */ ++ } ++ if (reason & (MID_STAT_OVFL | MID_SUNI_INT | MID_TX_IDENT_MISM ++ | MID_TX_DMA_OVFL)) { ++ EVENT("misc interrupt\n",0,0); ++ misc_int(dev,reason); ++ } ++ } ++} ++ ++ ++/*--------------------------------- entries ---------------------------------*/ ++ ++ ++static const char *media_name[] = { ++ "MMF", "SMF", "MMF", "03?", /* 0- 3 */ ++ "UTP", "05?", "06?", "07?", /* 4- 7 */ ++ "TAXI","09?", "10?", "11?", /* 8-11 */ ++ "12?", "13?", "14?", "15?", /* 12-15 */ ++ "MMF", "SMF", "18?", "19?", /* 16-19 */ ++ "UTP", "21?", "22?", "23?", /* 20-23 */ ++ "24?", "25?", "26?", "27?", /* 24-27 */ ++ "28?", "29?", "30?", "31?" /* 28-31 */ ++}; ++ ++ ++#define SET_SEPROM \ ++ ({ if (!error && !pci_error) { \ ++ pci_error = pcibios_write_config_byte(eni_dev->bus,eni_dev->dev_fn, \ ++ PCI_TONGA_CTRL,tonga); \ ++ udelay(10); /* 10 usecs */ \ ++ } }) ++#define GET_SEPROM \ ++ ({ if (!error && !pci_error) { \ ++ pci_error = pcibios_read_config_byte(eni_dev->bus,eni_dev->dev_fn, \ ++ PCI_TONGA_CTRL,&tonga); \ ++ udelay(10); /* 10 usecs */ \ ++ } }) ++ ++ ++static int get_esi_asic(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ unsigned char tonga; ++ int error,failed,pci_error; ++ int address,i,j; ++ ++ eni_dev = ENI_DEV(dev); ++ error = pci_error = 0; ++ tonga = SEPROM_MAGIC | SEPROM_DATA | SEPROM_CLK; ++ SET_SEPROM; ++ for (i = 0; i < ESI_LEN && !error && !pci_error; i++) { ++ /* start operation */ ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ tonga |= SEPROM_CLK; ++ SET_SEPROM; ++ tonga &= ~SEPROM_DATA; ++ SET_SEPROM; ++ tonga &= ~SEPROM_CLK; ++ SET_SEPROM; ++ /* send address */ ++ address = ((i+SEPROM_ESI_BASE) << 1)+1; ++ for (j = 7; j >= 0; j--) { ++ tonga = (address >> j) & 1 ? tonga | SEPROM_DATA : ++ tonga & ~SEPROM_DATA; ++ SET_SEPROM; ++ tonga |= SEPROM_CLK; ++ SET_SEPROM; ++ tonga &= ~SEPROM_CLK; ++ SET_SEPROM; ++ } ++ /* get ack */ ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ tonga |= SEPROM_CLK; ++ SET_SEPROM; ++ GET_SEPROM; ++ failed = tonga & SEPROM_DATA; ++ tonga &= ~SEPROM_CLK; ++ SET_SEPROM; ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ if (failed) error = -EIO; ++ else { ++ dev->esi[i] = 0; ++ for (j = 7; j >= 0; j--) { ++ dev->esi[i] <<= 1; ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ tonga |= SEPROM_CLK; ++ SET_SEPROM; ++ GET_SEPROM; ++ if (tonga & SEPROM_DATA) dev->esi[i] |= 1; ++ tonga &= ~SEPROM_CLK; ++ SET_SEPROM; ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ } ++ /* get ack */ ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ tonga |= SEPROM_CLK; ++ SET_SEPROM; ++ GET_SEPROM; ++ if (!(tonga & SEPROM_DATA)) error = -EIO; ++ tonga &= ~SEPROM_CLK; ++ SET_SEPROM; ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ } ++ /* stop operation */ ++ tonga &= ~SEPROM_DATA; ++ SET_SEPROM; ++ tonga |= SEPROM_CLK; ++ SET_SEPROM; ++ tonga |= SEPROM_DATA; ++ SET_SEPROM; ++ } ++ if (pci_error) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): error reading ESI (%s)\n", ++ dev->number,pcibios_strerror(pci_error)); ++ error = -EIO; ++ } ++ return error; ++} ++ ++ ++#undef SET_SEPROM ++#undef GET_SEPROM ++ ++ ++static int get_esi_fpga(struct atm_dev *dev,unsigned long base) ++{ ++ struct eni_dev *eni_dev; ++ struct midway_eprom *eprom; ++ int i; ++ ++ eprom = (struct midway_eprom *) (base+EPROM_SIZE-sizeof(struct ++ midway_eprom)); ++ eni_dev = ENI_DEV(dev); ++ for (i = 0; i < ESI_LEN; i++) ++ dev->esi[i] = eprom->mac[(i & ~3) | (3-(i & 3))]; ++ return 0; ++} ++ ++ ++static int eni_init(struct atm_dev *dev) ++{ ++ struct midway_eprom *eprom; ++ struct eni_dev *eni_dev; ++ unsigned int real_base,base; ++ unsigned short command; ++ unsigned char revision; ++ int error,i,last; ++ ++ DPRINTK(">eni_init\n"); ++ dev->ci_range.vpi_bits = 0; ++ dev->ci_range.vci_bits = NR_VCI_LD; ++ eni_dev = ENI_DEV(dev); ++ if ((error = pcibios_read_config_word(eni_dev->bus,eni_dev->dev_fn, ++ PCI_COMMAND,&command)) || (error = pcibios_read_config_dword( ++ eni_dev->bus,eni_dev->dev_fn,PCI_BASE_ADDRESS_0,&real_base)) || ++ (error = pcibios_read_config_byte(eni_dev->bus,eni_dev->dev_fn, ++ PCI_INTERRUPT_LINE,&eni_dev->irq)) || (error = ++ pcibios_read_config_byte(eni_dev->bus,eni_dev->dev_fn, ++ PCI_REVISION_ID,&revision))) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): init error %s\n", ++ dev->number,pcibios_strerror(error)); ++ return -EINVAL; ++ } ++ real_base &= MEM_VALID; /* strip flags */ ++ if ((error = pcibios_write_config_word(eni_dev->bus,eni_dev->dev_fn, ++ PCI_COMMAND,PCI_COMMAND_MEMORY | (eni_dev->asic ? ++ PCI_COMMAND_PARITY | PCI_COMMAND_SERR : 0)))) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): can't enable memory (%s)" ++ "\n",dev->number,pcibios_strerror(error)); ++ return error; ++ } ++ printk(KERN_NOTICE DEV_LABEL "(itf %d): rev.%d,base=0x%x,irq=%d,", ++ dev->number,revision,real_base,eni_dev->irq); ++ if (!(base = (unsigned long) vremap(real_base,MAP_MAX_SIZE))) { ++ printk("\n"); ++ printk(KERN_ERR DEV_LABEL "(itf %d): can't set up page " ++ "mapping\n",dev->number); ++ return error; ++ } ++ eni_dev->base_diff = real_base-base; ++ /* id may not be present in ASIC Tonga boards - check this @@@ */ ++ if (!eni_dev->asic) { ++ eprom = (struct midway_eprom *) (base+EPROM_SIZE-sizeof(struct ++ midway_eprom)); ++ if (eprom->magic != ENI155_MAGIC) { ++ printk("\n"); ++ printk(KERN_ERR KERN_ERR DEV_LABEL "(itf %d): bad " ++ "magic - expected 0x%X, got 0x%lX\n",dev->number, ++ ENI155_MAGIC,eprom->magic); ++ return -EINVAL; ++ } ++ } ++ eni_dev->phy = (volatile unsigned long *) (base+PHY_BASE); ++ eni_dev->reg = (volatile unsigned long *) (base+REG_BASE); ++ eni_dev->ram = (volatile unsigned long *) (base+RAM_BASE); ++ last = (MAP_MAX_SIZE-RAM_BASE)/4; ++ for (i = last-RAM_INCREMENT; i >= 0; ++ i -= RAM_INCREMENT) { ++ eni_dev->ram[i] = 0x55555555; ++ if (eni_dev->ram[i] != 0x55555555) last = i; ++ else { ++ eni_dev->ram[i] = 0xAAAAAAAA; ++ if (eni_dev->ram[i] != 0xAAAAAAAA) last = i; ++ else eni_dev->ram[i] = i; ++ } ++ } ++ for (i = 0; i < last; i += RAM_INCREMENT) ++ if (eni_dev->ram[i] != i) break; ++ eni_dev->mem = i << 2; ++ memset((void *) eni_dev->ram,0,eni_dev->mem); ++ /* TODO: should shrink allocation now */ ++ printk("mem=%dkB (",eni_dev->mem >> 10); ++ /* TODO: check for non-SUNI, check for TAXI ? */ ++ if (!(eni_dev->reg[MID_RES_ID_MCON] & 0x200) != !eni_dev->asic) { ++ printk(")\n"); ++ printk(KERN_ERR DEV_LABEL "(itf %d): ERROR - wrong id 0x%0lx\n", ++ dev->number,eni_dev->reg[MID_RES_ID_MCON]); ++ return -EINVAL; ++ } ++ error = eni_dev->asic ? get_esi_asic(dev) : get_esi_fpga(dev,base); ++ if (error) return error; ++ for (i = 0; i < ESI_LEN; i++) ++ printk("%s%02X",i ? "-" : "",dev->esi[i]); ++ printk(")\n"); ++ printk(KERN_NOTICE DEV_LABEL "(itf %d): %s,%s\n",dev->number, ++ eni_dev->reg[MID_RES_ID_MCON] & 0x200 ? "ASIC" : "FPGA", ++ media_name[eni_dev->reg[MID_RES_ID_MCON] & DAUGTHER_ID]); ++ return suni_init(dev); ++} ++ ++ ++static int eni_start(struct atm_dev *dev) ++{ ++ struct eni_dev *eni_dev; ++ volatile unsigned long *buf; ++ unsigned long buffer_mem; ++ int error; ++ ++ DPRINTK(">eni_start\n"); ++ eni_dev = ENI_DEV(dev); ++ if (request_irq(eni_dev->irq,&eni_int,0,DEV_LABEL,dev)) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): IRQ%d is already in use\n", ++ dev->number,eni_dev->irq); ++ return -EAGAIN; ++ } ++ /* @@@ should release IRQ on error */ ++ if ((error = pcibios_write_config_word(eni_dev->bus,eni_dev->dev_fn, ++ PCI_COMMAND,PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER | ++ (eni_dev->asic ? PCI_COMMAND_PARITY | PCI_COMMAND_SERR : 0)))) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): can't enable memory+" ++ "master (%s)\n",dev->number,pcibios_strerror(error)); ++ return error; ++ } ++ if ((error = pcibios_write_config_byte(eni_dev->bus,eni_dev->dev_fn, ++ PCI_TONGA_CTRL,END_SWAP_DMA))) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): can't set endian swap " ++ "(%s)\n",dev->number,pcibios_strerror(error)); ++ return error; ++ } ++ /* determine addresses of internal tables */ ++ eni_dev->vci = eni_dev->ram; ++ eni_dev->rx_dma = eni_dev->ram+NR_VCI*4; ++ eni_dev->tx_dma = eni_dev->rx_dma+NR_DMA_RX*2; ++ eni_dev->service = eni_dev->tx_dma+NR_DMA_TX*2; ++ buf = eni_dev->service+NR_SERVICE; ++ DPRINTK("vci 0x%lx,rx 0x%lx, tx 0x%lx,srv 0x%lx,buf 0x%lx\n", ++ (unsigned long) eni_dev->vci,(unsigned long) eni_dev->rx_dma, ++ (unsigned long) eni_dev->tx_dma,(unsigned long) eni_dev->service, ++ buf); ++ /* initialize memory management */ ++ buffer_mem = eni_dev->mem-((unsigned long) buf- ++ (unsigned long) eni_dev->ram); ++ eni_dev->free_list_size = buffer_mem/MID_MIN_BUF_SIZE/2; ++ eni_dev->free_list = (struct eni_free *) kmalloc( ++ sizeof(struct eni_free)*(eni_dev->free_list_size+1),GFP_KERNEL); ++ if (!eni_dev->free_list) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): couldn't get free page\n", ++ dev->number); ++ return -ENOMEM; ++ } ++ eni_dev->free_len = 0; ++ eni_put_free(eni_dev,(unsigned long) buf,buffer_mem); ++ memset((void *) eni_dev->vci,0,16*NR_VCI); /* clear VCI table */ ++ /* ++ * byte_addr free (k) ++ * 0x00000000 512 VCI table ++ * 0x00004000 496 RX DMA ++ * 0x00005000 492 TX DMA ++ * 0x00006000 488 service list ++ * 0x00007000 484 buffers ++ * 0x00080000 0 end (512kB) ++ */ ++ eni_dev->reg[MID_IE] = 0xffffffff; ++#if 0 ++MID_TX_COMPLETE_0 | MID_TX_DMA_OVFL | ++ MID_TX_IDENT_MISM | MID_RX_DMA_COMPLETE | MID_TX_DMA_COMPLETE | ++ MID_SERVICE | MID_SUNI_INT | MID_STAT_OVFL; /* enable interrupts */ ++#endif ++ error = start_tx(dev); ++ if (error) return error; ++ error = start_rx(dev); ++ if (error) return error; ++ error = dev->phy->start(dev); ++ if (error) return error; ++ eni_dev->reg[MID_MC_S] |= (1 << MID_INT_SEL_SHIFT) | ++ MID_TX_LOCK_MODE | MID_DMA_ENABLE | MID_TX_ENABLE | MID_RX_ENABLE; ++ /* Tonga uses SBus INTReq1 */ ++ (void) eni_dev->reg[MID_ISA]; /* clear Midway interrupts */ ++ return 0; ++} ++ ++ ++static void eni_close(struct atm_vcc *vcc) ++{ ++ DPRINTK(">eni_close\n"); ++ if (!ENI_VCC(vcc)) return; ++ vcc->flags &= ~ATM_VF_READY; ++ close_rx(vcc); ++ close_tx(vcc); ++ DPRINTK("eni_close: done waiting\n"); ++ /* deallocate memory */ ++ kfree(ENI_VCC(vcc)); ++ ENI_VCC(vcc) = NULL; ++ vcc->flags &= ~ATM_VF_ADDR; ++ /*foo();*/ ++} ++ ++ ++static int get_ci(struct atm_vcc *vcc,short *vpi,int *vci) ++{ ++ struct atm_vcc *walk; ++ ++ if (*vpi == ATM_VPI_ANY) *vpi = 0; ++ if (*vci == ATM_VCI_ANY) { ++ for (*vci = ATM_NOT_RSV_VCI; *vci < NR_VCI; (*vci)++) { ++ if (vcc->qos.rxtp.traffic_class != ATM_NONE && ++ ENI_DEV(vcc->dev)->rx_map[*vci]) ++ continue; ++ if (vcc->qos.txtp.traffic_class != ATM_NONE) { ++ for (walk = vcc->dev->vccs; walk; ++ walk = walk->next) ++ if ((walk->flags & ATM_VF_ADDR) && ++ walk->vci == *vci && ++ walk->qos.txtp.traffic_class != ++ ATM_NONE) ++ break; ++ if (walk) continue; ++ } ++ break; ++ } ++ return *vci == NR_VCI ? -EADDRINUSE : 0; ++ } ++ if (*vci == ATM_VCI_UNSPEC) return 0; ++ if (vcc->qos.rxtp.traffic_class != ATM_NONE && ++ ENI_DEV(vcc->dev)->rx_map[*vci]) ++ return -EADDRINUSE; ++ if (vcc->qos.txtp.traffic_class == ATM_NONE) return 0; ++ for (walk = vcc->dev->vccs; walk; walk = walk->next) ++ if ((walk->flags & ATM_VF_ADDR) && walk->vci == *vci && ++ walk->qos.txtp.traffic_class != ATM_NONE) ++ return -EADDRINUSE; ++ return 0; ++} ++ ++ ++static int eni_open(struct atm_vcc *vcc,short vpi,int vci) ++{ ++ struct eni_dev *eni_dev; ++ struct eni_vcc *eni_vcc; ++ int error; ++ ++ DPRINTK(">eni_open\n"); ++ EVENT("eni_open\n",0,0); ++ if (!(vcc->flags & ATM_VF_PARTIAL)) ENI_VCC(vcc) = NULL; ++ eni_dev = ENI_DEV(vcc->dev); ++#if 1 /* set to 0 to test atm_find_ci (get_ci usually is faster) */ ++ error = get_ci(vcc,&vpi,&vci); ++ if (error) return error; ++#else ++ error = atm_find_ci(vcc,&vpi,&vci); ++ if (error) return error; ++#endif ++ vcc->vpi = vpi; ++ vcc->vci = vci; ++ if (vci != ATM_VPI_UNSPEC && vpi != ATM_VCI_UNSPEC) ++ vcc->flags |= ATM_VF_ADDR; ++ if (vcc->aal != ATM_AAL0 && vcc->aal != ATM_AAL5) return -EINVAL; ++ DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, ++ vcc->vci); ++ if (!(vcc->flags & ATM_VF_PARTIAL)) { ++ eni_vcc = kmalloc(sizeof(struct eni_vcc),GFP_KERNEL); ++ if (!eni_vcc) return -ENOMEM; ++ ENI_VCC(vcc) = eni_vcc; ++ eni_vcc->tx = NULL; /* for eni_close after open_rx */ ++ if ((error = open_rx_first(vcc))) { ++ eni_close(vcc); ++ return error; ++ } ++ if ((error = open_tx_first(vcc))) { ++ eni_close(vcc); ++ return error; ++ } ++ } ++ if (vci == ATM_VPI_UNSPEC || vpi == ATM_VCI_UNSPEC) return 0; ++ if ((error = open_rx_second(vcc))) { ++ eni_close(vcc); ++ return error; ++ } ++ if ((error = open_tx_second(vcc))) { ++ eni_close(vcc); ++ return error; ++ } ++ vcc->flags |= ATM_VF_READY; ++ /* should power down SUNI while !ref_count @@@ */ ++ return 0; ++} ++ ++ ++static int eni_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) ++{ ++ if (cmd == ENI_MEMDUMP) { ++ dump(dev); ++ return 0; ++ } ++ if (cmd == ATM_SETCIRANGE) { ++ struct atm_cirange ci; ++ ++ memcpy_fromfs(&ci,(void *) arg,sizeof(struct atm_cirange)); ++ if ((ci.vpi_bits == 0 || ci.vpi_bits == ATM_CI_MAX) && ++ (ci.vci_bits == NR_VCI_LD || ci.vpi_bits == ATM_CI_MAX)) ++ return 0; ++ return -EINVAL; ++ } ++ if (!dev->phy->ioctl) return -EINVAL; ++ return dev->phy->ioctl(dev,cmd,arg); ++} ++ ++ ++static int eni_getsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int *optlen) ++{ ++#ifdef CONFIG_MMU_HACKS ++ ++static const struct atm_buffconst bctx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; ++static const struct atm_buffconst bcrx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; ++ ++#else ++ ++static const struct atm_buffconst bctx = { 4,0,4,0,0,0 }; ++static const struct atm_buffconst bcrx = { 4,0,4,0,0,0 }; ++ ++#endif ++ int error; ++ ++ if (level == SOL_AAL && (optname == SO_BCTXOPT || ++ optname == SO_BCRXOPT)) { ++ if (get_fs_long(optlen) < sizeof(struct atm_buffconst)) ++ return -EINVAL; ++ put_fs_long(sizeof(struct atm_buffconst),optlen); ++ error = verify_area(VERIFY_WRITE,optval, ++ sizeof(struct atm_buffconst)); ++ if (error) return error; ++ memcpy_tofs(optval,optname == SO_BCTXOPT ? &bctx : &bcrx, ++ sizeof(struct atm_buffconst)); ++ return 0; ++ } ++ return -EINVAL; ++} ++ ++ ++static int eni_setsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int optlen) ++{ ++ return -EINVAL; ++} ++ ++ ++static int eni_send(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ unsigned long flags; ++ ++ DPRINTK(">eni_send\n"); ++ if (!ENI_VCC(vcc)->tx) { ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ if (!skb) { ++ printk(KERN_CRIT "!skb in eni_send ?\n"); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ if (vcc->aal == ATM_AAL0) { ++ if (skb->len != ATM_CELL_SIZE-1) { ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ *(unsigned long *) skb->data = htonl(*(unsigned long *) ++ skb->data); ++ } ++submitted++; ++ skb->atm.vcc = vcc; ++ save_flags(flags); ++ cli(); /* brute force */ ++ if (skb_peek(&ENI_VCC(vcc)->tx->backlog) || do_tx(skb)) { ++ skb_queue_tail(&ENI_VCC(vcc)->tx->backlog,skb); ++ backlogged++; ++ } ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++static int eni_sg_send(struct atm_vcc *vcc,unsigned long start, ++ unsigned long size) ++{ ++ return vcc->aal == ATM_AAL5 && !((start | size) & 3); ++ /* don't tolerate misalignment */ ++} ++ ++ ++static void eni_phy_put(struct atm_dev *dev,unsigned char value, ++ unsigned long addr) ++{ ++ ENI_DEV(dev)->phy[addr] = value; ++} ++ ++ ++ ++static unsigned char eni_phy_get(struct atm_dev *dev,unsigned long addr) ++{ ++ volatile unsigned tmp; /* force 32 bit access */ ++ ++ tmp = ENI_DEV(dev)->phy[addr]; ++ return tmp; ++} ++ ++ ++static const struct atmdev_ops ops = { ++ eni_open, ++ eni_close, ++ eni_ioctl, ++ eni_getsockopt, ++ eni_setsockopt, ++ eni_send, ++ eni_sg_send, ++ NULL, /* no poll */ ++ NULL, /* no send_oam */ ++ eni_phy_put, ++ eni_phy_get, ++ NULL /* no feedback */ ++}; ++ ++ ++int eni_detect(void) ++{ ++ struct atm_dev *dev; ++ struct eni_dev *eni_dev; ++ int devs,type,index; ++ ++ if (!pcibios_present()) { ++ printk(KERN_ERR DEV_LABEL " driver but no PCI BIOS ?\n"); ++ return 0; ++ } ++ eni_dev = (struct eni_dev *) kmalloc(sizeof(struct eni_dev), ++ GFP_KERNEL); ++ if (!eni_dev) return -ENOMEM; ++ devs = 0; ++ for (type = 0; type < 2; type++) { ++ index = 0; ++ while (!pcibios_find_device(PCI_VENDOR_ID_EF,type ? ++ PCI_DEVICE_ID_EF_ATM_ASIC : PCI_DEVICE_ID_EF_ATM_FPGA, ++ index,&eni_dev->bus,&eni_dev->dev_fn)) { ++ dev = atm_dev_register(DEV_LABEL,&ops,0); ++ if (!dev) break; ++ ENI_DEV(dev) = eni_dev; ++ eni_dev->asic = type; ++ if (eni_init(dev) || eni_start(dev)) { ++ atm_dev_deregister(dev); ++ break; ++ } ++ eni_dev->more = eni_boards; ++ eni_boards = dev; ++ index++; ++ devs++; ++ eni_dev = (struct eni_dev *) kmalloc(sizeof(struct ++ eni_dev),GFP_KERNEL); ++ if (!eni_dev) break; ++ } ++ } ++ return devs; ++} ++ ++ ++#ifdef MODULE ++ ++int init_module(void) ++{ ++ if (!eni_detect()) { ++ printk(KERN_ERROR DEV_LABEL ": no adapter found\n"); ++ return -ENXIO; ++ } ++ MOD_INC_USE_COUNT; ++ return 0; ++} ++ ++ ++void cleanup_module(void) ++{ ++ /* ++ * Well, there's no way to get rid of the driver yet, so we don't ++ * have to clean up, right ? :-) ++ */ ++} ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/eni.h Wed Jul 31 19:32:14 1996 +@@ -0,0 +1,113 @@ ++/* drivers/atm/eni.h - Efficient Networks ENI155P device driver declarations */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVER_ATM_ENI_H ++#define DRIVER_ATM_ENI_H ++ ++#include ++ ++#define ENI_MEMDUMP _IOW('a',ATMIOC_SARPRV,struct atmif_sioc) ++ /* printk memory map */ ++ ++ ++#ifdef __KERNEL__ ++ ++#include ++#include ++#include ++#include ++#include ++ ++#include "midway.h" ++ ++ ++#define KERNEL_OFFSET 0xC0000000 /* kernel 0x0 is at phys 0xC0000000 */ ++#define DEV_LABEL "eni" ++ ++#define UBR_BUFFER (128*1024) /* UBR buffer size */ ++ ++#define RX_DMA_BUF 5 /* burst and skip a few things */ ++#define TX_DMA_BUF 60 /* should be enough for 64 kB */ ++ ++ ++struct eni_free { ++ unsigned long start; /* counting in bytes */ ++ int order; ++}; ++ ++struct eni_tx { ++ volatile unsigned long *send; /* base, NULL if unused */ ++ int prescaler; /* shaping prescaler */ ++ int resolution; /* shaping divider */ ++ unsigned long tx_pos; /* current TX write position */ ++ unsigned long words; /* size of TX queue */ ++ int index; /* TX channel number */ ++ int pcr; /* peak cell rate */ ++ struct sk_buff_head backlog; /* queue of waiting TX buffers */ ++}; ++ ++struct eni_vcc { ++ int (*rx)(struct atm_vcc *vcc); /* RX function, NULL if none */ ++ volatile unsigned long *recv; /* receive buffer */ ++ unsigned long words; /* its size in words */ ++ unsigned long descr; /* next descriptor (RX) */ ++ unsigned long rx_pos; /* current RX descriptor pos */ ++ struct eni_tx *tx; /* TXer, NULL if none */ ++ int rxing; /* number of pending PDUs */ ++ int servicing; /* number of waiting VCs (0 or 1) */ ++ int txing; /* number of pending TX cells/PDUs */ ++ struct timeval timestamp; /* for RX timing */ ++ struct atm_vcc *next; /* next pending RX */ ++ struct sk_buff *last; /* last PDU being DMAed (used to carry ++ discard information) */ ++}; ++ ++struct eni_dev { ++ /*-------------------------------- base pointers into Midway address ++ space */ ++ volatile unsigned long *phy; /* PHY interface chip registers */ ++ volatile unsigned long *reg; /* register base */ ++ volatile unsigned long *ram; /* RAM base */ ++ volatile unsigned long *vci; /* VCI table */ ++ volatile unsigned long *rx_dma; /* RX DMA queue */ ++ volatile unsigned long *tx_dma; /* TX DMA queue */ ++ volatile unsigned long *service;/* service list */ ++ /*-------------------------------- TX part */ ++ struct eni_tx tx[NR_CHAN]; /* TX channels */ ++ struct eni_tx *ubr; /* UBR channel */ ++ struct sk_buff_head tx_queue; /* PDUs currently being TX DMAed*/ ++ struct wait_queue *tx_wait; /* for close */ ++ int tx_bw; /* remaining bandwidth */ ++ /*-------------------------------- RX part */ ++ unsigned long serv_read; /* host service read index */ ++ struct atm_vcc *fast,*last_fast;/* queues of VCCs with pending PDUs */ ++ struct atm_vcc *slow,*last_slow; ++ struct atm_vcc **rx_map; /* for fast lookups */ ++ struct sk_buff_head rx_queue; /* PDUs currently being RX-DMAed */ ++ struct wait_queue *rx_wait; /* for close */ ++ /*-------------------------------- statistics */ ++ unsigned long lost; /* number of lost cells (RX) */ ++ /*-------------------------------- memory management */ ++ unsigned long base_diff; /* virtual-real base address */ ++ int free_len; /* free list length */ ++ struct eni_free *free_list; /* free list */ ++ int free_list_size; /* maximum size of free list */ ++ /*-------------------------------- ENI links */ ++ struct atm_dev *more; /* other ENI devices */ ++ /*-------------------------------- general information */ ++ int mem; /* RAM on board (in bytes) */ ++ int asic; /* PCI interface type, 0 for FPGA */ ++ unsigned char irq; /* IRQ */ ++ unsigned char bus; /* PCI stuff */ ++ unsigned char dev_fn; ++}; ++ ++ ++#define ENI_DEV(d) ((struct eni_dev *) (d)->dev_data) ++#define ENI_VCC(d) ((struct eni_vcc *) (d)->dev_data) ++ ++#endif /* __KERNEL__ */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/midway.h Mon Jun 10 17:36:06 1996 +@@ -0,0 +1,265 @@ ++/* drivers/atm/midway.h - Efficient Networks Midway (SAR) description */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVERS_ATM_MIDWAY_H ++#define DRIVERS_ATM_MIDWAY_H ++ ++ ++#define NR_VCI 1024 /* number of VCIs */ ++#define NR_VCI_LD 10 /* log2(NR_VCI) */ ++#define NR_DMA_RX 512 /* RX DMA queue entries */ ++#define NR_DMA_TX 512 /* TX DMA queue entries */ ++#define NR_SERVICE NR_VCI /* service list size */ ++#define NR_CHAN 8 /* number of TX channels */ ++#define TS_CLOCK 25000000 /* traffic shaper clock (cell/sec) */ ++ ++#define MAP_MAX_SIZE 0x00400000 /* memory window for max config */ ++#define EPROM_SIZE 0x00010000 ++#define MEM_VALID 0xffc00000 /* mask base address with this */ ++#define PHY_BASE 0x00020000 /* offset of PHY register are */ ++#define REG_BASE 0x00040000 /* offset of Midway register area */ ++#define RAM_BASE 0x00200000 /* offset of RAM area */ ++#define RAM_INCREMENT 0x00008000 /* probe for RAM every 128kB (32 kw) */ ++ ++#define MID_VCI_BASE RAM_BASE ++#define MID_DMA_RX_BASE (MID_VCI_BASE+NR_VCI*16) ++#define MID_DMA_TX_BASE (MID_DMA_RX_BASE+NR_DMA_RX*8) ++#define MID_SERVICE_BASE (MID_DMA_TX_BASE+NR_DMA_TX*8) ++#define MID_FREE_BASE (MID_SERVICE_BASE+NR_SERVICE*4) ++ ++#define MAC_LEN 6 /* atm.h */ ++ ++#define MID_MIN_BUF_SIZE (1024) /* 1 kB is minimum */ ++#define MID_MAX_BUF_SIZE (128*1024) /* 128 kB is maximum */ ++ ++#define RX_DESCR_SIZE 1 /* RX PDU descr is 1 longword */ ++#define TX_DESCR_SIZE 2 /* TX PDU descr is 2 longwords */ ++#define AAL5_TRAILER (ATM_AAL5_TRAILER/4) /* AAL5 trailer is 2 longwords */ ++ ++#define TX_GAP 8 /* TX buffer gap (words) */ ++ ++/* ++ * Midway Reset/ID ++ * ++ * All values read-only. Writing to this register resets Midway chip. ++ */ ++ ++#define MID_RES_ID_MCON 0x00 /* Midway Reset/ID */ ++ ++#define MID_ID 0xf0000000 /* Midway version */ ++#define MID_SHIFT 24 ++#define MID_MOTHER_ID 0x00000700 /* mother board id */ ++#define MID_MOTHER_SHIFT 8 ++#define MID_CON_TI 0x00000080 /* 0: normal ctrl; 1: SABRE */ ++#define MID_CON_SUNI 0x00000040 /* 0: UTOPIA; 1: SUNI */ ++#define MID_CON_V6 0x00000020 /* 0: non-pipel UTOPIA (required iff ++ !CON_SUNI; 1: UTOPIA */ ++#define DAUGTHER_ID 0x0000001f /* daugther board id */ ++ ++/* ++ * Interrupt Status Acknowledge, Interrupt Status & Interrupt Enable ++ */ ++ ++#define MID_ISA 0x01 /* Interrupt Status Acknowledge */ ++#define MID_IS 0x02 /* Interrupt Status */ ++#define MID_IE 0x03 /* Interrupt Enable */ ++ ++#define MID_TX_COMPLETE_7 0x00010000 /* channel N completed a PDU */ ++#define MID_TX_COMPLETE_6 0x00008000 /* transmission */ ++#define MID_TX_COMPLETE_5 0x00004000 ++#define MID_TX_COMPLETE_4 0x00002000 ++#define MID_TX_COMPLETE_3 0x00001000 ++#define MID_TX_COMPLETE_2 0x00000800 ++#define MID_TX_COMPLETE_1 0x00000400 ++#define MID_TX_COMPLETE_0 0x00000200 ++#define MID_TX_COMPLETE 0x0001fe00 /* any TX */ ++#define MID_TX_DMA_OVFL 0x00000100 /* DMA to adapter overflow */ ++#define MID_TX_IDENT_MISM 0x00000080 /* TX: ident mismatch => halted */ ++#define MID_DMA_LERR_ACK 0x00000040 /* LERR - SBus ? */ ++#define MID_DMA_ERR_ACK 0x00000020 /* DMA error */ ++#define MID_RX_DMA_COMPLETE 0x00000010 /* DMA to host done */ ++#define MID_TX_DMA_COMPLETE 0x00000008 /* DMA from host done */ ++#define MID_SERVICE 0x00000004 /* something in service list */ ++#define MID_SUNI_INT 0x00000002 /* interrupt from SUNI */ ++#define MID_STAT_OVFL 0x00000001 /* statistics overflow */ ++ ++/* ++ * Master Control/Status ++ */ ++ ++#define MID_MC_S 0x04 ++ ++#define MID_INT_SELECT 0x000001C0 /* Interrupt level (000: off) */ ++#define MID_INT_SEL_SHIFT 6 ++#define MID_TX_LOCK_MODE 0x00000020 /* 0: streaming; 1: TX ovfl->lock */ ++#define MID_DMA_ENABLE 0x00000010 /* R: 0: disable; 1: enable ++ W: 0: no change; 1: enable */ ++#define MID_TX_ENABLE 0x00000008 /* R: 0: TX disabled; 1: enabled ++ W: 0: no change; 1: enable */ ++#define MID_RX_ENABLE 0x00000004 /* like TX */ ++#define MID_WAIT_1MS 0x00000002 /* R: 0: timer not running; 1: running ++ W: 0: no change; 1: no interrupts ++ for 1 ms */ ++#define MID_WAIT_500US 0x00000001 /* like WAIT_1MS, but 0.5 ms */ ++ ++/* ++ * Statistics ++ * ++ * Cleared when reading. ++ */ ++ ++#define MID_STAT 0x05 ++ ++#define MID_VCI_TRASH 0xFFFF0000 /* trashed cells because of VCI mode */ ++#define MID_VCI_TRASH_SHIFT 16 ++#define MID_OVFL_TRASH 0x0000FFFF /* trashed cells because of overflow */ ++ ++/* ++ * Address registers ++ */ ++ ++#define MID_SERV_WRITE 0x06 /* free pos in service area (R, 10 bits) */ ++#define MID_DMA_ADDR 0x07 /* virtual DMA address (R, 32 bits) */ ++#define MID_DMA_WR_RX 0x08 /* (RW, 9 bits) */ ++#define MID_DMA_RD_RX 0x09 ++#define MID_DMA_WR_TX 0x0A ++#define MID_DMA_RD_TX 0x0B ++ ++/* ++ * Transmit Place Registers (0x10+4*channel) ++ */ ++ ++#define MID_TX_PLACE(c) (0x10+4*(c)) ++ ++#define MID_SIZE 0x00003800 /* size, N*256 x 32 bit */ ++#define MID_SIZE_SHIFT 11 ++#define MID_LOCATION 0x000007FF /* location in adapter memory (word) */ ++ ++#define MID_LOC_SKIP 8 /* 8 bits of location are always zero ++ (applies to all uses of location) */ ++ ++/* ++ * Transmit ReadPtr Registers (0x11+4*channel) ++ */ ++ ++#define MID_TX_RDPTR(c) (0x11+4*(c)) ++ ++#define MID_READ_PTR 0x00007FFF /* next word for PHY */ ++ ++/* ++ * Transmit DescrStart Registers (0x12+4*channel) ++ */ ++ ++#define MID_TX_DESCRSTART(c) (0x12+4*(c)) ++ ++#define MID_DESCR_START 0x00007FFF /* seg buffer being DMAed */ ++ ++#define ENI155_MAGIC 0xa54b872d ++ ++struct midway_eprom { ++ unsigned char mac[MAC_LEN],inv_mac[MAC_LEN]; ++ unsigned char pad[36]; ++ unsigned long serial,inv_serial; ++ unsigned long magic,inv_magic; ++}; ++ ++ ++/* ++ * VCI table entry ++ */ ++ ++#define MID_VCI_IN_SERVICE 0x00000001 /* set if VCI is currently in ++ service list */ ++#define MID_VCI_SIZE 0x00038000 /* reassembly buffer size, ++ 2* kB */ ++#define MID_VCI_SIZE_SHIFT 15 ++#define MID_VCI_LOCATION 0x1ffc0000 /* buffer location */ ++#define MID_VCI_LOCATION_SHIFT 18 ++#define MID_VCI_PTI_MODE 0x20000000 /* 0: trash, 1: preserve */ ++#define MID_VCI_MODE 0xc0000000 ++#define MID_VCI_MODE_SHIFT 30 ++#define MID_VCI_READ 0x00007fff ++#define MID_VCI_READ_SHIFT 0 ++#define MID_VCI_DESCR 0x7fff0000 ++#define MID_VCI_DESCR_SHIFT 16 ++#define MID_VCI_COUNT 0x000007ff ++#define MID_VCI_COUNT_SHIFT 0 ++#define MID_VCI_STATE 0x0000c000 ++#define MID_VCI_STATE_SHIFT 14 ++#define MID_VCI_WRITE 0x7fff0000 ++#define MID_VCI_WRITE_SHIFT 16 ++ ++#define MID_MODE_TRASH 0 ++#define MID_MODE_RAW 1 ++#define MID_MODE_AAL5 2 ++ ++/* ++ * Reassembly buffer descriptor ++ */ ++ ++#define MID_RED_COUNT 0x000007ff ++#define MID_RED_CRC_ERR 0x00000800 ++#define MID_RED_T 0x00001000 ++#define MID_RED_CE 0x00010000 ++#define MID_RED_CLP 0x01000000 ++#define MID_RED_IDEN 0xfe000000 ++#define MID_RED_SHIFT 25 ++ ++#define MID_RED_RX_ID 0x1b /* constant identifier */ ++ ++/* ++ * Segmentation buffer descriptor ++ */ ++ ++#define MID_SEG_COUNT MID_RED_COUNT ++#define MID_SEG_RATE 0x01f80000 ++#define MID_SEG_RATE_SHIFT 19 ++#define MID_SEG_PR 0x06000000 ++#define MID_SEG_PR_SHIFT 25 ++#define MID_SEG_AAL5 0x08000000 ++#define MID_SEG_ID 0xf0000000 ++#define MID_SEG_ID_SHIFT 28 ++#define MID_SEG_MAX_RATE 63 ++ ++#define MID_SEG_CLP 0x00000001 ++#define MID_SEG_PTI 0x0000000e ++#define MID_SEG_PTI_SHIFT 1 ++#define MID_SEG_VCI 0x00003ff0 ++#define MID_SEG_VCI_SHIFT 4 ++ ++#define MID_SEG_TX_ID 0xb /* constant identifier */ ++ ++/* ++ * DMA entry ++ */ ++ ++#define MID_DMA_COUNT 0xffff0000 ++#define MID_DMA_COUNT_SHIFT 16 ++#define MID_DMA_END 0x00000020 ++#define MID_DMA_TYPE 0x0000000f ++ ++#define MID_DT_JK 0x3 ++#define MID_DT_WORD 0x0 ++#define MID_DT_2W 0x7 ++#define MID_DT_4W 0x4 ++#define MID_DT_8W 0x5 ++#define MID_DT_16W 0x6 ++#define MID_DT_2WM 0xf ++#define MID_DT_4WM 0xc ++#define MID_DT_8WM 0xd ++#define MID_DT_16WM 0xe ++ ++/* only for RX*/ ++#define MID_DMA_VCI 0x0000ffc0 ++#define MID_DMA_VCI_SHIFT 6 ++ ++/* only for TX */ ++#define MID_DMA_CHAN 0x000001c0 ++#define MID_DMA_CHAN_SHIFT 6 ++ ++#define MID_DT_BYTE 0x1 ++#define MID_DT_HWORD 0x2 ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/suni.c Mon Jun 10 17:36:06 1996 +@@ -0,0 +1,271 @@ ++/* drivers/atm/suni.c - PMC SUNI (PHY) driver */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++ ++#include "suni.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++struct suni_priv { ++ struct sonet_stats sonet_stats; /* link diagnostics */ ++ unsigned char loop_mode; /* loopback mode */ ++ struct atm_dev *dev; /* device back-pointer */ ++ struct suni_priv *next; /* next SUNI */ ++}; ++ ++ ++#define PRIV(dev) ((struct suni_priv *) dev->phy_data) ++ ++#define PUT(val,reg) dev->ops->phy_put(dev,val,SUNI_##reg) ++#define GET(reg) dev->ops->phy_get(dev,SUNI_##reg) ++#define REG_CHANGE(mask,shift,value,reg) \ ++ PUT((GET(reg) & ~(mask)) | ((value) << (shift)),reg) ++ ++ ++static struct timer_list poll_timer = { NULL, NULL, 0L, 0L, NULL }; ++static int start_timer = 1; ++static struct suni_priv *sunis = NULL; ++ ++ ++static void suni_hz(unsigned long dummy) ++{ ++ struct suni_priv *walk; ++ struct atm_dev *dev; ++ struct sonet_stats *stats; ++ ++ for (walk = sunis; walk; walk = walk->next) { ++ dev = walk->dev; ++ stats = &walk->sonet_stats; ++ PUT(0,MRI); /* latch counters */ ++ udelay(1); ++ stats->section_bip += (GET(RSOP_SBL) & 0xff) | ++ ((GET(RSOP_SBM) & 0xff) << 8); ++ if (stats->section_bip < 0) stats->section_bip = LONG_MAX; ++ stats->line_bip += (GET(RLOP_LBL) & 0xff) | ++ ((GET(RLOP_LB) & 0xff) << 8) | ++ ((GET(RLOP_LBM) & 0xff) << 16); ++ if (stats->line_bip < 0) stats->line_bip = LONG_MAX; ++ stats->path_bip += (GET(RPOP_PBL) & 0xff) | ++ ((GET(RPOP_PBM) & 0xff) << 8); ++ if (stats->path_bip < 0) stats->path_bip = LONG_MAX; ++ stats->line_febe += (GET(RLOP_LFL) & 0xff) | ++ ((GET(RLOP_LF) & 0xff) << 8) | ++ ((GET(RLOP_LFM) & 0xff) << 16); ++ if (stats->line_febe < 0) stats->line_febe = LONG_MAX; ++ stats->path_febe += (GET(RPOP_PFL) & 0xff) | ++ ((GET(RPOP_PFM) & 0xff) << 8); ++ if (stats->path_febe < 0) stats->path_febe = LONG_MAX; ++ stats->corr_hcs += GET(RACP_CHEC) & 0xff; ++ if (stats->corr_hcs < 0) stats->corr_hcs = LONG_MAX; ++ stats->uncorr_hcs += GET(RACP_UHEC) & 0xff; ++ if (stats->uncorr_hcs < 0) stats->uncorr_hcs = LONG_MAX; ++ stats->rx_cells += (GET(RACP_RCCL) & 0xff) | ++ ((GET(RACP_RCC) & 0xff) << 8) | ++ ((GET(RACP_RCCM) & 0xff) << 16); ++ if (stats->rx_cells < 0) stats->rx_cells = LONG_MAX; ++ stats->tx_cells += (GET(TACP_TCCL) & 0xff) | ++ ((GET(TACP_TCC) & 0xff) << 8) | ++ ((GET(TACP_TCCM) & 0xff) << 16); ++ if (stats->tx_cells < 0) stats->tx_cells = LONG_MAX; ++ } ++ if (!start_timer) { ++ del_timer(&poll_timer); ++ poll_timer.expires = jiffies+HZ; ++ add_timer(&poll_timer); ++ } ++} ++ ++ ++static int fetch_stats(struct atm_dev *dev,struct sonet_stats *arg,int zero) ++{ ++ unsigned long flags; ++ ++ save_flags(flags); ++ cli(); ++ if (arg) ++ memcpy_tofs(arg,&PRIV(dev)->sonet_stats, ++ sizeof(struct sonet_stats)); ++ if (zero) ++ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++#define HANDLE_FLAG(flag,reg,bit) \ ++ if (todo & flag) { \ ++ if (set) PUT(GET(reg) | bit,reg); \ ++ else PUT(GET(reg) & ~bit,reg); \ ++ todo &= ~flag; \ ++ } ++ ++ ++static int change_diag(struct atm_dev *dev,unsigned long arg,int set) ++{ ++ int todo; ++ ++ todo = get_fs_long(arg); ++ HANDLE_FLAG(SONET_INS_SBIP,TSOP_DIAG,SUNI_TSOP_DIAG_DBIP8); ++ HANDLE_FLAG(SONET_INS_LBIP,TLOP_DIAG,SUNI_TLOP_DIAG_DBIP); ++ HANDLE_FLAG(SONET_INS_PBIP,TPOP_CD,SUNI_TPOP_DIAG_DB3); ++ HANDLE_FLAG(SONET_INS_FRAME,RSOP_CIE,SUNI_RSOP_CIE_FOOF); ++ HANDLE_FLAG(SONET_INS_LAIS,TSOP_CTRL,SUNI_TSOP_CTRL_LAIS); ++ HANDLE_FLAG(SONET_INS_PAIS,TPOP_CD,SUNI_TPOP_DIAG_PAIS); ++ HANDLE_FLAG(SONET_INS_LOS,TSOP_DIAG,SUNI_TSOP_DIAG_DLOS); ++ HANDLE_FLAG(SONET_INS_HCS,TACP_CS,SUNI_TACP_CS_DHCS); ++ put_fs_long(todo,arg); ++ return 0; ++} ++ ++ ++#undef HANDLE_FLAG ++ ++ ++static int get_diag(struct atm_dev *dev,unsigned long arg) ++{ ++ int set; ++ ++ set = 0; ++ if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DBIP8) set |= SONET_INS_SBIP; ++ if (GET(TLOP_DIAG) & SUNI_TLOP_DIAG_DBIP) set |= SONET_INS_LBIP; ++ if (GET(TPOP_CD) & SUNI_TPOP_DIAG_DB3) set |= SONET_INS_PBIP; ++ /* SONET_INS_FRAME is one-shot only */ ++ if (GET(TSOP_CTRL) & SUNI_TSOP_CTRL_LAIS) set |= SONET_INS_LAIS; ++ if (GET(TPOP_CD) & SUNI_TPOP_DIAG_PAIS) set |= SONET_INS_PAIS; ++ if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DLOS) set |= SONET_INS_LOS; ++ if (GET(TACP_CS) & SUNI_TACP_CS_DHCS) set |= SONET_INS_HCS; ++ put_fs_long(set,arg); ++ return 0; ++} ++ ++ ++static int suni_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) ++{ ++ int error; ++ ++ switch (cmd) { ++ case SONET_GETSTATZ: ++ case SONET_GETSTAT: ++ return fetch_stats(dev,(struct sonet_stats *) arg, ++ cmd == SONET_GETSTATZ); ++ case SONET_SETDIAG: ++ return change_diag(dev,arg,1); ++ case SONET_CLRDIAG: ++ return change_diag(dev,arg,0); ++ case SONET_GETDIAG: ++ return get_diag(dev,arg); ++ case SONET_SETFRAMING: ++ if (!suser()) return -EPERM; ++ if (arg != SONET_FRAME_SONET) return -EINVAL; ++ return 0; ++ case SONET_GETFRAMING: ++ put_fs_long(SONET_FRAME_SONET,arg); ++ return 0; ++ case SONET_GETFRSENSE: ++ return -EINVAL; ++ case SUNI_SETLOOP: ++ if (!suser()) return -EPERM; ++ if (arg > SUNI_LM_LOOP) return -EINVAL; ++ PUT((GET(MCT) & ~(SUNI_MCT_DLE | SUNI_MCT_LLE)) | ++ (arg == SUNI_LM_DIAG ? SUNI_MCT_DLE : 0) | ++ (arg == SUNI_LM_LOOP ? SUNI_MCT_LLE : 0),MCT); ++ PRIV(dev)->loop_mode = arg; ++ return 0; ++ case SUNI_GETLOOP: ++ error = verify_area(VERIFY_WRITE,(void *) arg, ++ sizeof(int)); ++ if (error) return error; ++ put_fs_long(PRIV(dev)->loop_mode,arg); ++ return 0; ++ default: ++ return -EINVAL; ++ } ++} ++ ++ ++static void suni_int(struct atm_dev *dev) ++{ ++ printk(KERN_NOTICE "%s(itf %d): signal %s\n",dev->type,dev->number, ++ GET(RSOP_SIS) & SUNI_RSOP_SIS_LOSV ? "lost" : "detected again"); ++} ++ ++ ++static int suni_start(struct atm_dev *dev) ++{ ++ unsigned long flags; ++ ++ if (!(PRIV(dev) = kmalloc(sizeof(struct suni_priv),GFP_KERNEL))) ++ return -ENOMEM; ++ PRIV(dev)->dev = dev; ++ save_flags(flags); ++ cli(); ++ PRIV(dev)->next = sunis; ++ sunis = PRIV(dev); ++ restore_flags(flags); ++ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); ++ PUT(GET(RSOP_CIE) | SUNI_RSOP_CIE_LOSE,RSOP_CIE); ++ /* interrupt on loss of signal */ ++ (void) GET(RSOP_SIS); /* clear SUNI interrupts */ ++ PRIV(dev)->loop_mode = SUNI_LM_NONE; ++ suni_hz(0); /* clear SUNI counters */ ++ (void) fetch_stats(dev,NULL,1); /* clear kernel counters */ ++ cli(); ++ if (!start_timer) restore_flags(flags); ++ else { ++ start_timer = 0; ++ restore_flags(flags); ++ /*init_timer(&poll_timer);*/ ++ poll_timer.expires = jiffies+HZ; ++ poll_timer.function = suni_hz; ++#if 0 ++printk(KERN_DEBUG "[u] p=0x%lx,n=0x%lx\n",(unsigned long) poll_timer.prev, ++ (unsigned long) poll_timer.next); ++#endif ++ add_timer(&poll_timer); ++ } ++ return 0; ++} ++ ++ ++static const struct atmphy_ops suni_ops = { ++ suni_start, ++ suni_ioctl, ++ suni_int ++}; ++ ++ ++int suni_init(struct atm_dev *dev) ++{ ++ unsigned char mri; ++ ++ mri = GET(MRI); /* reset SUNI */ ++ PUT(mri | SUNI_MRI_RESET,MRI); ++ PUT(mri,MRI); ++ PUT(0,MT); /* disable all tests */ ++ REG_CHANGE(SUNI_TPOP_APM_S,SUNI_TPOP_APM_S_SHIFT,SUNI_TPOP_S_SONET, ++ TPOP_APM); /* use SONET */ ++ REG_CHANGE(SUNI_TACP_IUCHP_CLP,0,SUNI_TACP_IUCHP_CLP, ++ TACP_IUCHP); /* idle cells */ ++ PUT(SUNI_IDLE_PATTERN,TACP_IUCPOP); ++ dev->phy = &suni_ops; ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/suni.h Wed Jul 31 19:32:14 1996 +@@ -0,0 +1,219 @@ ++/* drivers/atm/suni.h - PMC SUNI (PHY) declarations */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVER_ATM_SUNI_H ++#define DRIVER_ATM_SUNI_H ++ ++#include ++#include ++ ++ ++/* SUNI registers */ ++ ++#define SUNI_MRI 0x00 /* Master Reset and Identity / Load ++ Meter */ ++#define SUNI_MC 0x01 /* Master Configuration */ ++#define SUNI_MIS 0x02 /* Master Interrupt Status */ ++ /* no 0x03 */ ++#define SUNI_MCM 0x04 /* Master Clock Monitor */ ++#define SUNI_MCT 0x05 /* Master Control */ ++#define SUNI_CSCS 0x06 /* Clock Synthesis Control and Status */ ++#define SUNI_CRCS 0x07 /* Clock Recovery Control and Status */ ++ /* 0x08-0x0F reserved */ ++#define SUNI_RSOP_CIE 0x10 /* RSOP Control/Interrupt Enable */ ++#define SUNI_RSOP_SIS 0x11 /* RSOP Status/Interrupt Status */ ++#define SUNI_RSOP_SBL 0x12 /* RSOP Section BIP-8 LSB */ ++#define SUNI_RSOP_SBM 0x13 /* RSOP Section BIP-8 MSB */ ++#define SUNI_TSOP_CTRL 0x14 /* TSOP Control */ ++#define SUNI_TSOP_DIAG 0x15 /* TSOP Diagnostic */ ++ /* 0x16-0x17 reserved */ ++#define SUNI_RLOP_CS 0x18 /* RLOP Control/Status */ ++#define SUNI_RLOP_IES 0x19 /* RLOP Interrupt Enable/Status */ ++#define SUNI_RLOP_LBL 0x1A /* RLOP Line BIP-8/24 LSB */ ++#define SUNI_RLOP_LB 0x1B /* RLOP Line BIP-8/24 */ ++#define SUNI_RLOP_LBM 0x1C /* RLOP Line BIP-8/24 MSB */ ++#define SUNI_RLOP_LFL 0x1D /* RLOP Line FEBE LSB */ ++#define SUNI_RLOP_LF 0x1E /* RLOP Line FEBE */ ++#define SUNI_RLOP_LFM 0x1F /* RLOP Line FEBE MSB */ ++#define SUNI_TLOP_CTRL 0x20 /* TLOP Control */ ++#define SUNI_TLOP_DIAG 0x21 /* TLOP Diagnostic */ ++ /* 0x22-0x2F reserved */ ++#define SUNI_RPOP_SC 0x30 /* RPOP Status/Control */ ++#define SUNI_RPOP_IS 0x31 /* RPOP Interrupt Status */ ++ /* 0x32 reserved */ ++#define SUNI_RPOP_IE 0x33 /* RPOP Interrupt Enable */ ++ /* 0x34-0x36 reserved */ ++#define SUNI_RPOP_PSL 0x37 /* RPOP Path Signal Label */ ++#define SUNI_RPOP_PBL 0x38 /* RPOP Path BIP-8 LSB */ ++#define SUNI_RPOP_PBM 0x39 /* RPOP Path BIP-8 MSB */ ++#define SUNI_RPOP_PFL 0x3A /* RPOP Path FEBE LSB */ ++#define SUNI_RPOP_PFM 0x3B /* RPOP Path FEBE MSB */ ++ /* 0x3C reserved */ ++#define SUNI_RPOP_PBC 0x3D /* RPOP Path BIP-8 Configuration */ ++ /* 0x3E-0x3F reserved */ ++#define SUNI_TPOP_CD 0x40 /* TPOP Control/Diagnostic */ ++#define SUNI_TPOP_PC 0x41 /* TPOP Pointer Control */ ++ /* 0x42-0x44 reserved */ ++#define SUNI_TPOP_APL 0x45 /* TPOP Arbitrary Pointer LSB */ ++#define SUNI_TPOP_APM 0x46 /* TPOP Arbitrary Pointer MSB */ ++ /* 0x47 reserved */ ++#define SUNI_TPOP_PSL 0x48 /* TPOP Path Signal Label */ ++#define SUNI_TPOP_PS 0x49 /* TPOP Path Status */ ++ /* 0x4A-0x4F reserved */ ++#define SUNI_RACP_CS 0x50 /* RACP Control/Status */ ++#define SUNI_RACP_IES 0x51 /* RACP Interrupt Enable/Status */ ++#define SUNI_RACP_MHP 0x52 /* RACP Match Header Pattern */ ++#define SUNI_RACP_MHM 0x53 /* RACP Match Header Mask */ ++#define SUNI_RACP_CHEC 0x54 /* RACP Correctable HCS Error Count */ ++#define SUNI_RACP_UHEC 0x55 /* RACP Uncorrectable HCS Err Count */ ++#define SUNI_RACP_RCCL 0x56 /* RACP Receive Cell Counter LSB */ ++#define SUNI_RACP_RCC 0x57 /* RACP Receive Cell Counter */ ++#define SUNI_RACP_RCCM 0x58 /* RACP Receive Cell Counter MSB */ ++#define SUNI_RACP_CFG 0x59 /* RACP Configuration */ ++ /* 0x5A-0x5F reserved */ ++#define SUNI_TACP_CS 0x60 /* TACP Control/Status */ ++#define SUNI_TACP_IUCHP 0x61 /* TACP Idle/Unassigned Cell Hdr Pat */ ++#define SUNI_TACP_IUCPOP 0x62 /* TACP Idle/Unassigned Cell Payload ++ Octet Pattern */ ++#define SUNI_TACP_FIFO 0x63 /* TACP FIFO Configuration */ ++#define SUNI_TACP_TCCL 0x64 /* TACP Transmit Cell Counter LSB */ ++#define SUNI_TACP_TCC 0x65 /* TACP Transmit Cell Counter */ ++#define SUNI_TACP_TCCM 0x66 /* TACP Transmit Cell Counter MSB */ ++#define SUNI_TACP_CFG 0x67 /* TACP Configuration */ ++ /* 0x68-0x7F reserved */ ++#define SUNI_MT 0x80 /* Master Test */ ++ /* 0x81-0xFF reserved */ ++ ++/* SUNI register values */ ++ ++ ++/* MRI is reg 0 */ ++#define SUNI_MRI_ID 0x0f /* R, SUNI revision number */ ++#define SUNI_MRI_ID_SHIFT 0 ++#define SUNI_MRI_TYPE 0x70 /* R, SUNI type (lite is 011) */ ++#define SUNI_MRI_TYPE_SHIFT 4 ++#define SUNI_MRI_RESET 0x80 /* RW, reset & power down chip ++ 0: normal operation ++ 1: reset & low power */ ++/* MCT is reg 5 */ ++#define SUNI_MCT_LOOPT 0x01 /* RW, timing source, 0: from ++ TRCLK+/- */ ++#define SUNI_MCT_DLE 0x02 /* RW, diagnostic loopback */ ++#define SUNI_MCT_LLE 0x04 /* RW, line loopback */ ++#define SUNI_MCT_FIXPTR 0x20 /* RW, disable transmit payload pointer ++ adjustments ++ 0: payload ptr controlled by TPOP ++ ptr control reg ++ 1: payload pointer fixed at 522 */ ++#define SUNI_MCT_LCDV 0x40 /* R, loss of cell delineation */ ++#define SUNI_MCT_LCDE 0x80 /* RW, loss of cell delineation ++ interrupt (1: on) */ ++/* RSOP_CIE is reg 0x10 */ ++#define SUNI_RSOP_CIE_OOFE 0x01 /* RW, enable interrupt on frame alarm ++ state change */ ++#define SUNI_RSOP_CIE_LOFE 0x02 /* RW, enable interrupt on loss of ++ frame state change */ ++#define SUNI_RSOP_CIE_LOSE 0x04 /* RW, enable interrupt on loss of ++ signal state change */ ++#define SUNI_RSOP_CIE_BIPEE 0x08 /* RW, enable interrupt on section ++ BIP-8 error (B1) */ ++#define SUNI_RSOP_CIE_FOOF 0x20 /* W, force RSOP out of frame at next ++ boundary */ ++#define SUNI_RSOP_CIE_DDS 0x40 /* RW, disable scrambling */ ++ ++/* RSOP_SIS is reg 0x11 */ ++#define SUNI_RSOP_SIS_OOFV 0x01 /* R, out of frame */ ++#define SUNI_RSOP_SIS_LOFV 0x02 /* R, loss of frame */ ++#define SUNI_RSOP_SIS_LOSV 0x04 /* R, loss of signal */ ++#define SUNI_RSOP_SIS_OOFI 0x08 /* R, out of frame interrupt */ ++#define SUNI_RSOP_SIS_LOFI 0x10 /* R, loss of frame interrupt */ ++#define SUNI_RSOP_SIS_LOSI 0x20 /* R, loss of signal interrupt */ ++#define SUNI_RSOP_SIS_BIPEI 0x40 /* R, section BIP-8 interrupt */ ++ ++/* TSOP_CTRL is reg 0x14 */ ++#define SUNI_TSOP_CTRL_LAIS 0x01 /* insert alarm indication signal */ ++#define SUNI_TSOP_CTRL_DS 0x40 /* disable scrambling */ ++ ++/* TSOP_DIAG is reg 0x15 */ ++#define SUNI_TSOP_DIAG_DFP 0x01 /* insert single bit error cont. */ ++#define SUNI_TSOP_DIAG_DBIP8 0x02 /* insert section BIP err (cont) */ ++#define SUNI_TSOP_DIAG_DLOS 0x04 /* set line to zero (loss of signal) */ ++ ++/* TLOP_DIAG is reg 0x21 */ ++#define SUNI_TLOP_DIAG_DBIP 0x01 /* insert line BIP err (continuously) */ ++ ++/* TPOP_DIAG is reg 0x40 */ ++#define SUNI_TPOP_DIAG_PAIS 0x01 /* insert STS path alarm ind (cont) */ ++#define SUNI_TPOP_DIAG_DB3 0x02 /* insert path BIP err (continuously) */ ++ ++/* TPOP_APM is reg 0x46 */ ++#define SUNI_TPOP_APM_APTR 0x03 /* RW, arbitrary pointer, upper 2 ++ bits */ ++#define SUNI_TPOP_APM_APTR_SHIFT 0 ++#define SUNI_TPOP_APM_S 0x0c /* RW, "unused" bits of payload ++ pointer */ ++#define SUNI_TPOP_APM_S_SHIFT 2 ++#define SUNI_TPOP_APM_NDF 0xf0 /* RW, NDF bits */ ++#define SUNI_TPOP_APM_NDF_SHIFT 4 ++ ++#define SUNI_TPOP_S_SONET 0 /* set S bits to 00 */ ++#define SUNI_TPOP_S_SDH 2 /* set S bits to 10 */ ++ ++/* RACP_IES is reg 0x51 */ ++#define SUNI_RACP_IES_FOVRI 0x02 /* R, FIFO overrun */ ++#define SUNI_RACP_IES_UHCSI 0x04 /* R, uncorrectable HCS error */ ++#define SUNI_RACP_IES_CHCSI 0x08 /* R, correctable HCS error */ ++#define SUNI_RACP_IES_OOCDI 0x10 /* R, change of cell delineation ++ state */ ++#define SUNI_RACP_IES_FIFOE 0x20 /* RW, enable FIFO overrun interrupt */ ++#define SUNI_RACP_IES_HCSE 0x40 /* RW, enable HCS error interrupt */ ++#define SUNI_RACP_IES_OOCDE 0x80 /* RW, enable cell delineation state ++ change interrupt */ ++ ++/* TACP_CS is reg 0x60 */ ++#define SUNI_TACP_CS_FIFORST 0x01 /* RW, reset transmit FIFO (sticky) */ ++#define SUNI_TACP_CS_DSCR 0x02 /* RW, disable payload scrambling */ ++#define SUNI_TACP_CS_HCAADD 0x04 /* RW, add coset polynomial to HCS */ ++#define SUNI_TACP_CS_DHCS 0x10 /* RW, insert HCS errors */ ++#define SUNI_TACP_CS_FOVRI 0x20 /* R, FIFO overrun */ ++#define SUNI_TACP_CS_TSOCI 0x40 /* R, TSOC input high */ ++#define SUNI_TACP_CS_FIFOE 0x80 /* RW, enable FIFO overrun interrupt */ ++ ++/* TACP_IUCHP is reg 0x61 */ ++#define SUNI_TACP_IUCHP_CLP 0x01 /* RW, 8th bit of 4th octet of i/u ++ pattern */ ++#define SUNI_TACP_IUCHP_PTI 0x0e /* RW, 5th-7th bits of 4th octet of i/u ++ pattern */ ++#define SUNI_TACP_IUCHP_PTI_SHIFT 1 ++#define SUNI_TACP_IUCHP_GFC 0xf0 /* RW, 1st-4th bits of 1st octet of i/u ++ pattern */ ++#define SUNI_TACP_IUCHP_GFC_SHIFT 4 ++ ++/* MT is reg 0x80 */ ++#define SUNI_MT_HIZIO 0x01 /* RW, all but data bus & MP interface ++ tri-state */ ++#define SUNI_MT_HIZDATA 0x02 /* W, also tri-state data bus */ ++#define SUNI_MT_IOTST 0x04 /* RW, enable test mode */ ++#define SUNI_MT_DBCTRL 0x08 /* W, control data bus by CSB pin */ ++#define SUNI_MT_PMCTST 0x10 /* W, PMC test mode */ ++ ++ ++#define SUNI_IDLE_PATTERN 0x6a /* idle pattern */ ++ ++/* ioctls */ ++ ++#define SUNI_GETLOOP _IOR('a',ATMIOC_PHYPRV,int) /* get loopback mode */ ++#define SUNI_SETLOOP _IO('a',ATMIOC_PHYPRV+1) /* set loopback mode */ ++ ++#define SUNI_LM_NONE 0 /* no loopback */ ++#define SUNI_LM_DIAG 1 /* diagnostic (i.e. loop TX to RX) */ ++#define SUNI_LM_LOOP 2 /* line (i.e. loop RX to TX) */ ++ ++ ++#ifdef __KERNEL__ ++int suni_init(struct atm_dev *dev); ++#endif ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/tonga.h Mon Jun 10 17:36:07 1996 +@@ -0,0 +1,20 @@ ++/* drivers/atm/tonga.h - Efficient Networks Tonga (PCI bridge) declarations */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVER_ATM_TONGA_H ++#define DRIVER_ATM_TONGA_H ++ ++#define PCI_TONGA_CTRL 0x60 /* control register */ ++ ++#define END_SWAP_DMA 0x80 /* endian swap on DMA */ ++#define END_SWAP_BYTE 0x40 /* endian swap on slave byte accesses */ ++#define END_SWAP_WORD 0x20 /* endian swap on slave word accesses */ ++#define SEPROM_MAGIC 0x0c /* obscure required pattern (ASIC only) */ ++#define SEPROM_DATA 0x02 /* serial EEPROM data (ASIC only) */ ++#define SEPROM_CLK 0x01 /* serial EEPROM clock (ASIC only) */ ++ ++#define SEPROM_ESI_BASE 64 /* start of ESI in serial EEPROM */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/uPD98401.h Mon Jun 10 17:36:08 1996 +@@ -0,0 +1,292 @@ ++/* drivers/atm/uPD98401.h - NEC uPD98401 (SAR) declarations */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVERS_ATM_uPD98401_H ++#define DRIVERS_ATM_uPD98401_H ++ ++ ++#define MAX_CRAM_SIZE (1 << 18) /* 2^18 words */ ++#define RAM_INCREMENT 1024 /* check in 4 kB increments */ ++ ++#define uPD98401_PORTS 0x24 /* probably more ? */ ++ ++ ++/* ++ * Commands ++ */ ++ ++#define uPD98401_OPEN_CHAN 0x20000000 /* open channel */ ++#define uPD98401_CHAN_ADDR 0x0003fff8 /* channel address */ ++#define uPD98401_CHAN_ADDR_SHIFT 3 ++#define uPD98401_CLOSE_CHAN 0x24000000 /* close channel */ ++#define uPD98401_CHAN_RT 0x02000000 /* RX/TX (0 TX, 1 RX) */ ++#define uPD98401_DEACT_CHAN 0x28000000 /* deactivate channel */ ++#define uPD98401_TX_READY 0x30000000 /* TX ready */ ++#define uPD98401_ADD_BAT 0x34000000 /* add batches */ ++#define uPD98401_POOL 0x000f0000 /* pool number */ ++#define uPD98401_POOL_SHIFT 16 ++#define uPD98401_POOL_NUMBAT 0x0000ffff /* number of batches */ ++#define uPD98401_NOP 0x3f000000 /* NOP */ ++#define uPD98401_IND_ACC 0x00000000 /* Indirect Access */ ++#define uPD98401_IA_RW 0x10000000 /* Read/Write (0 W, 1 R) */ ++#define uPD98401_IA_B3 0x08000000 /* Byte select, 1 enable */ ++#define uPD98401_IA_B2 0x04000000 ++#define uPD98401_IA_B1 0x02000000 ++#define uPD98401_IA_B0 0x01000000 ++#define uPD98401_IA_BALL 0x0f000000 /* whole longword */ ++#define uPD98401_IA_TGT 0x000c0000 /* Target */ ++#define uPD98401_IA_TGT_SHIFT 18 ++#define uPD98401_IA_TGT_CM 0 /* - Control Memory */ ++#define uPD98401_IA_TGT_SAR 1 /* - uPD98401 registers */ ++#define uPD98401_IA_TGT_PHY 3 /* - PHY device */ ++#define uPD98401_IA_ADDR 0x0003ffff ++ ++/* ++ * Command Register Status ++ */ ++ ++#define uPD98401_BUSY 0x80000000 /* SAR is busy */ ++#define uPD98401_LOCKED 0x40000000 /* SAR is locked by other CPU */ ++ ++/* ++ * Indications ++ */ ++ ++/* Normal (AAL5) Receive Indication */ ++#define uPD98401_AAL5_UINFO 0xffff0000 /* user-supplied information */ ++#define uPD98401_AAL5_UINFO_SHIFT 16 ++#define uPD98401_AAL5_SIZE 0x0000ffff /* PDU size (in _CELLS_ !!) */ ++#define uPD98401_AAL5_CHAN 0x7fff0000 /* Channel number */ ++#define uPD98401_AAL5_CHAN_SHIFT 16 ++#define uPD98401_AAL5_ERR 0x00008000 /* Error indication */ ++#define uPD98401_AAL5_CI 0x00004000 /* Congestion Indication */ ++#define uPD98401_AAL5_CLP 0x00002000 /* CLP (>= 1 cell had CLP=1) */ ++#define uPD98401_AAL5_ES 0x00000f00 /* Error Status */ ++#define uPD98401_AAL5_ES_SHIFT 8 ++#define uPD98401_AAL5_ES_NONE 0 /* No error */ ++#define uPD98401_AAL5_ES_FREE 1 /* Receiver free buf underflow */ ++#define uPD98401_AAL5_ES_FIFO 2 /* Receiver FIFO overrun */ ++#define uPD98401_AAL5_ES_TOOBIG 3 /* Maximum length violation */ ++#define uPD98401_AAL5_ES_CRC 4 /* CRC error */ ++#define uPD98401_AAL5_ES_ABORT 5 /* User abort */ ++#define uPD98401_AAL5_ES_LENGTH 6 /* Length violation */ ++#define uPD98401_AAL5_ES_T1 7 /* T1 error (timeout) */ ++#define uPD98401_AAL5_ES_DEACT 8 /* Deactivated with DEACT_CHAN */ ++#define uPD98401_AAL5_POOL 0x0000001f /* Free buffer pool number */ ++ ++/* Raw Cell Indication */ ++#define uPD98401_RAW_UINFO uPD98401_AAL5_UINFO ++#define uPD98401_RAW_UINFO_SHIFT uPD98401_AAL5_UINFO_SHIFT ++#define uPD98401_RAW_HEC 0x000000ff /* HEC */ ++#define uPD98401_RAW_CHAN uPD98401_AAL5_CHAN ++#define uPD98401_RAW_CHAN_SHIFT uPD98401_AAL5_CHAN_SHIFT ++ ++/* Transmit Indication */ ++#define uPD98401_TXI_CONN 0x7fff0000 /* Connection Number */ ++#define uPD98401_TXI_CONN_SHIFT 16 ++#define uPD98401_TXI_ACTIVE 0x00008000 /* Channel remains active */ ++#define uPD98401_TXI_PQP 0x00007fff /* Packet Queue Pointer */ ++ ++/* ++ * Directly Addressable Registers ++ */ ++ ++#define uPD98401_GMR 0x00 /* General Mode Register */ ++#define uPD98401_GSR 0x01 /* General Status Register */ ++#define uPD98401_IMR 0x02 /* Interrupt Mask Register */ ++#define uPD98401_RQU 0x03 /* Receive Queue Underrun */ ++#define uPD98401_RQA 0x04 /* Receive Queue Alert */ ++#define uPD98401_ADDR 0x05 /* Last Burst Address */ ++#define uPD98401_VER 0x06 /* Version Number */ ++#define uPD98401_SWR 0x07 /* Software Reset */ ++#define uPD98401_CMR 0x08 /* Command Register */ ++#define uPD98401_CMR_L 0x09 /* Command Register and Lock/Unlock */ ++#define uPD98401_CER 0x0a /* Command Extension Register */ ++#define uPD98401_CER_L 0x0b /* Command Ext Reg and Lock/Unlock */ ++ ++#define uPD98401_MSH(n) (0x10+(n)) /* Mailbox n Start Address High */ ++#define uPD98401_MSL(n) (0x14+(n)) /* Mailbox n Start Address High */ ++#define uPD98401_MBA(n) (0x18+(n)) /* Mailbox n Bottom Address */ ++#define uPD98401_MTA(n) (0x1c+(n)) /* Mailbox n Tail Address */ ++#define uPD98401_MWA(n) (0x20+(n)) /* Mailbox n Write Address */ ++ ++/* GMR is at 0x00 */ ++#define uPD98401_GMR_ONE 0x80000000 /* Must be set to one */ ++#define uPD98401_GMR_SLM 0x40000000 /* Address mode (0 word, 1 byte) */ ++#define uPD98401_GMR_CPE 0x00008000 /* Control Memory Parity Enable */ ++#define uPD98401_GMR_LP 0x00004000 /* Loopback */ ++#define uPD98401_GMR_WA 0x00002000 /* Early Bus Write Abort/RDY */ ++#define uPD98401_GMR_RA 0x00001000 /* Early Read Abort/RDY */ ++#define uPD98401_GMR_SZ 0x00000f00 /* Burst Size Enable */ ++#define uPD98401_BURST16 0x00000800 /* 16-word burst */ ++#define uPD98401_BURST8 0x00000400 /* 8-word burst */ ++#define uPD98401_BURST4 0x00000200 /* 4-word burst */ ++#define uPD98401_BURST2 0x00000100 /* 2-word burst */ ++#define uPD98401_GMR_AD 0x00000080 /* Address (burst resolution) Disable */ ++#define uPD98401_GMR_BO 0x00000040 /* Byte Order (0 little, 1 big) */ ++#define uPD98401_GMR_PM 0x00000020 /* Bus Parity Mode (0 byte, 1 word)*/ ++#define uPD98401_GMR_PC 0x00000010 /* Bus Parity Control (0even,1odd) */ ++#define uPD98401_GMR_BPE 0x00000008 /* Bus Parity Enable */ ++#define uPD98401_GMR_DR 0x00000004 /* Receive Drop Mode (0drop,1don't)*/ ++#define uPD98401_GMR_SE 0x00000002 /* Shapers Enable */ ++#define uPD98401_GMR_RE 0x00000001 /* Receiver Enable */ ++ ++/* GSR is at 0x01, IMR is at 0x02 */ ++#define uPD98401_INT_PI 0x80000000 /* PHY interrupt */ ++#define uPD98401_INT_RQA 0x40000000 /* Receive Queue Alert */ ++#define uPD98401_INT_RQU 0x20000000 /* Receive Queue Underrun */ ++#define uPD98401_INT_RD 0x10000000 /* Receiver Deactivated */ ++#define uPD98401_INT_SPE 0x08000000 /* System Parity Error */ ++#define uPD98401_INT_CPE 0x04000000 /* Control Memory Parity Error */ ++#define uPD98401_INT_SBE 0x02000000 /* System Bus Error */ ++#define uPD98401_INT_IND 0x01000000 /* Initialization Done */ ++#define uPD98401_INT_RCR 0x0000ff00 /* Raw Cell Received */ ++#define uPD98401_INT_RCR_SHIFT 8 ++#define uPD98401_INT_MF 0x000000f0 /* Mailbox Full */ ++#define uPD98401_INT_MF_SHIFT 4 ++#define uPD98401_INT_MM 0x0000000f /* Mailbox Modified */ ++ ++/* VER is at 0x06 */ ++#define uPD98401_MAJOR 0x0000ff00 /* Major revision */ ++#define uPD98401_MAJOR_SHIFT 8 ++#define uPD98401_MINOR 0x000000ff /* Minor revision */ ++ ++/* ++ * Indirectly Addressable Registers ++ */ ++ ++#define uPD98401_IM(n) (0x40000+(n)) /* Scheduler n I and M */ ++#define uPD98401_X(n) (0x40010+(n)) /* Scheduler n X */ ++#define uPD98401_Y(n) (0x40020+(n)) /* Scheduler n Y */ ++#define uPD98401_PC(n) (0x40030+(n)) /* Scheduler n P, C, p and c */ ++#define uPD98401_PS(n) (0x40040+(n)) /* Scheduler n priority and status */ ++ ++/* IM contents */ ++#define uPD98401_IM_I 0xff000000 /* I */ ++#define uPD98401_IM_I_SHIFT 24 ++#define uPD98401_IM_M 0x00ffffff /* M */ ++ ++/* PC contents */ ++#define uPD98401_PC_P 0xff000000 /* P */ ++#define uPD98401_PC_P_SHIFT 24 ++#define uPD98401_PC_C 0x00ff0000 /* C */ ++#define uPD98401_PC_C_SHIFT 16 ++#define uPD98401_PC_p 0x0000ff00 /* p */ ++#define uPD98401_PC_p_SHIFT 8 ++#define uPD98401_PC_c 0x000000ff /* c */ ++ ++/* PS contents */ ++#define uPD98401_PS_PRIO 0xf0 /* Priority level (0 high, 15 low) */ ++#define uPD98401_PS_PRIO_SHIFT 4 ++#define uPD98401_PS_S 0x08 /* Scan - must be 0 (internal) */ ++#define uPD98401_PS_R 0x04 /* Round Robin (internal) */ ++#define uPD98401_PS_A 0x02 /* Active (internal) */ ++#define uPD98401_PS_E 0x01 /* Enabled */ ++ ++#define uPD98401_TOS 0x40100 /* Top of Stack Control Memory Address */ ++#define uPD98401_SMA 0x40200 /* Shapers Control Memory Start Address */ ++#define uPD98401_PMA 0x40201 /* Receive Pool Control Memory Start Address */ ++#define uPD98401_T1R 0x40300 /* T1 Register */ ++#define uPD98401_VRR 0x40301 /* VPI/VCI Reduction Register/Recv. Shutdown */ ++#define uPD98401_TSR 0x40302 /* Time-Stamp Register */ ++ ++/* VRR is at 0x40301 */ ++#define uPD98401_VRR_SDM 0x80000000 /* Shutdown Mode */ ++#define uPD98401_VRR_SHIFT 0x000f0000 /* VPI/VCI Shift */ ++#define uPD98401_VRR_SHIFT_SHIFT 16 ++#define uPD98401_VRR_MASK 0x0000ffff /* VPI/VCI mask */ ++ ++/* ++ * TX packet descriptor ++ */ ++ ++#define uPD98401_TXPD_SIZE 16 /* descriptor size (in bytes) */ ++ ++#define uPD98401_TXPD_V 0x80000000 /* Valid bit */ ++#define uPD98401_TXPD_DP 0x40000000 /* Descriptor (1) or Pointer (0) */ ++#define uPD98401_TXPD_SM 0x20000000 /* Single (1) or Multiple (0) */ ++#define uPD98401_TXPD_CLPM 0x18000000 /* CLP mode */ ++#define uPD98401_CLPM_0 0 /* 00 CLP = 0 */ ++#define uPD98401_CLPM_1 3 /* 11 CLP = 1 */ ++#define uPD98401_CLPM_LAST 1 /* 01 CLP unless last cell */ ++#define uPD98401_TXPD_CLPM_SHIFT 27 ++#define uPD98401_TXPD_PTI 0x07000000 /* PTI pattern */ ++#define uPD98401_TXPD_PTI_SHIFT 24 ++#define uPD98401_TXPD_GFC 0x00f00000 /* GFC pattern */ ++#define uPD98401_TXPD_GFC_SHIFT 20 ++#define uPD98401_TXPD_C10 0x00040000 /* insert CRC-10 */ ++#define uPD98401_TXPD_AAL5 0x00020000 /* AAL5 processing */ ++#define uPD98401_TXPD_MB 0x00010000 /* TX mailbox number */ ++#define uPD98401_TXPD_UU 0x0000ff00 /* CPCS-UU */ ++#define uPD98401_TXPD_UU_SHIFT 8 ++#define uPD98401_TXPD_CPI 0x000000ff /* CPI */ ++ ++/* ++ * TX buffer descriptor ++ */ ++ ++#define uPD98401_TXBD_SIZE 8 /* descriptor size (in bytes) */ ++ ++#define uPD98401_TXBD_LAST 0x80000000 /* last buffer in packet */ ++ ++/* ++ * TX VC table ++ */ ++ ++/* 1st word has the same structure as in a TX packet descriptor */ ++#define uPD98401_TXVC_L 0x80000000 /* last buffer */ ++#define uPD98401_TXVC_SHP 0x0f000000 /* shaper number */ ++#define uPD98401_TXVC_SHP_SHIFT 24 ++#define uPD98401_TXVC_VPI 0x00ff0000 /* VPI */ ++#define uPD98401_TXVC_VPI_SHIFT 16 ++#define uPD98401_TXVC_VCI 0x0000ffff /* VCI */ ++#define uPD98401_TXVC_QRP 6 /* Queue Read Pointer is in word 6 */ ++ ++/* ++ * RX free buffer pools descriptor ++ */ ++ ++#define uPD98401_RXFP_ALERT 0x70000000 /* low water mark */ ++#define uPD98401_RXFP_ALERT_SHIFT 28 ++#define uPD98401_RXFP_BFSZ 0x0f000000 /* buffer size, 64*2^n */ ++#define uPD98401_RXFP_BFSZ_SHIFT 24 ++#define uPD98401_RXFP_BTSZ 0x00ff0000 /* batch size, n+1 */ ++#define uPD98401_RXFP_BTSZ_SHIFT 16 ++#define uPD98401_RXFP_REMAIN 0x0000ffff /* remaining batches in pool */ ++ ++/* ++ * RX VC table ++ */ ++ ++#define uPD98401_RXVC_BTSZ 0xff000000 /* remaining free buffers in batch */ ++#define uPD98401_RXVC_BTSZ_SHIFT 24 ++#define uPD98401_RXVC_MB 0x00200000 /* RX mailbox number */ ++#define uPD98401_RXVC_POOL 0x001f0000 /* free buffer pool number */ ++#define uPD98401_RXVC_POOL_SHIFT 16 ++#define uPD98401_RXVC_UINFO 0x0000ffff /* user-supplied information */ ++#define uPD98401_RXVC_T1 0xffff0000 /* T1 timestamp */ ++#define uPD98401_RXVC_T1_SHIFT 16 ++#define uPD98401_RXVC_PR 0x00008000 /* Packet Reception, 1 if busy */ ++#define uPD98401_RXVC_DR 0x00004000 /* FIFO Drop */ ++#define uPD98401_RXVC_OD 0x00001000 /* Drop OAM cells */ ++#define uPD98401_RXVC_AR 0x00000800 /* AAL5 or raw cell; 1 if AAL5 */ ++#define uPD98401_RXVC_MAXSEG 0x000007ff /* max number of segments per PDU */ ++#define uPD98401_RXVC_REM 0xfffe0000 /* remaining words in curr buffer */ ++#define uPD98401_RXVC_REM_SHIFT 17 ++#define uPD98401_RXVC_CLP 0x00010000 /* CLP received */ ++#define uPD98401_RXVC_BFA 0x00008000 /* Buffer Assigned */ ++#define uPD98401_RXVC_BTA 0x00004000 /* Batch Assigned */ ++#define uPD98401_RXVC_CI 0x00002000 /* Congestion Indication */ ++#define uPD98401_RXVC_DD 0x00001000 /* Dropping incoming cells */ ++#define uPD98401_RXVC_DP 0x00000800 /* like PR ? */ ++#define uPD98401_RXVC_CURSEG 0x000007ff /* Current Segment count */ ++ ++/* ++ * RX lookup table ++ */ ++ ++#define uPD98401_RXLT_ENBL 0x8000 /* Enable */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/uPD98402.h Mon Jun 10 17:36:08 1996 +@@ -0,0 +1,106 @@ ++/* drivers/atm/uPD98402.h - NEC uPD98402 (PHY) declarations */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVERS_ATM_uPD98402_H ++#define DRIVERS_ATM_uPD98402_H ++ ++/* ++ * Registers ++ */ ++ ++#define uPD98402_CMR 0x00 /* Command Register */ ++#define uPD98402_MDR 0x01 /* Mode Register */ ++#define uPD98402_PICR 0x02 /* PHY Interrupt Cause Register */ ++#define uPD98402_PIMR 0x03 /* PHY Interrupt Mask Register */ ++#define uPD98402_ACR 0x04 /* Alarm Cause Register */ ++#define uPD98402_ACMR 0x05 /* Alarm Cause Mask Register */ ++#define uPD98402_PCR 0x06 /* Performance Cause Register */ ++#define uPD98402_PCMR 0x07 /* Performance Cause Mask Register */ ++#define uPD98402_IACM 0x08 /* Internal Alarm Cause Mask Register */ ++#define uPD98402_B1ECT 0x09 /* B1 Error Count Register */ ++#define uPD98402_B2ECT 0x0a /* B2 Error Count Register */ ++#define uPD98402_B3ECT 0x0b /* B3 Error Count Regster */ ++#define uPD98402_PFECB 0x0c /* Path FEBE Count Register */ ++#define uPD98402_LECCT 0x0d /* Line FEBE Count Register */ ++#define uPD98402_HECCT 0x0e /* HEC Error Count Register */ ++#define uPD98402_FJCT 0x0f /* Frequence Justification Count Reg */ ++#define uPD98402_PCOCR 0x10 /* Perf. Counter Overflow Cause Reg */ ++#define uPD98402_PCOMR 0x11 /* Perf. Counter Overflow Mask Reg */ ++#define uPD98402_C11T 0x20 /* C11T Data Register */ ++#define uPD98402_C12T 0x21 /* C12T Data Register */ ++#define uPD98402_C13T 0x22 /* C13T Data Register */ ++#define uPD98402_F1T 0x23 /* F1T Data Register */ ++#define uPD98402_K2T 0x25 /* K2T Data Register */ ++#define uPD98402_C2T 0x26 /* C2T Data Register */ ++#define uPD98402_F2T 0x27 /* F2T Data Register */ ++#define uPD98402_C11R 0x30 /* C11T Data Register */ ++#define uPD98402_C12R 0x31 /* C12T Data Register */ ++#define uPD98402_C13R 0x32 /* C13T Data Register */ ++#define uPD98402_F1R 0x33 /* F1T Data Register */ ++#define uPD98402_K2R 0x35 /* K2T Data Register */ ++#define uPD98402_C2R 0x36 /* C2T Data Register */ ++#define uPD98402_F2R 0x37 /* F2T Data Register */ ++ ++/* CMR is at 0x00 */ ++#define uPD98402_CMR_PFRF 0x01 /* Send path FERF */ ++#define uPD98402_CMR_LFRF 0x02 /* Send line FERF */ ++#define uPD98402_CMR_PAIS 0x04 /* Send path AIS */ ++#define uPD98402_CMR_LAIS 0x08 /* Send line AIS */ ++ ++/* MDR is at 0x01 */ ++#define uPD98402_MDR_ALP 0x01 /* ATM layer loopback */ ++#define uPD98402_MDR_TPLP 0x02 /* PMD loopback, to host */ ++#define uPD98402_MDR_RPLP 0x04 /* PMD loopback, to network */ ++#define uPD98402_MDR_SS0 0x08 /* SS0 */ ++#define uPD98402_MDR_SS1 0x10 /* SS1 */ ++#define uPD98402_MDR_SS_MASK 0x18 /* mask */ ++#define uPD98402_MDR_SS_SHIFT 3 /* shift */ ++#define uPD98402_MDR_HEC 0x20 /* disable HEC inbound processing */ ++#define uPD98402_MDR_FSR 0x40 /* disable frame scrambler */ ++#define uPD98402_MDR_CSR 0x80 /* disable cell scrambler */ ++ ++/* PICR is at 0x02, PIMR is at 0x03 */ ++#define uPD98402_INT_PFM 0x01 /* performance counter has changed */ ++#define uPD98402_INT_ALM 0x02 /* line fault */ ++#define uPD98402_INT_RFO 0x04 /* receive FIFO overflow */ ++#define uPD98402_INT_PCO 0x08 /* performance counter overflow */ ++#define uPD98402_INT_OTD 0x20 /* OTD has occurred */ ++#define uPD98402_INT_LOS 0x40 /* Loss Of Signal */ ++#define uPD98402_INT_LOF 0x80 /* Loss Of Frame */ ++ ++/* ACR is as 0x04, ACMR is at 0x05 */ ++#define uPD98402_ALM_PFRF 0x01 /* path FERF */ ++#define uPD98402_ALM_LFRF 0x02 /* line FERF */ ++#define uPD98402_ALM_PAIS 0x04 /* path AIS */ ++#define uPD98402_ALM_LAIS 0x08 /* line AIS */ ++#define uPD98402_ALM_LOD 0x10 /* loss of delineation */ ++#define uPD98402_ALM_LOP 0x20 /* loss of pointer */ ++#define uPD98402_ALM_OOF 0x40 /* out of frame */ ++ ++/* PCR is at 0x06, PCMR is at 0x07 */ ++#define uPD98402_PFM_PFEB 0x01 /* path FEBE */ ++#define uPD98402_PFM_LFEB 0x02 /* line FEBE */ ++#define uPD98402_PFM_B3E 0x04 /* B3 error */ ++#define uPD98402_PFM_B2E 0x08 /* B2 error */ ++#define uPD98402_PFM_B1E 0x10 /* B1 error */ ++#define uPD98402_PFM_FJ 0x20 /* frequency justification */ ++ ++/* IACM is at 0x08 */ ++#define uPD98402_IACM_PFRF 0x01 /* don't generate path FERF */ ++#define uPD98402_IACM_LFRF 0x02 /* don't generate line FERF */ ++ ++/* PCOCR is at 0x010, PCOMR is at 0x11 */ ++#define uPD98402_PCO_B1EC 0x01 /* B1ECT overflow */ ++#define uPD98402_PCO_B2EC 0x02 /* B2ECT overflow */ ++#define uPD98402_PCO_B3EC 0x04 /* B3ECT overflow */ ++#define uPD98402_PCO_PFBC 0x08 /* PFEBC overflow */ ++#define uPD98402_PCO_LFBC 0x10 /* LFEVC overflow */ ++#define uPD98402_PCO_HECC 0x20 /* HECCT overflow */ ++#define uPD98402_PCO_FJC 0x40 /* FJCT overflow */ ++ ++ ++int uPD98402_init(struct atm_dev *dev); ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/uPD98402.c Mon Jun 10 17:36:09 1996 +@@ -0,0 +1,201 @@ ++/* drivers/atm/uPD98402.c - NEC uPD98402 (PHY) declarations */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include /* for jiffies */ ++#include ++#include ++#include ++#include ++#include ++ ++#include "uPD98402.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++struct uPD98402_priv { ++ struct sonet_stats sonet_stats; /* link diagnostics */ ++ unsigned char framing; /* SONET/SDH framing */ ++}; ++ ++ ++#define PRIV(dev) ((struct uPD98402_priv *) dev->phy_data) ++ ++#define PUT(val,reg) dev->ops->phy_put(dev,val,uPD98402_##reg) ++#define GET(reg) dev->ops->phy_get(dev,uPD98402_##reg) ++ ++ ++static int fetch_stats(struct atm_dev *dev,struct sonet_stats *arg,int zero) ++{ ++ unsigned long flags; ++ ++ save_flags(flags); ++ cli(); ++ PRIV(dev)->sonet_stats.uncorr_hcs += GET(HECCT); ++ if (arg) ++ memcpy_tofs(arg,&PRIV(dev)->sonet_stats, ++ sizeof(struct sonet_stats)); ++ if (zero) { ++ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); ++ PRIV(dev)->sonet_stats.corr_hcs = -1; ++ PRIV(dev)->sonet_stats.tx_cells = -1; ++ PRIV(dev)->sonet_stats.rx_cells = -1; ++ } ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++static int set_framing(struct atm_dev *dev,unsigned char framing) ++{ ++ static const unsigned char sonet[] = { 1,2,3,0 }; ++ static const unsigned char sdh[] = { 1,0,0,2 }; ++ const char *set; ++ unsigned long flags; ++ ++ switch (framing) { ++ case SONET_FRAME_SONET: ++ set = sonet; ++ break; ++ case SONET_FRAME_SDH: ++ set = sdh; ++ break; ++ default: ++ return -EINVAL; ++ } ++ save_flags(flags); ++ cli(); ++ PUT(set[0],C11T); ++ PUT(set[1],C12T); ++ PUT(set[2],C13T); ++ PUT((GET(MDR) & ~uPD98402_MDR_SS_MASK) | (set[3] << ++ uPD98402_MDR_SS_SHIFT),MDR); ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++static int get_sense(struct atm_dev *dev,unsigned long arg) ++{ ++ unsigned long flags; ++ ++ save_flags(flags); ++ cli(); ++ put_fs_byte(GET(C11R),arg); ++ put_fs_byte(GET(C12R),arg+1); ++ put_fs_byte(GET(C13R),arg+2); ++ put_fs_byte(0xff,arg+3); ++ put_fs_byte(0xff,arg+4); ++ put_fs_byte(0xff,arg+5); ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++static int uPD98402_ioctl(struct atm_dev *dev,unsigned int cmd, ++ unsigned long arg) ++{ ++ switch (cmd) { ++ ++ case SONET_GETSTATZ: ++ case SONET_GETSTAT: ++ return fetch_stats(dev,(struct sonet_stats *) arg, ++ cmd == SONET_GETSTATZ); ++ case SONET_SETFRAMING: ++ return set_framing(dev,arg); ++ case SONET_GETFRAMING: ++ put_fs_long(PRIV(dev)->framing,arg); ++ return 0; ++ case SONET_GETFRSENSE: ++ return get_sense(dev,arg); ++ default: ++ return -EINVAL; ++ } ++} ++ ++ ++static void stat_event(struct atm_dev *dev) ++{ ++ unsigned char events; ++ ++ events = GET(PCR); ++ if (events & uPD98402_PFM_PFEB) ++ if ((PRIV(dev)->sonet_stats.path_febe += GET(PFECB)) < 0) ++ PRIV(dev)->sonet_stats.path_febe = LONG_MAX; ++ if (events & uPD98402_PFM_LFEB) ++ if ((PRIV(dev)->sonet_stats.line_febe += GET(LECCT)) < 0) ++ PRIV(dev)->sonet_stats.line_febe = LONG_MAX; ++ if (events & uPD98402_PFM_B3E) ++ if ((PRIV(dev)->sonet_stats.path_bip += GET(B3ECT)) < 0) ++ PRIV(dev)->sonet_stats.path_bip = LONG_MAX; ++ if (events & uPD98402_PFM_B2E) ++ if ((PRIV(dev)->sonet_stats.line_bip += GET(B2ECT)) < 0) ++ PRIV(dev)->sonet_stats.line_bip = LONG_MAX; ++ if (events & uPD98402_PFM_B1E) ++ if ((PRIV(dev)->sonet_stats.section_bip += GET(B1ECT)) < 0) ++ PRIV(dev)->sonet_stats.section_bip = LONG_MAX; ++} ++ ++ ++static void uPD98402_int(struct atm_dev *dev) ++{ ++ static unsigned long silence = 0; ++ unsigned char reason; ++ ++ while ((reason = GET(PICR))) { ++ if (reason & uPD98402_INT_LOS) ++ printk(KERN_NOTICE "%s(itf %d): signal lost\n", ++ dev->type,dev->number); ++ if (reason & uPD98402_INT_PFM) stat_event(dev); ++ if (reason & uPD98402_INT_PCO) { ++ (void) GET(PCOCR); /* clear interrupt cause */ ++ PRIV(dev)->sonet_stats.uncorr_hcs += GET(HECCT); ++ } ++ if ((reason & uPD98402_INT_RFO) && jiffies > silence) { ++ printk(KERN_WARNING "%s(itf %d): uPD98402 receive " ++ "FIFO overflow\n",dev->type,dev->number); ++ silence = jiffies+HZ/2; ++ } ++ } ++} ++ ++ ++static int uPD98402_start(struct atm_dev *dev) ++{ ++DPRINTK("phy_start\n"); ++ if (!(PRIV(dev) = kmalloc(sizeof(struct uPD98402_priv),GFP_KERNEL))) ++ return -ENOMEM; ++ memset(&PRIV(dev)->sonet_stats,0,sizeof(struct sonet_stats)); ++ (void) GET(PCR); /* clear performance events */ ++ PUT(uPD98402_PFM_FJ,PCMR); /* ignore frequency adj */ ++ (void) GET(PCOCR); /* clear overflows */ ++ PUT(~uPD98402_PCO_HECC,PCOMR); ++ (void) GET(PICR); /* clear interrupts */ ++ PUT(~(uPD98402_INT_PFM | uPD98402_INT_ALM | uPD98402_INT_RFO | ++ uPD98402_INT_LOS),PIMR); /* enable them */ ++ (void) fetch_stats(dev,NULL,1); /* clear kernel counters */ ++ return 0; ++} ++ ++ ++ ++static const struct atmphy_ops uPD98402_ops = { ++ uPD98402_start, ++ uPD98402_ioctl, /* no ioctl yet */ ++ uPD98402_int ++}; ++ ++ ++int uPD98402_init(struct atm_dev *dev) ++{ ++DPRINTK("phy_init\n"); ++ dev->phy = &uPD98402_ops; ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/zatm.c Tue Jul 30 22:08:08 1996 +@@ -0,0 +1,1659 @@ ++/* drivers/atm/zatm.c - ZeitNet ZN122x device driver */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include /* for request_region */ ++#include ++#include ++#include ++#include ++#include ++ ++#include "uPD98401.h" ++#include "uPD98402.h" ++#include "zeprom.h" ++#include "zatm.h" ++ ++ ++/* ++ * TODO: ++ * ++ * Minor features ++ * - support 64 kB SDUs (will have to use multibuffer batches then :-( ) ++ * - proper use of CDV, credit = max(1,CDVT*PCR) ++ * - AAL0 ++ * - better receive timestamps ++ * - OAM ++ */ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++#ifndef CONFIG_ATM_ZATM_DEBUG ++ ++ ++#define NULLCHECK(x) ++ ++#define EVENT(s,a,b) ++ ++ ++static void event_dump(void) ++{ ++} ++ ++ ++#else ++ ++ ++/* ++ * NULL pointer checking ++ */ ++ ++#define NULLCHECK(x) \ ++ if ((unsigned long) (x) < 0x30) printk(KERN_CRIT #x "==0x%x\n", (int) (x)) ++ ++/* ++ * Very extensive activity logging. Greatly improves bug detection speed but ++ * costs a few Mbps if enabled. ++ */ ++ ++#define EV 64 ++ ++static const char *ev[EV]; ++static unsigned long ev_a[EV],ev_b[EV]; ++static int ec = 0; ++ ++ ++static void EVENT(const char *s,unsigned long a,unsigned long b) ++{ ++ ev[ec] = s; ++ ev_a[ec] = a; ++ ev_b[ec] = b; ++ ec = (ec+1) % EV; ++} ++ ++ ++static void event_dump(void) ++{ ++ int n,i; ++ ++ printk(KERN_NOTICE "----- event dump follows -----\n"); ++ for (n = 0; n < EV; n++) { ++ i = (ec+n) % EV; ++ printk(KERN_NOTICE); ++ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); ++ } ++ printk(KERN_NOTICE "----- event dump ends here -----\n"); ++} ++ ++ ++#endif /* CONFIG_ATM_ZATM_DEBUG */ ++ ++ ++#define RING_BUSY 1 /* indication from do_tx that PDU has to be ++ backlogged */ ++ ++static struct atm_dev *zatm_boards = NULL; ++static unsigned long dummy[2] = {0,0}; ++ ++ ++#define zin_n(r) inl_p(zatm_dev->base+r*4) ++#define zin(r) inl_p(zatm_dev->base+uPD98401_##r*4) ++#define zout(v,r) outl_p(v,zatm_dev->base+uPD98401_##r*4) ++#define zwait while (zin(CMR) & uPD98401_BUSY) ++ ++/* RX0, RX1, TX0, TX1 */ ++static const int mbx_entries[NR_MBX] = { 1024,1024,1024,1024 }; ++static const int mbx_esize[NR_MBX] = { 16,16,4,4 }; /* entry size in bytes */ ++ ++#define MBX_SIZE(i) (mbx_entries[i]*mbx_esize[i]) ++ ++ ++/*-------------------------------- utilities --------------------------------*/ ++ ++ ++static void zpokel(struct zatm_dev *zatm_dev,unsigned long value, ++ unsigned long addr) ++{ ++ zwait; ++ zout(value,CER); ++ zout(uPD98401_IND_ACC | uPD98401_IA_BALL | ++ (uPD98401_IA_TGT_CM << uPD98401_IA_TGT_SHIFT) | addr,CMR); ++} ++ ++ ++static unsigned long zpeekl(struct zatm_dev *zatm_dev,unsigned long addr) ++{ ++ zwait; ++ zout(uPD98401_IND_ACC | uPD98401_IA_BALL | uPD98401_IA_RW | ++ (uPD98401_IA_TGT_CM << uPD98401_IA_TGT_SHIFT) | addr,CMR); ++ zwait; ++ return zin(CER); ++} ++ ++ ++/*------------------------------- free lists --------------------------------*/ ++ ++ ++#define HEAD_SIZE (3*sizeof(void *)) ++ ++ ++static void refill_pool(struct atm_dev *dev,int pool) ++{ ++ struct zatm_dev *zatm_dev; ++ struct sk_buff *skb,*first; ++ unsigned long flags; ++ int align,offset,free,count,size; ++ ++ EVENT("refill_pool\n",0,0); ++ zatm_dev = ZATM_DEV(dev); ++ size = (64 << (pool <= ZATM_AAL5_POOL_BASE ? 0 : ++ pool-ZATM_AAL5_POOL_BASE))+HEAD_SIZE; ++ if (size < PAGE_SIZE) { ++ align = 32; /* for 32 byte alignment */ ++ offset = HEAD_SIZE; ++ } ++ else { ++ align = 4096; ++ offset = zatm_dev->pool_info[pool].offset+HEAD_SIZE; ++ } ++ size += align; ++ save_flags(flags); ++ cli(); ++ free = zpeekl(zatm_dev,zatm_dev->pool_base+2*pool) & ++ uPD98401_RXFP_REMAIN; ++ restore_flags(flags); ++ if (free >= zatm_dev->pool_info[pool].low_water) return; ++ EVENT("starting ... POOL: 0x%08lx, 0x%08lx\n", ++ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool), ++ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool+1)); ++ EVENT("dummy: 0x%08lx, 0x%08lx\n",dummy[0],dummy[1]); ++ count = 0; ++ first = NULL; ++ while (free < zatm_dev->pool_info[pool].high_water) { ++ skb = alloc_skb(size,GFP_ATOMIC); ++ if (!skb) { ++ printk(KERN_WARNING DEV_LABEL "(Itf %d): got no new " ++ "skb (%d) with %d free\n",dev->number,size,free); ++ break; ++ } ++ if (!first) first = skb; ++ count++; ++ /* ++ * 2nd skb head structure: ++ * [0] pointer to buffer (for SAR) ++ * [1] buffer descr link pointer (for SAR) ++ * [2] back pointer to skb (for poll_rx) ++ * [3] data ++ * ... ++ */ ++ skb->free = 1; ++ skb->data = (void *) ((((unsigned long) skb->data+align+ ++ offset-1) & ~(align-1))-offset); ++ ((void **) skb->data)[0] = skb->data+HEAD_SIZE; ++ ((void **) skb->data)[1] = NULL; ++ ((void **) skb->data)[2] = skb; ++ EVENT("enq skb 0x%08lx/0x%08lx\n",(unsigned long) skb, ++ (unsigned long) skb->data); ++ cli(); ++ if (zatm_dev->last_free[pool]) ++ ((void **) zatm_dev->last_free[pool]->data)[-2] = ++ skb->data; ++ zatm_dev->last_free[pool] = skb; ++ skb->data += HEAD_SIZE; ++ skb_queue_tail(&zatm_dev->pool[pool],skb); ++ restore_flags(flags); ++ free++; ++ } ++ if (first) { ++ cli(); ++ zwait; ++ zout((unsigned long) first->data-HEAD_SIZE,CER); ++ zout(uPD98401_ADD_BAT | (pool << uPD98401_POOL_SHIFT) | count, ++ CMR); ++ restore_flags(flags); ++ EVENT ("POOL: 0x%08lx, 0x%08lx\n", ++ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool), ++ zpeekl(zatm_dev,zatm_dev->pool_base+2*pool+1)); ++ EVENT("dummy: 0x%08lx, 0x%08lx\n",dummy[0],dummy[1]); ++ } ++} ++ ++ ++static void drain_free(struct atm_dev *dev,int pool) ++{ ++ struct sk_buff *skb; ++ ++ while ((skb = skb_dequeue(&ZATM_DEV(dev)->pool[pool]))) ++ kfree_skb(skb,FREE_READ); ++} ++ ++ ++static int pool_index(int max_pdu) ++{ ++ int i; ++ ++ max_pdu += ATM_CELL_PAYLOAD-1; ++ if (max_pdu > 65536) return -1; ++ for (i = 0; (64 << i) < max_pdu; i++); ++ return i+ZATM_AAL5_POOL_BASE; ++} ++ ++ ++/* use_pool isn't reentrant */ ++ ++ ++static void use_pool(struct atm_dev *dev,int pool) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long flags; ++ int size; ++ ++ zatm_dev = ZATM_DEV(dev); ++ if (!(zatm_dev->pool_info[pool].ref_count++)) { ++ skb_queue_head_init(&zatm_dev->pool[pool]); ++ size = pool-ZATM_AAL5_POOL_BASE; ++ if (size < 0) size = 0; /* 64B... */ ++ else if (size > 10) size = 10; /* ... 64kB */ ++ save_flags(flags); ++ cli(); ++ zpokel(zatm_dev,((zatm_dev->pool_info[pool].low_water/4) << ++ uPD98401_RXFP_ALERT_SHIFT) | ++ (1 << uPD98401_RXFP_BTSZ_SHIFT) | ++ (size << uPD98401_RXFP_BFSZ_SHIFT), ++ zatm_dev->pool_base+pool*2); ++ zpokel(zatm_dev,(unsigned long) dummy,zatm_dev->pool_base+ ++ pool*2+1); ++ restore_flags(flags); ++ zatm_dev->last_free[pool] = NULL; ++ refill_pool(dev,pool); ++ } ++ DPRINTK("pool %d: %d\n",pool,zatm_dev->pool_info[pool].ref_count); ++} ++ ++ ++static void unuse_pool(struct atm_dev *dev,int pool) ++{ ++ if (!(--ZATM_DEV(dev)->pool_info[pool].ref_count)) ++ drain_free(dev,pool); ++} ++ ++ ++static void zatm_feedback(struct atm_vcc *vcc,struct sk_buff *skb, ++ unsigned long start,unsigned long dest,int len) ++{ ++ struct zatm_pool_info *pool; ++ unsigned long offset,flags; ++ ++ DPRINTK("start 0x%08lx dest 0x%08lx len %d\n",start,dest,len); ++ if (len < PAGE_SIZE) return; ++ pool = &ZATM_DEV(vcc->dev)->pool_info[ZATM_VCC(vcc)->pool]; ++ offset = (dest-start) & (PAGE_SIZE-1); ++ save_flags(flags); ++ cli(); ++ if (!offset || pool->offset == offset) { ++ pool->next_cnt = 0; ++ return; ++ } ++ if (offset != pool->next_off) { ++ pool->next_off = offset; ++ pool->next_cnt = 0; ++ return; ++ } ++ if (++pool->next_cnt >= pool->next_thres) { ++ pool->offset = pool->next_off; ++ pool->next_cnt = 0; ++ } ++ restore_flags(flags); ++} ++ ++ ++/*----------------------------------- RX ------------------------------------*/ ++ ++ ++#if 0 ++static void exception(struct atm_vcc *vcc) ++{ ++ static int count = 0; ++ struct zatm_dev *zatm_dev = ZATM_DEV(vcc->dev); ++ struct zatm_vcc *zatm_vcc = ZATM_VCC(vcc); ++ unsigned long *qrp; ++ int i; ++ ++ if (count++ > 2) return; ++ for (i = 0; i < 8; i++) ++ printk("TX%d: 0x%08lx\n",i, ++ zpeekl(zatm_dev,zatm_vcc->tx_chan*VC_SIZE/4+i)); ++ for (i = 0; i < 5; i++) ++ printk("SH%d: 0x%08lx\n",i, ++ zpeekl(zatm_dev,uPD98401_IM(zatm_vcc->shaper)+16*i)); ++ qrp = (unsigned long *) zpeekl(zatm_dev,zatm_vcc->tx_chan*VC_SIZE/4+ ++ uPD98401_TXVC_QRP); ++ printk("qrp=0x%08lx\n",(unsigned long) qrp); ++ for (i = 0; i < 4; i++) printk("QRP[%d]: 0x%08lx",i,qrp[i]); ++} ++#endif ++ ++ ++static const char *err_txt[] = { ++ "No error", ++ "RX buf underflow", ++ "RX FIFO overrun", ++ "Maximum len violation", ++ "CRC error", ++ "User abort", ++ "Length violation", ++ "T1 error", ++ "Deactivated", ++ "???", ++ "???", ++ "???", ++ "???", ++ "???", ++ "???", ++ "???" ++}; ++ ++ ++static void poll_rx(struct atm_dev *dev,int mbx) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long pos,x; ++ int error; ++ ++ EVENT("poll_rx\n",0,0); ++ zatm_dev = ZATM_DEV(dev); ++ pos = (zatm_dev->mbx_start[mbx] & ~0xffff) | zin(MTA(mbx)); ++ while (x = zin(MWA(mbx)), (pos & 0xffff) != x) { ++ unsigned long *here; ++ struct sk_buff *skb; ++ struct atm_vcc *vcc; ++ int cells,size,chan; ++ ++ EVENT("MBX: host 0x%lx, nic 0x%lx\n",pos,x); ++ here = (unsigned long *) pos; ++ if (((pos += 16) & 0xffff) == zatm_dev->mbx_end[mbx]) ++ pos = zatm_dev->mbx_start[mbx]; ++ cells = here[0] & uPD98401_AAL5_SIZE; ++#if 0 ++{ ++unsigned long *x; ++printk("RX IND: 0x%08x, 0x%08x, 0x%08x, 0x%08x\n",here[0],here[1],here[2], ++ here[3]); ++ printk("POOL: 0x%08lx, 0x%08lx\n",zpeekl(zatm_dev, ++ zatm_dev->pool_base), ++ zpeekl(zatm_dev,zatm_dev->pool_base+1)); ++ x = (unsigned long *) here[2]; ++ printk("[0..3] = 0x%08lx, 0x%08lx, 0x%08lx, 0x%08lx\n", ++ x[0],x[1],x[2],x[3]); ++} ++#endif ++ error = 0; ++ if (here[3] & uPD98401_AAL5_ERR) { ++ error = (here[3] & uPD98401_AAL5_ES) >> ++ uPD98401_AAL5_ES_SHIFT; ++ if (error == uPD98401_AAL5_ES_DEACT || ++ error == uPD98401_AAL5_ES_FREE) continue; ++ } ++EVENT("error code 0x%x/0x%x\n",(here[3] & uPD98401_AAL5_ES) >> ++ uPD98401_AAL5_ES_SHIFT,error); ++ skb = (struct sk_buff *) ((void **) here[2])[2]; ++ skb->atm.timestamp = xtime; ++#if 0 ++printk("[-3..0] 0x%08lx 0x%08lx 0x%08lx 0x%08lx\n",((unsigned *) skb->data)[-3], ++ ((unsigned *) skb->data)[-2],((unsigned *) skb->data)[-1], ++ ((unsigned *) skb->data)[0]); ++#endif ++ EVENT("skb 0x%08lx, here 0x%08lx\n",(unsigned long) skb, ++ (unsigned long) here); ++#if 0 ++printk("dummy: 0x%08lx, 0x%08lx\n",dummy[0],dummy[1]); ++#endif ++ size = error ? 0 : ntohs(((unsigned short *) skb->data)[cells* ++ ATM_CELL_PAYLOAD/sizeof(unsigned short)-3]); ++ EVENT("got skb 0x%lx, size %d\n",(unsigned long) skb,size); ++ chan = (here[3] & uPD98401_AAL5_CHAN) >> ++ uPD98401_AAL5_CHAN_SHIFT; ++ if (chan < zatm_dev->chans && zatm_dev->rx_map[chan]) { ++ vcc = zatm_dev->rx_map[chan]; ++ if (skb == zatm_dev->last_free[ZATM_VCC(vcc)->pool]) ++ zatm_dev->last_free[ZATM_VCC(vcc)->pool] = NULL; ++ skb_unlink(skb); ++ } ++ else { ++ printk(KERN_ERR DEV_LABEL "(itf %d): RX indication " ++ "for non-existing channel\n",dev->number); ++ size = 0; ++ vcc = NULL; ++ event_dump(); ++ } ++ if (error) { ++ static unsigned long silence = 0; ++ static int last_error = 0; ++ ++ if (error != last_error || jiffies > silence) { ++ printk(KERN_WARNING DEV_LABEL "(itf %d): " ++ "chan %d error %s\n",dev->number,chan, ++ err_txt[error]); ++ last_error = error; ++ silence = jiffies+2*HZ; ++ } ++ size = 0; ++ } ++ if (size && (size > cells*ATM_CELL_PAYLOAD-ATM_AAL5_TRAILER || ++ size <= (cells-1)*ATM_CELL_PAYLOAD-ATM_AAL5_TRAILER)) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): size %d with %d " ++ "cells\n",dev->number,size,cells); ++ size = 0; ++ event_dump(); ++ } ++ if (size > ATM_MAX_AAL5_PDU) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): size too big " ++ "(%d)\n",dev->number,size); ++ size = 0; ++ event_dump(); ++ } ++ if (!size) { ++ kfree_skb(skb,FREE_READ); ++ if (vcc) vcc->stats->rx_err++; ++ } ++ else { ++ skb->len = size; ++ skb->atm.vcc = vcc; ++ vcc->push(skb->atm.vcc,skb); ++ vcc->stats->rx++; ++ } ++#if 0 ++if (vcc && size == 2) exception(vcc); ++#endif ++ } ++ zout(pos & 0xffff,MTA(mbx)); ++#if 0 /* probably a stupid idea */ ++ refill_pool(dev,zatm_vcc->pool); ++ /* maybe this saves us a few interrupts */ ++#endif ++} ++ ++ ++static int open_rx_first(struct atm_vcc *vcc) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long flags; ++ unsigned short chan; ++ int cells; ++ ++ DPRINTK("open_rx_first (0x%x)\n",inb_p(0xc053)); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ zatm_vcc = ZATM_VCC(vcc); ++ zatm_vcc->rx_chan = 0; ++ if (vcc->qos.rxtp.traffic_class == ATM_NONE) return 0; ++ if (vcc->aal == ATM_AAL5) { ++ if (vcc->qos.rxtp.max_sdu > 65464) ++ vcc->qos.rxtp.max_sdu = 65464; ++ /* fix this - we may want to receive 64kB SDUs ++ later */ ++ cells = (vcc->qos.rxtp.max_sdu+ATM_AAL5_TRAILER+ ++ ATM_CELL_PAYLOAD-1)/ATM_CELL_PAYLOAD; ++ zatm_vcc->pool = pool_index(cells*ATM_CELL_PAYLOAD); ++ } ++ else { ++ cells = 1; ++ zatm_vcc->pool = ZATM_AAL0_POOL; ++ } ++ if (zatm_vcc->pool < 0) return -EMSGSIZE; ++ save_flags(flags); ++ cli(); ++ zwait; ++ zout(uPD98401_OPEN_CHAN,CMR); ++ zwait; ++ DPRINTK("0x%x 0x%x\n",zin(CMR),zin(CER)); ++ chan = (zin(CMR) & uPD98401_CHAN_ADDR) >> uPD98401_CHAN_ADDR_SHIFT; ++ restore_flags(flags); ++ DPRINTK("chan is %d\n",chan); ++ if (!chan) return -EAGAIN; ++ use_pool(vcc->dev,zatm_vcc->pool); ++ DPRINTK("pool %d\n",zatm_vcc->pool); ++ /* set up VC descriptor */ ++ cli(); ++ zpokel(zatm_dev,zatm_vcc->pool << uPD98401_RXVC_POOL_SHIFT, ++ chan*VC_SIZE/4); ++ zpokel(zatm_dev,uPD98401_RXVC_OD | (vcc->aal == ATM_AAL5 ? ++ uPD98401_RXVC_AR : 0) | cells,chan*VC_SIZE/4+1); ++ zpokel(zatm_dev,0,chan*VC_SIZE/4+2); ++ zatm_vcc->rx_chan = chan; ++ zatm_dev->rx_map[chan] = vcc; ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++static int open_rx_second(struct atm_vcc *vcc) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long flags; ++ int pos,shift; ++ ++ DPRINTK("open_rx_second (0x%x)\n",inb_p(0xc053)); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ zatm_vcc = ZATM_VCC(vcc); ++ if (!zatm_vcc->rx_chan) return 0; ++ save_flags(flags); ++ cli(); ++ /* should also handle VPI @@@ */ ++ pos = vcc->vci >> 1; ++ shift = (1-(vcc->vci & 1)) << 4; ++ zpokel(zatm_dev,(zpeekl(zatm_dev,pos) & ~(0xffff << shift)) | ++ ((zatm_vcc->rx_chan | uPD98401_RXLT_ENBL) << shift),pos); ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++static void close_rx(struct atm_vcc *vcc) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long flags; ++ int pos,shift; ++ ++ zatm_vcc = ZATM_VCC(vcc); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ if (!zatm_vcc->rx_chan) return; ++DPRINTK("close_rx\n"); ++ /* disable receiver */ ++ save_flags(flags); ++ if (vcc->vpi != ATM_VPI_UNSPEC && vcc->vci != ATM_VCI_UNSPEC) { ++ cli(); ++ pos = vcc->vci >> 1; ++ shift = (1-(vcc->vci & 1)) << 4; ++ zpokel(zatm_dev,zpeekl(zatm_dev,pos) & ~(0xffff << shift),pos); ++ restore_flags(flags); ++ udelay(48000/zatm_dev->khz+1); ++ } ++ cli(); ++ zwait; ++ zout(uPD98401_DEACT_CHAN | uPD98401_CHAN_RT | (zatm_vcc->rx_chan << ++ uPD98401_CHAN_ADDR_SHIFT),CMR); ++ zwait; ++ zout(uPD98401_CLOSE_CHAN | uPD98401_CHAN_RT | (zatm_vcc->rx_chan << ++ uPD98401_CHAN_ADDR_SHIFT),CMR); ++ zwait; ++ if (!(zin(CMR) & uPD98401_CHAN_ADDR)) ++ printk(KERN_CRIT DEV_LABEL "(itf %d): can't close RX channel " ++ "%d\n",vcc->dev->number,zatm_vcc->rx_chan); ++ restore_flags(flags); ++ zatm_dev->rx_map[zatm_vcc->rx_chan] = NULL; ++ zatm_vcc->rx_chan = 0; ++ unuse_pool(vcc->dev,zatm_vcc->pool); ++} ++ ++ ++static int start_rx(struct atm_dev *dev) ++{ ++ struct zatm_dev *zatm_dev; ++ int size,i; ++ ++DPRINTK("start_rx\n"); ++ zatm_dev = ZATM_DEV(dev); ++ size = sizeof(struct atm_vcc *)*zatm_dev->chans; ++ zatm_dev->rx_map = (struct atm_vcc **) kmalloc(size,GFP_KERNEL); ++ if (!zatm_dev->rx_map) return -ENOMEM; ++ memset(zatm_dev->rx_map,0,size); ++ /* set VPI/VCI split (use all VCIs and give what's left to VPIs) */ ++ zpokel(zatm_dev,(1 << dev->ci_range.vci_bits)-1,uPD98401_VRR); ++ /* prepare free buffer pools */ ++ for (i = 0; i <= ZATM_LAST_POOL; i++) { ++ zatm_dev->pool_info[i].ref_count = 0; ++ zatm_dev->pool_info[i].rqa_count = 0; ++ zatm_dev->pool_info[i].rqu_count = 0; ++ zatm_dev->pool_info[i].low_water = LOW_MARK; ++ zatm_dev->pool_info[i].high_water = HIGH_MARK; ++ zatm_dev->pool_info[i].offset = 0; ++ zatm_dev->pool_info[i].next_off = 0; ++ zatm_dev->pool_info[i].next_cnt = 0; ++ zatm_dev->pool_info[i].next_thres = OFF_CNG_THRES; ++ } ++ return 0; ++} ++ ++ ++/*----------------------------------- TX ------------------------------------*/ ++ ++ ++static int do_tx(struct sk_buff *skb) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long *dsc; ++ unsigned long flags; ++ ++ EVENT("do_tx\n",0,0); ++ DPRINTK("sending skb %p\n",skb); ++ zatm_dev = ZATM_DEV(skb->atm.vcc->dev); ++ zatm_vcc = ZATM_VCC(skb->atm.vcc); ++ EVENT("iovcnt=%d\n",skb->atm.iovcnt,0); ++ save_flags(flags); ++ cli(); ++ if (!skb->atm.iovcnt) { ++ if (zatm_vcc->txing == RING_ENTRIES-1) { ++ restore_flags(flags); ++ return RING_BUSY; ++ } ++ zatm_vcc->txing++; ++ dsc = zatm_vcc->ring+zatm_vcc->ring_curr; ++ zatm_vcc->ring_curr = (zatm_vcc->ring_curr+RING_WORDS) & ++ (RING_ENTRIES*RING_WORDS-1); ++ dsc[1] = 0; ++ dsc[2] = skb->len; ++ dsc[3] = (unsigned long) skb->data; ++ mb(); ++ dsc[0] = uPD98401_TXPD_V | uPD98401_TXPD_DP | uPD98401_TXPD_SM ++ | (skb->atm.vcc->aal == ATM_AAL5 ? uPD98401_TXPD_AAL5 : 0); ++ EVENT("dsc (0x%08lx)\n",(unsigned long) dsc,0); ++ } ++ else { ++printk("NONONONOO!!!!\n"); ++#if 0 ++ unsigned long *put; ++ int i; ++ ++ dsc = (unsigned long *) kmalloc(uPD98401_TXPD_SIZE*2+ ++ uPD98401_TXBD_SIZE*skb->atm.iovcnt,GFP_ATOMIC); ++ if (!dsc) { ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EAGAIN; ++ } ++ /* @@@ should check alignment */ ++ put = dsc+8; ++ dsc[0] = uPD98401_TXPD_V | uPD98401_TXPD_DP | ++ (skb->atm.vcc->aal == ATM_AAL5 ? uPD98401_TXPD_AAL5 : 0); ++ dsc[1] = 0; ++ dsc[2] = skb->atm.iovcnt*uPD98401_TXBD_SIZE; ++ dsc[3] = (unsigned long) put; ++ for (i = 0; i < skb->atm.iovcnt; i++) { ++ *put++ = ((struct iovec *) skb->data)[i].iov_len; ++ *put++ = (unsigned long) ((struct iovec *) ++ skb->data)[i].iov_base; ++ } ++ put[-2] |= uPD98401_TXBD_LAST; ++#endif ++ } ++ skb->atm.pos = (unsigned long) dsc; ++ skb_queue_tail(&zatm_vcc->tx_queue,skb); ++ DPRINTK("QRP=0x%08lx\n",zpeekl(zatm_dev,zatm_vcc->tx_chan*VC_SIZE/4+ ++ uPD98401_TXVC_QRP)); ++ zwait; ++ zout(uPD98401_TX_READY | (zatm_vcc->tx_chan << ++ uPD98401_CHAN_ADDR_SHIFT),CMR); ++ restore_flags(flags); ++ EVENT("done\n",0,0); ++ return 0; ++} ++ ++ ++static inline void dequeue_tx(struct atm_vcc *vcc) ++{ ++ struct zatm_vcc *zatm_vcc; ++ struct sk_buff *skb; ++ ++ EVENT("dequeue_tx\n",0,0); ++ zatm_vcc = ZATM_VCC(vcc); ++ skb = skb_dequeue(&zatm_vcc->tx_queue); ++ if (!skb) { ++ printk(KERN_CRIT DEV_LABEL "(itf %d): dequeue_tx but not " ++ "txing\n",vcc->dev->number); ++ return; ++ } ++if (*(unsigned long *) skb->atm.pos != (uPD98401_TXPD_V | uPD98401_TXPD_DP | ++ uPD98401_TXPD_SM | uPD98401_TXPD_AAL5)) printk("@#*$!!!! (%08lx)\n", ++ *(unsigned long *) skb->atm.pos); ++ *(unsigned long *) skb->atm.pos = 0; /* mark as invalid */ ++ zatm_vcc->txing--; ++ if (vcc->pop) vcc->pop(vcc,skb); ++ else dev_kfree_skb(skb,FREE_WRITE); ++ while ((skb = skb_dequeue(&zatm_vcc->backlog))) ++ if (do_tx(skb) == RING_BUSY) { ++ skb_queue_head(&zatm_vcc->backlog,skb); ++ break; ++ } ++ vcc->stats->tx++; ++ wake_up(&zatm_vcc->tx_wait); ++} ++ ++ ++static void poll_tx(struct atm_dev *dev,int mbx) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long pos,x; ++ ++ EVENT("poll_tx\n",0,0); ++ zatm_dev = ZATM_DEV(dev); ++ pos = (zatm_dev->mbx_start[mbx] & ~0xffff) | zin(MTA(mbx)); ++ while (x = zin(MWA(mbx)), (pos & 0xffff) != x) { ++ int chan; ++ ++#if 1 ++ unsigned long data,*addr; ++ ++ EVENT("MBX: host 0x%lx, nic 0x%lx\n",pos,x); ++ addr = (unsigned long *) pos; ++ data = *addr; ++ chan = (data & uPD98401_TXI_CONN) >> uPD98401_TXI_CONN_SHIFT; ++ EVENT("addr = 0x%08lx, data = 0x%08lx,",(unsigned long) addr, ++ data); ++ EVENT("chan = %d\n",chan,0); ++#else ++NO ! ++ chan = (zatm_dev->mbx_start[mbx][pos >> 2] & uPD98401_TXI_CONN) ++ >> uPD98401_TXI_CONN_SHIFT; ++#endif ++ if (chan < zatm_dev->chans && zatm_dev->tx_map[chan]) ++ dequeue_tx(zatm_dev->tx_map[chan]); ++ else { ++ printk(KERN_CRIT DEV_LABEL "(itf %d): TX indication " ++ "for non-existing channel %d\n",dev->number,chan); ++ event_dump(); ++ } ++ if (((pos += 4) & 0xffff) == zatm_dev->mbx_end[mbx]) ++ pos = zatm_dev->mbx_start[mbx]; ++ } ++ zout(pos & 0xffff,MTA(mbx)); ++} ++ ++ ++static int alloc_shaper(struct atm_dev *dev,int *pcr,int min,int max,int ubr) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long flags; ++ unsigned long i,m,c; ++ int shaper; ++ ++ DPRINTK("alloc_shaper (min = %d, max = %d)\n",min,max); ++ zatm_dev = ZATM_DEV(dev); ++ if (!zatm_dev->free_shapers) return -EAGAIN; ++ for (shaper = 0; !((zatm_dev->free_shapers >> shaper) & 1); shaper++); ++ zatm_dev->free_shapers &= ~1 << shaper; ++ if (ubr) { ++ c = 5; ++ i = m = 1; ++ zatm_dev->ubr_ref_cnt++; ++ zatm_dev->ubr = shaper; ++ } ++ else { ++ if (min) { ++ if (min <= 255) { ++ i = min; ++ m = ATM_OC3_PCR; ++ } ++ else { ++ i = 255; ++ m = ATM_OC3_PCR*255/min; ++ } ++ } ++ else { ++ if (max > zatm_dev->tx_bw) max = zatm_dev->tx_bw; ++ if (max <= 255) { ++ i = max; ++ m = ATM_OC3_PCR; ++ } ++ else { ++ i = 255; ++ m = (ATM_OC3_PCR*255+max-1)/max; ++ } ++ } ++ if (i > m) { ++ printk(KERN_CRIT DEV_LABEL "shaper algorithm botched " ++ "[%d,%d] -> i=%ld,m=%ld\n",min,max,i,m); ++ m = i; ++ } ++ *pcr = i*ATM_OC3_PCR/m; ++ c = 20; /* @@@ should use max_cdv ! */ ++ if ((min && *pcr < min) || (max && *pcr > max)) return -EINVAL; ++ if (zatm_dev->tx_bw < *pcr) return -EAGAIN; ++ zatm_dev->tx_bw -= *pcr; ++ } ++ save_flags(flags); ++ cli(); ++ DPRINTK("i = %d, m = %d, PCR = %d\n",i,m,*pcr); ++ zpokel(zatm_dev,(i << uPD98401_IM_I_SHIFT) | m,uPD98401_IM(shaper)); ++ zpokel(zatm_dev,c << uPD98401_PC_C_SHIFT,uPD98401_PC(shaper)); ++ zpokel(zatm_dev,0,uPD98401_X(shaper)); ++ zpokel(zatm_dev,0,uPD98401_Y(shaper)); ++ zpokel(zatm_dev,uPD98401_PS_E,uPD98401_PS(shaper)); ++ restore_flags(flags); ++ return shaper; ++} ++ ++ ++static void dealloc_shaper(struct atm_dev *dev,int shaper) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long flags; ++ ++ zatm_dev = ZATM_DEV(dev); ++ if (shaper == zatm_dev->ubr) { ++ if (--zatm_dev->ubr_ref_cnt) return; ++ zatm_dev->ubr = -1; ++ } ++ save_flags(flags); ++ cli(); ++ zpokel(zatm_dev,zpeekl(zatm_dev,uPD98401_PS(shaper)) & ~uPD98401_PS_E, ++ uPD98401_PS(shaper)); ++ restore_flags(flags); ++ zatm_dev->free_shapers |= 1 << shaper; ++} ++ ++ ++static void close_tx(struct atm_vcc *vcc) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long flags; ++ int chan; ++struct sk_buff *skb; ++int once = 1; ++ ++ zatm_vcc = ZATM_VCC(vcc); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ chan = zatm_vcc->tx_chan; ++ if (!chan) return; ++ DPRINTK("close_tx\n"); ++ save_flags(flags); ++ cli(); ++ while (skb_peek(&zatm_vcc->backlog)) { ++if (once) { ++printk("waiting for backlog to drain ...\n"); ++event_dump(); ++once = 0; ++} ++ sleep_on(&zatm_vcc->tx_wait); ++ } ++once = 1; ++ while ((skb = skb_peek(&zatm_vcc->tx_queue))) { ++if (once) { ++printk("waiting for TX queue to drain ... %p\n",skb); ++event_dump(); ++once = 0; ++} ++ DPRINTK("waiting for TX queue to drain ... %p\n",skb); ++ sleep_on(&zatm_vcc->tx_wait); ++ } ++#if 0 ++ zwait; ++ zout(uPD98401_DEACT_CHAN | (chan << uPD98401_CHAN_ADDR_SHIFT),CMR); ++#endif ++ zwait; ++ zout(uPD98401_CLOSE_CHAN | (chan << uPD98401_CHAN_ADDR_SHIFT),CMR); ++ zwait; ++ if (!(zin(CMR) & uPD98401_CHAN_ADDR)) ++ printk(KERN_CRIT DEV_LABEL "(itf %d): can't close TX channel " ++ "%d\n",vcc->dev->number,chan); ++ restore_flags(flags); ++ zatm_vcc->tx_chan = 0; ++ zatm_dev->tx_map[chan] = NULL; ++ if (zatm_vcc->shaper != zatm_dev->ubr) { ++ zatm_dev->tx_bw += vcc->qos.txtp.min_pcr; ++ dealloc_shaper(vcc->dev,zatm_vcc->shaper); ++ } ++ if (zatm_vcc->ring) kfree(zatm_vcc->ring); ++} ++ ++ ++static int open_tx_first(struct atm_vcc *vcc) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long flags,*loop; ++ unsigned short chan; ++ int pcr; ++ ++ DPRINTK("open_tx_first\n"); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ zatm_vcc = ZATM_VCC(vcc); ++ zatm_vcc->tx_chan = 0; ++ if (vcc->qos.txtp.traffic_class == ATM_NONE) return 0; ++ save_flags(flags); ++ cli(); ++ zwait; ++ zout(uPD98401_OPEN_CHAN,CMR); ++ zwait; ++ DPRINTK("0x%x 0x%x\n",zin(CMR),zin(CER)); ++ chan = (zin(CMR) & uPD98401_CHAN_ADDR) >> uPD98401_CHAN_ADDR_SHIFT; ++ restore_flags(flags); ++ DPRINTK("chan is %d\n",chan); ++ if (!chan) return -EAGAIN; ++ if (vcc->qos.txtp.traffic_class == ATM_UBR && zatm_dev->ubr != -1) ++ zatm_vcc->shaper = zatm_dev->ubr; ++ else { ++ if (vcc->qos.txtp.traffic_class == ATM_UBR) ++ vcc->qos.txtp.max_sdu = ATM_MAX_AAL5_PDU; ++ if ((zatm_vcc->shaper = alloc_shaper(vcc->dev,&pcr, ++ vcc->qos.txtp.min_pcr,vcc->qos.txtp.max_pcr, ++ vcc->qos.txtp.traffic_class == ATM_UBR)) < 0) { ++ close_tx(vcc); ++ return zatm_vcc->shaper; ++ } ++ vcc->qos.txtp.min_pcr = vcc->qos.txtp.max_pcr = pcr; ++ } ++ zatm_vcc->tx_chan = chan; ++ skb_queue_head_init(&zatm_vcc->tx_queue); ++ zatm_vcc->tx_wait = NULL; ++ /* initialize ring */ ++ zatm_vcc->ring = kmalloc(RING_SIZE,GFP_KERNEL); ++ if (!zatm_vcc->ring) return -ENOMEM; ++ memset(zatm_vcc->ring,0,RING_SIZE); ++ loop = zatm_vcc->ring+RING_ENTRIES*RING_WORDS; ++ loop[0] = uPD98401_TXPD_V; ++ loop[1] = loop[2] = 0; ++ loop[3] = (unsigned long) zatm_vcc->ring; ++ zatm_vcc->ring_curr = 0; ++ zatm_vcc->txing = 0; ++ skb_queue_head_init(&zatm_vcc->backlog); ++ zpokel(zatm_dev,(unsigned long) zatm_vcc->ring, ++ chan*VC_SIZE/4+uPD98401_TXVC_QRP); ++ return 0; ++} ++ ++ ++static int open_tx_second(struct atm_vcc *vcc) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ unsigned long flags; ++ ++ DPRINTK("open_tx_second\n"); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ zatm_vcc = ZATM_VCC(vcc); ++ if (!zatm_vcc->tx_chan) return 0; ++ save_flags(flags); ++ /* set up VC descriptor */ ++ cli(); ++ zpokel(zatm_dev,0,zatm_vcc->tx_chan*VC_SIZE/4); ++ zpokel(zatm_dev,uPD98401_TXVC_L | (zatm_vcc->shaper << ++ uPD98401_TXVC_SHP_SHIFT) | (vcc->vpi << uPD98401_TXVC_VPI_SHIFT) | ++ vcc->vci,zatm_vcc->tx_chan*VC_SIZE/4+1); ++ zpokel(zatm_dev,0,zatm_vcc->tx_chan*VC_SIZE/4+2); ++ restore_flags(flags); ++ zatm_dev->tx_map[zatm_vcc->tx_chan] = vcc; ++ return 0; ++} ++ ++ ++static int start_tx(struct atm_dev *dev) ++{ ++ struct zatm_dev *zatm_dev; ++ int i; ++ ++ DPRINTK("start_tx\n"); ++ zatm_dev = ZATM_DEV(dev); ++ zatm_dev->tx_map = (struct atm_vcc **) kmalloc(sizeof(struct atm_vcc *)* ++ zatm_dev->chans,GFP_KERNEL); ++ if (!zatm_dev->tx_map) return -ENOMEM; ++ zatm_dev->tx_bw = ATM_OC3_PCR; ++ zatm_dev->free_shapers = (1 << NR_SHAPERS)-1; ++ zatm_dev->ubr = -1; ++ zatm_dev->ubr_ref_cnt = 0; ++ /* initialize shapers */ ++ for (i = 0; i < NR_SHAPERS; i++) zpokel(zatm_dev,0,uPD98401_PS(i)); ++ return 0; ++} ++ ++ ++/*------------------------------- interrupts --------------------------------*/ ++ ++ ++static void zatm_int(int irq,void *dev_id,struct pt_regs *regs) ++{ ++ struct atm_dev *dev; ++ struct zatm_dev *zatm_dev; ++ unsigned long reason; ++ ++ dev = dev_id; ++ zatm_dev = ZATM_DEV(dev); ++ while ((reason = zin(GSR))) { ++ EVENT("reason 0x%lx\n",reason,0); ++ if (reason & uPD98401_INT_PI) { ++ EVENT("PHY int\n",0,0); ++ dev->phy->interrupt(dev); ++ } ++ if (reason & uPD98401_INT_RQA) { ++ unsigned long pools; ++ int i; ++ ++ pools = zin(RQA); ++ EVENT("RQA (0x%08lx)\n",pools,0); ++ for (i = 0; pools; i++) { ++ if (pools & 1) { ++ refill_pool(dev,i); ++ zatm_dev->pool_info[i].rqa_count++; ++ } ++ pools >>= 1; ++ } ++ } ++ if (reason & uPD98401_INT_RQU) { ++ unsigned long pools; ++ int i; ++ pools = zin(RQU); ++ printk(KERN_WARNING DEV_LABEL "(itf %d): RQU 0x%08lx\n", ++ dev->number,pools); ++ event_dump(); ++ for (i = 0; pools; i++) { ++ if (pools & 1) { ++ refill_pool(dev,i); ++ zatm_dev->pool_info[i].rqu_count++; ++ } ++ pools >>= 1; ++ } ++ } ++ /* don't handle RD */ ++ if (reason & uPD98401_INT_SPE) ++ printk(KERN_ALERT DEV_LABEL "(itf %d): system parity " ++ "error at 0x%08x\n",dev->number,zin(ADDR)); ++ if (reason & uPD98401_INT_CPE) ++ printk(KERN_ALERT DEV_LABEL "(itf %d): control memory " ++ "parity error at 0x%08x\n",dev->number,zin(ADDR)); ++ if (reason & uPD98401_INT_SBE) { ++ printk(KERN_ALERT DEV_LABEL "(itf %d): system bus " ++ "error at 0x%08x\n",dev->number,zin(ADDR)); ++ event_dump(); ++ } ++ /* don't handle IND */ ++ if (reason & uPD98401_INT_MF) { ++ printk(KERN_CRIT DEV_LABEL "(itf %d): mailbox full " ++ "(0x%lx)\n",dev->number,(reason & uPD98401_INT_MF) ++ >> uPD98401_INT_MF_SHIFT); ++ event_dump(); ++ /* @@@ should try to recover */ ++ } ++ if (reason & uPD98401_INT_MM) { ++ if (reason & 1) poll_rx(dev,0); ++ if (reason & 2) poll_rx(dev,1); ++ if (reason & 4) poll_tx(dev,2); ++ if (reason & 8) poll_tx(dev,3); ++ } ++ /* @@@ handle RCRn */ ++ } ++} ++ ++ ++/*----------------------------- (E)EPROM access -----------------------------*/ ++ ++ ++static void eprom_set(struct zatm_dev *zatm_dev,unsigned long value, ++ unsigned short cmd) ++{ ++ int error; ++ ++ if ((error = pcibios_write_config_dword(zatm_dev->bus,zatm_dev->dev_fn, ++ cmd,value))) ++ printk(KERN_ERR DEV_LABEL ": PCI write failed (%s)\n", ++ pcibios_strerror(error)); ++} ++ ++ ++static unsigned long eprom_get(struct zatm_dev *zatm_dev,unsigned short cmd) ++{ ++ unsigned int value; ++ int error; ++ ++ if ((error = pcibios_read_config_dword(zatm_dev->bus,zatm_dev->dev_fn, ++ cmd,&value))) ++ printk(KERN_ERR DEV_LABEL ": PCI read failed (%s)\n", ++ pcibios_strerror(error)); ++ return value; ++} ++ ++ ++static void eprom_put_bits(struct zatm_dev *zatm_dev,unsigned long data, ++ int bits,unsigned short cmd) ++{ ++ unsigned long value; ++ int i; ++ ++ for (i = bits-1; i >= 0; i--) { ++ value = ZEPROM_CS | (((data >> i) & 1) ? ZEPROM_DI : 0); ++ eprom_set(zatm_dev,value,cmd); ++ eprom_set(zatm_dev,value | ZEPROM_SK,cmd); ++ eprom_set(zatm_dev,value,cmd); ++ } ++} ++ ++ ++static void eprom_get_byte(struct zatm_dev *zatm_dev,unsigned char *byte, ++ unsigned short cmd) ++{ ++ int i; ++ ++ *byte = 0; ++ for (i = 8; i; i--) { ++ eprom_set(zatm_dev,ZEPROM_CS,cmd); ++ eprom_set(zatm_dev,ZEPROM_CS | ZEPROM_SK,cmd); ++ *byte <<= 1; ++ if (eprom_get(zatm_dev,cmd) & ZEPROM_DO) *byte |= 1; ++ eprom_set(zatm_dev,ZEPROM_CS,cmd); ++ } ++} ++ ++ ++static unsigned char eprom_try_esi(struct atm_dev *dev,unsigned short cmd, ++ int offset,int swap) ++{ ++ unsigned char buf[ZEPROM_SIZE]; ++ struct zatm_dev *zatm_dev; ++ int i; ++ ++ zatm_dev = ZATM_DEV(dev); ++ for (i = 0; i < ZEPROM_SIZE; i += 2) { ++ eprom_set(zatm_dev,ZEPROM_CS,cmd); /* select EPROM */ ++ eprom_put_bits(zatm_dev,ZEPROM_CMD_READ,ZEPROM_CMD_LEN,cmd); ++ eprom_put_bits(zatm_dev,i >> 1,ZEPROM_ADDR_LEN,cmd); ++ eprom_get_byte(zatm_dev,buf+i+swap,cmd); ++ eprom_get_byte(zatm_dev,buf+i+1-swap,cmd); ++ eprom_set(zatm_dev,0,cmd); /* deselect EPROM */ ++ } ++ memcpy(dev->esi,buf+offset,ESI_LEN); ++ return memcmp(dev->esi,"\0\0\0\0\0",ESI_LEN); /* assumes ESI_LEN == 6 */ ++} ++ ++ ++static void eprom_get_esi(struct atm_dev *dev) ++{ ++ if (eprom_try_esi(dev,ZEPROM_V1_REG,ZEPROM_V1_ESI_OFF,1)) return; ++ (void) eprom_try_esi(dev,ZEPROM_V2_REG,ZEPROM_V2_ESI_OFF,0); ++} ++ ++ ++/*--------------------------------- entries ---------------------------------*/ ++ ++ ++static int zatm_init(struct atm_dev *dev) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned short command; ++ unsigned char revision; ++ int error,i,last; ++ unsigned long t0,t1,t2; ++ ++ DPRINTK(">zatm_init\n"); ++ zatm_dev = ZATM_DEV(dev); ++ if ((error = pcibios_read_config_word(zatm_dev->bus,zatm_dev->dev_fn, ++ PCI_COMMAND,&command)) || (error = pcibios_read_config_dword( ++ zatm_dev->bus,zatm_dev->dev_fn,PCI_BASE_ADDRESS_0,&zatm_dev->base)) ++ || (error = pcibios_read_config_byte(zatm_dev->bus,zatm_dev->dev_fn, ++ PCI_INTERRUPT_LINE,&zatm_dev->irq)) || (error = ++ pcibios_read_config_byte(zatm_dev->bus,zatm_dev->dev_fn, ++ PCI_REVISION_ID,&revision))) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): init error %s\n", ++ dev->number,pcibios_strerror(error)); ++ return -EINVAL; ++ } ++ zatm_dev->base &= PCI_BASE_ADDRESS_IO_MASK; ++ if ((error = pcibios_write_config_word(zatm_dev->bus,zatm_dev->dev_fn, ++ PCI_COMMAND,command | PCI_COMMAND_IO | PCI_COMMAND_MASTER))) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): can't enable IO (%s)\n", ++ dev->number,pcibios_strerror(error)); ++ return error; ++ } ++ eprom_get_esi(dev); ++ printk(KERN_NOTICE DEV_LABEL "(itf %d): rev.%d,base=0x%x,irq=%d,", ++ dev->number,revision,zatm_dev->base,zatm_dev->irq); ++ /* reset uPD98401 */ ++ zout(0,SWR); ++ while (!(zin(GSR) & uPD98401_INT_IND)); ++ zout(uPD98401_GMR_ONE /*uPD98401_BURST4*/,GMR); ++ last = MAX_CRAM_SIZE; ++ for (i = last-RAM_INCREMENT; i >= 0; i -= RAM_INCREMENT) { ++ zpokel(zatm_dev,0x55555555,i); ++ if (zpeekl(zatm_dev,i) != 0x55555555) last = i; ++ else { ++ zpokel(zatm_dev,0xAAAAAAAA,i); ++ if (zpeekl(zatm_dev,i) != 0xAAAAAAAA) last = i; ++ else zpokel(zatm_dev,i,i); ++ } ++ } ++ for (i = 0; i < last; i += RAM_INCREMENT) ++ if (zpeekl(zatm_dev,i) != i) break; ++ zatm_dev->mem = i << 2; ++ while (i) zpokel(zatm_dev,0,--i); ++ /* reset again to rebuild memory pointers */ ++ zout(0,SWR); ++ while (!(zin(GSR) & uPD98401_INT_IND)); ++ zout(uPD98401_GMR_ONE | uPD98401_BURST8 | uPD98401_BURST4 | ++ uPD98401_BURST2 | uPD98401_GMR_PM | uPD98401_GMR_DR,GMR); ++ /* TODO: should shrink allocation now */ ++ printk("mem=%dkB,%s (",zatm_dev->mem >> 10,zatm_dev->copper ? "UTP" : ++ "MMF"); ++ for (i = 0; i < ESI_LEN; i++) ++ printk("%02X%s",dev->esi[i],i == ESI_LEN-1 ? ")\n" : "-"); ++ do { ++ t0 = zpeekl(zatm_dev,uPD98401_TSR); ++ udelay(10); ++ t1 = zpeekl(zatm_dev,uPD98401_TSR); ++ udelay(1010); ++ t2 = zpeekl(zatm_dev,uPD98401_TSR); ++ } ++ while (t0 > t1 || t1 > t2); ++ zatm_dev->khz = t2-2*t1+t0; ++ printk(KERN_NOTICE DEV_LABEL "(itf %d): uPD98401 %d.%d at %d.%03d " ++ "MHz\n",dev->number, ++ (zin(VER) & uPD98401_MAJOR) >> uPD98401_MAJOR_SHIFT, ++ zin(VER) & uPD98401_MINOR,zatm_dev->khz/1000,zatm_dev->khz % 1000); ++ return uPD98402_init(dev); ++} ++ ++ ++static int zatm_start(struct atm_dev *dev) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long curr; ++ int pools,vccs,rx; ++ int error,i,ld; ++ ++ DPRINTK("zatm_start\n"); ++ zatm_dev = ZATM_DEV(dev); ++ if (request_irq(zatm_dev->irq,&zatm_int,0,DEV_LABEL,dev)) { ++ printk(KERN_ERR DEV_LABEL "(itf %d): IRQ%d is already in use\n", ++ dev->number,zatm_dev->irq); ++ return -EAGAIN; ++ } ++ request_region(zatm_dev->base,uPD98401_PORTS,DEV_LABEL); ++ /* define memory regions */ ++ pools = NR_POOLS; ++ if (NR_SHAPERS*SHAPER_SIZE > pools*POOL_SIZE) ++ pools = NR_SHAPERS*SHAPER_SIZE/POOL_SIZE; ++ vccs = (zatm_dev->mem-NR_SHAPERS*SHAPER_SIZE-pools*POOL_SIZE)/ ++ (2*VC_SIZE+RX_SIZE); ++ ld = -1; ++ for (rx = 1; rx < vccs; rx <<= 1) ld++; ++ dev->ci_range.vpi_bits = 0; /* @@@ no VPI for now */ ++ dev->ci_range.vci_bits = ld; ++ zatm_dev->chans = vccs; /* ??? */ ++ curr = rx*RX_SIZE/4; ++ DPRINTK("RX pool 0x%08lx\n",curr); ++ zpokel(zatm_dev,curr,uPD98401_PMA); /* receive pool */ ++ zatm_dev->pool_base = curr; ++ curr += pools*POOL_SIZE/4; ++ DPRINTK("Shapers 0x%08lx\n",curr); ++ zpokel(zatm_dev,curr,uPD98401_SMA); /* shapers */ ++ curr += NR_SHAPERS*SHAPER_SIZE/4; ++ DPRINTK("Free 0x%08lx\n",curr); ++ zpokel(zatm_dev,curr,uPD98401_TOS); /* free pool */ ++ printk(KERN_INFO DEV_LABEL "(itf %d): %d shapers, %d pools, %d RX, " ++ "%ld VCs\n",dev->number,NR_SHAPERS,pools,rx, ++ (zatm_dev->mem-curr*4)/VC_SIZE); ++ /* create mailboxes */ ++ for (i = 0; i < NR_MBX; i++) zatm_dev->mbx_start[i] = 0; ++ for (i = 0; i < NR_MBX; i++) ++ if (mbx_entries[i]) { ++ unsigned long here; ++ ++ here = (unsigned long) kmalloc(2*MBX_SIZE(i), ++ GFP_KERNEL); ++ if (!here) return -ENOMEM; ++ if ((here^(here+MBX_SIZE(i))) & ~0xffff) /* paranoia */ ++ here = (here & ~0xffff)+0x10000; ++ DPRINTK("mbx@0x%08lx-0x%08lx\n",here,here+MBX_SIZE(i)); ++ zatm_dev->mbx_start[i] = here; ++ zatm_dev->mbx_end[i] = (here+MBX_SIZE(i)) & 0xffff; ++ zout(here >> 16,MSH(i)); ++ zout(here,MSL(i)); ++ zout((here+MBX_SIZE(i)) & 0xffff,MBA(i)); ++ zout(here & 0xffff,MTA(i)); ++ zout(here & 0xffff,MWA(i)); ++ } ++ error = start_tx(dev); ++ if (error) return error; ++ error = start_rx(dev); ++ if (error) return error; ++ error = dev->phy->start(dev); ++ if (error) return error; ++ zout(0xffffffff,IMR); /* enable interrupts */ ++ /* enable TX & RX */ ++ zout(zin(GMR) | uPD98401_GMR_SE | uPD98401_GMR_RE,GMR); ++ return 0; ++} ++ ++ ++static void zatm_close(struct atm_vcc *vcc) ++{ ++ DPRINTK(">zatm_close\n"); ++ if (!ZATM_VCC(vcc)) return; ++ vcc->flags &= ~ATM_VF_READY; ++ close_rx(vcc); ++EVENT("close_tx\n",0,0); ++ close_tx(vcc); ++ DPRINTK("zatm_close: done waiting\n"); ++ /* deallocate memory */ ++ kfree(ZATM_VCC(vcc)); ++ ZATM_VCC(vcc) = NULL; ++ vcc->flags &= ~ATM_VF_ADDR; ++} ++ ++ ++static int zatm_open(struct atm_vcc *vcc,short vpi,int vci) ++{ ++ struct zatm_dev *zatm_dev; ++ struct zatm_vcc *zatm_vcc; ++ int error; ++ ++ DPRINTK(">zatm_open\n"); ++ zatm_dev = ZATM_DEV(vcc->dev); ++ if (!(vcc->flags & ATM_VF_PARTIAL)) ZATM_VCC(vcc) = NULL; ++ error = atm_find_ci(vcc,&vpi,&vci); ++ if (error) return error; ++ vcc->vpi = vpi; ++ vcc->vci = vci; ++ if (vci != ATM_VPI_UNSPEC && vpi != ATM_VCI_UNSPEC) ++ vcc->flags |= ATM_VF_ADDR; ++ if (vcc->aal != ATM_AAL5) return -EINVAL; /* @@@ AAL0 */ ++ DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, ++ vcc->vci); ++ if (!(vcc->flags & ATM_VF_PARTIAL)) { ++ zatm_vcc = kmalloc(sizeof(struct zatm_vcc),GFP_KERNEL); ++ if (!zatm_vcc) { ++ vcc->flags &= ~ATM_VF_ADDR; ++ return -ENOMEM; ++ } ++ ZATM_VCC(vcc) = zatm_vcc; ++ ZATM_VCC(vcc)->tx_chan = 0; /* for zatm_close after open_rx */ ++ if ((error = open_rx_first(vcc))) { ++ zatm_close(vcc); ++ return error; ++ } ++ if ((error = open_tx_first(vcc))) { ++ zatm_close(vcc); ++ return error; ++ } ++ } ++ if (vci == ATM_VPI_UNSPEC || vpi == ATM_VCI_UNSPEC) return 0; ++ if ((error = open_rx_second(vcc))) { ++ zatm_close(vcc); ++ return error; ++ } ++ if ((error = open_tx_second(vcc))) { ++ zatm_close(vcc); ++ return error; ++ } ++ vcc->flags |= ATM_VF_READY; ++ return 0; ++} ++ ++ ++static int zatm_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) ++{ ++ struct zatm_dev *zatm_dev; ++ unsigned long flags; ++ int error; ++ ++ zatm_dev = ZATM_DEV(dev); ++ switch (cmd) { ++ case ZATM_GETPOOLZ: ++ if (!suser()) return -EPERM; ++ /* fall through */ ++ case ZATM_GETPOOL: ++ { ++ int pool; ++ ++ error = verify_area(VERIFY_WRITE,(void *) arg, ++ sizeof(struct zatm_pool_req)); ++ if (error) return error; ++ error = verify_area(VERIFY_READ,(void *) arg, ++ sizeof(struct zatm_pool_req)); ++ /* paranoia ? */ ++ if (error) return error; ++ pool = get_fs_long(&((struct zatm_pool_req *) ++ arg)->pool_num); ++ if (pool < 0 || pool > ZATM_LAST_POOL) ++ return -EINVAL; ++ save_flags(flags); ++ cli(); ++ memcpy_tofs(&((struct zatm_pool_req *) arg)-> ++ info,&zatm_dev->pool_info[pool], ++ sizeof(struct zatm_pool_info)); ++ if (cmd == ZATM_GETPOOLZ) { ++ zatm_dev->pool_info[pool].rqa_count = 0; ++ zatm_dev->pool_info[pool].rqu_count = 0; ++ } ++ restore_flags(flags); ++ return 0; ++ } ++ case ZATM_SETPOOL: ++ { ++ int pool,low,high,next_thres; ++ ++ if (!suser()) return -EPERM; ++ error = verify_area(VERIFY_READ,(void *) arg, ++ sizeof(struct zatm_pool_req)); ++ if (error) return error; ++ pool = get_fs_long(&((struct zatm_pool_req *) ++ arg)->pool_num); ++ if (pool < 0 || pool > ZATM_LAST_POOL) ++ return -EINVAL; ++ low = get_fs_long(&((struct zatm_pool_req *) ++ arg)->info.low_water); ++ high = get_fs_long(&((struct zatm_pool_req *) ++ arg)->info.high_water); ++ next_thres = get_fs_long( ++ &((struct zatm_pool_req *) arg)->info. ++ next_thres); ++ if (!low) ++ low = zatm_dev->pool_info[pool]. ++ low_water; ++ if (!high) ++ high = zatm_dev->pool_info[pool]. ++ high_water; ++ if (!next_thres) ++ next_thres = zatm_dev->pool_info[pool]. ++ next_thres; ++ if (low >= high || low < 0) return -EINVAL; ++ save_flags(flags); ++ cli(); ++ zatm_dev->pool_info[pool].low_water = low; ++ zatm_dev->pool_info[pool].high_water = high; ++ zatm_dev->pool_info[pool].next_thres = ++ next_thres; ++ restore_flags(flags); ++ return 0; ++ } ++ default: ++ if (!dev->phy->ioctl) return -EINVAL; ++ return dev->phy->ioctl(dev,cmd,arg); ++ } ++} ++ ++ ++static int zatm_getsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int *optlen) ++{ ++#ifdef CONFIG_MMU_HACKS ++ ++static const struct atm_buffconst bctx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; ++static const struct atm_buffconst bcrx = { PAGE_SIZE,0,PAGE_SIZE,0,0,0 }; ++ ++#else ++ ++static const struct atm_buffconst bctx = { 4,0,4,0,0,0 }; ++static const struct atm_buffconst bcrx = { 4,0,4,0,0,0 }; ++ ++#endif ++ int error; ++ ++ if (level == SOL_AAL && (optname == SO_BCTXOPT || ++ optname == SO_BCRXOPT)) { ++ if (get_fs_long(optlen) < sizeof(struct atm_buffconst)) ++ return -EINVAL; ++ put_fs_long(sizeof(struct atm_buffconst),optlen); ++ error = verify_area(VERIFY_WRITE,optval, ++ sizeof(struct atm_buffconst)); ++ if (error) return error; ++ memcpy_tofs(optval,optname == SO_BCTXOPT ? &bctx : &bcrx, ++ sizeof(struct atm_buffconst)); ++ return 0; ++ } ++ return -EINVAL; ++} ++ ++ ++static int zatm_setsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int optlen) ++{ ++ return -EINVAL; ++} ++ ++ ++#if 0 ++static int zatm_sg_send(struct atm_vcc *vcc,unsigned long start, ++ unsigned long size) ++{ ++ return vcc->aal == ATM_AAL5; ++ /* @@@ should check size and maybe alignment*/ ++} ++#endif ++ ++ ++static int zatm_send(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ int error; ++ ++ EVENT(">zatm_send 0x%08x\n",(unsigned long) skb,0); ++ if (!ZATM_VCC(vcc)->tx_chan || !(vcc->flags & ATM_VF_READY)) { ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ if (!skb) { ++ printk(KERN_CRIT "!skb in zatm_send ?\n"); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ skb->atm.vcc = vcc; ++ error = do_tx(skb); ++ if (error != RING_BUSY) return error; ++ skb_queue_tail(&ZATM_VCC(vcc)->backlog,skb); ++ return 0; ++} ++ ++ ++static void zatm_phy_put(struct atm_dev *dev,unsigned char value, ++ unsigned long addr) ++{ ++ struct zatm_dev *zatm_dev; ++ ++ zatm_dev = ZATM_DEV(dev); ++ zwait; ++ zout(value,CER); ++ zout(uPD98401_IND_ACC | uPD98401_IA_B0 | ++ (uPD98401_IA_TGT_PHY << uPD98401_IA_TGT_SHIFT) | addr,CMR); ++} ++ ++ ++static unsigned char zatm_phy_get(struct atm_dev *dev,unsigned long addr) ++{ ++ struct zatm_dev *zatm_dev; ++ ++ zatm_dev = ZATM_DEV(dev); ++ zwait; ++ zout(uPD98401_IND_ACC | uPD98401_IA_B0 | uPD98401_IA_RW | ++ (uPD98401_IA_TGT_PHY << uPD98401_IA_TGT_SHIFT) | addr,CMR); ++ zwait; ++ return zin(CER) & 0xff; ++} ++ ++ ++static const struct atmdev_ops ops = { ++ zatm_open, ++ zatm_close, ++ zatm_ioctl, ++ zatm_getsockopt, ++ zatm_setsockopt, ++ zatm_send, ++ NULL /*zatm_sg_send*/, ++ NULL, /* no poll */ ++ NULL, /* no send_oam */ ++ zatm_phy_put, ++ zatm_phy_get, ++ zatm_feedback ++}; ++ ++ ++int zatm_detect(void) ++{ ++ struct atm_dev *dev; ++ struct zatm_dev *zatm_dev; ++ int devs,type,index; ++ ++ if (!pcibios_present()) { ++ printk(KERN_ERR DEV_LABEL " driver but no PCI BIOS ?\n"); ++ return 0; ++ } ++ zatm_dev = (struct zatm_dev *) kmalloc(sizeof(struct zatm_dev), ++ GFP_KERNEL); ++ if (!zatm_dev) return -ENOMEM; ++ devs = 0; ++ for (type = 0; type < 2; type++) { ++ index = 0; ++ while (!pcibios_find_device(PCI_VENDOR_ID_ZEITNET,type ? ++ PCI_DEVICE_ID_ZEITNET_1225 : PCI_DEVICE_ID_ZEITNET_1221, ++ index,&zatm_dev->bus,&zatm_dev->dev_fn)) { ++ dev = atm_dev_register(DEV_LABEL,&ops,0); ++ if (!dev) break; ++ ZATM_DEV(dev) = zatm_dev; ++ zatm_dev->copper = type; ++ if (zatm_init(dev) || zatm_start(dev)) { ++ atm_dev_deregister(dev); ++ break; ++ } ++ zatm_dev->more = zatm_boards; ++ zatm_boards = dev; ++ index++; ++ devs++; ++ zatm_dev = (struct zatm_dev *) kmalloc(sizeof(struct ++ zatm_dev),GFP_KERNEL); ++ if (!zatm_dev) break; ++ } ++ } ++ return devs; ++} ++ ++ ++#ifdef MODULE ++ ++int init_module(void) ++{ ++ if (!zatm_detect()) { ++ printk(KERN_ERROR DEV_LABEL ": no adapter found\n"); ++ return -ENXIO; ++ } ++ MOD_INC_USE_COUNT; ++ return 0; ++} ++ ++ ++void cleanup_module(void) ++{ ++ /* ++ * Well, there's no way to get rid of the driver yet, so we don't ++ * have to clean up, right ? :-) ++ */ ++} ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/zatm.h Wed Jul 31 19:32:42 1996 +@@ -0,0 +1,128 @@ ++/* drivers/atm/zatm.h - ZeitNet ZN122x device driver declarations */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVER_ATM_ZATM_H ++#define DRIVER_ATM_ZATM_H ++ ++#include ++ ++#define ZATM_GETPOOL _IOW('a',ATMIOC_SARPRV+1,struct atmif_sioc) ++ /* get pool statistics */ ++#define ZATM_GETPOOLZ _IOW('a',ATMIOC_SARPRV+2,struct atmif_sioc) ++ /* get statistics and zero */ ++#define ZATM_SETPOOL _IOW('a',ATMIOC_SARPRV+3,struct atmif_sioc) ++ /* set pool parameters */ ++ ++ ++struct zatm_pool_info { ++ int ref_count; /* free buffer pool usage counters */ ++ int low_water,high_water; /* refill parameters */ ++ int rqa_count,rqu_count; /* queue condition counters */ ++ int offset,next_off; /* alignment optimizations: offset */ ++ int next_cnt,next_thres; /* repetition counter and threshold */ ++}; ++ ++struct zatm_pool_req { ++ int pool_num; /* pool number */ ++ struct zatm_pool_info info; /* actual information */ ++}; ++ ++ ++#define ZATM_OAM_POOL 0 /* free buffer pool for OAM cells */ ++#define ZATM_AAL0_POOL 1 /* free buffer pool for AAL0 cells */ ++#define ZATM_AAL5_POOL_BASE 2 /* first AAL5 free buffer pool */ ++#define ZATM_LAST_POOL ZATM_AAL5_POOL_BASE+10 /* max. 64 kB */ ++ ++ ++ ++#ifdef __KERNEL__ ++ ++#include ++#include ++#include ++#include ++ ++ ++#define DEV_LABEL "zatm" ++ ++#define MAX_AAL5_PDU 10240 /* allocate for AAL5 PDUs of this size */ ++#define MAX_RX_SIZE_LD 14 /* ceil(log2((MAX_AAL5_PDU+47)/48)) */ ++ ++#define LOW_MARK 12 /* start adding new buffers if less than 12 */ ++#define HIGH_MARK 30 /* stop adding buffers after reaching 30 */ ++#define OFF_CNG_THRES 5 /* threshold for offset changes */ ++ ++#define RX_SIZE 2 /* RX lookup entry size (in bytes) */ ++#define NR_POOLS 32 /* number of free buffer pointers */ ++#define POOL_SIZE 8 /* buffer entry size (in bytes) */ ++#define NR_SHAPERS 16 /* number of shapers */ ++#define SHAPER_SIZE 4 /* shaper entry size (in bytes) */ ++#define VC_SIZE 32 /* VC dsc (TX or RX) size (in bytes) */ ++ ++#define RING_ENTRIES 32 /* ring entries (without back pointer) */ ++#define RING_WORDS 4 /* ring element size */ ++#define RING_SIZE (sizeof(unsigned long)*(RING_ENTRIES+1)*RING_WORDS) ++ ++#define NR_MBX 4 /* four mailboxes */ ++#define MBX_RX_0 0 /* mailbox indices */ ++#define MBX_RX_1 1 ++#define MBX_TX_0 2 ++#define MBX_TX_1 3 ++ ++ ++struct zatm_vcc { ++ /*-------------------------------- RX part */ ++ int rx_chan; /* RX channel, 0 if none */ ++ int pool; /* free buffer pool */ ++ /*-------------------------------- TX part */ ++ int tx_chan; /* TX channel, 0 if none */ ++ int shaper; /* shaper, <0 if none */ ++ struct sk_buff_head tx_queue; /* list of buffers in transit */ ++ struct wait_queue *tx_wait; /* for close */ ++ unsigned long *ring; /* transmit ring */ ++ int ring_curr; /* current write position */ ++ int txing; /* number of transmits in progress */ ++ struct sk_buff_head backlog; /* list of buffers waiting for ring */ ++}; ++ ++struct zatm_dev { ++ /*-------------------------------- TX part */ ++ int tx_bw; /* remaining bandwidth */ ++ unsigned long free_shapers; /* bit set */ ++ int ubr; /* UBR shaper; -1 if none */ ++ int ubr_ref_cnt; /* number of VCs using UBR shaper */ ++ /*-------------------------------- RX part */ ++ int pool_ref[NR_POOLS]; /* free buffer pool usage counters */ ++ volatile struct sk_buff *last_free[NR_POOLS]; ++ /* last entry in respective pool */ ++ struct sk_buff_head pool[NR_POOLS];/* free buffer pools */ ++ struct zatm_pool_info pool_info[NR_POOLS]; /* pool information */ ++ /*-------------------------------- maps */ ++ struct atm_vcc **tx_map; /* TX VCCs */ ++ struct atm_vcc **rx_map; /* RX VCCs */ ++ int chans; /* map size, must be 2^n */ ++ /*-------------------------------- mailboxes */ ++ unsigned long mbx_start[NR_MBX];/* start addresses */ ++ unsigned short mbx_end[NR_MBX]; /* end offset (in bytes) */ ++ /*-------------------------------- other pointers */ ++ unsigned long pool_base; /* Free buffer pool dsc (word addr) */ ++ /*-------------------------------- ZATM links */ ++ struct atm_dev *more; /* other ZATM devices */ ++ /*-------------------------------- general information */ ++ int mem; /* RAM on board (in bytes) */ ++ int khz; /* timer clock */ ++ int copper; /* PHY type */ ++ unsigned char irq; /* IRQ */ ++ unsigned int base; /* IO base address */ ++ unsigned char bus; /* PCI stuff */ ++ unsigned char dev_fn; ++}; ++ ++ ++#define ZATM_DEV(d) ((struct zatm_dev *) (d)->dev_data) ++#define ZATM_VCC(d) ((struct zatm_vcc *) (d)->dev_data) ++ ++#endif __KERNEL__ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/zeprom.h Wed Jul 10 20:16:37 1996 +@@ -0,0 +1,34 @@ ++/* drivers/atm/zeprom.h - ZeitNet ZN122x EEPROM (NM93C46) declarations */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef DRIVER_ATM_ZEPROM_H ++#define DRIVER_ATM_ZEPROM_H ++ ++/* Different versions use different control registers */ ++ ++#define ZEPROM_V1_REG PCI_VENDOR_ID /* PCI register */ ++#define ZEPROM_V2_REG 0x40 ++ ++/* Bits in contol register */ ++ ++#define ZEPROM_SK 0x80000000 /* strobe (probably on raising edge) */ ++#define ZEPROM_CS 0x40000000 /* Chip Select */ ++#define ZEPROM_DI 0x20000000 /* Data Input */ ++#define ZEPROM_DO 0x10000000 /* Data Output */ ++ ++#define ZEPROM_SIZE 32 /* 32 bytes */ ++#define ZEPROM_V1_ESI_OFF 24 /* ESI offset in EEPROM (V1) */ ++#define ZEPROM_V2_ESI_OFF 4 /* ESI offset in EEPROM (V2) */ ++ ++#define ZEPROM_CMD_LEN 3 /* commands are three bits */ ++#define ZEPROM_ADDR_LEN 6 /* addresses are six bits */ ++ ++/* Commands (3 bits) */ ++ ++#define ZEPROM_CMD_READ 6 ++ ++/* No other commands are needed. */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/tneta1570.h Mon Jun 10 17:36:11 1996 +@@ -0,0 +1,310 @@ ++/* drivers/atm/tneta1570.h - TI TNETA1570 (SAR) declarations */ ++ ++/* Written 1996 by Rolf Fiedler ++ * based on the atm drivers by Werner Almesberger, EPFL LRC ++ */ ++ ++#ifndef DRIVERS_ATM_TNETA1570_H ++#define DRIVERS_ATM_TNETA1570_H ++ ++#include ++ ++#ifdef __KERNEL__ ++ ++#include ++#include ++#include ++#include ++#include ++ ++#define NR_VCI 256 ++#define NR_VCI_LD 8 ++#define NR_VPI 32 ++#define NR_VPI_LD 5 ++#define MAX_VCI 255 ++#define MAX_VPI 255 ++ ++/* this is better put in pci.h, but I want to keep my driver independent */ ++#define MEM_VALID 0xfffffff0 ++#ifndef PCI_VENDOR_ID_TI ++#define PCI_VENDOR_ID_TI 0x104c ++#endif ++#ifndef PCI_DEVICE_ID_TI_TNETA1570 ++#define PCI_DEVICE_ID_TI_TNETA1570 0xa001 ++#endif ++ ++#define KERNEL_OFFSET 0xc0000000 /* kernel 0 is at linear 0xc0000000 */ ++#define DEV_LABEL "tneta1570" ++#define RAM_INCREMENT 1024 /* check in 4 kB increments */ ++ ++/*---------------------------------------------------------*/ ++ ++/* transmit DMA state table, in control memory */ ++struct tneta_tx_dma_state_table{ ++ unsigned int control; ++ unsigned int current_buffer_ptr; ++ unsigned int atm_header; ++ unsigned int dma_state_flag; /* only initialized value */ ++ unsigned int next_buffer_ptr; ++ unsigned int start_of_buffer_address; ++ unsigned int partial_AAL5_tx_CRC; ++ unsigned int AAL5_control_length_field; ++}; ++ ++/* receive DMA state table, in control memory */ ++#define RX_DMA_CONTROL_AAL5 ((1<<29)|(1<<26)) ++#define RX_DMA_CONTROL_AAL0 ((1<<29)|(1<<27)) ++#define RX_TIME_OUT (0xfff<<12) ++#define DMA_ON (1<<31) ++#define DMA_FILTER (1<<30) ++struct tneta_rx_dma_state_table{ ++ unsigned int control; /* needs initialization */ ++ unsigned int current_buffer_ptr; ++ unsigned int sob_ptr; ++ unsigned int EOP; ++ unsigned int sop_ptr; ++ unsigned int AAL0_cells; /* needs initialization if AAL0 */ ++ unsigned int dma_on_idx; /* needs initialization */ ++ unsigned int rx_timeout; /* needs initialization */ ++}; ++ ++#define MAX_AAL5_PDU 9600 /* max size for AAL5 PDUs buffers */ ++#define MAX_AAL5_CELLS 200 ++#define MAX_AAL0_PDU 48 ++#define MAX_AAL0_CELLS 1 ++#define AAL0_BUFS 32 ++#define AAL5_BUFS 16 ++#define FBR_AAL0_32 ((2<<16) | (1<<10) | (0)) ++#define FBR_AAL5_16 ((MAX_AAL5_CELLS<<16) | (0<<10) | (0)) ++#define RX_HDR 20 ++#define MAX_FBR_ENTRIES 256 ++struct tneta_rx_fbrptr { ++ unsigned int * buf_ptr; ++ unsigned int buf_size; ++}; ++ ++#define AAL5_IND (1<<26) ++struct tneta_rx_compl { ++ unsigned int atm_header; ++ unsigned int error; ++ unsigned int buf_ptr; ++ unsigned int trailer; ++ unsigned int control; /* needs initialization */ ++ unsigned int res1; ++ unsigned int res2; ++ unsigned int res3; ++}; ++ ++/* device dependent vcc data */ ++#define TX_SEG_RING_SIZE 256 ++ ++struct tneta1570_vcc { ++ /*-------------------------------- RX part */ ++ int (*rx)(struct atm_vcc *vcc); ++ int rxing; /* pending cells */ ++ struct wait_queue * rx_wait; /* for close */ ++ int dma_channel; /* for close */ ++ int fbr_idx; ++ /*-------------------------------- TX part */ ++ struct wait_queue * tx_wait; /* for close */ ++ int txing; /* cells to be tx'd */ ++ int scheduler_idx; /* index in scheduler table */ ++ unsigned int * seg_ring; /* size aligned 1K */ ++ unsigned int * seg_ring_mptr; /* word aligned */ ++ int seg_ring_idx; ++ ++ struct atm_vcc *next; /* next pending rx */ ++ struct sk_buff *last; /* last PDU */ ++}; ++ ++ ++/* device dependent data */ ++#define TXCMPLR_SZ_IRQ 256 /* size aligned */ ++#define TXCMPLR_SZ_NOI 128 /* size aligned */ ++#define RXCMPLR_SZ_IRQ 128 /* size aligned */ ++#define RXCMPLR_SZ_NOI 64 /* size aligned */ ++#define SAR_REG_WORD(dev, x) (dev->reg[x]) ++#define SAR_REG_SHORT(dev, x) (((unsigned short *)dev->reg)[x]) ++#define MAX_SCHED_ENTRIES 1022 ++#define MAX_TXDMA_ENTRIES 1022 ++#define TX_CMPL_R_IRQ(dev) (dev->txcmplringptr_irq[dev->txcmpl_ring_idx_irq]) ++#define TX_CMPL_R_NOI(dev) (dev->txcmplringptr_noi[dev->txcmpl_ring_idx_noi]) ++#define RX_CMPL_R_IRQ(dev) (dev->rxcmplringptr_irq[dev->rxcmpl_ring_idx_irq]) ++#define RX_CMPL_R_NOI(dev) (dev->rxcmplringptr_noi[dev->rxcmpl_ring_idx_noi]) ++ ++struct tneta1570_dev { ++ /*-------------------------------- TX part */ ++ int txcmpl_ring_idx_noi, txcmpl_ring_idx_irq; ++ unsigned int *txcmplringptr_noi, *txcmplringptr_irq; ++ unsigned int *txcmpl_ring; ++ ++ /*-------------------------------- RX part */ ++ int rxcmpl_ring_idx_noi, rxcmpl_ring_idx_irq; ++ struct tneta_rx_compl *rxcmplringptr_noi, *rxcmplringptr_irq; ++ struct tneta_rx_compl *rxcmpl_ring; ++ ++ /*-------------------------------- maps */ ++ int oam_fbr_idx; ++ ++ /*-------------------------------- stats */ ++ unsigned int lost; /* lost rx cells */ ++ /*-------------------------------- other pointers */ ++ ++ /*-------------------------------- TNETA links */ ++ struct atm_dev *more; /* other TNETA devices */ ++ /*-------------------------------- general information */ ++ ++ volatile unsigned long *ram; /* base of phy device */ ++ volatile unsigned long *scheduler; /* base of scheduler table */ ++ volatile unsigned int *reg; /* base of sar regs device */ ++ volatile struct tneta_rx_fbrptr *free_buf_ptr; /* free buffer pointers */ ++ volatile unsigned long *rx_vpi_vci; /* rx vpi vci table */ ++ volatile struct tneta_tx_dma_state_table *tx_dma_state; /* tx dma state table */ ++ volatile struct tneta_rx_dma_state_table *rx_dma_state; /* rx dma state table */ ++ volatile unsigned long *phy; /* base of phy device */ ++ ++ int mem; /* RAM on board (in bytes) */ ++ void * base; /* board base address */ ++ unsigned long base_diff; /* virtual - phy base address */ ++ unsigned int pci_map_size; /* pci map size of board */ ++ unsigned char irq; /* IRQ */ ++ unsigned char bus; /* PCI stuff */ ++ unsigned char dev_fn; ++}; ++ ++ ++#define TNETA1570_DEV(d) ((struct tneta1570_dev *) (d)->dev_data) ++#define TNETA1570_VCC(d) ((struct tneta1570_vcc *) (d)->dev_data) ++ ++/*---------------------------------------------------------*/ ++ ++/* ++ * Directly Addressable Registers, memory mapped ++ */ ++#define TNETA_REG_BASE_OFFSET 0x3200 /* offset PCI base to registers */ ++#define TNETA_CONFIG 0 /* configuration register */ ++#define TNETA_STATUS 1 /* status register */ ++#define TNETA_INT_MASK 2 /* interrupt mask register */ ++#define TNETA_S_RAT 6 /* 3L RAT cycle # rx DMA state table */ ++#define TNETA_S_RGT 7 /* 3H global reass. timer */ ++#define TNETA_RXUNKNOWN 4 /* rx unknown register */ ++#define TNETA_S_TXCOMPLSIZEI 10 /* 5L TX compl. ring size W/ interrupt */ ++#define TNETA_S_TXCOMPLSIZE 11 /* 5H TX compl. ring size W/O interrupt */ ++#define TNETA_S_RXCOMPLSIZEI 12 /* 6L RX completion ring size W/ interrupt */ ++#define TNETA_S_RXCOMPLSIZE 13 /* 6H RX completion ring size W/O interrupt */ ++#define TNETA_S_FIFO_FREE 14 /* 7L FIFO free-buffer-size */ ++#define TNETA_S_TXSEGSIZE 15 /* 7H Segmentation ring size */ ++#define TNETA_S_AAL_DISCARD 16 /* 8L discarded AAL5 rx cell counter */ ++#define TNETA_S_HEC_ERR 17 /* 8H HEC error counter */ ++#define TNETA_UNKNOWN_P 9 /* Unknown Protocols RX # */ ++#define TNETA_CELL_RXC 10 /* ATM Cells RX'd # */ ++#define TNETA_CELL_TXC 11 /* ATM Cells TX'd # */ ++#define TNETA_S_TXM_RXM 24 /* 12L TX FIFO & RX FIFO max occupancy */ ++#define TNETA_S_VCIM 25 /* 12H VCI mask */ ++#define TNETA_S_SCHEDSIZE 26 /* 13L scheduler-table-size register */ ++#define TNETA_RESET 14 /* software reset register */ ++ ++#define TNETA_TXCOMPLNOI 128 /* TX completion ring W/O interrupt pointer */ ++#define TNETA_TXCOMPLIRQ 129 /* TX completion ring W/ interrupt pointer */ ++#define TNETA_RXCOMPLNOI 130 /* RX completion ring W/O interrupt pointer */ ++#define TNETA_RXCOMPLIRQ 131 /* RX completion ring W/ interrupt pointer */ ++ ++/* configuration register bits */ ++#define TNETA_R0_UNI 0x2000 ++#define TNETA_R0_MAX_RETRY (0xf << 9) /* 1111 max retry master */ ++#define TNETA_R0_LOOP 0x0100 /* set to loop-back (reset!, no enable) */ ++#define TNETA_R0_TX_HECERR 0x0080 /* force HEC error */ ++#define TNETA_R0_SMALL_MAP 0x0040 ++#define TNETA_R0_TX_ENABLE 0x0020 ++#define TNETA_R0_RX_ENABLE 0x0010 ++#define TNETA_R0_ENDIAN (0x0 << 3) /* 00 little endian */ ++#define TNETA_R0_PERBUFFER 0x002 ++#define TNETA_R0_RAT_ENABL 0x001 /* enable reass. aging timer */ ++#define TNETA_R0_STANDARD_MODE (TNETA_R0_UNI) ++ ++/* status register bits */ ++#define TNETA_R1_PCI_MODE 0x400 /* 32/64 bit */ ++#define TNETA_R1_RX_FREEZE 0x200 /* rx ring overflow */ ++#define TNETA_R1_TX_FREEZE 0x100 /* tx ring overflow */ ++#define TNETA_R1_CP_RX 0x080 /* packet reassembly completed */ ++#define TNETA_R1_RX_IRR 0x040 /* rx-unknown written */ ++#define TNETA_R1_HEC_OVER 0x020 /* HEC error counter overflow */ ++#define TNETA_R1_UP_OVER 0x010 /* unknown proto counter overflow */ ++#define TNETA_R1_APD_OVER 0x008 /* AAL5 PDU discard counter overflow */ ++#define TNETA_R1_ACR_OVER 0x004 /* ATM cell rxd counter overflow */ ++#define TNETA_R1_ACT_OVER 0x002 /* ATM cell txd counter overflow */ ++#define TNETA_R1_CP_TX 0x001 /* packet segmentation completed */ ++#define TNETA_R2_STANDARD_INTS (TNETA_R1_RX_FREEZE | \ ++ TNETA_R1_TX_FREEZE | \ ++ TNETA_R1_CP_RX | \ ++ TNETA_R1_CP_TX) ++/* control memory map offsets */ ++#define TNETA_SCHED_TABLE 0x0 ++#define TNETA_FREE_BUFFER_POINTERS 0x3800 ++#define TNETA_RX_VPIVCI_DMA_POINTERS 0x4000 ++#define TNETA_TX_DMA_STATE_TABLE 0x8000 ++#define TNETA_RX_DMA_STATE_TABLE 0x10000 ++#define TNETA_SUNI_OFFSET (0x20000 << 2) ++ ++/* reserved control memory area */ ++#define RESERVED_LL 0xc00 /* lower limit */ ++#define RESERVED_UL 0xe00 /* upper limit */ ++ ++#define TNETA_SUNI_RDREQ 0x00100 ++#define TNETA_SUNI_RD_D_AV (0x10) ++ ++#define OWN (0x1 << 31) /* own bit, set to 1 if owned by tneta1570 */ ++#define SEG_PTR(x) (0x3fffff00 & ((unsigned int)x >> 2)) ++#define BUF_PTR(x) (((unsigned int)x >> 2) & 0x3fffffff) ++ /* pointer to tx data buffer header, aligned to 4 byte */ ++ ++/* tx data buffer header */ ++struct tx_buffer_descriptor{ ++ unsigned int control; ++ unsigned int next_buffer; ++ unsigned int atm_header; ++ unsigned int AAL5_control; ++}; ++ ++/* control word layout */ ++#define TNETA_TXDBH_CTRL_RDY (0x1 << 31) ++#define TNETA_TXDBH_CTRL_SOP (0x1 << 30) ++#define TNETA_TXDBH_CTRL_EOP (0x1 << 29) ++#define TNETA_TXDBH_CTRL_ABORT (0x1 << 28) ++#define TNETA_TXDBH_CTRL_AAL0_PTI (0x0 << 26) ++#define TNETA_TXDBH_CTRL_AAL5 (0x1 << 26) ++#define TNETA_TXDBH_CTRL_AAL0_NOPTI (0x2 << 26) ++#define TNETA_TXDBH_CTRL_INT_NOINT (0x1 << 25) ++#define TNETA_TXDBH_CTRL_BUF_OFFSET (0xff << 16) ++#define TNETA_TXDBH_CTRL_BYTE_COUNT (0xffff << 0) ++ ++#define AAL5_PDU_INT (TNETA_TXDBH_CTRL_RDY | \ ++ TNETA_TXDBH_CTRL_SOP | \ ++ TNETA_TXDBH_CTRL_EOP | \ ++ TNETA_TXDBH_CTRL_AAL5 | \ ++ TNETA_TXDBH_CTRL_INT_NOINT) ++ ++#define AAL0_PDU_INT (TNETA_TXDBH_CTRL_RDY | \ ++ TNETA_TXDBH_CTRL_SOP | \ ++ TNETA_TXDBH_CTRL_EOP | \ ++ TNETA_TXDBH_CTRL_AAL0_PTI) ++ ++/* ATM header */ ++#define TNETA_TXDBH_ATMH_GFC (0xff << 24) ++#define TNETA_TXDBH_ATMH_VPI (0xff << 16) ++#define TNETA_TXDBH_ATMH_VCI (0xffff << 4) ++#define TNETA_TXDBH_ATMH_PTI (0x7 << 1) ++#define TNETA_TXDBH_ATMH_CLP (0x1 << 0) ++ ++/* AAL5 control */ ++#define TNETA_TXDBH_AAL5_CPCS_UU (0xff << 24) ++#define TNETA_TXDBH_AAL5_CPI (0xffff << 16) ++#define TNETA_TXDBH_AAL5_USER (0xffff << 0) ++ ++/* TX completion rings */ ++#define TNETA_TXCR_OWN (0x1 << 31) ++#define TNETA_TXCR_ABORT (0x1 << 30) ++#define TNETA_TXCR_BUFADDR (0x3fffffff << 0) ++ ++#endif __KERNEL__ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/tneta1570.c Fri Jul 26 17:35:25 1996 +@@ -0,0 +1,1479 @@ ++/* drivers/atm/tneta1570.c - ti tneta1570 atm driver */ ++ ++/* Written 1996 by Rolf Fiedler (rolf.fiedler@infotech.tu-chemnitz.de) ++ * based on the atm drivers by Werner Almesberger, EPFL LRC ++ */ ++ ++#include /* for extended debugging options */ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include /* for xtime */ ++#include ++#include ++#include ++#include ++#include ++ ++#include "tneta1570.h" ++#include "suni.h" ++ ++#define SLOW_DOWN_FACTOR 8 ++ ++/* ++ * KNOWN BUGS: ++ * ++ * doesn't work a bit ++ */ ++ ++inline void write_sched_tab(struct tneta1570_dev * dev, int i, unsigned int v); ++inline int read_sched_tab(struct tneta1570_dev * dev, int i); ++static void dequeue_OAM(struct atm_dev *dev); /* dequeue OAM cells */ ++static void dequeue_AAL0(struct atm_dev *dev); /* dequeue AAL0 cells */ ++static void dequeue_AAL5(struct atm_dev *dev); /* dequeue AAL5 cells */ ++static int alloc_dma(struct atm_vcc *vcc); ++ ++#if 0 ++#define DPRINTK printk ++#else ++#define DPRINTK (void) ++#endif ++ ++#ifndef CONFIG_ATM_TNETA1570_DEBUG ++ ++ ++#define NULLCHECK(x) ++ ++#define EVENT(s,a,b) ++ ++ ++static inline void event_dump(void) ++{ ++} ++ ++ ++#else ++ ++ ++/* ++ * NULL pointer checking ++ */ ++ ++#define NULLCHECK(x) \ ++ if ((unsigned long) (x) < 0x30) printk(#x "==0x%x\n", (int) (x)) ++ ++/* ++ * Very extensive activity logging. Greatly improves bug detection speed but ++ * costs a few Mbps if enabled. ++ */ ++ ++#define EV 64 ++ ++static const char *ev[EV]; ++static unsigned long ev_a[EV],ev_b[EV]; ++static int ec = 0; ++ ++static void EVENT(const char *s,unsigned long a,unsigned long b) ++{ ++ ev[ec] = s; ++ ev_a[ec] = a; ++ ev_b[ec] = b; ++ ec = (ec+1) % EV; ++} ++ ++ ++static void event_dump(void) ++{ ++ int n,i; ++ ++ for (n = 0; n < EV; n++) { ++ i = (ec+n) % EV; ++ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i]); ++ } ++} ++ ++ ++#endif /* CONFIG_ATM_TNETA1570_DEBUG */ ++ ++ ++static int tx_complete = 0,dma_complete = 0,queued = 0,requeued = 0, ++ backlogged = 0,rx_enqueued = 0,rx_dequeued = 0,pushed = 0,submitted = 0, ++ putting = 0; ++ ++static struct atm_dev *tneta1570_boards = NULL; ++ ++ ++/*-------------------------------- utilities --------------------------------*/ ++ ++ ++static void dump_mem(struct tneta1570_dev *tneta1570_dev) ++{ ++} ++ ++ ++static void dump(struct atm_dev *dev) ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ ++ tneta1570_dev = TNETA1570_DEV(dev); ++ printk("\nFree memory\n"); ++ dump_mem(tneta1570_dev); ++ printk("TX buffers\n"); ++ ++ printk("RX buffers\n"); ++ ++ printk("----\n"); ++} ++ ++/* --------------------------memory allocation-------------------------------*/ ++ ++ ++/* ++ * allocate a skbuff with enough room for the SDU header ++ */ ++static struct sk_buff *tneta1570_alloc_tx(struct atm_vcc *vcc, unsigned int size) ++{ ++ struct sk_buff *ptr; ++ ++ ptr = alloc_skb(size + 48, GFP_KERNEL); ++ if(ptr == NULL) return NULL; ++ skb_reserve(ptr, 48); /* room for push */ ++ return ptr; ++} ++ ++ ++ ++/*----------------------------------- RX ------------------------------------*/ ++ ++/* ++ * alloc_dma ++ * find entry in dma state table for this vpi/vci ++ * if vpi already open increase valid vci range ++ * else open vpi, set vci range to vci ++ * return index to dma channel, return 0 on error ++ */ ++static int alloc_dma(struct atm_vcc *vcc) ++{ ++ unsigned char unsorted[MAX_VPI], sorted[MAX_VPI]; ++ unsigned int x; ++ int i; ++ struct tneta1570_dev *tneta1570_dev; ++ ++ EVENT(">alloc_rx_dma\n",0,0); ++ ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++ ++ x = tneta1570_dev->rx_vpi_vci[vcc->vpi]; ++ ++ if(x != 0) { ++ x = 0x7fff & (x >> 16); ++ return x + vcc->vci - 0x800; /* idx = value - offset */ ++ } else { ++ /* create a new vpi entry */ ++ /* first, find dma channel range */ ++ for(i=0; irx_vpi_vci[i] & OWN) { ++ x = tneta1570_dev->rx_vpi_vci[i]; ++ unsorted[i] = 0x7f & (x >> 24); ++ } else { ++ unsorted[i] = 0; ++ } ++ sorted[i] = 0; ++ } ++ for(i=0; irx_vpi_vci[vcc->vpi] = OWN | ((i+8)<<24) | (MAX_VCI); ++ return 256*i + vcc->vci; ++ } ++} ++ ++ ++/* ++ * let the protocol have a look at the buffer ++ */ ++static unsigned long tneta1570_fetch(struct atm_vcc *vcc, int i) ++{ ++ return 0; /* not implemented yet */ ++} ++ ++/* ++ * interrupt driven dequeue for rx buffer ++ * -> for each and every post in the completion ring do ++ * increment completion ring ptr (modulo RXCMPLR_SIZE_IRQ) ++ * get skb address from buffer address ++ * get free-buffer ring address from tneta1570_vcc ++ * prepare skb with header information ++ * vcc->push skb ++ * alloc (ATOMIC) new skb for this vci, put in free-buffer ring ++ * increment free-buffer ring index (modulo FBR_SIZE) ++ */ ++static void dequeue_rx(struct atm_dev * dev) ++{ ++ struct tneta1570_dev * tneta1570_dev; ++ ++ EVENT(">dequeue_rx\n",0,0); ++ NULLCHECK(dev); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ NULLCHECK(tneta1570_dev); ++ ++ /* find here completion ring entries */ ++ EVENT(">completion ring post: %08x, %d\n", ++ (unsigned int)&RX_CMPL_R_IRQ(tneta1570_dev).atm_header, ++ tneta1570_dev->rxcmpl_ring_idx_irq); ++ ++ while(!(RX_CMPL_R_IRQ(tneta1570_dev).control & OWN)) { ++ if((RX_CMPL_R_IRQ(tneta1570_dev).control & 0xff) == 0) { ++ dequeue_OAM(dev); ++ } else { ++ if((RX_CMPL_R_IRQ(tneta1570_dev).error & AAL5_IND)) { ++ dequeue_AAL5(dev); ++ } else { ++ dequeue_AAL0(dev); ++ ++ } ++ } ++ RX_CMPL_R_IRQ(tneta1570_dev).control = OWN; ++ tneta1570_dev->rxcmpl_ring_idx_irq++; ++ tneta1570_dev->rxcmpl_ring_idx_irq %= RXCMPLR_SZ_IRQ; ++ } ++ return ; ++} ++ ++static void dequeue_OAM(struct atm_dev *dev) /* dequeue AAL0 cells */ ++{ ++ struct tneta1570_dev * tneta1570_dev; ++ struct sk_buff *skb, *new_skb; ++ unsigned int *p, *fbr; ++ ++ EVENT(">dequeue_rx_OAM\n",0,0); ++ NULLCHECK(dev); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ NULLCHECK(tneta1570_dev); ++ ++/* if(vcc->push_oam) printk(" PushOAM is present.\n"); */ ++ ++ p = (unsigned int *)(RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr << 2); ++ skb = (struct sk_buff *)(*(p-1)); /* get skb */ ++ ++ /* get new buffer before dequeueing old ++ */ ++ new_skb = alloc_skb(MAX_AAL0_PDU+RX_HDR, GFP_ATOMIC); ++ if(new_skb == NULL) { ++ /* add just received buffer to free list, drop pdu :-( */ ++ fbr = tneta1570_dev->free_buf_ptr[0].buf_ptr; ++ fbr[tneta1570_dev->oam_fbr_idx] = OWN | ((int)p >> 2); ++ tneta1570_dev->oam_fbr_idx++; ++ tneta1570_dev->oam_fbr_idx %= AAL0_BUFS; ++ return; ++ } ++ ++ /* add newly allocated buffer to free list */ ++ fbr = tneta1570_dev->free_buf_ptr[0].buf_ptr; ++ fbr[tneta1570_dev->oam_fbr_idx] = OWN | ((unsigned int)(new_skb->data+4) >> 2); ++ *(struct sk_buff **)(new_skb->data) = new_skb; ++ tneta1570_dev->oam_fbr_idx++; ++ tneta1570_dev->oam_fbr_idx %= AAL0_BUFS; ++ ++ /* push received buffer to protocol */ ++ ++ skb->data[16] = skb->data[12]; ++ skb->data[17] = skb->data[13]; ++ skb->data[18] = skb->data[14]; ++ skb->data[19] = skb->data[15]; ++ skb->data += 4*4; /* skip header */ ++ skb->len = 52; ++ /* should check for multiple buffers @@@@ */ ++ skb->tail = skb->data + skb->len; ++ ++ if (/* vcc->push */ 1) { ++ dev_kfree_skb(skb, GFP_ATOMIC); ++ printk(" Don't know how to call push !\n"); ++ /* vcc->push(vcc,skb); */ ++ } else { ++ dev_kfree_skb(skb, GFP_ATOMIC); ++ printk(DEV_LABEL "(itf %d) No push in protocol.\n", ++ dev->number); ++ } ++} ++ ++ ++static void dequeue_AAL0(struct atm_dev *dev) /* dequeue AAL0 cells */ ++{ ++ struct tneta1570_dev * tneta1570_dev; ++ struct tneta1570_vcc * tneta1570_vcc; ++ struct atm_vcc *vcc; ++ struct sk_buff *skb, *new_skb; ++ unsigned int *p, v, *fbr; ++ ++ EVENT(">dequeue_rx_AAL0\n",0,0); ++ NULLCHECK(dev); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ NULLCHECK(tneta1570_dev); ++ ++ p = (unsigned int *)(RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr << 2); ++ skb = (struct sk_buff *)(*(p-1)); /* get skb */ ++ ++ vcc = skb->atm.vcc; ++ NULLCHECK(vcc); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ NULLCHECK(tneta1570_vcc); ++ /* get new buffer before dequeueing old ++ * if error in peek drop pdu ++ */ ++ new_skb = vcc->peek(vcc, MAX_AAL0_PDU+RX_HDR, NULL); ++ if(new_skb == NULL) { ++ /* add just received buffer to free list, drop pdu :-( */ ++ v = RX_CMPL_R_IRQ(tneta1570_dev).control; ++ fbr = tneta1570_dev->free_buf_ptr[0xff & v].buf_ptr; ++ fbr[tneta1570_vcc->fbr_idx] = OWN | ((int)p >> 2); ++ tneta1570_vcc->fbr_idx++; ++ tneta1570_vcc->fbr_idx %= AAL0_BUFS; ++ return; ++ } ++ ++ /* add newly allocated buffer to free list */ ++ ++ v = RX_CMPL_R_IRQ(tneta1570_dev).control; ++ fbr = tneta1570_dev->free_buf_ptr[0xff & v].buf_ptr; ++ fbr[tneta1570_vcc->fbr_idx] = OWN | ((unsigned int)(new_skb->data+4) >> 2); ++ *(struct sk_buff **)(new_skb->data) = new_skb; ++ new_skb->atm.vcc = vcc; /* link vcc info */ ++ tneta1570_vcc->fbr_idx++; ++ tneta1570_vcc->fbr_idx %= AAL0_BUFS; ++ ++ /* push received buffer to protocol */ ++ ++ skb->data[16] = skb->data[12]; ++ skb->data[17] = skb->data[13]; ++ skb->data[18] = skb->data[14]; ++ skb->data[19] = skb->data[15]; ++ skb->data += 4*4; /* skip header */ ++ skb->len = 52; ++ /* should check for multiple buffers @@@@ */ ++ skb->tail = skb->data + skb->len; ++ skb->free = 1; /* set free flag, is there need for it? */ ++ ++ if (vcc->push) { ++ vcc->push(vcc,skb); ++ } else { ++ printk(DEV_LABEL "(itf %d) No push in protocol.\n", ++ dev->number); ++ } ++ /* update statistics */ ++ vcc->stats->rx++; ++rx_dequeued++; ++} ++ ++ ++ ++static void dequeue_AAL5(struct atm_dev *dev) /* dequeue AAL5 PDU */ ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc * tneta1570_vcc; ++ struct atm_vcc *vcc; ++ struct sk_buff *skb, *new_skb; ++ unsigned int *p, v, *fbr; ++ ++ EVENT(">dequeue_rx_AAL5\n",0,0); ++ NULLCHECK(dev); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ NULLCHECK(tneta1570_dev); ++ ++ p = (unsigned int *)(RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr << 2); ++ skb = (struct sk_buff *)(*(p-1)); /* get skb */ ++ ++ DPRINTK(" p %08x, skb %08x, head %08x, err %08x, sop %08x, trailer %08x, idx %08x", ++ p, skb, ++ RX_CMPL_R_IRQ(tneta1570_dev).atm_header, ++ RX_CMPL_R_IRQ(tneta1570_dev).error, ++ RX_CMPL_R_IRQ(tneta1570_dev).buf_ptr, ++ RX_CMPL_R_IRQ(tneta1570_dev).trailer, ++ RX_CMPL_R_IRQ(tneta1570_dev).control); ++ ++ vcc = skb->atm.vcc; ++ DPRINTK(" vcc %08x", vcc); ++ ++ NULLCHECK(vcc); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ NULLCHECK(tneta1570_vcc); ++ /* get new buffer before dequeueing old ++ * if error in peek drop pdu ++ */ ++ new_skb = vcc->peek(vcc, MAX_AAL5_PDU+RX_HDR, NULL); ++ if(new_skb == NULL) { ++ /* add just received buffer to free list :-( */ ++ v = RX_CMPL_R_IRQ(tneta1570_dev).control; ++ fbr = tneta1570_dev->free_buf_ptr[0xff & v].buf_ptr; ++ fbr[tneta1570_vcc->fbr_idx] = OWN | ((int)p >> 2); ++ tneta1570_vcc->fbr_idx++; ++ tneta1570_vcc->fbr_idx %= AAL5_BUFS; ++ return; ++ } ++ /* add newly allocated buffer to free list */ ++ ++ v = RX_CMPL_R_IRQ(tneta1570_dev).control; ++ fbr = tneta1570_dev->free_buf_ptr[v].buf_ptr; ++ fbr[tneta1570_vcc->fbr_idx] = OWN | ((unsigned int)(new_skb->data+4) >> 2); ++ *(struct sk_buff **)(new_skb->data) = new_skb; ++ new_skb->atm.vcc = vcc; /* link context info */ ++ tneta1570_vcc->fbr_idx++; ++ tneta1570_vcc->fbr_idx %= AAL5_BUFS; ++ ++ /* push received buffer to protocol */ ++ skb->data += 5*4; /* skip header */ ++ skb->len = RX_CMPL_R_IRQ(tneta1570_dev).trailer & 0xffff; ++ /* should check for multiple buffers @@@@ */ ++ skb->tail = skb->data + skb->len; ++ skb->free = 1; /* set free flag, is there need for it? */ ++ ++ if (vcc->push) { ++ vcc->push(vcc,skb); ++ } else { ++ printk(DEV_LABEL "(itf %d) No push in protocol.\n", ++ dev->number); ++ } ++ /* update statistics */ ++ vcc->stats->rx++; ++rx_dequeued++; ++} ++ ++ ++/* ++ * --- bring rx up --- ++ * init vpi/vci table - well, already done by tneta1570_init ++ * kmalloc completion rings ++ * write ptrs to completion rings into sar regs ++ * init completion rings to all OWN ++ * write completion ring related data to device structure, set index to 0 ++ * init dma channels 0, 1, 2 for reception of OAM cells ++ */ ++static int start_rx(struct atm_dev *dev) ++{ ++ int i; ++ unsigned int x; ++ unsigned int *ptr; ++ struct sk_buff *buf; ++ struct tneta1570_dev *tneta1570_dev; ++ ++ EVENT(">start_rx\n",0,0); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ tneta1570_dev->lost = 0; ++ ++ /* init rx completion rings */ ++ tneta1570_dev->rxcmpl_ring = ++ kmalloc(2*RXCMPLR_SZ_IRQ*sizeof(struct tneta_rx_compl), ++ GFP_KERNEL); ++ DPRINTK("RX_CMPL_R->%08x", tneta1570_dev->rxcmpl_ring); ++ if(!tneta1570_dev->rxcmpl_ring) { ++ printk(DEV_LABEL "(itf %d) malloc on rx start failed.\n", dev->number); ++ return -ENOMEM; ++ } ++ /* align completion-ring with irq to its size */ ++ x = (unsigned int)(&tneta1570_dev->rxcmpl_ring[RXCMPLR_SZ_IRQ]); ++ tneta1570_dev->rxcmplringptr_irq = (struct tneta_rx_compl *) ++ (x & (~(RXCMPLR_SZ_IRQ*sizeof(struct tneta_rx_compl) - 1))); ++ /* the rest is for the completion ring w/o irq */ ++ if((tneta1570_dev->rxcmplringptr_irq - RXCMPLR_SZ_NOI) ++ > tneta1570_dev->rxcmpl_ring) { ++ tneta1570_dev->rxcmplringptr_noi = ++ tneta1570_dev->rxcmplringptr_irq - RXCMPLR_SZ_NOI; ++ } else { ++ tneta1570_dev->rxcmplringptr_noi = ++ tneta1570_dev->rxcmplringptr_irq + RXCMPLR_SZ_IRQ; ++ } ++ EVENT(">init rx completion ring irq\n",0,0); ++ for(i=0; irxcmplringptr_irq[i].control = OWN; ++ EVENT(">init tx completion ring noi\n",0,0); ++ for(i=0; irxcmplringptr_noi[i].control = OWN; ++ ++ tneta1570_dev->rxcmpl_ring_idx_noi = 0; ++ tneta1570_dev->rxcmpl_ring_idx_irq = 0; ++ ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_RXCOMPLSIZEI) = RXCMPLR_SZ_IRQ-1; ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_RXCOMPLSIZE) = RXCMPLR_SZ_NOI-1; ++ SAR_REG_WORD(tneta1570_dev, TNETA_RXCOMPLNOI) = (unsigned int)tneta1570_dev->rxcmplringptr_noi; ++ SAR_REG_WORD(tneta1570_dev, TNETA_RXCOMPLIRQ) = (unsigned int)tneta1570_dev->rxcmplringptr_irq; ++ ++ /* init dma 0,1,2 for oam */ ++ ++ /* alloc memory for oam fbr & buffers */ ++ ptr = kmalloc(AAL0_BUFS*sizeof(struct tneta_rx_fbrptr), GFP_KERNEL); ++ if(ptr == NULL) printk(DEV_LABEL "PANIC on start rx \n"); ++ for(i=0; idata) = buf; /* link */ ++ ptr[i] = OWN | ((unsigned int)(buf->data + 4) >> 2); ++ } ++ ++ tneta1570_dev->oam_fbr_idx = 0; ++ /* oam cells use fbr 0 */ ++ tneta1570_dev->free_buf_ptr[0].buf_ptr = ptr; ++ tneta1570_dev->free_buf_ptr[0].buf_size = FBR_AAL0_32; ++ ++ tneta1570_dev->rx_dma_state[0].control = RX_DMA_CONTROL_AAL0; ++ tneta1570_dev->rx_dma_state[0].AAL0_cells = MAX_AAL0_CELLS; ++ tneta1570_dev->rx_dma_state[0].rx_timeout = RX_TIME_OUT; ++ tneta1570_dev->rx_dma_state[0].dma_on_idx = DMA_ON + 0; ++ tneta1570_dev->rx_dma_state[1].control = RX_DMA_CONTROL_AAL0; ++ tneta1570_dev->rx_dma_state[1].AAL0_cells = MAX_AAL0_CELLS; ++ tneta1570_dev->rx_dma_state[1].rx_timeout = RX_TIME_OUT; ++ tneta1570_dev->rx_dma_state[1].dma_on_idx = DMA_ON + 0; ++ tneta1570_dev->rx_dma_state[2].control = RX_DMA_CONTROL_AAL0; ++ tneta1570_dev->rx_dma_state[2].AAL0_cells = MAX_AAL0_CELLS; ++ tneta1570_dev->rx_dma_state[2].rx_timeout = RX_TIME_OUT; ++ tneta1570_dev->rx_dma_state[2].dma_on_idx = DMA_ON + 0; ++ ++ SAR_REG_WORD(tneta1570_dev, TNETA_CONFIG) |= TNETA_R0_RX_ENABLE; ++ ++ return 0; ++} ++ ++/* ++ * open vpi/vci for rx ++ * alloc 16 words for free-buffer ring ++ * alloc 16 skbs, size: if AAL5 ++ * IP-MTU + a little something (64K SDUs need multiple bufs) ++ * else ++ * 48 + a little something ++ * enter pointers to skbs in free-buffer ring ++ * find unused free-buffer ring-pointer table entry ++ * put pointer to free-buffer ring in ring-pointer table & tneta1570_vcc ++ * check if vpi has already alloc'd a dma table range ++ * if not, alloc range in dma table for vpi (size is 256*8 words) ++ * if AAL5 -> set dma state table to AAL5 ++ * else use counter terminated AAL0 (cell count 1) ++ * prepare dma state table entry for this vpi/vci (may turn rx for this vci on) ++ * if range < vci -> set range to vci (max) (this definitely turns it on) ++ */ ++static int open_rx(struct atm_vcc *vcc) ++{ ++ int i, dma_idx, fbr_idx; ++ struct sk_buff *skb; ++ unsigned int *ptr; ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc *tneta1570_vcc; ++ ++ EVENT(">open_rx\n",0,0); ++ ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ ++ tneta1570_vcc->rx_wait = NULL; ++ ++ tneta1570_vcc->dma_channel = alloc_dma(vcc); ++ if(!tneta1570_vcc->dma_channel) return -1; ++ ++ dma_idx = tneta1570_vcc->dma_channel; ++ ++ for(fbr_idx = 0; fbr_idxfree_buf_ptr[fbr_idx].buf_ptr == 0) ++ break; ++ if(fbr_idx == MAX_FBR_ENTRIES) return -1; ++ ++ if(vcc->aal == ATM_AAL0) { ++ /* alloc memory for fbr & buffers */ ++ ptr = kmalloc(AAL0_BUFS*sizeof(struct tneta_rx_fbrptr), ++ GFP_KERNEL); ++ if(ptr == NULL) printk(DEV_LABEL "PANIC on open rx \n"); ++ for(i=0; ipeek(vcc, MAX_AAL0_PDU+RX_HDR, NULL); ++ if(skb == NULL) printk(DEV_LABEL "PANIC on open rx \n"); ++ *(struct sk_buff **)(skb->data) = skb; /* link */ ++ skb->atm.vcc = vcc; /* link vcc info */ ++ ptr[i] = OWN | ((unsigned int)(skb->data+4) >> 2); ++ } ++ ++ tneta1570_vcc->fbr_idx = 0; ++ ++ tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr = ptr; ++ tneta1570_dev->free_buf_ptr[fbr_idx].buf_size = FBR_AAL0_32; ++ ++ tneta1570_dev->rx_dma_state[dma_idx].control = RX_DMA_CONTROL_AAL0; ++ tneta1570_dev->rx_dma_state[dma_idx].AAL0_cells = MAX_AAL0_CELLS; ++ tneta1570_dev->rx_dma_state[dma_idx].rx_timeout = RX_TIME_OUT; ++ tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx = DMA_ON + fbr_idx; ++ ++ } else if(vcc->aal == ATM_AAL5) { ++ /* alloc memory for fbr & buffers */ ++ ptr = kmalloc(AAL5_BUFS*sizeof(struct tneta_rx_fbrptr), ++ GFP_KERNEL); ++ if(ptr == NULL) printk(DEV_LABEL "PANIC on open rx \n"); ++ for(i=0; ipeek(vcc, MAX_AAL5_PDU+RX_HDR, NULL); ++ if(skb == NULL) printk(DEV_LABEL "PANIC on open rx \n"); ++ *(struct sk_buff **)(skb->data) = skb; /* link */ ++ skb->atm.vcc = vcc; /* link vcc info */ ++ ptr[i] = OWN | ((unsigned int)(skb->data+4) >> 2); ++ } ++ ++ tneta1570_vcc->fbr_idx = 0; ++ ++ tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr = ptr; ++ tneta1570_dev->free_buf_ptr[fbr_idx].buf_size = FBR_AAL5_16; ++ ++ tneta1570_dev->rx_dma_state[dma_idx].control = RX_DMA_CONTROL_AAL5; ++ tneta1570_dev->rx_dma_state[dma_idx].rx_timeout = RX_TIME_OUT; ++ tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx = DMA_ON + fbr_idx; ++ ++ } else return -1; ++ return 0; ++} ++ ++/* ++ * close vpi/vci for rx ++ * ++ * get free-buffer ring table address ++ * clear dma state table entry (rx for vci off) ++ * get free-buffer ring address ++ * wait for rx to drain ++ * free all remaining skbs (the ones with own enabled, e.g. all) ++ * free free-buffer ring ++ * set free-buffer-ring ptr to 0 to indicate 'freeness' ++ * check if vpi has another vci enabled ++ * -> yes: if other_vci > this_vci -> do nothing ++ * else -> set max vci to highest other vci ++ * -> no: set vci in vpi/vci table to 0 ++ */ ++static void close_rx(struct atm_vcc *vcc) ++{ ++ int i, fbr_idx, dma_idx, x; ++ struct sk_buff *skb; ++ unsigned int *buf, *ptr; ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc *tneta1570_vcc; ++ ++ EVENT(">close_rx\n",0,0); ++ ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ ++ dma_idx = tneta1570_vcc->dma_channel; ++ fbr_idx = tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx & 0xff; ++ /* wait for EOP */ ++ while(tneta1570_dev->rx_dma_state[dma_idx].control & OWN); ++ tneta1570_dev->rx_dma_state[dma_idx].dma_on_idx = 0; /* off */ ++ /* mark as empty */ ++ ptr = tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr; ++ tneta1570_dev->free_buf_ptr[fbr_idx].buf_ptr = 0; /* mark fbr free */ ++ x = tneta1570_dev->free_buf_ptr[fbr_idx].buf_size; ++ x = x >> 10; /* ring size */ ++ x &= 0x3f; ++ x++; ++ x = 16 * x; ++ for(i=0; ifree = 1; /* ???? */ ++ kfree_skb(skb, FREE_READ); ++ } ++ } ++ kfree(ptr); ++ ++ /* if last vci on this vpi is closed, close vpi */ ++ ++} ++ ++ ++/*----------------------------------- TX ------------------------------------*/ ++ ++/* ++ * -- bring tx up -- ++ * init scheduler table to all 0s ++ * kmalloc tx completion rings ++ * write ptrs to completion rings into sar regs ++ * init completion rings to all 0x80000000s ++ * write completion ring related data to device structure, set index to 0 ++ * enable tx in sar ++ */ ++static int start_tx(struct atm_dev *dev) ++{ ++ int i; ++ unsigned int x, *seg_ring, *seg_ring_mptr; ++ struct tneta1570_dev *tneta1570_dev; ++ ++ EVENT(">start_tx\n",0,0); ++ ++ tneta1570_dev = TNETA1570_DEV(dev); ++ ++ /* init tx completion rings */ ++ tneta1570_dev->txcmpl_ring=kmalloc(2*TXCMPLR_SZ_IRQ*4, GFP_KERNEL); ++ if(!tneta1570_dev->txcmpl_ring) { ++ printk(DEV_LABEL "(itf %d) malloc on tx start failed.\n", dev->number); ++ return -ENOMEM; ++ } ++ DPRINTK("TX_CMPL_R->%08x", tneta1570_dev->txcmpl_ring); ++ /* align completion-ring with irq to its size */ ++ x = (unsigned int)(&tneta1570_dev->txcmpl_ring[TXCMPLR_SZ_IRQ]); ++ tneta1570_dev->txcmplringptr_irq = (unsigned int *)(x & (~(TXCMPLR_SZ_IRQ*4 - 1))); ++ /* the rest is for the completion ring w/o irq */ ++ if((tneta1570_dev->txcmplringptr_irq - TXCMPLR_SZ_NOI) > tneta1570_dev->txcmpl_ring) { ++ tneta1570_dev->txcmplringptr_noi = tneta1570_dev->txcmplringptr_irq - TXCMPLR_SZ_NOI; ++ } else { ++ tneta1570_dev->txcmplringptr_noi = tneta1570_dev->txcmplringptr_irq + TXCMPLR_SZ_IRQ; ++ } ++ EVENT(">init tx completion ring irq\n",0,0); ++ for(i=0; itxcmplringptr_irq[i] = OWN; ++ EVENT(">init tx completion ring noi\n",0,0); ++ for(i=0; itxcmplringptr_noi[i] = OWN; ++ ++ tneta1570_dev->txcmpl_ring_idx_noi = 0; ++ tneta1570_dev->txcmpl_ring_idx_irq = 0; ++ ++ /* dma state reread bug fix - allocate dma 1 */ ++ seg_ring_mptr=kmalloc(2*TX_SEG_RING_SIZE*4, GFP_KERNEL); ++ if(!seg_ring_mptr) { ++ printk(DEV_LABEL "(itf %d) malloc on tx open failed.\n", ++ dev->number); ++ return -ENOMEM; ++ } ++ x = (unsigned int)(seg_ring_mptr + TX_SEG_RING_SIZE); ++ seg_ring = (unsigned int *)(x & ~(TX_SEG_RING_SIZE * 4 - 1)); ++ ++ for(i=0; itx_dma_state[1].dma_state_flag = (OWN | SEG_PTR(seg_ring)); ++ ++ /* init registers */ ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_TXCOMPLSIZEI) = TXCMPLR_SZ_IRQ - 1; ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_TXCOMPLSIZE) = TXCMPLR_SZ_NOI - 1; ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_TXSEGSIZE) = TX_SEG_RING_SIZE - 1; ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_SCHEDSIZE) = 2 + SLOW_DOWN_FACTOR; ++ ++ SAR_REG_WORD(tneta1570_dev, TNETA_TXCOMPLNOI) = (unsigned int)tneta1570_dev->txcmplringptr_noi; ++ SAR_REG_WORD(tneta1570_dev, TNETA_TXCOMPLIRQ) = (unsigned int)tneta1570_dev->txcmplringptr_irq; ++ ++ SAR_REG_WORD(tneta1570_dev, TNETA_CONFIG) |= TNETA_R0_TX_ENABLE; ++ ++ return 0; ++} ++ ++/* ++ * -- open vpi/vci -- ++ * find free entry in scheduler table ++ * init tx_dma_state table for this vpi/vci ++ * kmalloc tx_seg_ring, init with all 0s ++ * add entry to scheduler table ++ */ ++static int open_tx(struct atm_vcc *vcc) ++{ ++ int scheduler_idx, i; ++ unsigned int x; ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc *tneta1570_vcc; ++ ++ EVENT(">open_tx\n",0,0); ++ ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ ++ tneta1570_vcc->tx_wait = NULL; ++ ++ if (vcc->qos.txtp.traffic_class == ATM_NONE) return 0; ++ ++ tneta1570_vcc->seg_ring_mptr=kmalloc(2*TX_SEG_RING_SIZE*4, GFP_KERNEL); ++ if(!tneta1570_vcc->seg_ring_mptr) { ++ printk(DEV_LABEL "(itf %d) malloc on tx open failed.\n", ++ vcc->dev->number); ++ return -ENOMEM; ++ } ++ /* align seg-ring to its size */ ++ x = (unsigned int)(tneta1570_vcc->seg_ring_mptr + TX_SEG_RING_SIZE); ++ tneta1570_vcc->seg_ring = (unsigned int *)(x & ~(TX_SEG_RING_SIZE * 4 - 1)); ++ ++ EVENT("> seg ring is at phy %x\n", (unsigned int)tneta1570_vcc->seg_ring,0); ++ for(i=0; iseg_ring[i]=0; ++ tneta1570_vcc->seg_ring_idx = 0; ++ ++ /* find free scheduler table entry */ ++ scheduler_idx=0; ++ while(read_sched_tab(tneta1570_dev, scheduler_idx) != 0) { ++ scheduler_idx++; ++ if(scheduler_idx >= MAX_SCHED_ENTRIES) { ++ printk(DEV_LABEL "(itf %d) tx scheduler full on open.\n", ++ vcc->dev->number); ++ return -ENOMEM; ++ } ++ } ++ ++ if((scheduler_idx < SLOW_DOWN_FACTOR) && ++ (scheduler_idx + SLOW_DOWN_FACTOR < MAX_SCHED_ENTRIES)) ++ SAR_REG_SHORT(tneta1570_dev, TNETA_S_SCHEDSIZE) = ++ scheduler_idx + SLOW_DOWN_FACTOR; ++ else SAR_REG_SHORT(tneta1570_dev, TNETA_S_SCHEDSIZE) =scheduler_idx; ++ ++ tneta1570_vcc->scheduler_idx = scheduler_idx; ++ write_sched_tab(tneta1570_dev, scheduler_idx, scheduler_idx+1); /* 1 in entry 0 */ ++ ++ tneta1570_dev->tx_dma_state[scheduler_idx+1].dma_state_flag = ++ (OWN | SEG_PTR(tneta1570_vcc->seg_ring)); ++ ++ tneta1570_vcc->txing = 0; /* init txing flag */ ++ ++ return 0; ++} ++ ++/* ++ * -- close vpi/vci -- ++ * remove scheduler table entry ++ * free tx_seg_ring ++ */ ++static void close_tx(struct atm_vcc *vcc) ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc *tneta1570_vcc; ++ ++ EVENT(">close_tx\n",0,0); ++ ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ ++ while(tneta1570_vcc->txing) { ++ sleep_on(&tneta1570_vcc->tx_wait); /* wait for tx to drain */ ++ } ++ ++ /* remove ptr to segmentation ring */ ++ ++ tneta1570_dev->tx_dma_state[tneta1570_vcc->scheduler_idx+1].dma_state_flag = 0; ++ write_sched_tab(tneta1570_dev, tneta1570_vcc->scheduler_idx, 0); ++ ++ kfree(tneta1570_vcc->seg_ring_mptr); ++} ++ ++/* ++ * -- send skb -- ++ * prepare buffer with header data ++ * set entry in segmentation ring for vpi/vci and increment index ++ * smile ;-) ++ */ ++static int do_tx(struct sk_buff * skb) ++{ ++ struct atm_vcc *vcc; ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc *tneta1570_vcc; ++ unsigned int seg_ring_entry, i; ++ unsigned int *buffer; ++ ++ NULLCHECK(skb); ++ EVENT(">do_tx: skb=0x%lx, %d bytes\n",(unsigned long) skb,skb->len); ++ vcc = skb->atm.vcc; ++ NULLCHECK(vcc); ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++ NULLCHECK(tneta1570_dev); ++ tneta1570_vcc = TNETA1570_VCC(vcc); ++ if ((unsigned long) skb->data & 2) { ++ printk(DEV_LABEL "(itf %d): VCI %d has mis-aligned TX data\n", ++ vcc->dev->number,vcc->vci); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ /* ping seems to be a problem here, its not using my alloc function */ ++ /* prepare buffer descriptor */ ++ if((skb->data - skb->head) < 24) { ++ DPRINTK(DEV_LABEL "(itf %d): skbuff push impossible (%d)\n", ++ vcc->dev->number, skb->data - skb->head); ++ /* copy the data if push not possible */ ++ if(!(buffer=kmalloc(skb->len + 24, GFP_ATOMIC))) { ++ printk(DEV_LABEL "(itf %d): malloc on send failed.\n", ++ vcc->dev->number); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -ENOMEM; ++ } ++ EVENT(">tx mem alloc'd at %08x\n", (unsigned int)buffer,0); ++ NULLCHECK(skb->data); ++ if(vcc->aal == ATM_AAL0) { ++ buffer[3] = 0; ++ buffer[4] = ((unsigned int *)skb->data)[0]; /* copy atm header */ ++ buffer[5] = 0; ++ for(i=0; ilen/4+1; i++) ++ buffer[6+i] = ((unsigned int *)skb->data)[1+i]; ++ buffer[2] = AAL0_PDU_INT | (0xffff & skb->len); /* offset 0 */ ++ } else { ++ buffer[3] = 0; ++ buffer[4] = (vcc->vpi << 20) | (vcc->vci << 4); /* prepare atm header */ ++ buffer[5] = 0; ++ for(i=0; ilen/4+1; i++) ++ buffer[6+i] = ((unsigned int *)skb->data)[i]; ++ buffer[2] = AAL5_PDU_INT | (0xffff & skb->len); ++ } ++ buffer[1] = (unsigned int)skb; ++ buffer[0] = 0; /* push size */ ++ EVENT(">data copied\n",0,0); ++ } else { /* push skb and put header in front of sdu */ ++ if(vcc->aal == ATM_AAL0) { /* sdu contains header */ ++ buffer = (unsigned int *)skb_push(skb, 20); /* make room for 1+4 words header */ ++ buffer[3] = 0; ++ buffer[4] = buffer[5]; /* copy atm header */ ++ buffer[5] = 0; ++ buffer[2] = AAL0_PDU_INT | (0xffff & (skb->len-20)); /* offset 0 */ ++ buffer[0] = 20; /* push size */ ++ } else { ++ buffer = (unsigned int *)skb_push(skb, 24); /* make room for 1+4 words header */ ++ buffer[3] = 0; ++ buffer[4] = (vcc->vpi << 20) | (vcc->vci << 4); /* prepare atm header */ ++ buffer[5] = 0; ++ buffer[2] = AAL5_PDU_INT | (0xffff & (skb->len-24)); ++ buffer[0] = 24; /* push size */ ++ } ++ buffer[1] = (unsigned int)skb; /* store skb ptr for dequeue */ ++ } ++ ++ seg_ring_entry = ((unsigned int)(&buffer[2]) >> 2) | OWN; ++ tneta1570_vcc->seg_ring[tneta1570_vcc->seg_ring_idx] = seg_ring_entry; ++ DPRINTK(">zippered up"); ++ DPRINTK(">sched %d," ++ ">dma %08x," ++ ">sridx %d >seg_r %08x (%08x)," ++ ">buffer %08x, (%08x)," ++ "atm header %08x\n", ++ read_sched_tab(tneta1570_dev, tneta1570_vcc->scheduler_idx), ++ tneta1570_dev->tx_dma_state[tneta1570_vcc->scheduler_idx+1].dma_state_flag, ++ tneta1570_vcc->seg_ring_idx, ++ tneta1570_vcc->seg_ring, ++ tneta1570_vcc->seg_ring[tneta1570_vcc->scheduler_idx], ++ &buffer[2], buffer[2], buffer[4]); ++ ++ /* index to seg.ring entry for next SDU */ ++ tneta1570_vcc->seg_ring_idx++; ++ tneta1570_vcc->seg_ring_idx %= TX_SEG_RING_SIZE; ++ ++ tneta1570_vcc->txing++; ++ return 0; ++} ++ ++/* ++ * -- dequeue tx buffer on tx complete interrupt -- ++ * check completion ring ++ * while valid entry ++ * dequeue skb (needs a bit of backtracking) ++ * increment completion ring index ++ */ ++static void dequeue_tx(struct atm_dev * dev) ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ struct atm_vcc *vcc; ++ struct sk_buff *skb; ++ unsigned int * p, v; ++ ++ EVENT(">dequeue_tx\n",0,0); ++ ++ NULLCHECK(dev); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ NULLCHECK(tneta1570_dev); ++ ++ /* find here completion ring entries */ ++ EVENT(">completion ring post: %08x, %d\n", TX_CMPL_R_IRQ(tneta1570_dev), ++ tneta1570_dev->txcmpl_ring_idx_irq); ++ while(!(TX_CMPL_R_IRQ(tneta1570_dev) & OWN)) { ++ p = (unsigned int *)(TX_CMPL_R_IRQ(tneta1570_dev) << 2); ++ TX_CMPL_R_IRQ(tneta1570_dev) = OWN; ++ tneta1570_dev->txcmpl_ring_idx_irq++; ++ tneta1570_dev->txcmpl_ring_idx_irq %= TXCMPLR_SZ_IRQ; ++ skb = (struct sk_buff *)(*(p-1)); /* get skb */ ++ v = *(p-2); /* get skb push size */ ++ ++ if(v==0) { /* free copy area */ ++ kfree(p-2); ++ } else { /* correct skb */ ++ skb_pull(skb, v); ++ } ++ ++ vcc = skb->atm.vcc; ++ NULLCHECK(vcc); ++ if (vcc->pop) vcc->pop(vcc,skb); ++ else dev_kfree_skb(skb,FREE_WRITE); ++ ++ vcc->stats->tx++; ++ TNETA1570_VCC(vcc)->txing--; ++ wake_up(&(TNETA1570_VCC(vcc)->tx_wait)); ++dma_complete++; ++ }; ++} ++ ++ ++ ++/*--------------------------------- common ----------------------------------*/ ++ ++ ++static void foo(void) ++{ ++printk("tx_complete=%d,dma_complete=%d,queued=%d,requeued=%d,sub=%d,\n" ++ "backlogged=%d,rx_enqueued=%d,rx_dequeued=%d,putting=%d,pushed=%d\n", ++ tx_complete,dma_complete,queued,requeued,submitted,backlogged, ++ rx_enqueued,rx_dequeued,putting,pushed); ++printk("loss: %d\n",TNETA1570_DEV(tneta1570_boards)->lost); ++} ++ ++ ++static void tneta1570_int(int irq,void *dev_id,struct pt_regs *regs) ++{ ++ struct atm_dev *dev; ++ struct tneta1570_dev *tneta1570_dev; ++ unsigned long reason; ++ ++ EVENT(">tneta_int\n",0,0); ++ dev = dev_id; ++ tneta1570_dev = TNETA1570_DEV(dev); ++ while ( (reason = 0x3ff & SAR_REG_WORD(tneta1570_dev, TNETA_STATUS)) ) { ++ DPRINTK(DEV_LABEL ": int 0x%08x\n",reason); ++ if (reason & TNETA_R1_RX_FREEZE) { ++ EVENT("INT: RX Freeze - RX ring overflow\n",0,0); ++ } /* ? */ ++ if (reason & TNETA_R1_TX_FREEZE) { ++ EVENT("INT: TX Freeze - TX ring overflow\n",0,0); ++ dequeue_tx(dev); ++ } /* ? */ ++ if (reason & TNETA_R1_CP_RX) { ++ EVENT("INT: RX Complete - RX buffer completed\n",0,0); ++ dequeue_rx(dev); ++ } /* ? */ ++ if (reason & TNETA_R1_CP_TX) { ++ EVENT("INT: TX Complete - TX Buffer completed\n",0,0); ++ dequeue_tx(dev); ++ /* pop buffers which have been completed */ ++ } ++ } ++} ++ ++/* ++ * perform SAR software reset ++ */ ++static int reset_sar(struct tneta1570_dev * tneta1570_dev) ++{ ++ int i; ++ unsigned int pci_config[64]; ++ ++ for(i=0; i<64; i++) ++ if(pcibios_read_config_dword(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ i*4, ++ &pci_config[i]) ++ !=PCIBIOS_SUCCESSFUL) return -1; ++ ++ SAR_REG_WORD(tneta1570_dev, TNETA_RESET) = 0; /* reset sar */ ++ ++ for(i=0; i<64; i++) ++ if(pcibios_write_config_dword(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ i*4, ++ pci_config[i]) ++ !=PCIBIOS_SUCCESSFUL) return -1; ++ return 0; ++ ++} ++ ++ ++inline void write_sched_tab(struct tneta1570_dev * dev, int i, unsigned int v) ++{ ++ if(1 & i) ++ dev->scheduler[i>>1] = (dev->scheduler[i>>1] & 0xffff) | (v << 16); ++ else ++ dev->scheduler[i>>1] = (dev->scheduler[i>>1] & 0xffff0000) | (v & 0xffff); ++} ++ ++inline int read_sched_tab(struct tneta1570_dev * dev, int i) ++{ ++ if(1 & i) ++ return (dev->scheduler[i>>1] >> 16); ++ else ++ return (0xffff & dev->scheduler[i>>1]); ++} ++ ++/*--------------------------------- entries ---------------------------------*/ ++ ++ ++static int tneta1570_init(struct atm_dev *dev) ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ unsigned int real_base,base; ++ unsigned short command; ++ unsigned char revision; ++ int error,i,last; ++ ++ EVENT(">tneta1570_init\n",0,0); ++ ++ dev->ci_range.vpi_bits = NR_VPI_LD; ++ dev->ci_range.vci_bits = NR_VCI_LD; ++ tneta1570_dev = TNETA1570_DEV(dev); ++ ++ if ((error = pcibios_read_config_word(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, PCI_COMMAND,&command)) ++ || (error = pcibios_read_config_dword(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn,PCI_BASE_ADDRESS_0,&real_base)) ++ || (error = pcibios_read_config_byte(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, PCI_INTERRUPT_LINE,&tneta1570_dev->irq)) ++ || (error = pcibios_read_config_byte(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, PCI_REVISION_ID,&revision))) { ++ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, ++ pcibios_strerror(error)); ++ return -EINVAL; ++ } ++ ++ /* find mapping size of board */ ++ if(pcibios_write_config_dword(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ PCI_BASE_ADDRESS_0, ++ 0xffffffff)!=PCIBIOS_SUCCESSFUL) ++ { ++ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, ++ pcibios_strerror(error)); ++ return -EINVAL; ++ } ++ ++ if(pcibios_read_config_dword(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ PCI_BASE_ADDRESS_0, ++ &(tneta1570_dev->pci_map_size))!=PCIBIOS_SUCCESSFUL) ++ { ++ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, ++ pcibios_strerror(error)); ++ return -EINVAL; ++ } ++ tneta1570_dev->pci_map_size=~tneta1570_dev->pci_map_size+1; ++ ++ if(pcibios_write_config_dword(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ PCI_BASE_ADDRESS_0, ++ real_base)!=PCIBIOS_SUCCESSFUL) ++ { ++ printk(DEV_LABEL "(itf %d): init error %s\n",dev->number, ++ pcibios_strerror(error)); ++ return -EINVAL; ++ } ++ ++ ++ real_base &= MEM_VALID; /* strip flags */ ++ if ((error = pcibios_write_config_word(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ PCI_COMMAND, ++ PCI_COMMAND_MEMORY))) ++ { ++ printk(DEV_LABEL "(itf %d): can't enable memory (%s)\n", ++ dev->number,pcibios_strerror(error)); ++ return error; ++ } ++ printk(DEV_LABEL "(itf %d): rev.%d,base=0x%x,irq=%d,",dev->number, ++ revision,real_base,tneta1570_dev->irq); ++ if (!(base = (unsigned long) vremap(real_base,tneta1570_dev->pci_map_size))) { ++ printk(DEV_LABEL "(itf %d): can't set up page mapping\n", ++ dev->number); ++ return error; ++ } ++ tneta1570_dev->base_diff = real_base-base; ++ tneta1570_dev->reg = (volatile unsigned int *) (base+TNETA_REG_BASE_OFFSET); ++ tneta1570_dev->scheduler = (volatile unsigned long *) (base+TNETA_SCHED_TABLE); ++ tneta1570_dev->ram = (volatile unsigned long *) (base+TNETA_SCHED_TABLE); ++ tneta1570_dev->free_buf_ptr = (volatile struct tneta_rx_fbrptr *) (base+TNETA_FREE_BUFFER_POINTERS); ++ tneta1570_dev->rx_vpi_vci = (volatile unsigned long *) (base+TNETA_RX_VPIVCI_DMA_POINTERS); ++ tneta1570_dev->tx_dma_state = (volatile struct tneta_tx_dma_state_table *) (base+TNETA_TX_DMA_STATE_TABLE); ++ tneta1570_dev->rx_dma_state = (volatile struct tneta_rx_dma_state_table *) (base+TNETA_RX_DMA_STATE_TABLE); ++ tneta1570_dev->phy = (volatile unsigned long *) (base+TNETA_SUNI_OFFSET); ++ ++ tneta1570_dev->txcmpl_ring_idx_noi = 0; ++ tneta1570_dev->txcmpl_ring_idx_irq = 0; ++ tneta1570_dev->rxcmpl_ring_idx_noi = 0; ++ tneta1570_dev->rxcmpl_ring_idx_irq = 0; ++ ++ /* test board memory, find amount of memory installed */ ++ last = (TNETA_SUNI_OFFSET)/4; /* max up to phy ctrl */ ++ for (i = last-RAM_INCREMENT; i >= 0; i -= RAM_INCREMENT) { ++ if(i>RESERVED_UL || iram[i] = 0x55555555; ++ if (tneta1570_dev->ram[i] != 0x55555555) last = i; ++ else { ++ tneta1570_dev->ram[i] = 0xAAAAAAAA; ++ if (tneta1570_dev->ram[i] != 0xAAAAAAAA) last = i; ++ else tneta1570_dev->ram[i] = i; ++ } ++ } ++ } ++ for (i = 0; i < last; i += RAM_INCREMENT) ++ if(i>RESERVED_UL || iram[i] != i) break; ++ ++ tneta1570_dev->mem = i << 2; /* byte count */ ++ /* init control memory with all 0s (including regs) */ ++ last = i; ++ /* bring sar up */ ++ for(i=0; iRESERVED_UL || iram[i] = 0; ++ ++ printk("mem=%dkB\n",tneta1570_dev->mem >> 10); ++ ++ /* reset SAR */ ++ reset_sar(tneta1570_dev); ++ ++ for(i=0; iRESERVED_UL || iram[i] = 0; ++ /* TODO: check for non-SUNI, check for TAXI ? */ ++ return suni_init(dev); ++} ++ ++ ++static int tneta1570_start(struct atm_dev *dev) ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ int error; ++ ++ EVENT(">tneta1570_start\n",0,0); ++ tneta1570_dev = TNETA1570_DEV(dev); ++ if (request_irq(tneta1570_dev->irq,&tneta1570_int,0,DEV_LABEL,dev)) { ++ printk(DEV_LABEL "(itf %d): IRQ%d is already in use\n", ++ dev->number,tneta1570_dev->irq); ++ return -EAGAIN; ++ } ++ /* @@@ should release IRQ on error */ ++ ++ if ((error = pcibios_write_config_word(tneta1570_dev->bus, ++ tneta1570_dev->dev_fn, ++ PCI_COMMAND, ++ PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER))) ++ { ++ printk(DEV_LABEL "(itf %d): can't enable memory+master (%s)\n", ++ dev->number,pcibios_strerror(error)); ++ return error; ++ } ++ ++ /* bring suni up */ ++ error = dev->phy->start(dev); ++ if (error) return error; ++ ++ SAR_REG_WORD(tneta1570_dev, TNETA_CONFIG) = TNETA_R0_STANDARD_MODE; ++ SAR_REG_WORD(tneta1570_dev, TNETA_INT_MASK) = TNETA_R2_STANDARD_INTS; ++ ++ error = start_tx(dev); ++ if (error) return error; ++ error = start_rx(dev); ++ if (error) return error; ++ ++ return 0; ++} ++ ++ ++ ++static void tneta1570_close(struct atm_vcc *vcc) ++{ ++ EVENT(">tneta1570_close\n",0,0); ++ if (!TNETA1570_VCC(vcc)) return; ++ vcc->flags &= ~ATM_VF_READY; ++ close_rx(vcc); ++ close_tx(vcc); ++ EVENT("tneta1570_close: done waiting\n",0,0); ++ /* deallocate memory */ ++ kfree(TNETA1570_VCC(vcc)); ++ TNETA1570_VCC(vcc) = NULL; ++ vcc->flags &= ~ATM_VF_ADDR; ++ /*foo();*/ ++} ++ ++ ++/* trying to find a connection identifier */ ++/* ++ * not implemented yet ++ */ ++static int get_ci(struct atm_vcc *vcc,short *vpi,int *vci) ++{ ++ return 0; ++} ++ ++ ++static int tneta1570_open(struct atm_vcc *vcc,short vpi,int vci) ++{ ++ struct tneta1570_dev *tneta1570_dev; ++ struct tneta1570_vcc *tneta1570_vcc; ++ int error; ++ ++ EVENT(">tneta1570_open\n",0,0); ++ TNETA1570_VCC(vcc) = NULL; ++ vcc->alloc_tx = tneta1570_alloc_tx; /* set my skb_alloc function */ ++ ++ tneta1570_dev = TNETA1570_DEV(vcc->dev); ++#if 0 /* set to 0 to test atm_find_ci (get_ci usually is faster) */ ++ error = get_ci(vcc,&vpi,&vci); /* get connection id */ ++ if (error) return error; ++#else ++ error = atm_find_ci(vcc,&vpi,&vci); /* get connection id */ ++ if (error) return error; ++#endif ++ vcc->vpi = vpi; ++ vcc->vci = vci; ++ if (vcc->aal != ATM_AAL0 && vcc->aal != ATM_AAL5) return -EINVAL; ++ tneta1570_vcc = kmalloc(sizeof(struct tneta1570_vcc),GFP_KERNEL); ++ if (!tneta1570_vcc) return -ENOMEM; ++ TNETA1570_VCC(vcc) = tneta1570_vcc; ++ DPRINTK(DEV_LABEL "(itf %d): open %d.%d\n",vcc->dev->number,vcc->vpi, ++ vcc->vci); ++ vcc->flags |= ATM_VF_ADDR; /* set flag */ ++ if ((error = open_rx(vcc))) { /* open rx */ ++ tneta1570_close(vcc); /* close on error */ ++ return error; ++ } ++ if ((error = open_tx(vcc))) { /* open tx */ ++ tneta1570_close(vcc); ++ return error; ++ } ++ vcc->flags |= ATM_VF_READY; /* set IF ready */ ++ /* should power down SUNI while !ref_count @@@ */ ++ return 0; ++} ++ ++ ++static int tneta1570_ioctl(struct atm_dev *dev,unsigned int cmd,unsigned long arg) ++{ ++ if (cmd == 12345678) dump(dev); ++ if (!dev->phy->ioctl) return -EINVAL; ++ return dev->phy->ioctl(dev,cmd,arg); ++} ++ ++ ++static int tneta1570_getsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int *optlen) ++{ ++ return -EINVAL; ++} ++ ++ ++static int tneta1570_setsockopt(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int optlen) ++{ ++ return -EINVAL; ++} ++ ++/* ++ * -- send a PDU (AAL5 or AAL0) ++ */ ++static int tneta1570_send(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ EVENT(">tneta1570_send\n",0,0); ++ if (!skb) { ++ printk("!skb in tneta1570_send ?\n"); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ if (vcc->aal == ATM_AAL0) { ++ if (skb->len != ATM_CELL_SIZE-1) { ++ dev_kfree_skb(skb,FREE_WRITE); ++ return -EINVAL; ++ } ++ *(unsigned long *) skb->data = htonl(*(unsigned long *) ++ skb->data); ++ /* correct byte order of an AAL0 header */ ++ } ++ ++submitted++; ++ skb->atm.vcc = vcc; ++ ++ return do_tx(skb); ++} ++ ++/* Scatter/Gather send, build vector and send from user space ++ * not yet implemented ++ */ ++static int tneta1570_sg_send(struct atm_vcc *vcc,unsigned long start, ++ unsigned long size) ++{ ++ return vcc->aal == ATM_AAL5 && !((start | size) & 3); ++ /* don't tolerate misalignment */ ++} ++ ++ ++static void tneta1570_phy_put(struct atm_dev *dev,unsigned char value, ++ unsigned long addr) ++{ ++ TNETA1570_DEV(dev)->phy[addr] = value; ++} ++ ++ ++ ++static unsigned char tneta1570_phy_get(struct atm_dev *dev,unsigned long addr) ++{ ++ volatile unsigned tmp; /* force 32 bit access */ ++ ++ /* set address */ ++ TNETA1570_DEV(dev)->phy[addr+TNETA_SUNI_RDREQ]=0; ++ /* read the bugger */ ++ tmp=TNETA1570_DEV(dev)->phy[addr]; ++ ++ return (unsigned char)(0xff & tmp); ++} ++ ++ ++static struct atmdev_ops ops = { ++ tneta1570_open, ++ tneta1570_close, ++ tneta1570_ioctl, ++ tneta1570_getsockopt, ++ tneta1570_setsockopt, ++ tneta1570_send, ++ NULL, /* no tneta1570_sg_send */ ++ NULL, /* no poll */ ++ NULL, /* no send_oam ???? */ ++ tneta1570_phy_put, ++ tneta1570_phy_get, ++ NULL /* no feedback */ ++}; ++ ++ ++int tneta1570_detect(void) ++{ ++ struct atm_dev *dev; ++ struct tneta1570_dev *tneta1570_dev; ++ int index; ++ ++ if (!pcibios_present()) { ++ printk(DEV_LABEL " driver but no PCI BIOS ?\n"); ++ return 0; ++ } ++ tneta1570_dev = (struct tneta1570_dev *) kmalloc(sizeof(struct tneta1570_dev), ++ GFP_KERNEL); ++ if (!tneta1570_dev) return -ENOMEM; ++ index = 0; ++ while (!pcibios_find_device(PCI_VENDOR_ID_TI, ++ PCI_DEVICE_ID_TI_TNETA1570, ++ index, ++ &tneta1570_dev->bus, ++ &tneta1570_dev->dev_fn)) ++ { ++ dev = atm_dev_register(DEV_LABEL,&ops,0); ++ if (!dev) break; ++ TNETA1570_DEV(dev) = tneta1570_dev; ++ ++ if (tneta1570_init(dev) || tneta1570_start(dev)) { ++ atm_dev_deregister(dev); ++ break; ++ } ++ tneta1570_dev->more = tneta1570_boards; ++ tneta1570_boards = dev; ++ index++; ++ tneta1570_dev = (struct tneta1570_dev *) kmalloc(sizeof(struct tneta1570_dev), ++ GFP_KERNEL); ++ if (!tneta1570_dev) break; ++ ++ } ++ return index; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/drivers/atm/fore200.c Thu Jul 18 20:59:50 1996 +@@ -0,0 +1,26 @@ ++/* drivers/atm/fore200.c - This is just a test, not a real driver */ ++ ++/* Written 1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++ ++ ++int fore200_detect(void) ++{ ++ struct linux_sbus *bus; ++ struct linux_sbus_device *sdev = 0; ++ ++ for_each_sbus(bus) { ++ for_each_sbusdev(sdev, bus) { ++ if (strcmp(sdev->prom_name,"FORE,sba-200") == 0) { ++ printk(KERN_NOTICE "fore200: found an SBA-200 " ++ "in slot %x,offset=%08lx,irq=%d", ++ sdev->slot,sdev->offset,sdev->irqs->pri); ++ } ++ } ++ } ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atm.h Wed Jul 31 17:57:46 1996 +@@ -0,0 +1,225 @@ ++/* atm.h - general ATM declarations */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_ATM_H ++#define _LINUX_ATM_H ++ ++/* ++ * BEGIN_xx and END_xx markers are used for automatic generation of ++ * documentation. Do not change them. ++ */ ++ ++#include ++#include ++ ++ ++/* general ATM constants */ ++#define ATM_CELL_SIZE 53 /* ATM cell size incl. header */ ++#define ATM_CELL_PAYLOAD 48 /* ATM payload size */ ++#define ATM_AAL0_SDU 52 /* AAL0 SDU size */ ++#define ATM_MAX_AAL34_PDU 65535 /* maximum AAL3/4 PDU payload */ ++#define ATM_AAL5_TRAILER 8 /* AAL5 trailer size */ ++#define ATM_MAX_AAL5_PDU 65535 /* maximum AAL5 PDU payload */ ++#define ATM_MAX_CDV 9999 /* maximum (default) CDV */ ++#define ATM_NOT_RSV_VCI 32 /* first non-reserved VCI value */ ++ ++#define ATM_MAX_VPI 255 /* maximum VPI at the UNI */ ++#define ATM_MAX_VPI_NNI 4096 /* maximum VPI at the NNI */ ++#define ATM_MAX_VCI 65535 /* maximum VCI */ ++ ++/* ++ * The following items should be added to sys/socket.h aka linux/socket.h ++ */ ++ ++/* address families */ ++#define AF_ATMPVC 6 /* ATM PVCs */ ++#define AF_ATMSVC 7 /* ATM SVCs */ ++ ++/* "protcol" values for the socket system call */ ++#define ATM_AAL0 0 /* "raw" ATM cells */ ++#define ATM_AAL1 1 /* AAL1 (CBR) */ ++#define ATM_AAL2 2 /* AAL2 (VBR) */ ++#define ATM_AAL34 3 /* AAL3/4 (data) */ ++#define ATM_AAL5 5 /* AAL5 (data) */ ++#define ATM_SAAL 12 /* signaling AAL */ ++ ++/* ++ * UGLY - there should only be one protocol family (PF_ATM) for both ++ * address families. A quick glance at some kernel internals seems to ++ * suggest to me that doing it the "right" way might involve some ++ * swimming against the stream ... ++ */ ++ ++/* protocol families */ ++#define PF_ATMPVC AF_ATMPVC ++#define PF_ATMSVC AF_ATMSVC ++ ++/* layers for getsockopt/setsockopt */ ++#define SOL_ATM 2 ++#define SOL_AAL 3 ++ ++/* ++ * ATM layer (values used for flags must be 2^n, non-flag values should use ++ * the remaining values) ++ */ ++ ++#define SO_SETCLP 1 /* set CLP bit value - TODO */ ++#define SO_CIRANGE 3 /* connection identifier range; ++ socket must be bound or connected */ ++#define SO_ATMQOS 5 /* Quality of Service setting */ ++ ++/* AAL layer */ ++#define SO_AALTYPE 0 /* AAL type, get only */ ++ ++/* socket layer */ ++#define SO_BCTXOPT 16 /* not ATM specific - should go */ ++#define SO_BCRXOPT 17 /* somewhere else */ ++ ++ ++/* for SO_BCTXOPT and SO_BCRXOPT */ ++ ++struct atm_buffconst { ++ unsigned long buf_fac; /* buffer alignment factor */ ++ unsigned long buf_off; /* buffer alignment offset */ ++ unsigned long size_fac; /* buffer size factor */ ++ unsigned long size_off; /* buffer size offset */ ++ unsigned long min_size; /* minimum size */ ++ unsigned long max_size; /* maximum size, 0 = unlimited */ ++}; ++ ++ ++/* ATM cell header (for AAL0) */ ++ ++/* BEGIN_CH */ ++#define ATM_HDR_GFC_MASK 0xf0000000 ++#define ATM_HDR_GFC_SHIFT 28 ++#define ATM_HDR_VPI_MASK 0x0ff00000 ++#define ATM_HDR_VPI_SHIFT 20 ++#define ATM_HDR_VCI_MASK 0x000ffff0 ++#define ATM_HDR_VCI_SHIFT 4 ++#define ATM_HDR_PTI_MASK 0x0000000e ++#define ATM_HDR_PTI_SHIFT 1 ++#define ATM_HDR_CLP 0x00000001 ++/* END_CH */ ++ ++ ++/* PTI codings */ ++ ++/* BEGIN_PTI */ ++#define ATM_PTI_US0 0 /* user data cell, congestion not exp, SDU-type 0 */ ++#define ATM_PTI_US1 1 /* user data cell, congestion not exp, SDU-type 1 */ ++#define ATM_PTI_UCES0 2 /* user data cell, cong. experienced, SDU-type 0 */ ++#define ATM_PTI_UCES1 3 /* user data cell, cong. experienced, SDU-type 1 */ ++#define ATM_PTI_SEGF5 4 /* segment OAM F5 flow related cell */ ++#define ATM_PTI_E2EF5 5 /* end-to-end OAM F5 flow related cell */ ++#define ATM_PTI_RSV_RM 6 /* reserved for traffic control/resource mgmt */ ++#define ATM_PTI_RSV 7 /* reserved */ ++/* END_PTI */ ++ ++ ++/* ++ * The following items should stay in linux/atm.h, which should be linked to ++ * netatm/atm.h ++ */ ++ ++/* Traffic description */ ++ ++#define ATM_NONE 0 /* no traffic */ ++#define ATM_UBR 1 ++#define ATM_CBR 2 ++#define ATM_VBR 3 ++#define ATM_ABR 4 ++#define ATM_ANYCLASS 5 /* compatible with everything */ ++ ++#define ATM_MAX_PCR -1 /* maximum available PCR */ ++ ++#define class traffic_class /* backward compatibility */ ++struct atm_trafprm { ++ unsigned char traffic_class; /* traffic class (ATM_UBR, ...) */ ++ int max_pcr; /* maximum PCR in cells per second */ ++ int min_pcr; /* minimum PCR in cells per second */ ++ int max_cdv; /* maximum CDV in microseconds */ ++ int max_sdu; /* maximum SDU in bytes */ ++}; ++ ++struct atm_qos { ++ struct atm_trafprm txtp; /* parameters in TX direction */ ++ struct atm_trafprm rxtp; /* parameters in RX direction */ ++}; ++ ++/* PVC addressing */ ++ ++#define ATM_ITF_ANY -1 /* "magic" PVC address values */ ++#define ATM_VPI_ANY -1 ++#define ATM_VCI_ANY -1 ++#define ATM_VPI_UNSPEC -2 ++#define ATM_VCI_UNSPEC -2 ++ ++ ++struct sockaddr_atmpvc { ++ unsigned short sap_family; /* address family, AF_ATMPVC */ ++ struct { /* PVC address */ ++ short itf; /* ATM interface */ ++ short vpi; /* VPI (only 8 bits at UNI) */ ++ int vci; /* VCI (only 16 bits at UNI) */ ++ } sap_addr; /* PVC address */ ++}; ++ ++/* SVC addressing */ ++ ++#define ATM_ESA_LEN 20 /* ATM End System Address length */ ++#define ATM_E164_LEN 12 /* maximum E.164 number length */ ++ ++#define ATM_MAX_BLLI 16 /* maximum number of BLLI elements */ ++ ++#define ATM_AFI_DCC 0x39 /* DCC ATM Format */ ++#define ATM_AFI_ICD 0x47 /* ICD ATM Format */ ++#define ATM_AFI_E164 0x45 /* E.164 ATM Format */ ++ ++struct sockaddr_atmsvc { ++ unsigned short sas_family; /* address family, AF_ATMSVC */ ++ struct { /* SVC address */ ++ unsigned char prv[ATM_ESA_LEN];/* private ATM address */ ++ char pub[ATM_E164_LEN+1]; /* public address (E.164) */ ++ /* unused addresses must be bzero'ed */ ++ struct atm_blli *blli; /* local SAP, low-layer information */ ++ struct atm_bhli bhli; /* local SAP, high-layer information */ ++ } sas_addr; /* SVC address */ ++}; ++ ++ ++/* ++ * Some stuff for linux/sockios.h ++ */ ++ ++struct atmif_sioc { ++ int number; ++ int length; ++ void *arg; ++}; ++ ++ ++#define SIOCSIFATMTCP _IO('a',ATMIOC_ITF) /* set ATMTCP mode */ ++ ++/* ++ * The following ioctls are obsolete and will be removed in a later release ++ */ ++ ++#define SIOCGIFATMADDR _IOR('a',ATMIOC_ITF+1,struct atmif_sioc) ++ /* get local ATM address */ ++#define SIOCSIFATMADDR _IOR('a',ATMIOC_ITF+2,struct atmif_sioc) ++ /* set local ATM address */ ++ ++#ifdef __KERNEL__ ++ ++#include /* struct net_proto */ ++ ++ ++void atmpvc_proto_init(struct net_proto *pro); ++void atmsvc_proto_init(struct net_proto *pro); ++ ++#endif /* __KERNEL__ */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmclip.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,37 @@ ++/* atmclip.h - Classical IP over ATM */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef LINUX_ATMCLIP_H ++#define LINUX_ATMCLIP_H ++ ++#include ++#include ++ ++ ++#define CLIP_NULENCAP SIOCDEVPRIVATE /* set NULL encapsulation */ ++#define CLIP_LLCENCAP (SIOCDEVPRIVATE+1) /* set LLC/SNAP encap. */ ++ ++ ++#define RFC1483LLC_LEN 8 /* LLC+OUI+PID = 8 */ ++#define RFC1626_MTU 9180 /* RFC1626 default MTU */ ++ ++#define CLIP_DEFAULT_IDLETIMER 1200 /* 20 minutes, see RFC1755 */ ++#define CLIP_CHECK_INTERVAL 10 /* check every ten seconds */ ++ ++#define SIOCMKCLIP _IO('a',ATMIOC_CLIP) /* create IP interface */ ++#define CLIP_PVC _IO('a',ATMIOC_CLIP+4) /* IP itf becomes CLIP itf */ ++ ++#ifdef __KERNEL__ ++ ++#include ++#include ++#include ++ ++ ++int atm_init_clip(struct atm_vcc *vcc); ++ ++#endif /* __KERNEL__ */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmdev.h Wed Jul 31 19:30:44 1996 +@@ -0,0 +1,242 @@ ++/* atmdev.h - ATM device driver declarations */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef LINUX_ATMDEV_H ++#define LINUX_ATMDEV_H ++ ++ ++#include ++#include ++#include ++#include ++ ++ ++#define MAX_ATM_ITF 10 /* for now, should be lowered */ ++#define MAX_ATM_VCC 128 /* for now, should be dynamic */ ++ ++#define ESI_LEN 6 ++ ++#define ATM_OC3_PCR (155520000/270*260/8/53) ++ /* OC3 link rate: 155520000 bps ++ SONET overhead: /270*260 (9 section, 1 path) ++ bits per cell: /8/53 ++ max cell rate: 353207.547 cells/sec */ ++ ++#define ATM_SD(s) ((struct atm_vcc *) ((s)->data)) ++ ++ ++struct atm_aal_stats { ++ long tx,tx_err; /* TX okay and errors */ ++ long rx,rx_err; /* RX okay and errors */ ++ long rx_drop; /* RX out of memory */ ++}; ++ ++ ++struct atm_dev_stats { ++ struct atm_aal_stats aal0; ++ struct atm_aal_stats aal34; ++ struct atm_aal_stats aal5; ++}; ++ ++ ++#define ATM_GETNAMES _IOW('a',ATMIOC_ITF+3,struct atm_iobuf) ++ /* get interface names (numbers) */ ++#define ATM_GETTYPE _IOW('a',ATMIOC_ITF+4,struct atmif_sioc) ++ /* get interface type name */ ++#define ATM_GETESI _IOW('a',ATMIOC_ITF+5,struct atmif_sioc) ++ /* get interface ESI */ ++#define ATM_GETADDR _IOW('a',ATMIOC_ITF+6,struct atmif_sioc) ++ /* get itf's local ATM addr. list */ ++#define ATM_RSTADDR _IOW('a',ATMIOC_ITF+7,struct atmif_sioc) ++ /* reset itf's ATM address list */ ++#define ATM_ADDADDR _IOW('a',ATMIOC_ITF+8,struct atmif_sioc) ++ /* add a local ATM address */ ++#define ATM_DELADDR _IOW('a',ATMIOC_ITF+9,struct atmif_sioc) ++ /* remove a local ATM address */ ++#define ATM_GETCIRANGE _IOW('a',ATMIOC_ITF+10,struct atmif_sioc) ++ /* get connection identifier range */ ++#define ATM_SETCIRANGE _IOW('a',ATMIOC_ITF+11,struct atmif_sioc) ++ /* set connection identifier range */ ++#define ATM_GETSTAT _IOW('a',ATMIOC_SARCOM+0,struct atmif_sioc) ++ /* get AAL layer statistics */ ++#define ATM_GETSTATZ _IOW('a',ATMIOC_SARCOM+1,struct atmif_sioc) ++ /* get AAL layer statistics and zero */ ++ ++/* for ATM_GETTYPE */ ++#define ATM_ITFTYP_LEN 8 /* maximum length of interface type name */ ++ ++ ++ ++struct atm_iobuf { ++ int length; ++ void *buffer; ++}; ++ ++/* for ATM_GETCIRANGE / ATM_SETCIRANGE */ ++ ++#define ATM_CI_MAX -1 /* use maximum range of VPI/VCI */ ++ ++struct atm_cirange { ++ char vpi_bits; /* 1..8, ATM_CI_MAX (-1) for maximum */ ++ char vci_bits; /* 1..16, ATM_CI_MAX (-1) for maximum */ ++}; ++ ++ ++#define ATM_BACKLOG_DEFAULT 32 /* if we get more, we're likely to time out ++ anyway */ ++ ++#ifdef __KERNEL__ ++ ++#include /* struct wait_queue */ ++#include /* struct timeval */ ++#include ++#include /* struct sk_buff */ ++#include ++ ++#ifdef CONFIG_AREQUIPA ++#include /* for struct sock */ ++#endif ++ ++ ++#define ATM_VF_ADDR 1 /* Address is in use. Set by anybody, cleared ++ by device driver. */ ++#define ATM_VF_READY 2 /* VC is ready to transfer data. Set by device ++ driver, cleared by anybody. */ ++#define ATM_VF_PARTIAL 4 /* resources are bound to PVC (partial PVC ++ setup), controlled by socket layer */ ++#define ATM_VF_BOUND 4 /* local SAP is set, controlled by SVC socket ++ layer */ ++#define ATM_VF_REGIS 8 /* registered with demon, controlled by SVC ++ socket layer */ ++#define ATM_VF_RELEASED 16 /* demon has indicated/requested release, ++ controlled by SVC socket layer */ ++#define ATM_VF_HASQOS 32 /* QOS parameters have been set */ ++#define ATM_VF_LISTEN 64 /* socket is used for listening */ ++#define ATM_VF_META 128 /* SVC socket isn't used for normal data ++ traffic and doesn't depend on signaling ++ to be available */ ++#define ATM_VF_AQREL 256 /* Arequipa socket is being released */ ++ ++struct atm_vcc { ++ unsigned short flags; /* VCC flags (ATM_VF_*) */ ++ unsigned char family; /* address family; 0 if unused */ ++ unsigned char aal; /* ATM Adaption Layer */ ++ short vpi; /* VPI and VCI (types must be equal */ ++ /* with sockaddr) */ ++ int vci; ++ unsigned long aal_options; /* AAL layer options */ ++ unsigned long atm_options; /* ATM layer options */ ++ struct atm_dev *dev; /* device back pointer */ ++ struct atm_qos qos; /* QOS */ ++ unsigned long tx_quota,rx_quota; /* buffer quotas */ ++ atomic_t tx_inuse,rx_inuse; /* buffer space in use */ ++ void (*push)(struct atm_vcc *vcc,struct sk_buff *skb); ++ void (*pop)(struct atm_vcc *vcc,struct sk_buff *skb); /* optional */ ++ struct sk_buff *(*peek)(struct atm_vcc *vcc,unsigned long pdu_size, ++ __u32 (*fetch)(struct atm_vcc *vcc,int i)); ++ /* super-efficient xfers; note that */ ++ /* PDU_SIZE may be rounded */ ++ struct sk_buff *(*alloc_tx)(struct atm_vcc *vcc,unsigned int size); ++ /* TX allocation routine - can be */ ++ /* modified by protocol or by driver.*/ ++ /* NOTE: this interface will change */ ++ int (*push_oam)(struct atm_vcc *vcc,void *cell); ++ void *dev_data; /* per-device data */ ++ void *proto_data; /* per-protocol data */ ++ struct timeval timestamp; /* AAL timestamps */ ++ struct sk_buff_head recvq; /* receive queue */ ++ struct atm_aal_stats *stats; /* pointer to AAL stats group */ ++ struct wait_queue *sleep; /* if socket is busy */ ++ struct atm_vcc *prev,*next; ++ /* SVC part --- may move later */ ++ short itf; /* interface number */ ++ struct sockaddr_atmsvc local; ++ struct sockaddr_atmsvc remote; ++ void (*callback)(struct atm_vcc *vcc); ++ struct sk_buff_head listenq; ++ int backlog_quota; /* number of connection requests we */ ++ /* can still accept */ ++ int reply; ++ void *user_back; /* user backlink - not touched */ ++#ifdef CONFIG_AREQUIPA ++ struct sock *upper; /* our "master" */ ++ struct socket *sock; /* back pointer to our own socket */ ++#endif ++}; ++ ++ ++struct atm_dev_addr { ++ struct sockaddr_atmsvc addr; /* ATM address */ ++ struct atm_dev_addr *next; /* next address */ ++}; ++ ++ ++struct atm_dev { ++ const struct atmdev_ops *ops; /* device operations; NULL if unused */ ++ const struct atmphy_ops *phy; /* PHY operations, may be undefined */ ++ /* (NULL) */ ++ const char *type; /* device type name */ ++ int number; /* device index */ ++ struct atm_vcc *vccs; /* VCC table (or NULL) */ ++ struct atm_vcc *last; /* last VCC (or undefined) */ ++ void *dev_data; /* per-device data */ ++ void *phy_data; /* private PHY date */ ++ unsigned long flags; /* device flags, TBD */ ++ struct atm_dev_addr *local; /* local ATM addresses */ ++ unsigned char esi[ESI_LEN]; /* ESI ("MAC" addr) */ ++ struct atm_cirange ci_range; /* VPI/VCI range */ ++ struct atm_dev_stats stats; /* statistics */ ++/* */ int sending; ++}; ++ ++ ++/* ++ * ioctl, getsockopt, setsockopt, sg_send, and poll are optional and can ++ * be set to NULL. ++ */ ++ ++#define ATM_OF_IMMED 1 /* Attempt immediate delivery */ ++#define ATM_OF_INRATE 2 /* Attempt in-rate delivery */ ++ ++struct atmdev_ops { /* only send is required */ ++ int (*open)(struct atm_vcc *vcc,short vpi,int vci); ++ void (*close)(struct atm_vcc *vcc); ++ int (*ioctl)(struct atm_dev *dev,unsigned int cmd,unsigned long arg); ++ int (*getsockopt)(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int *optlen); ++ int (*setsockopt)(struct atm_vcc *vcc,int level,int optname, ++ char *optval,int optlen); ++ int (*send)(struct atm_vcc *vcc,struct sk_buff *skb); ++ int (*sg_send)(struct atm_vcc *vcc,unsigned long start, ++ unsigned long size); ++#if 0 /* keep the current hack for now */ ++ int (*send_iovec)(struct atm_vcc *vcc,struct iovec *iov,int size, ++ void (*discard)(struct atm_vcc *vcc,void *user),void *user); ++#endif ++ void (*poll)(struct atm_vcc *vcc,int nonblock); ++ int (*send_oam)(struct atm_vcc *vcc,void *cell,int flags); ++ void (*phy_put)(struct atm_dev *dev,unsigned char value, ++ unsigned long addr); ++ unsigned char (*phy_get)(struct atm_dev *dev,unsigned long addr); ++ void (*feedback)(struct atm_vcc *vcc,struct sk_buff *skb, ++ unsigned long start,unsigned long dest,int len); ++}; ++ ++ ++struct atmphy_ops { ++ int (*start)(struct atm_dev *dev); ++ int (*ioctl)(struct atm_dev *dev,unsigned int cmd,unsigned long arg); ++ void (*interrupt)(struct atm_dev *dev); ++}; ++ ++ ++struct atm_dev *atm_dev_register(const char *type,const struct atmdev_ops *ops, ++ unsigned long flags); ++void atm_dev_deregister(struct atm_dev *dev); ++int atm_find_ci(struct atm_vcc *vcc,short *vpi,int *vci); ++ ++#endif /* __KERNEL__ */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmsap.h Mon Jun 10 17:36:14 1996 +@@ -0,0 +1,129 @@ ++/* atmsap.h - ATM Service Access Point addressing definitions */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_ATMSAP_H ++#define _LINUX_ATMSAP_H ++ ++/* ++ * BEGIN_xx and END_xx markers are used for automatic generation of ++ * documentation. Do not change them. ++ */ ++ ++ ++/* ++ * Layer 2 protocol identifiers ++ */ ++ ++/* BEGIN_L2 */ ++#define ATM_L2_NONE 0 /* L2 not specified */ ++#define ATM_L2_ISO1745 0x01 /* Basic mode ISO 1745 */ ++#define ATM_L2_Q291 0x02 /* ITU-T Q.291 */ ++#define ATM_L2_X25_LL 0x06 /* ITU-T X.25, link layer */ ++#define ATM_L2_X25_ML 0x07 /* ITU-T X.25, multilink */ ++#define ATM_L2_LAPB 0x08 /* Extended LAPB, half-duplex */ ++#define ATM_L2_HDLC_ARM 0x09 /* HDLC ARM (ISO 4335) */ ++#define ATM_L2_HDLC_NRM 0x0a /* HDLC NRM (ISO 4335) */ ++#define ATM_L2_HDLC_ABM 0x0b /* HDLC ABM (ISO 4335) */ ++#define ATM_L2_ISO8802 0x0c /* LAN LLC (ISO 8802/2) */ ++#define ATM_L2_X75 0x0d /* ITU-T X.75, SLP */ ++#define ATM_L2_Q922 0x0e /* ITU-T Q.922 */ ++#define ATM_L2_USER 0x10 /* user-specified */ ++#define ATM_L2_ISO7776 0x11 /* ISO 7776 DTE-DTE */ ++/* END_L2 */ ++ ++ ++/* ++ * Layer 3 protocol identifiers ++ */ ++ ++/* BEGIN_L3 */ ++#define ATM_L3_NONE 0 /* L3 not specified */ ++#define ATM_L3_X25 0x06 /* ITU-T X.25, packet layer */ ++#define ATM_L3_ISO8208 0x07 /* ISO/IEC 8208 */ ++#define ATM_L3_X223 0x08 /* ITU-T X.223/ISO 8878 */ ++#define ATM_L3_ISO8473 0x09 /* ISO/IEC 8473 */ ++#define ATM_L3_T70 0x0a /* ITU-T T.70 minimum network layer */ ++#define ATM_L3_TR9577 0x0b /* ISO/IEC TR 9577 */ ++#define ATM_L3_USER 0x10 /* user-specified */ ++/* END_L3 */ ++ ++ ++/* ++ * High layer identifiers ++ */ ++ ++/* BEGIN_HL */ ++#define ATM_HL_NONE 0 /* HL not specified */ ++#define ATM_HL_ISO 0x01 /* ISO */ ++#define ATM_HL_USER 0x02 /* user-specific */ ++#if defined(UNI30) || defined(ALLOW_UNI30) ++#define ATM_HL_HLP 0x03 /* high layer profile - UNI 3.0 only */ ++#endif ++#define ATM_HL_VENDOR 0x04 /* vendor-specific application identifier */ ++/* END_HL */ ++ ++ ++/* ++ * ITU-T coded mode of operation ++ */ ++ ++/* BEGIN_IMD */ ++#define ATM_IMD_NONE 0 /* mode not specified */ ++#define ATM_IMD_NORMAL 1 /* normal mode of operation */ ++#define ATM_IMD_EXTENDED 2 /* extended mode of operation */ ++/* END_IMD */ ++ ++/* ++ * Selected ISO/IEC TR 9577 Network Layer Protocol Identifiers (NLPID) ++ */ ++ ++#define NLPID_IEEE802_1_SNAP 0x80 /* IEEE 802.1 SNAP */ ++ ++/* ++ * SAP structures ++ */ ++ ++#define ATM_MAX_HLI 7 /* maximum high-layer information length */ ++ ++ ++struct atm_blli { ++ unsigned char l2_proto; /* layer 2 protocol */ ++ union { ++ struct { ++ unsigned char mode; /* mode of operation (ATM_IMD_xxx), 0 if */ ++ /* absent */ ++ unsigned char window; /* window size (k), 1-127 (0 to omit) */ ++ } itu; /* ITU-T encoding */ ++ unsigned char user; /* user-specified l2 information */ ++ } l2; ++ unsigned char l3_proto; /* layer 3 protocol */ ++ union { ++ struct { ++ unsigned char mode; /* mode of operation (ATM_IMD_xxx), 0 if */ ++ /* absent */ ++ unsigned char def_size; /* default packet size (log2), 4-12 (0 to */ ++ /* omit) */ ++ unsigned char window;/* packet window size, 1-127 (0 to omit) */ ++ } itu; /* ITU-T ecoding */ ++ unsigned char user; /* user specified l3 information */ ++ struct { /* if l3_proto = ATM_L3_TR9577 */ ++ unsigned char ipi; /* initial protocol id */ ++ unsigned char snap[5];/* IEEE 802.1 SNAP identifier */ ++ /* (only if ipi == NLPID_IEEE802_1_SNAP) */ ++ } tr9577; ++ } l3; ++ struct atm_blli *next; /* next BLLI or NULL (undefined when used in */ ++ /* atmsvc_msg) */ ++}; ++ ++ ++struct atm_bhli { ++ unsigned char hl_type; /* high layer information type */ ++ unsigned char hl_length; /* length (only if hl_type == ATM_HL_USER || */ ++ /* hl_type == ATM_HL_ISO) */ ++ unsigned char hl_info[ATM_MAX_HLI];/* high layer information */ ++}; ++ ++#endif +--- ref/include/linux/skbuff.h Sun Jun 9 11:23:42 1996 ++++ work/include/linux/skbuff.h Wed Jul 31 19:30:20 1996 +@@ -112,6 +112,16 @@ + unsigned char *end; /* End pointer */ + void (*destructor)(struct sk_buff *); /* Destruct function */ + __u16 redirport; /* Redirect port */ ++#ifdef CONFIG_ATM ++ struct { ++ int size; /* PDU size (adapter too) */ ++ unsigned long pos; /* adapter data */ ++ struct atm_vcc *vcc; /* ATM VCC */ ++ int iovcnt; /* 0 for "normal" operation */ ++ struct timeval timestamp; /* timestamp or 0 */ ++ } atm; ++#endif ++ + }; + + #ifdef CONFIG_SKB_LARGE +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/sonet.h Mon Jun 10 17:36:15 1996 +@@ -0,0 +1,52 @@ ++/* sonet.h - SONET/SHD physical layer control */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef LINUX_SONET_H ++#define LINUX_SONET_H ++ ++struct sonet_stats { ++ long section_bip; /* section parity errors (B1) */ ++ long line_bip; /* line parity errors (B2) */ ++ long path_bip; /* path parity errors (B3) */ ++ long line_febe; /* line parity errors at remote */ ++ long path_febe; /* path parity errors at remote */ ++ long corr_hcs; /* correctable header errors */ ++ long uncorr_hcs; /* uncorrectable header errors */ ++ long tx_cells; /* cells sent */ ++ long rx_cells; /* cells received */ ++}; ++ ++#define SONET_GETSTAT _IOR('a',ATMIOC_PHYTYP,struct sonet_stats) ++ /* get statistics */ ++#define SONET_GETSTATZ _IOR('a',ATMIOC_PHYTYP+1,struct sonet_stats) ++ /* ... and zero counters */ ++#define SONET_SETDIAG _IOWR('a',ATMIOC_PHYTYP+2,int) ++ /* set error insertion */ ++#define SONET_CLRDIAG _IOWR('a',ATMIOC_PHYTYP+3,int) ++ /* clear error insertion */ ++#define SONET_GETDIAG _IOR('a',ATMIOC_PHYTYP+4,int) ++ /* query error insertion */ ++#define SONET_SETFRAMING _IO('a',ATMIOC_PHYTYP+5) ++ /* set framing mode (SONET/SDH) */ ++#define SONET_GETFRAMING _IOR('a',ATMIOC_PHYTYP+6,int) ++ /* get framing mode */ ++#define SONET_GETFRSENSE _IOR('a',ATMIOC_PHYTYP+7, \ ++ unsigned char[SONET_FRSENSE_SIZE]) /* get framing sense information */ ++ ++#define SONET_INS_SBIP 1 /* section BIP */ ++#define SONET_INS_LBIP 2 /* line BIP */ ++#define SONET_INS_PBIP 4 /* path BIP */ ++#define SONET_INS_FRAME 8 /* out of frame */ ++#define SONET_INS_LOS 16 /* set line to zero */ ++#define SONET_INS_LAIS 32 /* line alarm indication signal */ ++#define SONET_INS_PAIS 64 /* path alarm indication signal */ ++#define SONET_INS_HCS 128 /* insert HCS error */ ++ ++#define SONET_FRAME_SONET 0 /* SONET STS-3 framing */ ++#define SONET_FRAME_SDH 1 /* SDH STM-1 framing */ ++ ++#define SONET_FRSENSE_SIZE 6 /* C1[3],H1[3] (0xff for unknown) */ ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmsvc.h Wed Jul 31 18:20:21 1996 +@@ -0,0 +1,75 @@ ++/* atmsvc.h - ATM signaling kernel-demon interface definitions */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_ATMSVC_H ++#define _LINUX_ATMSVC_H ++ ++#include ++#include ++ ++ ++#define ATMSIGD_CTRL _IO('a',ATMIOC_SPECIAL) ++ /* become ATM signaling demon control socket */ ++ ++enum atmsvc_msg_type { as_catch_null,as_bind,as_connect,as_accept,as_listen, ++ as_okay,as_error,as_indicate,as_close,as_itf_notify }; ++ ++struct atmsvc_msg { ++ enum atmsvc_msg_type type; ++ unsigned long vcc; ++ unsigned long listen_vcc; /* indicate */ ++ int reply; /* for okay and close: */ ++ /* < 0: error before active */ ++ /* (sigd has discarded ctx) */ ++ /* ==0: success */ ++ /* > 0: error when active (still */ ++ /* need to close) */ ++ unsigned char aal; /* AAL */ ++ struct sockaddr_atmpvc pvc; /* indicate, okay (connect) */ ++ struct sockaddr_atmsvc local; /* local SVC address */ ++ struct atm_qos qos; /* QOS parameters */ ++ struct sockaddr_atmsvc svc; /* MUST BE BEFORE "blli", SVC address */ ++ struct atm_blli blli[1]; /* MUST BE LAST */ ++}; ++ ++/* ++ * Message contents: ++ * ++ * Message Dir vcc listen_vcc reply aal pvc --svc-- local ++ * addr *xtp addr sap *xtp addr ++ * bind K->D X - - - - - X X - - ++ * - okay D->K X - - - - - X X - - ++ * connect K->D X - - X - - X X X X ++ * - okay D->K X - - - X X - - - X ++ * listen K->D X - - X - - X X X - ++ * - okay D->K X - - - - - - - - - ++ * indicate D->K - X - - X 1 X X X - ++ * accept K->D X X - - - - - - - - ++ * - okay D->K X - - - - - - - - X ++ * close K->D X - - - - - - - - - ++ * close D->K X - X - - - - - - - ++ * ++ * 1 same value as in svc.*xtp ++ * ++ * Note: we may have to get rid of the PVC part in indicate messages later, ++ * so it's a good idea not to depend on it too heavily. ++ */ ++ ++/* ++ * In an as_itf_update message, only the fields type and pvc.sas_addr.itf are ++ * valid. ++ */ ++ ++/* ++ * Some policy stuff for atmsigd and for net/atm/svc.c. Both have to agree on ++ * what PCR is used to request bandwidth from the device driver. net/atm/svc.c ++ * tries to do better than that, but only if there's no routing decision (i.e. ++ * if signaling only uses one ATM interface). ++ */ ++ ++#define SELECT_TOP_PCR(tp) ((tp).max_pcr && (tp).max_pcr != ATM_MAX_PCR ? \ ++ (tp).max_pcr : (tp).min_pcr) ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmioc.h Mon Jun 10 17:36:16 1996 +@@ -0,0 +1,32 @@ ++/* atmioc.h - ranges for ATM-related ioctl numbers */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_ATMIOC_H ++#define _LINUX_ATMIOC_H ++ ++#include ++ /* everybody including atmioc.h will also need _IO{,R,W,WR} */ ++ ++#define ATMIOC_PHYCOM 0x00 /* PHY device common ioctls, globally unique */ ++#define ATMIOC_PHYCOM_END 0x0f ++#define ATMIOC_PHYTYP 0x10 /* PHY dev type ioctls, unique per PHY type */ ++#define ATMIOC_PHYTYP_END 0x2f ++#define ATMIOC_PHYPRV 0x30 /* PHY dev private ioctls, unique per driver */ ++#define ATMIOC_PHYPRV_END 0x4f ++#define ATMIOC_SARCOM 0x50 /* SAR device common ioctls, globally unique */ ++#define ATMIOC_SARCOM_END 0x50 ++#define ATMIOC_SARPRV 0x60 /* SAR dev private ioctls, unique per driver */ ++#define ATMIOC_SARPRV_END 0x7f ++#define ATMIOC_ITF 0x80 /* Interface ioctls, globally unique */ ++#define ATMIOC_ITF_END 0x8f ++/* 0x90-0xbf: Reserved for future use */ ++#define ATMIOC_AREQUIPA 0xc0 /* Application requested IP over ATM, glob. u. */ ++#define ATMIOC_LANE 0xd0 /* LAN Emulation, globally unique */ ++#define ATMIOC_CLIP 0xe0 /* Classical IP over ATM control, globally u. */ ++#define ATMIOC_CLIP_END 0xef ++#define ATMIOC_SPECIAL 0xf0 /* Special-purpose controls, globally unique */ ++#define ATMIOC_SPECIAL_END 0xff ++ ++#endif +--- ref/net/Makefile Thu May 16 15:35:55 1996 ++++ work/net/Makefile Mon Jun 10 17:50:26 1996 +@@ -8,12 +8,17 @@ + # Note 2! The CFLAGS definition is now in the main makefile... + + MOD_SUB_DIRS := ipv4 +-ALL_SUB_DIRS := 802 ax25 bridge core ethernet ipv4 ipx unix appletalk netrom #decnet ++ALL_SUB_DIRS := 802 atm ax25 bridge core ethernet ipv4 ipx unix appletalk \ ++ netrom #decnet + SUB_DIRS := core ethernet unix + MOD_LIST_NAME := NET_MISC_MODULES + + ifeq ($(CONFIG_NET),y) + SUB_DIRS += 802 ++endif ++ ++ifeq ($(CONFIG_ATM),y) ++SUB_DIRS += atm + endif + + ifeq ($(CONFIG_INET),y) +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/Makefile Wed Jul 17 19:31:55 1996 +@@ -0,0 +1,54 @@ ++# ++# Makefile for the ATM Protocol Families. ++# ++# Note! Dependencies are done automagically by 'make dep', which also ++# removes any old dependencies. DON'T put your own dependencies here ++# unless it's something special (ie not a .c file). ++# ++# Note 2! The CFLAGS definition is now in the main makefile... ++ ++include ../../.config ++ ++CFLAGS += -g ++ ++ifeq ($(CONFIG_ATM),y) ++ ++OBJS = common.o dev.o mmuio.o pvc.o raw.o signaling.o static.o svc.o ++ ++ifeq ($(CONFIG_ATM_ATMARP),y) ++OBJS += atmarp.o ++NEED_IPCOM = ipcommon.o ++endif ++ ++ifeq ($(CONFIG_ATM_CLIP),y) ++OBJS += clip.o ++NEED_IPCOM = ipcommon.o ++endif ++ ++ifeq ($(CONFIG_AREQUIPA),y) ++OBJS += arequipa.o ++NEED_IPCOM = ipcommon.o ++endif ++ ++OBJS += $(NEED_IPCOM) ++ ++ifeq ($(CONFIG_PROC_FS),y) ++OBJS += proc.o ++endif ++ ++ifeq ($(CONFIG_ATM_LANE),y) ++OBJS += lec.o lec_arpc.o ++endif ++ ++atm.o: $(OBJS) ++ $(LD) -r -o atm.o $(OBJS) ++ ++else ++ ++atm.o: ++ $(AR) rcs atm.o ++ ++endif ++ ++ ++include $(TOPDIR)/Rules.make +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/clip.c Wed Jul 31 17:15:40 1996 +@@ -0,0 +1,115 @@ ++/* net/atm/clip.c - Classical IP over ATM */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++ ++#include "protocols.h" ++#include "common.h" ++#include "ipcommon.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++ ++static int pvc_num = 0; ++ ++ ++/*static*/ void atm_push_clip(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ DPRINTK("clip push\n"); ++ if (!skb) { ++ printk(KERN_ALERT "ARGL!\n"); ++ unregister_netdev((struct device *) vcc->proto_data); ++ vcc->proto_data = NULL; ++ return; ++ } ++ skb->dev = vcc->proto_data; ++ ipcom_push(skb); ++} ++ ++ ++static int clip_xmit(struct sk_buff *skb,struct device *dev) ++{ ++ DPRINTK("clip xmit\n"); ++ if (!CLIP(dev)->vcc) return -ENOTCONN; /* @@@ discard skb ? */ ++ ipcom_xmit(dev,CLIP(dev)->vcc,skb); ++ CLIP(dev)->stats.tx_packets++; ++ return 0; ++} ++ ++ ++#if 0 ++static int clip_sg_xmit(struct sk_buff *skb,struct device *dev) ++{ ++/* ++struct iovec *iov; ++int i; ++ ++iov = (struct iovec *) skb->data; ++for (i = 0; i < skb->atm.iovcnt; i++) ++ printk("[%d] 0x%lx + %d\n",i,(unsigned long) iov[i].iov_base, ++ iov[i].iov_len); ++ ++ printk("clip *DIRECT* xmit (iovcnt: %d)\n",skb->atm.iovcnt); ++*/ ++ CLIP(dev)->vcc->dev->ops->send(CLIP(dev)->vcc,skb); ++ CLIP(dev)->stats.tx_packets++; ++ return 0; ++} ++#endif ++ ++ ++static int clip_init(struct device *dev) ++{ ++ ipcom_init(dev,clip_xmit,0); ++ return 0; ++} ++ ++ ++ ++int atm_init_clip(struct atm_vcc *vcc) ++{ ++ struct device *dev; ++ int number; ++ ++ DPRINTK("atm_init_clip\n"); ++ if (!suser()) return -EPERM; ++ vcc->aal = ATM_AAL5; ++ vcc->push = atm_push_clip; ++ vcc->peek = atm_peek_clip; ++ vcc->pop = atm_pop_clip; ++ vcc->push_oam = NULL; ++ vcc->proto_data = dev = kmalloc(sizeof(struct device)+ ++ sizeof(struct clip_priv),GFP_KERNEL); ++ if (!dev) return -ENOMEM; ++ memset(dev,0,sizeof(struct device)+sizeof(struct clip_priv)); ++ dev->name = CLIP(dev)->name; ++ number = pvc_num++; ++ sprintf(dev->name,"atm%d",number); ++ dev->init = clip_init; ++ CLIP(dev)->vcc = vcc; ++ if (register_netdev(dev)) return -EIO; ++ DPRINTK("registered %s,0x%lx\n",dev->name,(unsigned long) vcc); ++ return number; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/common.c Wed Jul 31 19:29:44 1996 +@@ -0,0 +1,899 @@ ++/* net/atm/common.c - ATM sockets (common part for PVC and SVC) */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include /* struct socket, struct net_proto, struct ++ proto_ops */ ++#include /* ATM stuff */ ++#include ++#include /* CLIP_*ENCAP */ ++#include /* manifest constants */ ++#include /* for ioctls */ ++#include /* SOL_SOCKET */ ++#include /* error codes */ ++#include /* suser */ ++#include /* verify_area */ ++#include ++#include /* struct timeval */ ++#include ++#include ++#include ++ ++#ifdef CONFIG_AREQUIPA ++#include ++#endif ++ ++#ifdef CONFIG_ATM_LANE ++#include ++#include "lec.h" ++#include "lec_arpc.h" ++#endif ++ ++#include "static.h" /* atm_find_dev */ ++#include "common.h" /* prototypes */ ++#include "protocols.h" /* atm_init_ */ ++#include "tunable.h" /* tunable parameters */ ++#include "atmarp.h" /* for clip_create */ ++#include "signaling.h" /* for WAITING and sigd_attach */ ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++static struct sk_buff *alloc_tx(struct atm_vcc *vcc,unsigned int size) ++{ ++ struct sk_buff *skb; ++ ++ if (size+vcc->tx_inuse+ATM_PDU_OVHD > vcc->tx_quota) return NULL; ++ while (!(skb = alloc_skb(size,GFP_KERNEL))) schedule(); ++ DPRINTK("AlTx %d += %d\n",vcc->tx_inuse,skb->truesize); ++ atomic_add(skb->truesize+ATM_PDU_OVHD,&vcc->tx_inuse); ++ return skb; ++} ++ ++ ++int atm_create(struct socket *sock,int protocol) ++{ ++ struct atm_vcc *vcc; ++ int error; ++ ++ ATM_SD(sock) = NULL; ++ if (sock->type == SOCK_STREAM) return -EINVAL; ++ if (!(vcc = alloc_atm_vcc())) return -ENOMEM; ++#ifdef CONFIG_AREQUIPA ++ vcc->upper = NULL; ++ vcc->sock = sock; ++#endif ++ vcc->flags = 0; ++ vcc->dev = NULL; ++ vcc->family = sock->ops->family; ++ vcc->alloc_tx = alloc_tx; ++ vcc->callback = NULL; ++ memset(&vcc->local,0,sizeof(struct sockaddr_atmsvc)); ++ memset(&vcc->remote,0,sizeof(struct sockaddr_atmsvc)); ++ vcc->tx_quota = ATM_TXBQ_DEF; ++ vcc->rx_quota = ATM_RXBQ_DEF; ++ vcc->tx_inuse = vcc->rx_inuse = 0; ++ switch (protocol) { ++ /* ++ * Note: ATM_AAL0 also covers the "0 for default" case, ++ * although some people may not like that default ;-) ++ */ ++ case ATM_AAL0: ++ error = atm_init_aal0(vcc); ++ break; ++ case ATM_AAL34: ++ error = atm_init_aal34(vcc); ++ break; ++ case ATM_AAL5: ++ error = atm_init_aal5(vcc); ++ break; ++ default: ++ error = -EPROTOTYPE; ++ } ++ if (error) { ++ free_atm_vcc(vcc); ++ return error; ++ } ++ vcc->vpi = vcc->vci = 0; /* no VCI/VPI yet */ ++ vcc->atm_options = vcc->aal_options = 0; ++ vcc->timestamp.tv_sec = vcc->timestamp.tv_usec = 0; ++ vcc->sleep = NULL; ++ skb_queue_head_init(&vcc->recvq); ++ skb_queue_head_init(&vcc->listenq); ++ ATM_SD(sock) = vcc; ++ return 0; ++} ++ ++ ++int atm_release_vcc(struct atm_vcc *vcc,int free_vcc) ++{ ++ struct sk_buff *skb; ++ ++ vcc->flags &= ~ATM_VF_READY; ++ if (vcc->dev) { ++ if (vcc->dev->ops->close) vcc->dev->ops->close(vcc); ++ if (vcc->push) vcc->push(vcc,NULL); /* atmarpd has no push */ ++ while ((skb = skb_dequeue(&vcc->recvq))) ++ kfree_skb(skb,FREE_READ); ++ if (vcc->prev) vcc->prev->next = vcc->next; ++ else vcc->dev->vccs = vcc->next; ++ if (vcc->next) vcc->next->prev = vcc->prev; ++ else vcc->dev->last = vcc->prev; ++ } ++ if (free_vcc) free_atm_vcc(vcc); ++ return 0; ++} ++ ++ ++extern void atm_push_clip(struct atm_vcc *vcc,struct sk_buff *skb); ++ ++ ++int atm_release(struct socket *sock,struct socket *peer) ++{ ++ struct atm_vcc *vcc; ++ ++ vcc = ATM_SD(sock); ++ if (!vcc ++#ifdef CONFIG_ATM_CLIP ++ || (vcc->push == atm_push_clip && (vcc->vpi || vcc->vci)) ++#endif ++ ) ++ return 0; /* ugly */ ++ return atm_release_vcc(vcc,1); ++} ++ ++ ++static int adjust_tp(struct atm_trafprm *tp,unsigned char aal) ++{ ++ int max_sdu; ++ ++ if (!tp->class) return 0; ++ if (tp->class != ATM_UBR && !tp->min_pcr && !tp->max_pcr) ++ return -EINVAL; ++ switch (aal) { ++ case ATM_AAL0: ++ max_sdu = ATM_CELL_SIZE-1; ++ break; ++ case ATM_AAL34: ++ max_sdu = ATM_MAX_AAL34_PDU; ++ break; ++ default: ++ printk(KERN_WARNING "ATM: AAL problems ... " ++ "(%d)\n",aal); ++ /* fall through */ ++ case ATM_AAL5: ++ max_sdu = ATM_MAX_AAL5_PDU; ++ } ++ if (!tp->max_sdu) tp->max_sdu = max_sdu; ++ else if (tp->max_sdu > max_sdu) return -EINVAL; ++ if (!tp->max_cdv) tp->max_cdv = ATM_MAX_CDV; ++ return 0; ++} ++ ++ ++static int check_ci(struct atm_vcc *vcc,short vpi,int vci) ++{ ++ struct atm_vcc *walk; ++ ++ for (walk = vcc->dev->vccs; walk; walk = walk->next) ++ if ((walk->flags & ATM_VF_ADDR) && walk->vpi == vpi && ++ walk->vci == vci && ((walk->qos.txtp.traffic_class != ++ ATM_NONE && vcc->qos.txtp.traffic_class != ATM_NONE) || ++ (walk->qos.rxtp.traffic_class != ATM_NONE && ++ vcc->qos.rxtp.traffic_class != ATM_NONE))) ++ return -EADDRINUSE; ++ /* allow VCCs with same VPI/VCI iff they don't collide on ++ TX/RX (but we may refuse such sharing for other reasons, ++ e.g. if protocol requires to have both channels) */ ++ return 0; ++} ++ ++ ++int atm_find_ci(struct atm_vcc *vcc,short *vpi,int *vci) ++{ ++ static short p = 0; /* poor man's per-device cache */ ++ static int c = 0; ++ short old_p; ++ int old_c; ++ ++ if (*vpi != ATM_VPI_ANY && *vci != ATM_VCI_ANY) ++ return check_ci(vcc,*vpi,*vci); ++ /* last scan may have left values out of bounds for current device */ ++ if (*vpi != ATM_VPI_ANY) p = *vpi; ++ else if (p >= 1 << vcc->dev->ci_range.vpi_bits) p = 0; ++ if (*vci != ATM_VCI_ANY) c = *vci; ++ else if (c < ATM_NOT_RSV_VCI || c >= 1 << vcc->dev->ci_range.vci_bits) ++ c = ATM_NOT_RSV_VCI; ++ old_p = p; ++ old_c = c; ++ do { ++ if (!check_ci(vcc,p,c)) { ++ *vpi = p; ++ *vci = c; ++ return 0; ++ } ++ if (*vci == ATM_VCI_ANY) { ++ c++; ++ if (c >= 1 << vcc->dev->ci_range.vci_bits) ++ c = ATM_NOT_RSV_VCI; ++ } ++ if ((c == ATM_NOT_RSV_VCI || *vci != ATM_VCI_ANY) && ++ *vpi == ATM_VPI_ANY) { ++ p++; ++ if (p >= 1 << vcc->dev->ci_range.vpi_bits) p = 0; ++ } ++ } ++ while (old_p != p || old_c != c); ++ return -EADDRINUSE; ++} ++ ++ ++static int atm_do_connect(struct atm_vcc *vcc,int itf,int vpi,int vci) ++{ ++ volatile struct atm_dev *dev; /* need volatile for sequence */ ++ int error; ++ ++ if (itf >= MAX_ATM_ITF) return -EINVAL; ++ dev = &atm_dev[itf]; ++ if (!dev->ops) return -ENODEV; ++ if ((vpi != ATM_VPI_UNSPEC && vpi >> dev->ci_range.vpi_bits) || ++ (vci != ATM_VCI_UNSPEC && vci >> dev->ci_range.vci_bits)) ++ return -EINVAL; ++ if (vci > 0 && vci < ATM_NOT_RSV_VCI && !suser()) return -EPERM; ++ switch (vcc->aal) { ++ case ATM_AAL0: ++ vcc->stats = &((struct atm_dev *) dev)->stats.aal0; ++ break; ++ case ATM_AAL34: ++ vcc->stats = &((struct atm_dev *) dev)->stats.aal34; ++ break; ++ case ATM_AAL5: ++ vcc->stats = &((struct atm_dev *) dev)->stats.aal5; ++ break; ++ default: ++ printk(KERN_WARNING "%s(itf %d): unsupported AAL " ++ "(%d)\n",vcc->dev->type,vcc->dev->number,vcc->aal); ++ return -EINVAL; ++ } ++ error = adjust_tp(&vcc->qos.txtp,vcc->aal); ++ if (!error) error = adjust_tp(&vcc->qos.rxtp,vcc->aal); ++ if (error) return error; ++ vcc->dev = (struct atm_dev *) dev; ++ DPRINTK("VCC %d.%d, AAL %d\n",vpi,vci,vcc->aal); ++ DPRINTK(" TX: %d, PCR %d..%d, SDU %d\n",vcc->qos.txtp.traffic_class, ++ vcc->qos.txtp.min_pcr,vcc->qos.txtp.max_pcr,vcc->qos.txtp.max_sdu); ++ DPRINTK(" RX: %d, PCR %d..%d, SDU %d\n",vcc->qos.rxtp.class, ++ vcc->qos.rxtp.min_pcr,vcc->qos.rxtp.max_pcr,vcc->qos.rxtp.max_sdu); ++ if (dev->ops->open) { ++ error = dev->ops->open(vcc,vpi,vci); ++ if (error) { ++ vcc->dev = NULL; ++ return error; ++ } ++ } ++ vcc->prev = dev->last; ++ vcc->next = NULL; ++ if (!dev->vccs) dev->vccs = vcc; ++ else dev->last->next = vcc; ++ dev->last = vcc; ++ return 0; ++} ++ ++ ++int atm_connect(struct socket *sock,int itf,short vpi,int vci) ++{ ++ struct atm_vcc *vcc; ++ int error; ++ ++ DPRINTK("atm_connect (vpi %d, vci %d)\n",vpi,vci); ++ if (sock->state == SS_CONNECTED) return -EISCONN; ++ if (sock->state != SS_UNCONNECTED) return -EINVAL; ++ if (!(vpi || vci)) return -EINVAL; ++ vcc = ATM_SD(sock); ++ if (vpi != ATM_VPI_UNSPEC && vci != ATM_VCI_UNSPEC) ++ vcc->flags &= ~ATM_VF_PARTIAL; ++ else if (vcc->flags & ATM_VF_PARTIAL) return -EINVAL; ++ printk("atm_connect (TX: cl %d,bw %d-%d,sdu %d; RX: cl %d,bw %d-%d," ++ "sdu %d)\n",vcc->qos.txtp.traffic_class,vcc->qos.txtp.min_pcr, ++ vcc->qos.txtp.max_pcr,vcc->qos.txtp.max_sdu, ++ vcc->qos.rxtp.traffic_class,vcc->qos.rxtp.min_pcr, ++ vcc->qos.rxtp.max_pcr,vcc->qos.rxtp.max_sdu); ++ if (vcc->qos.txtp.traffic_class == ATM_ANYCLASS || ++ vcc->qos.rxtp.traffic_class == ATM_ANYCLASS) ++ return -EINVAL; ++ if (itf != ATM_ITF_ANY) error = atm_do_connect(vcc,itf,vpi,vci); ++ else { ++ int i; ++ ++ error = -ENODEV; ++ for (i = 0; i < MAX_ATM_ITF; i++) ++ if (atm_dev[i].ops) ++ if (!(error = atm_do_connect(vcc,i,vpi,vci))) ++ break; ++ } ++ if (error) return error; ++ if (vpi == ATM_VPI_UNSPEC || vci == ATM_VCI_UNSPEC) ++ vcc->flags |= ATM_VF_PARTIAL; ++ else sock->state = SS_CONNECTED; ++ return 0; ++} ++ ++ ++int atm_recvmsg(struct socket *sock,struct msghdr *m,int total_len, ++ int nonblock,int flags,int *addr_len) ++{ ++ struct atm_vcc *vcc; ++ struct sk_buff *skb; ++ unsigned long cpu_flags; ++ int eff_len; ++ ++ void *buff; ++ int size; ++ ++ if (sock->state != SS_CONNECTED || flags || m->msg_name) ++ return -EINVAL; ++ if (m->msg_iovlen != 1) return -ENOSYS; /* fix this later @@@ */ ++ buff = m->msg_iov->iov_base; ++ size = m->msg_iov->iov_len; ++ /* verify_area is done by net/socket.c */ ++ vcc = ATM_SD(sock); ++ if (vcc->dev->ops->poll && (vcc->flags & ATM_VF_READY)) ++ while (1) { ++ vcc->dev->ops->poll(vcc,nonblock); ++ if (current->signal & ~current->blocked) ++ return -ERESTARTSYS; ++ if (skb_peek(&vcc->recvq)) break; ++ if (nonblock) return -EAGAIN; ++ } ++ save_flags(cpu_flags); ++ cli(); ++ while (!(skb = skb_dequeue(&vcc->recvq))) { ++ if (vcc->flags & ATM_VF_RELEASED) return vcc->reply; ++ if (!(vcc->flags & ATM_VF_READY)) return 0; ++ if (nonblock) { ++ restore_flags(cpu_flags); ++ return -EAGAIN; ++ } ++ interruptible_sleep_on(&vcc->sleep); ++ if (current->signal & ~current->blocked) { ++ restore_flags(cpu_flags); ++ return -ERESTARTSYS; ++ } ++ } ++ restore_flags(cpu_flags); ++ vcc->timestamp = skb->atm.timestamp; ++ eff_len = skb->len > size ? size : skb->len; ++ if (vcc->dev->ops->feedback) ++ vcc->dev->ops->feedback(vcc,skb,(unsigned long) skb->data, ++ (unsigned long) buff,eff_len); ++ DPRINTK("RcvM %d -= %d\n",vcc->rx_inuse,skb->truesize); ++ atomic_sub(skb->truesize+ATM_PDU_OVHD,&vcc->rx_inuse); ++#ifdef CONFIG_MMU_HACKS ++ mmucp_tofs((unsigned long) buff,eff_len,skb,(unsigned long) skb->data); ++#else ++#ifdef DUMP_PACKETS ++ if (vcc->vci==5 || vcc->vci >32) { ++ char buf[300]; ++ int i; ++ ++ for(i=0;i<99 && i < skb->len;i++) { ++ sprintf(buf+i*3,"%2.2x ", ++ 0xff&skb->data[i]); ++ } ++ printk("recv %d:%s\n",vcc->vci,buf); ++ } ++#endif ++ memcpy_tofs(buff,skb->data,eff_len); ++ kfree_skb(skb,FREE_READ); ++#endif ++ return eff_len; ++} ++ ++ ++int atm_sendmsg(struct socket *sock,struct msghdr *m,int total_len, ++ int nonblock,int flags) ++{ ++ struct atm_vcc *vcc; ++ struct sk_buff *skb; ++ int eff; ++ ++ const void *buff; ++ int size; ++ ++ if (sock->state != SS_CONNECTED || flags || m->msg_name) ++ return -EINVAL; ++ if (m->msg_iovlen != 1) return -ENOSYS; /* fix this later @@@ */ ++ buff = m->msg_iov->iov_base; ++ size = m->msg_iov->iov_len; ++ vcc = ATM_SD(sock); ++ if (vcc->flags & ATM_VF_RELEASED) return vcc->reply; ++ if (!(vcc->flags & ATM_VF_READY)) return -EPIPE; ++ if (!size) return 0; ++ /* verify_area is done by net/socket.c */ ++#ifdef CONFIG_MMU_HACKS ++ if (vcc->dev->ops->sg_send && vcc->dev->ops->sg_send(vcc, ++ (unsigned long) buff,size)) { ++ int res,max_iov; ++ ++ max_iov = 2+size/PAGE_SIZE; ++ /* ++ * Doesn't use alloc_tx yet - this will change later. @@@ ++ */ ++ while (!(skb = alloc_skb(sizeof(struct iovec)*max_iov, ++ GFP_KERNEL))) { ++ if (nonblock) return -EAGAIN; ++ interruptible_sleep_on(&vcc->sleep); ++ if (current->signal & ~current->blocked) ++ return -ERESTARTSYS; ++ } ++ skb->free = 1; ++ skb->len = size; ++ res = lock_user((unsigned long) buff,size,max_iov, ++ (struct iovec *) skb->data); ++ if (res < 0) { ++ kfree_skb(skb,FREE_WRITE); ++ if (res != -EAGAIN) return res; ++ } ++ else { ++ DPRINTK("res is %d\n",res); ++ DPRINTK("Asnd %d += %d\n",vcc->tx_inuse,skb->truesize); ++ atomic_add(skb->truesize+ATM_PDU_OVHD,&vcc->tx_inuse); ++ skb->atm.iovcnt = res; ++ skb_device_lock(skb); ++ vcc->dev->ops->send(vcc,skb); ++ /* FIXME: security: may send up to 3 "garbage" bytes */ ++ return size; ++ } ++ } ++#endif ++ eff = (size+3) & ~3; /* align to word boundary */ ++ while (!(skb = vcc->alloc_tx(vcc,eff))) { ++ if (nonblock) return -EAGAIN; ++ interruptible_sleep_on(&vcc->sleep); ++ if (current->signal & ~current->blocked) ++ return -ERESTARTSYS; ++ if (vcc->flags & ATM_VF_RELEASED) return vcc->reply; ++ if (!(vcc->flags & ATM_VF_READY)) return -EPIPE; ++ } ++ skb->free = 1; ++ skb->len = size; ++ skb->atm.iovcnt = 0; ++ memcpy_fromfs(skb->data,buff,size); ++ if (eff != size) memset(skb->data+size,0,eff-size); ++#if 0 /* experimental */ ++ vcc->dev->sending = 1; ++#endif ++ skb_device_lock(skb); ++#ifdef DUMP_PACKETS ++ if (vcc->vci==5 || vcc->vci >32) { ++ char buf[300]; ++ int i; ++ ++ for(i=0;i<99 && i < skb->len;i++) { ++ sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]); ++ } ++ printk("send %d:%s\n",vcc->vci,buf); ++ } ++#endif ++ vcc->dev->ops->send(vcc,skb); ++#if 0 /* experimental */ ++ while (vcc->dev->sending) sleep_on(&vcc->sleep); ++#endif ++ return size; ++} ++ ++ ++int atm_select(struct socket *sock,int sel_type,select_table *wait) ++{ ++ struct atm_vcc *vcc; ++ ++ vcc = ATM_SD(sock); ++ switch(sel_type) { ++ case SEL_IN: ++ if (vcc->dev && vcc->dev->ops->poll) ++ vcc->dev->ops->poll(ATM_SD(sock),1); ++ if (sock->state == SS_CONNECTING) break; ++ if (!skb_peek(&vcc->recvq) && ++ !skb_peek(&vcc->listenq) && ++ !(vcc->flags & ATM_VF_RELEASED)) break; ++ if (vcc->dev && vcc->dev->ops->poll) return 0; ++ return 1; ++ case SEL_OUT: ++ if (sock->state == SS_CONNECTING) break; ++ if (vcc->qos.txtp.traffic_class == ATM_NONE) return 1; ++ if (vcc->qos.txtp.max_sdu+vcc->tx_inuse+ATM_PDU_OVHD > ++ vcc->tx_quota) break; ++ return 1; ++ case SEL_EX: ++ if (sock->state != SS_CONNECTING) return 0; ++ if (vcc->reply == WAITING) break; ++ return 1; ++ } ++ select_wait(&vcc->sleep,wait); ++ return 0; ++} ++ ++ ++ ++static int fetch_stats(struct atm_dev *dev,struct atm_dev_stats *arg,int zero) ++{ ++ unsigned long flags; ++ ++ save_flags(flags); ++ cli(); ++ if (arg) ++ memcpy_tofs(arg,&dev->stats,sizeof(struct atm_dev_stats)); ++ if (zero) ++ memset(&dev->stats,0,sizeof(struct atm_dev_stats)); ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++extern int clip_ioctl(void *dev,void *rq,int cmd); /* @@@ lie and cheat ... */ ++ ++ ++#ifdef CONFIG_AREQUIPA ++ ++/* @@@ stolen from net/socket.c - should be in a common header file */ ++ ++ ++struct socket *sockfd_lookup(int fd) ++{ ++ struct file *file; ++ struct inode *inode; ++ ++ if (fd < 0 || fd >= NR_OPEN || !(file = current->files->fd[fd])) ++ return NULL; ++ inode = file->f_inode; ++ if (!inode || !inode->i_sock) return NULL; ++ return &inode->u.socket_i; ++} ++ ++#endif ++ ++ ++int atm_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg) ++{ ++ struct atm_dev *dev; ++ unsigned long eff_arg; ++ int rsize,wsize,len; ++ int error; ++ ++ rsize = wsize = 0; ++ switch (cmd) { ++ case ATM_GETNAMES: ++ { ++ struct atm_iobuf *buf; ++ ++ error = verify_area(VERIFY_READ,(void *) arg, ++ sizeof(struct atm_iobuf)); ++ if (error) return error; ++ buf = (struct atm_iobuf *) arg; ++ error = verify_area(VERIFY_WRITE, ++ (void *) get_fs_long(&buf->buffer), ++ get_fs_long(&buf->length)); ++ if (error) return error; ++ error = verify_area(VERIFY_WRITE, ++ (void *) &buf->length,sizeof(int)); ++ if (error) return error; ++ return atm_dev_list((void *) get_fs_long(&buf-> ++ buffer),&buf->length); ++ } ++ case SIOCGSTAMP: /* borrowed from IP */ ++ if (!ATM_SD(sock)->timestamp.tv_sec) return -ENOENT; ++ error = verify_area(VERIFY_WRITE,(void *) arg, ++ sizeof(struct timeval)); ++ if (error) return error; ++ memcpy_tofs((void *) arg,&ATM_SD(sock)->timestamp, ++ sizeof(struct timeval)); ++ return 0; ++ case ATMSIGD_CTRL: ++ if (!suser()) return -EPERM; ++ error = sigd_attach(ATM_SD(sock)); ++ if (!error) sock->state = SS_CONNECTED; ++ return error; ++#ifdef CONFIG_ATM_CLIP ++ case CLIP_PVC: ++ if (!suser()) return -EPERM; ++ return atm_init_clip(ATM_SD(sock)); ++ case CLIP_NULENCAP: ++ case CLIP_LLCENCAP: ++ if (!suser()) return -EPERM; ++ return clip_ioctl(ATM_SD(sock)->proto_data,NULL,cmd); ++ /* rather crude hack ... */ ++#endif ++#ifdef CONFIG_ATM_ATMARP ++ case SIOCMKCLIP: ++ if (!suser()) return -EPERM; ++ return clip_create(arg); ++ case ATMARPD_CTRL: ++ if (!suser()) return -EPERM; ++ error = atm_init_atmarp(ATM_SD(sock)); ++ if (!error) sock->state = SS_CONNECTED; ++ return error; ++ case ATMARP_MKIP: ++ if (!suser()) return -EPERM; ++ return atmarp_mkip(ATM_SD(sock),arg); ++ case ATMARP_SETENTRY: ++ if (!suser()) return -EPERM; ++ return atmarp_setentry(ATM_SD(sock),arg); ++ case ATMARP_ENCAP: ++ if (!suser()) return -EPERM; ++ return atmarp_encap(ATM_SD(sock),arg); ++#endif ++#ifdef CONFIG_AREQUIPA ++ case AREQUIPA_PRESET: ++ { ++ struct socket *upper; ++ ++ if (!(upper = sockfd_lookup(arg))) ++ return -ENOTSOCK; ++ if (upper->ops->family != PF_INET) ++ return -EPROTOTYPE; ++ return arequipa_preset(sock, ++ (struct sock *) upper->data); ++ } ++ case AREQUIPA_INCOMING: ++ return arequipa_incoming(sock); ++ case AREQUIPA_CTRL: ++ if (!suser()) return -EPERM; ++ error = arequipad_attach(ATM_SD(sock)); ++ if (!error) sock->state = SS_CONNECTED; ++ return error; ++ case AREQUIPA_CLS3RD: ++ if (!suser()) return -EPERM; ++ arequipa_close_vcc((struct atm_vcc *) arg); ++ return 0; ++#endif ++#ifdef CONFIG_ATM_LANE ++ case ATMLEC_CTRL: ++ if (!suser()) return -EPERM; ++ error = lecd_attach(ATM_SD(sock)); ++ if (!error) sock->state = SS_CONNECTED; ++ return error; ++ case ATMLEC_MCAST: ++ if (!suser()) return -EPERM; ++ return lec_mcast_attach(ATM_SD(sock)); ++ case ATMLEC_DATA: ++ if (!suser()) return -EPERM; ++ return lec_vcc_attach(ATM_SD(sock), (void*)arg); ++#endif ++ case ATM_GETTYPE: ++ wsize = -1; /* special - don't check length */ ++ break; ++ case ATM_GETESI: ++ wsize = ESI_LEN; ++ break; ++ case ATM_GETSTATZ: ++ if (!suser()) return -EPERM; ++ /* fall through */ ++ case ATM_GETSTAT: ++ wsize = sizeof(struct atm_dev_stats); ++ break; ++ case ATM_GETCIRANGE: ++ wsize = sizeof(struct atm_cirange); ++ break; ++ case ATM_SETCIRANGE: ++ if (!suser()) return -EPERM; ++ rsize = sizeof(struct atm_cirange); ++ break; ++ case SONET_GETSTATZ: ++ if (!suser()) return -EPERM; ++ /* fall through */ ++ case SONET_GETSTAT: ++ wsize = sizeof(struct sonet_stats); ++ break; ++ case SONET_GETDIAG: ++ wsize = sizeof(int); ++ break; ++ case SONET_SETDIAG: ++ case SONET_CLRDIAG: ++ if (!suser()) return -EPERM; ++ rsize = sizeof(int); ++ break; ++ case SONET_SETFRAMING: ++ rsize = sizeof(int); ++ break; ++ case SONET_GETFRAMING: ++ wsize = sizeof(int); ++ break; ++ case SONET_GETFRSENSE: ++ wsize = SONET_FRSENSE_SIZE; ++ break; ++ default: ++ wsize = -1; /* just in case ... */ ++ } ++ error = verify_area(VERIFY_READ,(void *) arg, ++ sizeof(struct atmif_sioc)); ++ if (error) return error; ++ if (wsize) { ++ error = verify_area(VERIFY_WRITE,(void *) arg, ++ sizeof(struct atmif_sioc)); ++ if (error) return error; ++ } ++ if (!(dev = atm_find_dev(get_fs_long(&((struct atmif_sioc *) arg)-> ++ number)))) return -ENODEV; ++ len = get_fs_long(&((struct atmif_sioc *) arg)->length); ++ eff_arg = get_fs_long(&((struct atmif_sioc *) arg)->arg); ++ if (!eff_arg && (rsize || wsize)) return -EINVAL; ++ if (rsize > 0) { ++ if (len != rsize) return -EINVAL; ++ error = verify_area(VERIFY_READ,(void *) eff_arg,len); ++ if (error) return error; ++ } ++ if (wsize > 0) { ++ if (len != wsize) return -EINVAL; ++ error = verify_area(VERIFY_WRITE,(void *) eff_arg,len); ++ if (error) return error; ++ put_fs_long(wsize,&((struct atmif_sioc *) arg)->length); ++ } ++ switch (cmd) { ++ case ATM_GETTYPE: ++ { ++ int length; ++ ++ length = strlen(dev->type); ++ if (len type, ++ length+1); ++ put_fs_long(length, ++ &((struct atmif_sioc *) arg)->length); ++ return length; ++ } ++ case ATM_GETESI: ++ memcpy_tofs((void *) eff_arg,dev->esi,ESI_LEN); ++ return wsize; ++ case ATM_GETSTATZ: ++ case ATM_GETSTAT: ++ error = fetch_stats(dev,(void *) eff_arg, ++ cmd == ATM_GETSTATZ); ++ return error < 0 ? error : wsize; ++ case ATM_GETCIRANGE: ++ memcpy_tofs((void *) eff_arg,&dev->ci_range, ++ sizeof(struct atm_cirange)); ++ return wsize; ++ default: ++ if (!dev->ops->ioctl) return -EINVAL; ++ error = dev->ops->ioctl(dev,cmd,eff_arg); ++ if (error >= 0) ++ put_fs_long(len, ++ &((struct atmif_sioc *) arg)->length); ++ return error; ++ } ++} ++ ++ ++int atm_setsockopt(struct socket *sock,int level,int optname, ++ char *optval,int optlen) ++{ ++ struct atm_vcc *vcc; ++ int error; ++ ++ error = verify_area(VERIFY_READ,optval,optlen); ++ if (error) return -EINVAL; ++ vcc = ATM_SD(sock); ++ if (level == SOL_SOCKET) { ++ unsigned long value; ++ ++ switch (optname) { ++ case SO_SNDBUF: ++ if (optlen != sizeof(value)) return -EINVAL; ++ value = get_fs_long(optval); ++ if (!value) value = ATM_TXBQ_DEF; ++ if (value < ATM_TXBQ_MIN) value = ATM_TXBQ_MIN; ++ if (value > ATM_TXBQ_MAX) value = ATM_TXBQ_MAX; ++ vcc->tx_quota = value; ++ return 0; ++ case SO_RCVBUF: ++ if (optlen != sizeof(value)) return -EINVAL; ++ value = get_fs_long(optval); ++ if (!value) value = ATM_RXBQ_DEF; ++ if (value < ATM_RXBQ_MIN) value = ATM_RXBQ_MIN; ++ if (value > ATM_RXBQ_MAX) value = ATM_RXBQ_MAX; ++ vcc->rx_quota = value; ++ return 0; ++ default: ++ return -EINVAL; ++ } ++ } ++ if (level == SOL_ATM) { ++ switch (optname) { ++ case SO_ATMQOS: ++ if (sock->state != SS_UNCONNECTED) ++ return -EBADFD; ++ if (optlen != sizeof(struct atm_qos)) ++ return -EINVAL; ++ memcpy_fromfs(&vcc->qos,optval,optlen); ++ vcc->flags |= ATM_VF_HASQOS; ++ return 0; ++ default: ++ break; ++ } ++ } ++ if (!vcc->dev || !vcc->dev->ops->setsockopt) return -EINVAL; ++ return vcc->dev->ops->setsockopt(vcc,level,optname,optval,optlen); ++} ++ ++ ++static int putsockopt(void *data,int len,char *optval,int *optlen) ++{ ++ int error; ++ ++ if (get_fs_long(optlen) < len) return -EINVAL; ++ put_fs_long(len,optlen); ++ error = verify_area(VERIFY_WRITE,optval,len); ++ if (error) return error; ++ memcpy_tofs(optval,data,len); ++ return 0; ++} ++ ++ ++int atm_getsockopt(struct socket *sock,int level,int optname, ++ char *optval,int *optlen) ++{ ++ struct atm_vcc *vcc; ++ int error; ++ ++ error = verify_area(VERIFY_READ,optlen,sizeof(*optlen)); /* paranoia? */ ++ if (error) return error; ++ error = verify_area(VERIFY_WRITE,optlen,sizeof(*optlen)); ++ if (error) return error; ++ vcc = ATM_SD(sock); ++ switch (level) { ++ case SOL_SOCKET: ++ switch (optname) { ++ case SO_SNDBUF: ++ return putsockopt(&vcc->tx_quota, ++ sizeof(unsigned long),optval, ++ optlen); ++ case SO_RCVBUF: ++ return putsockopt(&vcc->rx_quota, ++ sizeof(unsigned long),optval, ++ optlen); ++ case SO_BCTXOPT: ++ case SO_BCRXOPT: ++ level = SOL_AAL; /* cheat */ ++ break; ++ default: ++ return -EINVAL; ++ } ++ /* fall through */ ++ case SOL_AAL: ++ switch (optname) { ++ case SO_AALTYPE: ++ return putsockopt(&vcc->aal, ++ sizeof(unsigned char),optval, ++ optlen); ++ default: ++ break; ++ } ++ break; ++ case SOL_ATM: ++ switch (optname) { ++ case SO_ATMQOS: ++ if (!(vcc->flags & ATM_VF_HASQOS)) ++ return -EINVAL; ++ return putsockopt(&vcc->qos, ++ sizeof(struct atm_qos),optval, ++ optlen); ++ default: ++ break; ++ } ++ /* fall through */ ++ default: ++ break; ++ } ++ if (!vcc->dev || !vcc->dev->ops->getsockopt) return -EINVAL; ++ return vcc->dev->ops->getsockopt(vcc,level,optname,optval,optlen); ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/common.h Wed Jul 31 18:20:21 1996 +@@ -0,0 +1,32 @@ ++/* net/atm/common.h - ATM sockets (common part for PVC and SVC) */ ++ ++/* Written 1995 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_COMMON_H ++#define NET_ATM_COMMON_H ++ ++#include ++ ++int atm_create(struct socket *sock,int protocol); ++int atm_release(struct socket *sock,struct socket *peer); ++int atm_connect(struct socket *sock,int itf,short vpi,int vci); ++int atm_recvmsg(struct socket *sock,struct msghdr *m,int total_len, ++ int nonblock,int flags,int *addr_len); ++int atm_sendmsg(struct socket *sock,struct msghdr *m,int total_len, ++ int nonblock,int flags); ++int atm_select(struct socket *sock,int sel_type,select_table *wait); ++int atm_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg); ++int atm_setsockopt(struct socket *sock,int level,int optname,char *optval, ++ int optlen); ++int atm_getsockopt(struct socket *sock,int level,int optname,char *optval, ++ int *optlen); ++ ++int atm_release_vcc(struct atm_vcc *vcc,int free_vcc); ++ ++/* SVC */ ++ ++int copy_svc_addr(struct sockaddr_atmsvc *to,struct sockaddr_atmsvc *from); ++void svc_callback(struct atm_vcc *vcc); ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/dev.c Mon Jun 10 17:36:19 1996 +@@ -0,0 +1,38 @@ ++/* net/atm/dev.c - ATM device registeration */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++ ++#include "static.h" ++ ++ ++struct atm_dev *atm_dev_register(const char *type,const struct atmdev_ops *ops, ++ unsigned long flags) ++{ ++ volatile struct atm_dev *dev; /* need volatile to ensure sequence */ ++ ++ dev = alloc_atm_dev(type); ++ if (!dev) { ++ printk(KERN_ERR "atm_dev_register: no space for dev %s\n", ++ type); ++ return NULL; ++ } ++ dev->number = 0; ++ while (atm_find_dev(dev->number)) dev->number++; ++ dev->vccs = dev->last = NULL; ++ dev->dev_data = NULL; ++ dev->ops = ops; ++ dev->flags = flags; ++ memset((void *) &dev->stats,0,sizeof(struct atm_dev_stats)); ++ return (struct atm_dev *) dev; ++} ++ ++ ++void atm_dev_deregister(struct atm_dev *dev) ++{ ++ free_atm_dev(dev); ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/pvc.c Mon Jul 29 10:40:33 1996 +@@ -0,0 +1,162 @@ ++/* net/atm/pvc.c - ATM PVC sockets */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include /* struct socket, struct net_proto, ++ struct proto_ops */ ++#include /* ATM stuff */ ++#include /* ATM devices */ ++#include /* Classical IP over ATM */ ++#include /* error codes */ ++#include /* printk */ ++#include ++#ifdef CONFIG_AREQUIPA ++#include ++#endif ++ ++#include "static.h" /* static data ... */ ++#include "common.h" /* common for PVCs and SVCs */ ++ ++#ifndef NULL ++#define NULL 0 ++#endif ++ ++ ++static int pvc_dup(struct socket *newsock,struct socket *oldsock) ++{ ++ return -EOPNOTSUPP; ++} ++ ++ ++static int pvc_shutdown(struct socket *sock,int how) ++{ ++ return -EOPNOTSUPP; ++} ++ ++ ++static int pvc_bind(struct socket *sock,struct sockaddr *sockaddr, ++ int sockaddr_len) ++{ ++ struct sockaddr_atmpvc *addr; ++ struct atm_vcc *vcc; ++ ++ if (sockaddr_len != sizeof(struct sockaddr_atmpvc)) return -EINVAL; ++ addr = (struct sockaddr_atmpvc *) sockaddr; ++ if (addr->sap_family != AF_ATMPVC) return -EAFNOSUPPORT; ++ vcc = ATM_SD(sock); ++ if (!(vcc->flags & ATM_VF_HASQOS)) return -EBADFD; ++ if (vcc->flags & ATM_VF_PARTIAL) { ++ if (vcc->vpi != ATM_VPI_UNSPEC) addr->sap_addr.vpi = vcc->vpi; ++ if (vcc->vci != ATM_VCI_UNSPEC) addr->sap_addr.vci = vcc->vci; ++ } ++ return atm_connect(sock,addr->sap_addr.itf,addr->sap_addr.vpi, ++ addr->sap_addr.vci); ++} ++ ++ ++static int pvc_connect(struct socket *sock,struct sockaddr *sockaddr, ++ int sockaddr_len,int flags) ++{ ++ return pvc_bind(sock,sockaddr,sockaddr_len); ++} ++ ++ ++static int pvc_listen(struct socket *sock,int backlog) ++{ ++ return -EOPNOTSUPP; ++} ++ ++ ++static int pvc_accept(struct socket *sock,struct socket *newsock,int flags) ++{ ++ return -EOPNOTSUPP; ++} ++ ++ ++static int pvc_getname(struct socket *sock,struct sockaddr *sockaddr, ++ int *sockaddr_len,int peer) ++{ ++ struct sockaddr_atmpvc *addr; ++ struct atm_vcc *vcc; ++ ++#if 0 /* add some sanity checks later ... @@@ */ ++ if (sock->state != SS_CONNECTED) return -EINVAL; ++#endif ++ if (*sockaddr_len < sizeof(struct sockaddr_atmpvc)) return -EINVAL; ++ *sockaddr_len = sizeof(struct sockaddr_atmpvc); ++ addr = (struct sockaddr_atmpvc *) sockaddr; ++ vcc = ATM_SD(sock); ++ addr->sap_family = AF_ATMPVC; ++ addr->sap_addr.itf = vcc->dev->number; ++ addr->sap_addr.vpi = vcc->vpi; ++ addr->sap_addr.vci = vcc->vci; ++ return 0; ++} ++ ++ ++static int pvc_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg) ++{ ++ /* put PVC-specific code here */ ++ return atm_ioctl(sock,cmd,arg); ++} ++ ++ ++static int pvc_setsockopt(struct socket *sock,int level,int optname, ++ char *optval,int optlen) ++{ ++ /* put PVC-specific code here */ ++ return atm_setsockopt(sock,level,optname,optval,optlen); ++} ++ ++ ++static int pvc_getsockopt(struct socket *sock,int level,int optname, ++ char *optval,int *optlen) ++{ ++ /* put PVC-specific code here */ ++ return atm_getsockopt(sock,level,optname,optval,optlen); ++} ++ ++ ++static struct proto_ops pvc_proto_ops = { ++ PF_ATMPVC, ++ atm_create, ++ pvc_dup, ++ atm_release, ++ pvc_bind, ++ pvc_connect, ++ NULL, /* no socketpair */ ++ pvc_accept, ++ pvc_getname, ++ atm_select, ++ pvc_ioctl, ++ pvc_listen, ++ pvc_shutdown, ++ pvc_setsockopt, ++ pvc_getsockopt, ++ NULL, /* no fcntl */ ++ atm_sendmsg, ++ atm_recvmsg ++}; ++ ++ ++/* ++ * Initialize the ATM PVC protocol family ++ */ ++ ++ ++extern int atmdev_init(void); ++ ++ ++void atmpvc_proto_init(struct net_proto *pro) ++{ ++ atm_static_init(); ++ if (sock_register(pvc_proto_ops.family,&pvc_proto_ops) < 0) { ++ printk(KERN_ERR "ATMPVC: can't register"); ++ return; ++ } ++#ifdef CONFIG_AREQUIPA ++ (void) atm_init_arequipa(); ++#endif ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/static.c Fri Jul 19 15:21:05 1996 +@@ -0,0 +1,114 @@ ++/* net/atm/static.c - Staticly allocated resources */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include /* for get_fs_long and put_fs_long */ ++ ++#include "static.h" ++ ++ ++#ifndef NULL ++#define NULL 0 ++#endif ++ ++ ++struct atm_dev atm_dev[MAX_ATM_ITF]; ++struct atm_vcc atm_vcc[MAX_ATM_VCC]; ++ ++ ++void atm_static_init(void) ++{ ++ int i; ++ ++ for (i = 0; i < MAX_ATM_ITF; i++) atm_dev[i].ops = NULL; ++ for (i = 0; i < MAX_ATM_VCC; i++) atm_vcc[i].family = 0; ++} ++ ++ ++struct atm_dev *alloc_atm_dev(const char *type) ++{ ++ static int curr_dev = 0; ++ int last_dev; ++ ++ last_dev = curr_dev; ++ do { ++ if (!atm_dev[curr_dev].ops) { ++ memset(&atm_dev[curr_dev],0,sizeof(struct atm_dev)); ++ atm_dev[curr_dev].type = type; ++ return atm_dev+curr_dev; ++ } ++ if (++curr_dev == MAX_ATM_ITF) curr_dev = 0; ++ } ++ while (last_dev != curr_dev); ++ return NULL; ++} ++ ++ ++struct atm_vcc *alloc_atm_vcc(void) ++{ ++ static int curr_vcc = 0; ++ int last_vcc; ++ ++ last_vcc = curr_vcc; ++ do { ++ if (!atm_vcc[curr_vcc].family) return atm_vcc+curr_vcc; ++ if (++curr_vcc == MAX_ATM_VCC) curr_vcc = 0; ++ } ++ while (last_vcc != curr_vcc); ++ return NULL; ++} ++ ++ ++void free_atm_dev(struct atm_dev *dev) ++{ ++ dev->ops = NULL; ++} ++ ++ ++void free_atm_vcc(struct atm_vcc *vcc) ++{ ++ vcc->family = 0; ++} ++ ++ ++struct atm_dev *atm_find_dev(int number) ++{ ++ int i; ++ ++ for (i = 0; i < MAX_ATM_ITF; i++) ++ if (atm_dev[i].ops && atm_dev[i].number == number) ++ return &atm_dev[i]; ++ return NULL; ++} ++ ++ ++int atm_dev_list(int *buffer,int *u_length) ++{ ++ int length,left,i; ++ ++ length = get_fs_long(u_length); ++ left = length/sizeof(int); ++ if (!left) return -EINVAL; ++ for (i = 0; i < MAX_ATM_ITF; i++) ++ if (atm_dev[i].ops) { ++ if (!left) break; ++ put_fs_long(atm_dev[i].number,buffer); ++ buffer++; ++ left--; ++ } ++ put_fs_long(length-(length/sizeof(int)-left)*sizeof(int),u_length); ++ return length/sizeof(int)-left; ++} ++ ++ ++void for_all_vccs(void (*fn)(struct atm_vcc *vcc)) ++{ ++ int i; ++ ++ for (i = 0; i < MAX_ATM_VCC; i++) ++ if (atm_vcc[i].family) fn(atm_vcc+i); ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/static.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,29 @@ ++/* net/atm/static.h - Staticly allocated resources */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_STATIC_H ++#define NET_ATM_STATIC_H ++ ++#include ++ ++ ++/* ++ * This is evil ... ++ */ ++ ++extern struct atm_dev atm_dev[MAX_ATM_ITF]; ++extern struct atm_vcc atm_vcc[MAX_ATM_VCC]; ++ ++ ++void atm_static_init(void); ++struct atm_dev *alloc_atm_dev(const char *type); ++struct atm_vcc *alloc_atm_vcc(void); ++void free_atm_dev(struct atm_dev *dev); ++void free_atm_vcc(struct atm_vcc *vcc); ++struct atm_dev *atm_find_dev(int number); ++int atm_dev_list(int *buffer,int *u_length); ++void for_all_vccs(void (*fn)(struct atm_vcc *vcc)); ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/svc.c Mon Jul 29 10:44:01 1996 +@@ -0,0 +1,617 @@ ++/* net/atm/svc.c - ATM SVC sockets */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include /* struct socket, struct net_proto, ++ struct proto_ops */ ++#include /* error codes */ ++#include /* printk */ ++#include ++#include ++#include /* jiffies and HZ */ ++#include /* O_NONBLOCK */ ++#include /* ATM stuff */ ++#include ++#include ++#include ++ ++#include "static.h" ++#include "common.h" /* common for PVCs and SVCs */ ++#include "signaling.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++/* ++ * Note: since all this is still nicely synchronized with the signaling demon, ++ * there's no need to protect sleep loops with clis. If signaling is ++ * moved into the kernel, that would change. ++ */ ++ ++ ++void svc_callback(struct atm_vcc *vcc) ++{ ++ wake_up(&vcc->sleep); ++} ++ ++ ++static int svc_create(struct socket *sock,int protocol) ++{ ++ int error; ++ ++ error = atm_create(sock,protocol); ++ if (error) return error; ++ ATM_SD(sock)->callback = svc_callback; ++ return 0; ++} ++ ++ ++static int svc_dup(struct socket *newsock,struct socket *oldsock) ++{ ++ return svc_create(newsock,ATM_SD(oldsock)->aal); ++} ++ ++ ++static int svc_shutdown(struct socket *sock,int how) ++{ ++ return -EOPNOTSUPP; ++} ++ ++ ++static void svc_disconnect(struct atm_vcc *vcc) ++{ ++ struct sk_buff *skb; ++ ++ DPRINTK("svc_disconnect\n"); ++ if (vcc->flags & ATM_VF_REGIS) { ++ sigd_enq(vcc,as_close,NULL,NULL,NULL); ++ while (!(vcc->flags & ATM_VF_RELEASED) && sigd) ++ sleep_on(&vcc->sleep); ++ } ++ while ((skb = skb_dequeue(&vcc->listenq))) { ++ vcc->flags &= ~ATM_VF_RELEASED; ++ DPRINTK("LISTEN REL\n"); ++ sigd_enq(NULL,as_close,vcc,NULL,NULL); /* reject */ ++ while (!(vcc->flags & ATM_VF_RELEASED) && sigd) ++ sleep_on(&vcc->sleep); ++ dev_kfree_skb(skb,FREE_WRITE); ++ } ++ vcc->flags &= ~(ATM_VF_REGIS | ATM_VF_RELEASED); /* may retry later */ ++} ++ ++ ++static int svc_release(struct socket *sock,struct socket *peer) ++{ ++ DPRINTK("svc_release\n"); ++ if (!ATM_SD(sock)) return 0; ++ ATM_SD(sock)->flags &= ~ATM_VF_READY; ++ atm_release_vcc(ATM_SD(sock),0); ++ svc_disconnect(ATM_SD(sock)); ++ /* VCC pointer is used as a reference, so we must not free it ++ (thereby subjecting it to re-use) before all pending connections ++ are closed */ ++ free_atm_vcc(ATM_SD(sock)); ++ return 0; ++} ++ ++ ++int copy_svc_addr(struct sockaddr_atmsvc *to,struct sockaddr_atmsvc *from) ++{ ++ struct atm_blli *walk,**link,*next; ++ int error,bllis; ++ ++ *to = *from; ++ link = &to->sas_addr.blli; ++ error = bllis = 0; ++ for (walk = from->sas_addr.blli; walk; walk = (struct atm_blli *) ++ get_fs_long((unsigned long) &walk->next)) { ++ if (++bllis > ATM_MAX_BLLI) { ++ error = -E2BIG; ++ break; ++ } ++ *link = kmalloc(sizeof(struct atm_blli),GFP_KERNEL); ++ if (!*link) { ++ error = -ENOMEM; ++ break; ++ } ++ error = verify_area(VERIFY_READ,walk,sizeof(struct atm_blli)); ++ /* kmalloc may swap out user pages */ ++ if (error) break; ++ memcpy_fromfs(*link,walk,sizeof(struct atm_blli)); ++ link = &(*link)->next; ++ } ++ *link = NULL; ++ if (!error) return 0; ++ for (walk = to->sas_addr.blli; walk; walk = next) { ++ next = walk->next; ++ kfree(walk); ++ } ++ return error; ++} ++ ++ ++static int svc_bind(struct socket *sock,struct sockaddr *sockaddr, ++ int sockaddr_len) ++{ ++ struct sockaddr_atmsvc *addr; ++ struct atm_vcc *vcc; ++ int error; ++ ++ if (sockaddr_len != sizeof(struct sockaddr_atmsvc)) return -EINVAL; ++ if (sock->state == SS_CONNECTED) return -EISCONN; ++ if (sock->state != SS_UNCONNECTED) return -EINVAL; ++ addr = (struct sockaddr_atmsvc *) sockaddr; ++ if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT; ++ vcc = ATM_SD(sock); ++ vcc->flags &= ~ATM_VF_BOUND; /* failing rebind will kill old binding */ ++ /* @@@ check memory (de)allocation on rebind */ ++ if (!(vcc->flags & ATM_VF_HASQOS)) return -EBADFD; ++ error = copy_svc_addr(&vcc->local,addr); ++ if (error) return error; ++ vcc->reply = WAITING; ++ sigd_enq(vcc,as_bind,NULL,NULL,&vcc->local); ++ while (vcc->reply == WAITING && sigd) sleep_on(&vcc->sleep); ++ vcc->flags &= ~ATM_VF_REGIS; /* doesn't count */ ++ if (!sigd) return -EUNATCH; /* good code ? @@@ */ ++ if (!vcc->reply) vcc->flags |= ATM_VF_BOUND; ++ return vcc->reply; ++} ++ ++ ++static int svc_connect(struct socket *sock,struct sockaddr *sockaddr, ++ int sockaddr_len,int flags) ++{ ++ struct sockaddr_atmsvc *addr; ++ struct atm_vcc *vcc; ++ int error; ++ ++ DPRINTK("svc_connect\n"); ++ if (sockaddr_len != sizeof(struct sockaddr_atmsvc)) return -EINVAL; ++ if (sock->state == SS_CONNECTED) return -EISCONN; ++ vcc = ATM_SD(sock); ++ if (sock->state == SS_CONNECTING) { ++ if (vcc->reply == WAITING) return -EALREADY; ++ sock->state = SS_UNCONNECTED; ++ if (vcc->reply) return vcc->reply; ++ } ++ else { ++ if (sock->state != SS_UNCONNECTED) return -EINVAL; ++ addr = (struct sockaddr_atmsvc *) sockaddr; ++ if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT; ++ if (!(vcc->flags & ATM_VF_HASQOS)) return -EBADFD; ++ if (vcc->qos.txtp.traffic_class == ATM_ANYCLASS || ++ vcc->qos.rxtp.traffic_class == ATM_ANYCLASS) ++ return -EINVAL; ++ if (!vcc->qos.txtp.traffic_class && ++ !vcc->qos.rxtp.traffic_class) return -EINVAL; ++ error = copy_svc_addr(&vcc->remote,addr); ++ if (error) return error; ++ vcc->reply = WAITING; ++ sigd_enq(vcc,as_connect,NULL,NULL,&vcc->remote); ++ if (flags & O_NONBLOCK) { ++ sock->state = SS_CONNECTING; ++ return -EINPROGRESS; ++ } ++ while (vcc->reply == WAITING && sigd) { ++ interruptible_sleep_on(&vcc->sleep); ++ if (current->signal & ~current->blocked) { ++ DPRINTK("*ABORT*\n"); ++ /* ++ * This is tricky: ++ * Kernel -------close------> Demon ++ * Kernel <-----close(0)----- Demon ++ * or ++ * Kernel -------close------> Demon ++ * Kernel <--close(error)---- Demon ++ * or ++ * Kernel -------close------> Demon ++ * Kernel <------okay-------- Demon ++ * Kernel <-----close(0)----- Demon ++ */ ++ vcc->flags &= ~ATM_VF_RELEASED; ++ sigd_enq(vcc,as_close,NULL,NULL,NULL); ++ while (vcc->reply == WAITING && sigd) ++ sleep_on(&vcc->sleep); ++ if (!vcc->reply) ++ while (!(vcc->flags & ATM_VF_RELEASED) ++ && sigd) sleep_on(&vcc->sleep); ++ vcc->flags &= ~(ATM_VF_REGIS | ATM_VF_RELEASED); ++ /* we're gone now but may connect later */ ++ return -EINTR; ++ } ++ } ++ if (!sigd) return -EUNATCH; ++ if (vcc->reply) return vcc->reply; ++ } ++/* ++ * Not supported yet ++ * ++ * #ifndef CONFIG_SINGLE_SIGITF ++ */ ++ vcc->qos.txtp.max_pcr = SELECT_TOP_PCR(vcc->qos.txtp); ++ vcc->qos.txtp.min_pcr = 0; ++/* ++ * #endif ++ */ ++ if (!(error = atm_connect(sock,vcc->itf,vcc->vpi,vcc->vci))) ++ sock->state = SS_CONNECTED; ++ else (void) svc_disconnect(ATM_SD(sock)); ++ return error; ++} ++ ++ ++static int svc_listen(struct socket *sock,int backlog) ++{ ++ struct atm_vcc *vcc; ++ ++ DPRINTK("svc_listen\n"); ++ /* let server handle listen on unbound sockets */ ++ vcc = ATM_SD(sock); ++ vcc->reply = WAITING; ++ sigd_enq(vcc,as_listen,NULL,NULL,&vcc->local); ++ while (vcc->reply == WAITING && sigd) sleep_on(&vcc->sleep); ++ if (!sigd) return -EUNATCH; ++ vcc->flags |= ATM_VF_LISTEN; ++ vcc->backlog_quota = backlog > 0 ? backlog : ATM_BACKLOG_DEFAULT; ++ return vcc->reply; ++} ++ ++ ++static int svc_accept(struct socket *sock,struct socket *newsock,int flags) ++{ ++ struct sk_buff *skb; ++ struct atmsvc_msg *msg; ++ struct atm_vcc *old_vcc,*new_vcc; ++ int error; ++ ++ DPRINTK("svc_accept\n"); ++ old_vcc = ATM_SD(sock); ++ new_vcc = ATM_SD(newsock); ++ while (1) { ++ while (!(skb = skb_dequeue(&old_vcc->listenq)) && sigd) { ++ if (flags & O_NONBLOCK) return 0; /* not -EAGAIN ? */ ++ interruptible_sleep_on(&old_vcc->sleep); ++ if (current->signal & ~current->blocked) ++ return -ERESTARTSYS; ++ } ++ /* should try to atm_connect now and possibly send a close on ++ error */ ++ /* wait should be short, so we ignore the non-blocking flag */ ++ new_vcc->reply = WAITING; ++ sigd_enq(new_vcc,as_accept,old_vcc,NULL,NULL); ++ while (new_vcc->reply == WAITING && sigd) ++ sleep_on(&new_vcc->sleep); ++ if (!sigd) return -EUNATCH; ++ old_vcc->backlog_quota++; ++ if (!new_vcc->reply) break; ++ dev_kfree_skb(skb,FREE_WRITE); ++ } ++ if (!sigd) return -EUNATCH; ++ msg = (struct atmsvc_msg *) skb->data; ++ new_vcc->qos = msg->qos; ++ new_vcc->remote = msg->svc; ++ /* copy BLLI @@@ */ ++ new_vcc->remote.sas_addr.blli = NULL; ++ error = atm_connect(newsock,msg->pvc.sap_addr.itf,msg->pvc.sap_addr.vpi, ++ msg->pvc.sap_addr.vci); ++ dev_kfree_skb(skb,FREE_WRITE); ++ if (error) { ++ (void) svc_disconnect(ATM_SD(newsock)); ++ /* @@@ or should we try additional connections just until ++ we'd block ? (then we MUST return) */ ++ return error == -EAGAIN ? -EBUSY : error; ++ } ++ newsock->state = SS_CONNECTED; ++ return 0; ++} ++ ++ ++static int svc_getname(struct socket *sock,struct sockaddr *sockaddr, ++ int *sockaddr_len,int peer) ++{ ++ struct sockaddr_atmsvc *addr; ++ ++ /* this will be fun ... we have: public and private ++ address, bhli and possibly a lot of bllis. Now address buffers ++ are static ... argl */ ++ /* The solution: use pointers to link bllis */ ++ /* naturally, we still need some place to put all those nasty ++ little bllis ... */ ++#if 0 ++ /* sigh ... */ ++ if (*sockaddr_len < sizeof(struct sockaddr_atmsvc)) return -EINVAL; ++#endif ++ *sockaddr_len = sizeof(struct sockaddr_atmsvc); ++ addr = (struct sockaddr_atmsvc *) sockaddr; ++ memcpy(addr,peer ? &ATM_SD(sock)->remote : &ATM_SD(sock)->local, ++ sizeof(struct sockaddr_atmsvc)); ++ addr->sas_addr.blli = NULL; /* @@@ no - copy it */ ++ return 0; ++} ++ ++ ++static int check_addr(struct sockaddr_atmsvc *addr) ++{ ++ int i; ++ ++ if (addr->sas_family != AF_ATMSVC) return -EAFNOSUPPORT; ++ if (!*addr->sas_addr.prv) ++ if (!*addr->sas_addr.pub) return -EINVAL; ++ else return 0; ++ for (i = 1; i < ATM_E164_LEN+1; i++) ++ if (!addr->sas_addr.prv[i]) return 0; ++ return -EINVAL; ++} ++ ++ ++static int identical(struct sockaddr_atmsvc *a,struct sockaddr_atmsvc *b) ++{ ++ if (*a->sas_addr.prv) ++ if (memcmp(a->sas_addr.prv,b->sas_addr.prv,ATM_ESA_LEN)) ++ return 0; ++ if (!*a->sas_addr.pub) return !*b->sas_addr.pub; ++ if (!*b->sas_addr.pub) return 0; ++ return !strcmp(a->sas_addr.pub,b->sas_addr.pub); ++} ++ ++ ++/* ++ * Avoid modification of any list of local interfaces while reading it ++ * (which may involve page faults and therefore rescheduling) ++ */ ++ ++ ++static volatile int local_lock = 0; ++static struct wait_queue *local_wait = NULL; ++ ++ ++static void lock_local(void) ++{ ++ while (local_lock) sleep_on(&local_wait); ++ local_lock = 1; ++} ++ ++ ++static void unlock_local(void) ++{ ++ local_lock = 0; ++ wake_up(&local_wait); ++} ++ ++ ++static void notify_sigd(struct atm_dev *dev) ++{ ++ struct sockaddr_atmpvc pvc; ++ ++ pvc.sap_addr.itf = dev->number; ++ sigd_enq(NULL,as_itf_notify,NULL,&pvc,NULL); ++} ++ ++ ++static void reset_addr(struct atm_dev *dev) ++{ ++ struct atm_dev_addr *this; ++ ++ lock_local(); ++ while (dev->local) { ++ this = dev->local; ++ dev->local = this->next; ++ kfree(this); ++ } ++ unlock_local(); ++ notify_sigd(dev); ++} ++ ++ ++static int add_addr(struct atm_dev *dev,struct sockaddr_atmsvc *addr) ++{ ++ struct atm_dev_addr **walk; ++ ++ lock_local(); ++ for (walk = &dev->local; *walk; walk = &(*walk)->next) ++ if (identical(&(*walk)->addr,addr)) { ++ unlock_local(); ++ return -EEXIST; ++ } ++ *walk = kmalloc(sizeof(struct atm_dev_addr),GFP_KERNEL); ++ if (!*walk) { ++ unlock_local(); ++ return -ENOMEM; ++ } ++ (*walk)->addr = *addr; ++ (*walk)->next = NULL; ++ unlock_local(); ++ notify_sigd(dev); ++ return 0; ++} ++ ++ ++static int del_addr(struct atm_dev *dev,struct sockaddr_atmsvc *addr) ++{ ++ struct atm_dev_addr **walk,*this; ++ ++ lock_local(); ++ for (walk = &dev->local; *walk; walk = &(*walk)->next) ++ if (identical(&(*walk)->addr,addr)) break; ++ if (!*walk) { ++ unlock_local(); ++ return -ENOENT; ++ } ++ this = *walk; ++ *walk = this->next; ++ kfree(this); ++ unlock_local(); ++ notify_sigd(dev); ++ return 0; ++} ++ ++ ++static int get_addr(struct atm_dev *dev,struct sockaddr_atmsvc *buf,int size) ++{ ++ struct atm_dev_addr *walk; ++ int total; ++ ++ lock_local(); ++ total = 0; ++ for (walk = dev->local; walk; walk = walk->next) { ++ total += sizeof(struct sockaddr_atmsvc); ++ if (total > size) { ++ unlock_local(); ++ return -E2BIG; ++ } ++ memcpy_tofs(buf,&walk->addr,sizeof(struct sockaddr_atmsvc)); ++ buf++; ++ } ++ unlock_local(); ++ return total; ++} ++ ++ ++static int svc_ioctl(struct socket *sock,unsigned int cmd,unsigned long arg) ++{ ++ struct atm_dev *dev; ++ void *buf; ++ int rsize,wsize,len; ++ int error; ++ ++ rsize = wsize = 0; ++ switch (cmd) { ++ case SIOCGIFATMADDR: ++ wsize = sizeof(struct sockaddr_atmsvc); ++ break; ++ case SIOCSIFATMADDR: ++ case ATM_ADDADDR: ++ case ATM_DELADDR: ++ rsize = sizeof(struct sockaddr_atmsvc); ++ case ATM_RSTADDR: ++ if (!suser()) return -EPERM; ++ break; ++ case ATM_GETADDR: ++ wsize = -1; ++ break; ++ default: ++ return atm_ioctl(sock,cmd,arg); ++ } ++ error = verify_area(VERIFY_READ,(void *) arg, ++ sizeof(struct atmif_sioc)); ++ if (error) return error; ++ if (wsize) { ++ error = verify_area(VERIFY_WRITE,(void *) arg, ++ sizeof(struct atmif_sioc)); ++ if (error) return error; ++ } ++ if (!(dev = atm_find_dev(get_fs_long(&((struct atmif_sioc *) arg)-> ++ number)))) return -ENODEV; ++ len = get_fs_long(&((struct atmif_sioc *) arg)->length); ++ buf = (void *) get_fs_long(&((struct atmif_sioc *) arg)->arg); ++ if (cmd == SIOCSIFATMADDR && !buf) rsize = 0; /* @@@ */ ++ if (!buf && (rsize || wsize)) return -EINVAL; ++ if (rsize > 0) { ++ if (len != rsize) return -EINVAL; ++ error = verify_area(VERIFY_READ,buf,len); ++ if (error) return error; ++ } ++ if (wsize > 0) { ++ if (len != wsize) return -EINVAL; ++ error = verify_area(VERIFY_WRITE,buf,len); ++ if (error) return error; ++ put_fs_long(wsize,&((struct atmif_sioc *) arg)->length); ++ } ++ switch (cmd) { ++ case SIOCGIFATMADDR: ++ { ++ struct sockaddr_atmsvc addr; ++ ++ memset(&addr,0,sizeof(addr)); ++ memcpy_tofs((struct sockaddr_atmsvc *) buf, ++ dev->local ? &dev->local->addr : &addr, ++ sizeof(struct sockaddr_atmsvc)); ++ return wsize; ++ } ++ case ATM_RSTADDR: ++ reset_addr(dev); ++ return 0; ++ case SIOCSIFATMADDR: /* OBSOLETE - REMOVE WHEN ILMID UPDATED */ ++ reset_addr(dev); ++ if (!buf) return 0; ++ cmd = ATM_ADDADDR; ++ /* fall through */ ++ case ATM_ADDADDR: ++ case ATM_DELADDR: ++ { ++ struct sockaddr_atmsvc addr; ++ ++ memcpy_fromfs(&addr,buf,sizeof(addr)); ++ error = check_addr(&addr); ++ if (error) return error; ++ if (cmd == ATM_ADDADDR) ++ return add_addr(dev,&addr); ++ else return del_addr(dev,&addr); ++ } ++ case ATM_GETADDR: ++ error = get_addr(dev,buf,len); ++ if (error < 0) return error; ++ put_fs_long(error, ++ &((struct atmif_sioc *) arg)->length); ++ return error; ++ } ++ return -EINVAL; /* actually, we're in trouble if we end up here ... */ ++} ++ ++ ++static int svc_setsockopt(struct socket *sock,int level,int optname, ++ char *optval,int optlen) ++{ ++ /* stuff for SVCs */ ++ return atm_setsockopt(sock,level,optname,optval,optlen); ++} ++ ++ ++static int svc_getsockopt(struct socket *sock,int level,int optname, ++ char *optval,int *optlen) ++{ ++ /* stuff for SVCs */ ++ return atm_getsockopt(sock,level,optname,optval,optlen); ++} ++ ++ ++static struct proto_ops svc_proto_ops = { ++ PF_ATMSVC, ++ svc_create, ++ svc_dup, ++ svc_release, ++ svc_bind, ++ svc_connect, ++ NULL, /* no socketpair */ ++ svc_accept, ++ svc_getname, ++ atm_select, ++ svc_ioctl, ++ svc_listen, ++ svc_shutdown, ++ svc_setsockopt, ++ svc_getsockopt, ++ NULL, /* no fcntl */ ++ atm_sendmsg, ++ atm_recvmsg ++}; ++ ++ ++/* ++ * Initialize the ATM SVC protocol family ++ */ ++ ++void atmsvc_proto_init(struct net_proto *pro) ++{ ++ if (sock_register(svc_proto_ops.family,&svc_proto_ops) < 0) { ++ printk(KERN_ERR "ATMSVC: can't register"); ++ return; ++ } ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/signaling.c Wed Jul 31 19:29:23 1996 +@@ -0,0 +1,218 @@ ++/* net/atm/signaling.c - ATM signaling */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include /* error codes */ ++#include /* printk, suser */ ++#include ++#include ++#include /* jiffies and HZ */ ++#include /* ATM stuff */ ++#include ++#include ++#include ++ ++#include "tunable.h" ++#include "static.h" ++#include "signaling.h" ++ ++ ++#undef WAIT_FOR_DEMON /* #define this if system calls on SVC sockets ++ should block until the demon runs. ++ Danger: may cause nasty hangs if the demon ++ crashes. */ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++struct atm_vcc *sigd = NULL; ++static struct wait_queue *sigd_sleep = NULL; ++ ++ ++static int sigd_send(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ struct atmsvc_msg *msg; ++ ++ msg = (struct atmsvc_msg *) skb->data; ++ DPRINTK("sigd_send %d (0x%lx)\n",(int) msg->type,msg->vcc); ++ vcc = (struct atm_vcc *) msg->vcc; ++ switch (msg->type) { ++ case as_okay: ++ vcc->reply = msg->reply; ++ if (!*vcc->local.sas_addr.prv && ++ !*vcc->local.sas_addr.pub) { ++ vcc->local.sas_family = AF_ATMSVC; ++ memcpy(vcc->local.sas_addr.prv, ++ msg->local.sas_addr.prv,ATM_ESA_LEN); ++ memcpy(vcc->local.sas_addr.pub, ++ msg->local.sas_addr.pub,ATM_E164_LEN+1); ++ } ++ if (vcc->vpi || vcc->vci) break; ++ vcc->itf = msg->pvc.sap_addr.itf; ++ vcc->vpi = msg->pvc.sap_addr.vpi; ++ vcc->vci = msg->pvc.sap_addr.vci; ++ if (vcc->vpi || vcc->vci) vcc->qos = msg->qos; ++ break; ++ case as_error: ++ vcc->flags &= ~(ATM_VF_REGIS | ATM_VF_READY); ++ vcc->reply = msg->reply; ++ break; ++ case as_indicate: ++ vcc = (struct atm_vcc *) msg->listen_vcc; ++ DPRINTK("as_indicate!!!\n"); ++ if (!vcc->backlog_quota) { ++ sigd_enq(0,as_close,(struct atm_vcc *) ++ msg->listen_vcc,NULL,NULL); ++ return 0; ++ } ++ vcc->backlog_quota--; ++ skb_queue_tail(&vcc->listenq,skb); ++ if (vcc->callback) { ++ DPRINTK("waking vcc->sleep 0x%lx\n", ++ (unsigned long) &vcc->sleep); ++ vcc->callback(vcc); ++ } ++ return 0; ++ case as_close: ++ vcc->flags |= ATM_VF_RELEASED; ++ vcc->flags &= ~ATM_VF_READY; ++ vcc->reply = msg->reply; ++ break; ++ default: ++ printk(KERN_ALERT "sigd_send: bad message type %d\n", ++ (int) msg->type); ++ return -EINVAL; ++ } ++ if (vcc->callback) vcc->callback(vcc); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return 0; ++} ++ ++ ++void sigd_enq(struct atm_vcc *vcc,enum atmsvc_msg_type type, ++ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, ++ const struct sockaddr_atmsvc *svc) ++{ ++ struct sk_buff *skb; ++ struct atmsvc_msg *msg; ++ struct atm_blli *walk; ++ int size,i; ++#ifdef WAIT_FOR_DEMON ++ static unsigned long silence = 0; ++#endif ++ ++ DPRINTK("sigd_enq %d (0x%lx)\n",(int) type,(unsigned long) vcc); ++ size = sizeof(struct atmsvc_msg)-sizeof(struct atm_blli); ++ if (svc) ++ for (walk = svc->sas_addr.blli; walk; walk = walk->next) ++ size += sizeof(struct atm_blli); ++ while (!(skb = alloc_skb(size,GFP_KERNEL))) schedule(); ++ skb->free = 1; ++ skb->len = size; ++ msg = (struct atmsvc_msg *) skb->data; ++ msg->type = type; ++ msg->vcc = (unsigned long) vcc; ++ msg->listen_vcc = (unsigned long) listen_vcc; ++ msg->aal = vcc ? vcc->aal : 0; ++ msg->qos = vcc->qos; ++ if (!svc) msg->svc.sas_family = 0; ++ else { ++ msg->svc = *svc; ++ i = 0; ++ for (walk = svc->sas_addr.blli; walk; walk = walk->next) ++ msg->blli[i++] = *walk; ++ } ++ if (vcc) msg->local = vcc->local; ++ if (!pvc) memset(&msg->pvc,0,sizeof(msg->pvc)); ++ else msg->pvc = *pvc; ++ while (!sigd) { ++#ifdef WAIT_FOR_DEMON ++/* ++ * Don't ever enable this as Arequipa depends on being able to send a ++ * message to the signaling demon from an interrupt. ++ */ ++ if (silence < jiffies) { ++ printk(KERN_INFO "atmsvc: waiting for signaling demon " ++ "...\n"); ++ silence = jiffies+30*HZ; ++ } ++ sleep_on(&sigd_sleep); ++#else ++ printk(KERN_WARNING "atmsvc: no signaling demon\n"); ++ kfree_skb(skb,FREE_READ); ++ return; ++#endif ++ } ++ atomic_add(skb->truesize+ATM_PDU_OVHD,&sigd->rx_inuse); ++ skb_queue_tail(&sigd->recvq,skb); ++ wake_up(&sigd->sleep); ++ if (vcc) vcc->flags |= ATM_VF_REGIS; ++} ++ ++ ++static void trigger(struct atm_vcc *vcc) ++{ ++ if (vcc->family == PF_ATMSVC && !(vcc->flags & ATM_VF_META)) { ++ vcc->flags |= ATM_VF_RELEASED; ++ vcc->reply = -EUNATCH; ++ wake_up(&vcc->sleep); ++ } ++} ++ ++ ++static void sigd_close(struct atm_vcc *vcc) ++{ ++ struct sk_buff *skb; ++ ++ DPRINTK("sigd_close\n"); ++ sigd = NULL; ++ if (skb_peek(&vcc->recvq)) ++ printk(KERN_ERR "sigd_close: closing with requests pending\n"); ++ while ((skb = skb_dequeue(&vcc->recvq))) kfree_skb(skb,FREE_READ); ++ for_all_vccs(trigger); ++} ++ ++ ++static struct atmdev_ops sigd_dev_ops = { ++ NULL, /* no open */ ++ sigd_close, /* close */ ++ NULL, /* no ioctl */ ++ NULL, /* no getsockopt */ ++ NULL, /* no setsockopt */ ++ sigd_send, /* send */ ++ NULL, /* no sg_send */ ++ NULL, /* no poll */ ++ NULL, /* no phy_put */ ++ NULL, /* no phy_get */ ++ NULL /* no feedback */ ++}; ++ ++ ++static struct atm_dev sigd_dev = { ++ &sigd_dev_ops, ++ NULL, /* no PHY */ ++ "sig", /* type */ ++ 999, /* dummy device number */ ++ NULL,NULL, /* pretend not to have any VCCs */ ++ NULL,NULL, /* no data */ ++ 0, /* no flags */ ++ NULL, /* no local address */ ++ { 0 } /* no ESI, no statistics */ ++}; ++ ++ ++int sigd_attach(struct atm_vcc *vcc) ++{ ++ if (sigd) return -EADDRINUSE; ++ DPRINTK("sigd_attach\n"); ++ sigd = vcc; ++ vcc->dev = &sigd_dev; ++ vcc->flags |= ATM_VF_READY | ATM_VF_META; ++ wake_up(&sigd_sleep); ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/signaling.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,25 @@ ++/* net/atm/signaling.h - ATM signaling */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_SIGNALING_H ++#define NET_ATM_SIGNALING_H ++ ++#include ++#include ++#include ++ ++ ++#define WAITING 1 /* for reply: 0: no error, < 0: error, ... */ ++ ++ ++extern struct atm_vcc *sigd; /* needed in svc_release */ ++ ++ ++void sigd_enq(struct atm_vcc *vcc,enum atmsvc_msg_type type, ++ const struct atm_vcc *listen_vcc,const struct sockaddr_atmpvc *pvc, ++ const struct sockaddr_atmsvc *svc); ++int sigd_attach(struct atm_vcc *vcc); ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/atmarp.c Wed Jul 31 15:25:49 1996 +@@ -0,0 +1,607 @@ ++/* atmarp.c - RFC1577 ATM ARP */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include /* for UINT_MAX */ ++#include ++#include ++#include ++#include ++#include /* for some manifest constants */ ++#include ++#include ++#include ++#include ++#include ++#include /* for net/route.h */ ++#include /* for struct sockaddr_in */ ++#include /* for struct rtable and ip_rt_route */ ++#include /* for HZ */ ++#include /* for htons etc. */ ++ ++ ++/* ++ * WARNING: This code will eventually become full ATMARP support as defined in ++ * RFC1577 (actually, the plan is to move on quickly to RFC1577+), but ++ * right now it's certainly full of bugs and severe design errors. ++ * Don't use it as a reference for anything. ++ */ ++ ++ ++#include "common.h" ++#include "tunable.h" ++#include "protocols.h" /* for atm_push_raw */ ++#include "ipcommon.h" ++#include "atmarp.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++/* ++ * Relation between address/subddress and private/public address: ++ * ++ * Caller Called Address Subaddress ++ * ----------- ----------------------- -------------- ---------- ++ * private same private net private - ++ * public-only private via public public (E.164) private ++ * private net public UNI public (NSAP) - ++ * ++ * See also: ATM Forum UNI 3.0 (or 3.1), Annex A ++ */ ++ ++ ++struct device *clip_devs = NULL; ++struct atm_vcc *atmarpd = NULL; ++static struct wait_queue *atmarpd_sleep = NULL; ++static struct timer_list idle_timer = { NULL, NULL, 0L, 0L, NULL }; ++static int start_timer = 1; ++ ++ ++#define WAITING 1 /* see also signaling.h */ ++ ++ ++static int atmarpd_send(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ struct atmarp_ctrl *ctrl; ++ ++ ctrl = (struct atmarp_ctrl *) skb->data; ++ if (ctrl->magic != ATMARP_CTRL_MAGIC) { ++ printk(KERN_ALERT "atmarpd_send: bad magic 0x%x\n", ++ ctrl->magic); ++ return -EPROTO; ++ } ++ if (ctrl->type != act_complete) { ++ printk(KERN_ALERT "atmarpd_send: bad type 0x%x\n",ctrl->type); ++ return -EPROTO; ++ } ++ if (!ctrl->reply) { ++ printk(KERN_ALERT "atmarpd_send: no reply\n"); ++ return -EPROTO; ++ } ++ *ctrl->reply = ctrl->arg; ++ wake_up(&atmarpd_sleep); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return 0; ++} ++ ++ ++static int send_demon(enum atmarp_ctrl_type type,int itf,unsigned long arg, ++ void *data,int length) ++{ ++ struct atmarp_ctrl *ctrl; ++ struct sk_buff *skb; ++ int size,need_reply; ++ volatile int reply; ++ ++ DPRINTK("send_demon(%d)\n",type); ++ if (!atmarpd) return -EUNATCH; ++ size = sizeof(struct atmarp_ctrl)+(data ? length : 0); ++ skb = alloc_skb(size,GFP_ATOMIC); ++ if (!skb) return -ENOMEM; ++ skb->free = 1; ++ skb->len = size; ++ need_reply = type == act_ioctl || type == act_create; ++ ctrl = (struct atmarp_ctrl *) skb->data; ++ ctrl->magic = ATMARP_CTRL_MAGIC; ++ ctrl->type = type; ++ ctrl->reply = need_reply ? &reply : NULL; ++ ctrl->itf_num = itf; ++ ctrl->arg = arg; ++ if (data) memcpy(ctrl->data,data,length); ++ reply = WAITING; ++ atomic_add(skb->truesize+ATM_PDU_OVHD,&atmarpd->rx_inuse); ++ skb_queue_tail(&atmarpd->recvq,skb); ++ wake_up(&atmarpd->sleep); ++ if (!need_reply) return 0; ++ while (reply == WAITING && atmarpd) sleep_on(&atmarpd_sleep); ++ return atmarpd ? reply : -EUNATCH; ++} ++ ++ ++static void remove(struct atmarp_entry *entry) /* @@@ ugly ! */ ++{ ++ struct atmarp_entry **walk; ++ ++ for (walk = &PRIV(entry->dev)->table; *walk; walk = &(*walk)->next) ++ if (*walk == entry) { ++ *walk = entry->next; ++ return; ++ } ++ printk(KERN_CRIT "ATMARP: remove failed (0x%08lx)\n", ++ (unsigned long) entry); ++} ++ ++ ++static inline void time_out_entry(struct atmarp_entry **entry) ++{ ++ struct atmarp_entry *next; ++ ++ DPRINTK("VC TIMED OUT\n"); ++ if ((*entry)->vcc) { ++ (*entry)->vcc->flags |= ATM_VF_RELEASED; ++ (*entry)->vcc->flags &= ~ATM_VF_READY; ++ } ++ else { ++ if ((*entry)->queued) { ++ dev_kfree_skb((*entry)->queued,FREE_WRITE); ++ DPRINTK("discarding queued skb\n"); ++ } ++ else printk(KERN_CRIT "atmarp: weird - incomplete entry, but " ++ "nothing queued\n"); ++ next = (*entry)->next; ++ kfree(*entry); ++ *entry = next; ++ } ++} ++ ++ ++static void idle_timer_check(unsigned long dummy) ++{ ++ struct device *itf; ++ struct atmarp_entry **entry; ++ unsigned long expire; ++ ++ idle_timer.expires = UINT_MAX; ++ for (itf = clip_devs; itf; itf = PRIV(itf)->next) ++ for (entry = &PRIV(itf)->table; *entry; ++ entry = &(*entry)->next) ++ if ((*entry)->idle_timeout) { ++ expire = (*entry)->last_use+(*entry)-> ++ idle_timeout; ++ if (expire < jiffies) { ++ time_out_entry(entry); ++ if (!*entry) break; ++ } ++ else if (expire < idle_timer.expires) ++ idle_timer.expires = expire; ++ } ++ if (idle_timer.expires < jiffies+CLIP_CHECK_INTERVAL*HZ) ++ idle_timer.expires = jiffies+CLIP_CHECK_INTERVAL*HZ; ++ del_timer(&idle_timer); ++ add_timer(&idle_timer); ++} ++ ++ ++static void atm_push_ip(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++#if 0 ++ DPRINTK("clip push\n"); ++#endif ++ if (!skb) { ++ DPRINTK("removing AE\n"); ++ AE(vcc)->old_push(vcc,NULL); ++ if (AE(vcc)->ip) remove(AE(vcc)); ++ kfree(AE(vcc)); ++ return; ++ } ++ AE(vcc)->last_use = jiffies; ++ skb->dev = AE(vcc)->dev; ++ skb->mac.raw = skb->data; ++ if (!skb->dev->hard_header_len) skb->protocol = htons(ETH_P_IP); ++ else if (skb->len < RFC1483LLC_LEN || memcmp(skb->data,llc_oui, ++ sizeof(llc_oui))) skb->protocol = 0; ++ /* probably wrong encap ... */ ++ else { ++ skb->protocol = ((unsigned short *) skb->data)[3]; ++ skb_pull(skb,RFC1483LLC_LEN); ++ if (vcc && skb->protocol == htons(ETH_P_ARP)) { ++ PRIV(skb->dev)->stats.rx_packets++; ++ atm_push_raw(vcc,skb); ++ return; ++ } ++ } ++ PRIV(skb->dev)->stats.rx_packets++; ++ netif_rx(skb); ++} ++ ++ ++static struct atmarp_entry *new_entry(int timeout) ++{ ++ struct atmarp_entry *entry; ++ ++ entry = kmalloc(sizeof(struct atmarp_entry),GFP_ATOMIC); ++ if (!entry) return NULL; ++ entry->ip = 0; ++ entry->vcc = NULL; ++ entry->encap = 1; ++ entry->dev = clip_devs; ++ entry->old_push = NULL; ++ entry->last_use = jiffies; ++ entry->idle_timeout = timeout*HZ; ++ entry->queued = NULL; ++ entry->next = NULL; ++ return entry; ++} ++ ++ ++static void attach_entry(struct atm_vcc *vcc,struct atmarp_entry *entry) ++{ ++ AE(vcc) = entry; ++ entry->old_push = vcc->push; ++ vcc->push = atm_push_ip; ++ entry->vcc = vcc; ++} ++ ++ ++static int clip_hard_header(struct sk_buff *skb,struct device *dev, ++ unsigned short type,void *daddr,void *saddr,unsigned len) ++{ ++ void *here; ++ ++ here = skb_push(skb,dev->hard_header_len); ++ memcpy(here,llc_oui,sizeof(llc_oui)); ++ ((unsigned short *) here)[3] = htons(type); ++ return -RFC1483LLC_LEN; ++} ++ ++ ++static int clip_rebuild_header(void *buff,struct device *dev,unsigned long dst, ++ struct sk_buff *skb) ++{ ++#if 0 ++ void *here; ++ ++ here = skb->data; /*skb_push(skb,dev->hard_header_len);*/ ++ memcpy(here,llc_oui,sizeof(llc_oui)); ++ ((unsigned short *) here)[3] = htons(ETH_P_IP); ++#endif ++ return 0; ++} ++ ++ ++static int clip_xmit(struct sk_buff *skb,struct device *dev) ++{ ++ struct atmarp_entry *entry; ++ ++#if 0 ++ int i; ++ DPRINTK("new clip_xmit (0x%x)\n",skb->raddr); ++/*(int *) 0xffff0000 = 42;*/ ++for (i = 0; i < skb->len; i++) printk("%02X ",skb->data[i]); ++printk("\n"); ++#endif ++ for (entry = PRIV(dev)->table; entry; entry = entry->next) ++ if (entry->ip == skb->raddr) break; ++ if (!entry) { ++ DPRINTK("no entry - queuing\n"); ++ send_demon(act_need,PRIV(dev)->number,skb->raddr,NULL,0); ++ entry = new_entry(ATMARP_RETRY_DELAY); ++ entry->queued = skb; ++ entry->ip = skb->raddr; ++ entry->next = PRIV(dev)->table; ++ PRIV(dev)->table = entry; ++ idle_timer_check(0); ++ return 0; ++ } ++ if (!entry->vcc || !(entry->vcc->flags & ATM_VF_READY)) { ++ DPRINTK("not found - discarding\n"); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return 0; ++ /* Should return -EHOSTUNREACH, but then it will retry ++ forever, so we just discard the packet. */ ++ } ++ if (!entry->encap) skb_push(skb,RFC1483LLC_LEN); ++ /* assumes that we'll never attempt to xmit the same packet ++ twice @@@ */ ++ else { ++ memcpy((void *) skb->data,llc_oui,sizeof(llc_oui)); ++ ((unsigned short *) skb->data)[3] = htons(ETH_P_IP); ++ } ++ DPRINTK("CX(A) %d += %d\n",entry->vcc->tx_inuse,skb->truesize); ++ atomic_add(skb->truesize,&entry->vcc->tx_inuse); ++ skb->atm.iovcnt = 0; ++ AE(entry->vcc)->last_use = jiffies; ++ entry->vcc->dev->ops->send(entry->vcc,skb); ++ PRIV(dev)->stats.tx_packets++; ++ return 0; ++} ++ ++ ++static struct enet_statistics *atm_clip_get_stats(struct device *dev) ++{ ++ return &PRIV(dev)->stats; ++} ++ ++ ++int atmarp_mkip(struct atm_vcc *vcc,int timeout) ++{ ++ struct atmarp_entry *entry; ++ ++ DPRINTK("MKIP\n"); ++ entry = new_entry(timeout); ++ if (!entry) return -ENOMEM; ++ attach_entry(vcc,entry); ++ idle_timer_check(0); ++ return 0; ++} ++ ++ ++int atmarp_setentry(struct atm_vcc *vcc,unsigned long ip) ++{ ++ struct atmarp_entry **walk,**next,*succ; ++ struct rtable *route; ++ struct sk_buff *queued; ++ ++ DPRINTK("SETENTRY 0x%lx\n",ip); ++ if (vcc->push != atm_push_ip) { ++ printk(KERN_WARNING "atmarp_setentry: VCC has no ARP entry\n"); ++ return -EBADF; ++ } ++ if (!ip) { ++ if (!AE(vcc)->ip) { ++ printk(KERN_ERR "hiding hidden ATMARP entry\n"); ++ return 0; ++ } ++ DPRINTK("setentry: remove\n"); ++ remove(AE(vcc)); ++ AE(vcc)->ip = 0; ++ return 0; ++ } ++ DPRINTK("setentry: route\n"); ++ route = ip_rt_route(ip,1); ++ if (!route) return -EHOSTUNREACH; ++ AE(vcc)->dev = route->rt_dev; ++ if (AE(vcc)->ip) { ++ DPRINTK("setentry: update\n"); ++ DPRINTK("(updating)\n"); ++ AE(vcc)->ip = ip; ++ return 0; ++ } ++ DPRINTK("setentry: add\n"); ++ queued = NULL; ++ for (walk = &PRIV(AE(vcc)->dev)->table; *walk; walk = next) { ++ next = &(*walk)->next; ++ if ((*walk)->ip == ip) { ++ if ((*walk)->vcc) continue; ++ /* more than one VC to dest */ ++ if ((*walk)->queued) { ++ DPRINTK("setentry: flushing\n"); ++ if (queued) ++ printk(KERN_CRIT "atmarp: bad news - " ++ "more than one skb queued\n"); ++ queued = (*walk)->queued; ++ } ++ succ = (*walk)->next; ++ kfree(*walk); ++ *walk = succ; ++ next = walk; ++ continue; ++ } ++ } ++ DPRINTK("(adding)\n"); ++ AE(vcc)->ip = ip; ++ AE(vcc)->next = PRIV(AE(vcc)->dev)->table; ++ PRIV(AE(vcc)->dev)->table = AE(vcc); ++ if (queued) clip_xmit(queued,route->rt_dev); ++ return 0; ++} ++ ++ ++int atmarp_encap(struct atm_vcc *vcc,int mode) ++{ ++ AE(vcc)->encap = mode; ++ return 0; ++} ++ ++ ++static int atmarp_ioctl(struct device *dev,unsigned int cmd,void *arg) ++{ ++ struct atmarpreq req; ++ __u32 *ip; ++ int error; ++ ++ DPRINTK("atmarp_ioctl\n"); ++ error = verify_area(VERIFY_READ,arg,sizeof(struct atmarpreq)); ++ if (error) return error; ++ memcpy_fromfs(&req,arg,sizeof(struct atmarpreq)); ++ if (req.arp_pa.sa_family != AF_INET) return -EPFNOSUPPORT; ++ ip = &((struct sockaddr_in *) &req.arp_pa)->sin_addr.s_addr; ++ if (!(*ip & ~dev->pa_mask) && !(req.arp_flags & ATF_ARPSRV)) ++ return -EINVAL; ++ switch (cmd) { ++ case SIOCSARP: ++ case SIOCDARP: ++ case SIOCGARP: ++ return send_demon(act_ioctl,PRIV(dev)->number,cmd,&req, ++ sizeof(struct atmarpreq)); ++ /* @@@ get will need special treatment */ ++ default: ++ return -EINVAL; ++ } ++ return 0; ++} ++ ++ ++static int clip_open(struct device *dev) ++{ ++ DPRINTK("clip_open called\n"); ++ return 0; ++} ++ ++ ++static int clip_stop(struct device *dev) ++{ ++ DPRINTK("clip_stop\n"); ++ /* @@@ just kill it on error ? */ ++ return 0; ++} ++ ++ ++static int clip_init(struct device *dev) ++{ ++ DPRINTK("init %s\n",dev->name); ++ dev->hard_start_xmit = clip_xmit; ++ /* sg_xmit ... */ ++ dev->open = clip_open; ++ dev->stop = clip_stop; ++ ether_setup(dev); ++ dev->tbusy = 0; /* @@@ check */ ++ dev->hard_header = clip_hard_header; ++ dev->do_ioctl = NULL; ++ dev->ip_arp = atmarp_ioctl; ++ dev->rebuild_header = clip_rebuild_header; ++ dev->get_stats = atm_clip_get_stats; ++ dev->hard_header_len = RFC1483LLC_LEN; ++ dev->flags &= ~(IFF_BROADCAST | IFF_MULTICAST); ++ dev->flags |= IFF_NOARP; /* we do our own ARP ... */ ++ dev->mtu = RFC1626_MTU; ++ return send_demon(act_create,PRIV(dev)->number,0,NULL,0); ++} ++ ++ ++int clip_create(int number) /* remove by downing */ ++{ ++ struct device *dev,*walk; ++ ++ if (number != -1) { ++ for (walk = clip_devs; walk; walk = PRIV(walk)->next) ++ if (PRIV(walk)->number == number) return -EEXIST; ++ } ++ else { ++ number = 0; ++ for (walk = clip_devs; walk; walk = PRIV(walk)->next) ++ if (PRIV(walk)->number >= number) ++ number = PRIV(walk)->number+1; ++ } ++ dev = kmalloc(sizeof(struct device)+sizeof(struct atmarp_priv), ++ GFP_KERNEL); ++ if (!dev) return -ENOMEM; ++ memset(dev,0,sizeof(struct device)+sizeof(struct atmarp_priv)); ++ dev->name = PRIV(dev)->name; ++ sprintf(dev->name,"atm%d",number); ++ dev->init = clip_init; ++ if (register_netdev(dev)) return -EIO; /* free dev ? */ ++ PRIV(dev)->number = number; ++ PRIV(dev)->table = NULL; ++ PRIV(dev)->next = clip_devs; ++ clip_devs = dev; ++ DPRINTK("registered (net:%s)\n",dev->name); ++ return number; ++} ++ ++ ++static int clip_device_event(struct notifier_block *this,unsigned long event, ++ void *dev) ++{ ++ /* ignore non-CLIP devices */ ++ if (((struct device *) dev)->init != clip_init) return NOTIFY_DONE; ++ switch (event) { ++ case NETDEV_UP: ++ (void) send_demon(act_up,PRIV(dev)->number,0,NULL,0); ++ break; ++ case NETDEV_DOWN: ++ DPRINTK("clip_device_event NETDEV_DOWN\n"); ++ (void) send_demon(act_down,PRIV(dev)->number,0,NULL,0); ++ break; ++ case NETDEV_REBOOT: ++ /* ignore */ ++ break; ++ default: ++ printk(KERN_ERR "clip_device_event: unknown event " ++ "%ld\n",event); ++ break; ++ } ++ return NOTIFY_DONE; ++} ++ ++ ++static struct notifier_block clip_dev_notifier = { ++ clip_device_event, ++ NULL, ++ 0 ++}; ++ ++ ++static void atmarpd_close(struct atm_vcc *vcc) ++{ ++ struct sk_buff *skb; ++ ++ DPRINTK("atmarpd_close\n"); ++ atmarpd = NULL; /* assumed to be atomic */ ++ barrier(); ++ unregister_netdevice_notifier(&clip_dev_notifier); ++ wake_up(&atmarpd_sleep); ++ if (skb_peek(&vcc->recvq)) ++ printk(KERN_ERR "atmarpd_close: closing with requests " ++ "pending\n"); ++ while ((skb = skb_dequeue(&vcc->recvq))) kfree_skb(skb,FREE_READ); ++ DPRINTK("(done)\n"); ++} ++ ++ ++static struct atmdev_ops atmarpd_dev_ops = { ++ NULL, /* no open */ ++ atmarpd_close, /* close */ ++ NULL, /* no ioctl */ ++ NULL, /* no getsockopt */ ++ NULL, /* no setsockopt */ ++ atmarpd_send, /* send */ ++ NULL, /* no sg_send */ ++ NULL, /* no poll */ ++ NULL, /* no phy_put */ ++ NULL, /* no phy_get */ ++ NULL /* no feedback */ ++}; ++ ++static struct atm_dev atmarpd_dev = { ++ &atmarpd_dev_ops, ++ NULL, /* no PHY */ ++ "arpd", /* type */ ++ 999, /* dummy device number */ ++ NULL,NULL, /* pretend not to have any VCCs */ ++ NULL,NULL, /* no data */ ++ 0, /* no flags */ ++ NULL, /* no local address */ ++ { 0 } /* no ESI, no statistics */ ++}; ++ ++ ++int atm_init_atmarp(struct atm_vcc *vcc) ++{ ++ if (atmarpd) return -EADDRINUSE; ++ if (start_timer) { ++ start_timer = 0; ++ idle_timer.expires = jiffies+CLIP_CHECK_INTERVAL*HZ; ++ idle_timer.function = idle_timer_check; ++ add_timer(&idle_timer); ++ } ++ atmarpd = vcc; ++ vcc->flags |= ATM_VF_READY | ATM_VF_META; ++ /* allow replies and avoid getting closed if signaling dies */ ++ vcc->dev = &atmarpd_dev; ++ vcc->aal = ATM_AAL5; /* lie */ ++ vcc->push = NULL; ++ vcc->peek = NULL; /* crash */ ++ vcc->pop = NULL; /* crash */ ++ vcc->push_oam = NULL; /* crash */ ++ register_netdevice_notifier(&clip_dev_notifier); ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/atmarp.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,54 @@ ++/* net/atm/atmarp.h - RFC1577 ATM ARP */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_ATMARP_H ++#define NET_ATM_ATMARP_H ++ ++#include ++#include ++#include ++#include ++#include ++ ++ ++#define PRIV(dev) ((struct atmarp_priv *) ((struct device *) (dev)+1)) ++#define AE(vcc) ((struct atmarp_entry *) (vcc->user_back)) ++ ++ ++struct atmarp_entry { ++ unsigned long ip; /* IP address, 0 if none */ ++ struct atm_vcc *vcc; /* active VCC */ ++ unsigned char encap; /* 0: NULL, 1: LLC/SNAP */ ++ struct device *dev; /* device back pointer */ ++ void (*old_push)(struct atm_vcc *vcc,struct sk_buff *skb); ++ /* keep old push fn for detaching */ ++ unsigned long last_use; /* last send or receive operation */ ++ unsigned long idle_timeout; /* keep open idle for so many jiffies*/ ++ struct sk_buff *queued; /* queue one skb when resolving */ ++ struct atmarp_entry *next; /* ugly linked list ... */ ++}; ++ ++/* Entry is PVC iff vcc && vcc->family == AF_ATMPVC */ ++ ++ ++struct atmarp_priv { ++ struct atmarp_entry *table; /* ARP table */ ++ char name[8]; /* interface name */ ++ int number; /* for convenience ... */ ++ struct enet_statistics stats; ++ struct device *next; /* next CLIP interface */ ++}; ++ ++ ++extern struct device *clip_devs; ++extern struct atm_vcc *atmarpd; /* ugly */ ++ ++ ++int clip_create(int number); ++int atmarp_mkip(struct atm_vcc *vcc,int timeout); ++int atmarp_setentry(struct atm_vcc *vcc,unsigned long ip); ++int atmarp_encap(struct atm_vcc *vcc,int mode); ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/ipcommon.h Tue Jul 30 18:42:55 1996 +@@ -0,0 +1,66 @@ ++/* net/atm/ipcommon.h - Common items for all ways of doing IP over ATM */ ++ ++/* Written 1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_IPCOMMON_H ++#define NET_ATM_IPCOMMON_H ++ ++ ++#include ++#include ++#include ++#include ++#include ++ ++ ++extern const unsigned char llc_oui[6]; ++ ++ ++#define CLIP(dev) ((struct clip_priv *) ((struct device *) (dev)+1)) ++ ++ ++struct clip_priv { ++ char name[8]; ++ struct atm_vcc *vcc; ++ struct enet_statistics stats; ++}; ++ ++ ++static inline void ipcom_push(struct sk_buff *skb) ++{ ++ skb->mac.raw = skb->data; ++ if (!skb->dev->hard_header_len) skb->protocol = htons(ETH_P_IP); ++ else if (skb->len < RFC1483LLC_LEN || memcmp(skb->data,llc_oui, ++ sizeof(llc_oui))) skb->protocol = 0; ++ /* probably wrong encap ... */ ++ else { ++ skb->protocol = ((unsigned short *) skb->data)[3]; ++ skb_pull(skb,RFC1483LLC_LEN); ++ } ++ CLIP(skb->dev)->stats.rx_packets++; ++ netif_rx(skb); ++} ++ ++ ++static inline void ipcom_xmit(struct device *dev,struct atm_vcc *vcc, ++ struct sk_buff *skb) ++{ ++ if (dev->hard_header_len) { ++ memcpy(skb->data,llc_oui,sizeof(llc_oui)); ++ ((unsigned short *) skb->data)[3] = htons(ETH_P_IP); /* hack */ ++ } ++ atomic_add(skb->truesize,&vcc->tx_inuse); ++ skb->atm.iovcnt = 0; ++ vcc->dev->ops->send(vcc,skb); ++} ++ ++ ++struct sk_buff *atm_peek_clip(struct atm_vcc *vcc,unsigned long pdu_size, ++ __u32 (*fetch)(struct atm_vcc *vcc,int i)); ++void atm_pop_clip(struct atm_vcc *vcc,struct sk_buff *skb); ++void ipcom_init(struct device *dev, ++ int (*hard_start_xmit)(struct sk_buff *skb,struct device *dev), ++ unsigned short extra_flags); ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/ipcommon.c Mon Jul 29 11:30:37 1996 +@@ -0,0 +1,181 @@ ++/* net/atm/ipcommon.c - Common items for all ways of doing IP over ATM */ ++ ++/* Written 1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++ ++#include "common.h" ++#include "ipcommon.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++const unsigned char llc_oui[] = { ++ 0xaa, /* DSAP: non-ISO */ ++ 0xaa, /* SSAP: non-ISO */ ++ 0x03, /* Ctrl: Unnumbered Information Command PDU */ ++ 0x00, /* OUI: EtherType */ ++ 0x00, ++ 0x00 }; ++ ++ ++static int clip_hard_header(struct sk_buff *skb,struct device *dev, ++ unsigned short type,void *daddr,void *saddr,unsigned len) ++{ ++ void *here; ++ ++ if (!dev->hard_header_len) return 0; /* just in case ... */ ++ here = skb_push(skb,dev->hard_header_len); ++ memcpy(here,llc_oui,sizeof(llc_oui)); ++ ((unsigned short *) here)[3] = htons(type); ++ return -RFC1483LLC_LEN; ++} ++ ++ ++static int clip_rebuild_header(void *buff,struct device *dev,unsigned long dst, ++ struct sk_buff *skb) ++{ ++ /* no ARP with this type of IP over ATM */ ++ return 0; ++} ++ ++ ++struct sk_buff *atm_peek_clip(struct atm_vcc *vcc,unsigned long pdu_size, ++ __u32 (*fetch)(struct atm_vcc *vcc,int i)) ++{ ++ struct sk_buff *skb; ++ int header_size; ++ ++ /* TODO: check against buffer quota (should even check against upper ++ layer protocol socket quota) */ ++ header_size = 0; ++ if (fetch && pdu_size > 28) { /* > IP+UDP header */ ++ unsigned long type; ++ ++/* doesn't work yet */ ++type = ntohl(fetch(vcc,2)); ++/*printk("type is 0x%08lx\n",type);*/ ++ type = ntohl(fetch(vcc,2)) & 0xff0000; ++ if (type == IPPROTO_UDP << 8) header_size = 28; /* bytes */ ++ else if (type == IPPROTO_TCP << 8) header_size = 40; /* bytes */ ++ } ++ if (!header_size) skb = alloc_skb((pdu_size+3) & ~3,GFP_ATOMIC); ++ else { ++ skb = alloc_skb(((pdu_size+3) & ~3)+PAGE_SIZE+header_size-1, ++ GFP_ATOMIC); ++ if (skb) { ++ DPRINTK("data before: 0x%lx\n", ++ (unsigned long) skb->data); ++ skb->data = (unsigned char *) (((unsigned long) skb-> ++ data+header_size+PAGE_SIZE-1) & ~(PAGE_SIZE-1))- ++ header_size; ++ DPRINTK("data after: 0x%lx\n", ++ (unsigned long) skb->data); ++ } ++ } ++ if (!skb) { ++ CLIP(vcc->proto_data)->stats.rx_dropped++; ++ vcc->stats->rx_drop++; ++ } ++ return skb; ++} ++ ++ ++void atm_pop_clip(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++#ifdef CONFIG_MMU_HACKS ++ if (skb->atm.iovcnt) ++ unlock_user(skb->atm.iovcnt-1,(struct iovec *) skb->data+1); ++#endif ++/*printk("popping (r:%d,w:%d)\n",skb->sk->rmem_alloc,skb->sk->wmem_alloc);*/ ++ dev_kfree_skb(skb,FREE_WRITE); ++} ++ ++ ++ ++static struct enet_statistics *atm_clip_get_stats(struct device *dev) ++{ ++ return &CLIP(dev)->stats; ++} ++ ++ ++/*@@@static*/ int clip_ioctl(struct device *dev,struct ifreq *rq,int cmd) ++{ ++ if (!suser()) return -EPERM; ++ switch (cmd) { ++ case CLIP_NULENCAP: ++#if 0 ++ dev->type = ARPHDR_ATMNULL; ++#endif ++ dev->hard_header_len = 0; ++ return 0; ++ case CLIP_LLCENCAP: ++#if 0 ++ dev->type = ARPHDR_ATMLLC; ++#endif ++ dev->hard_header_len = RFC1483LLC_LEN; ++ return 0; ++ default: ++ return -EOPNOTSUPP; ++ } ++} ++ ++ ++static int clip_open(struct device *dev) ++{ ++ DPRINTK("clip_open called\n"); ++ return 0; ++} ++ ++ ++static int clip_stop(struct device *dev) ++{ ++ DPRINTK("DOWN! (%s,0x%lx)\n",dev->name,(unsigned long) CLIP(dev)->vcc); ++ atm_release_vcc(CLIP(dev)->vcc,1); ++ return 0; ++} ++ ++ ++void ipcom_init(struct device *dev, ++ int (*hard_start_xmit)(struct sk_buff *skb,struct device *dev), ++ unsigned short extra_flags) ++{ ++ DPRINTK("ipcom_init\n"); ++ DPRINTK("configuring %s\n",dev->name); ++ dev->hard_start_xmit = hard_start_xmit; ++#if 0 ++#ifdef CONFIG_MMU_HACKS ++ dev->sg_xmit = clip_sg_xmit; ++#else ++ dev->sg_xmit = NULL; ++#endif ++#endif ++ dev->open = clip_open; ++ dev->stop = clip_stop; ++ ether_setup(dev); ++ dev->tbusy = 0; /* @@@ check */ ++ dev->hard_header = clip_hard_header; ++ dev->do_ioctl = clip_ioctl; ++ dev->rebuild_header = clip_rebuild_header; ++ dev->get_stats = atm_clip_get_stats; ++ dev->hard_header_len = RFC1483LLC_LEN; ++ dev->flags |= IFF_NOARP | IFF_POINTOPOINT | extra_flags; ++#if 0 ++ dev->type = ARPHDR_ATMLLC; ++#endif ++ dev->mtu = RFC1626_MTU; ++ memset(&CLIP(dev)->stats,0,sizeof(struct enet_statistics)); ++ ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/arequipa.c Wed Jul 31 17:06:38 1996 +@@ -0,0 +1,367 @@ ++/* net/atm/arequipa.c - Application requested IP over ATM */ ++ ++/* Written 1996 by Jean-Michel Pittet and Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include /* cli and such */ ++ ++#include "protocols.h" ++#include "tunable.h" ++#include "signaling.h" /* for indirect closing, see below */ ++#include "common.h" ++#include "ipcommon.h" ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++struct device *arequipa_dev = NULL; ++ /* must use a different null value if skb->dev can ever be NULL */ ++struct atm_vcc *aqd = NULL; ++ ++struct rtable arequipa_rt = { ++ NULL, /* rt_next */ ++ 0L, /* rt_dst */ ++ 0L, /* rt_src */ ++ 0L, /* rt_gateway */ ++ 2, /* rt_refcnt */ ++ 1, /* rt_use */ ++ 0, /* rt_window */ ++ 0L, /* rt_lastuse */ ++ NULL, /* rt_hh */ ++ NULL, /* rt_dev */ ++ RTF_UP, /* rt_flags */ ++ RFC1626_MTU, /* rt_mtu */ ++ 0, /* rt_irtt */ ++ 0 /* rt_tos */ ++}; ++ ++ ++/* ++ * Closing is tricky. Since we may be in an interrupt when executing ++ * arequipa_close, we can't just go and call close_fp. So what we do it instead ++ * is to ask arequipad nicely to close the VC. arequipad issues an ++ * AREQUIPA_CLS3RD ioctl to close us (via arequipa_close_vcc). Now we're in a ++ * process context and can sleep, etc. Ain't life sweet ? ++ */ ++ ++ ++static void aqd_enq(struct atm_vcc *vcc) ++{ ++ struct sk_buff *skb; ++ ++ if (!aqd) { ++ printk(KERN_CRIT "aqd_enq: no Arequipa demon\n"); ++ return; ++ } ++ skb = alloc_skb(sizeof(vcc),GFP_ATOMIC); ++ if (!skb) { ++ printk(KERN_CRIT "adq_enq: out of memory\n"); ++ return; ++ } ++ skb->free = 1; ++ skb->len = sizeof(vcc); ++ *(struct atm_vcc **) skb->data = vcc; ++ atomic_add(skb->truesize+ATM_PDU_OVHD,&aqd->rx_inuse); ++ skb_queue_tail(&aqd->recvq,skb); ++ wake_up(&aqd->sleep); ++} ++ ++ ++int arequipa_close(struct sock *upper) ++{ ++ struct socket *lower; ++ unsigned long flags; ++ ++ DPRINTK("arequipa_close\n"); ++ if (!(lower = upper->arequipa)) return -ENOTCONN; ++ save_flags(flags); ++ cli(); ++ upper->arequipa = NULL; ++ ATM_SD(lower)->upper = NULL; ++ if (!(ATM_SD(lower)->flags & ATM_VF_AQREL)) aqd_enq(ATM_SD(lower)); ++ ATM_SD(lower)->flags |= ATM_VF_AQREL; ++ restore_flags(flags); ++ return 0; ++} ++ ++ ++void arequipa_close_vcc(struct atm_vcc *vcc) ++{ ++ if (!(vcc->flags & ATM_VF_AQREL)) ++ printk(KERN_CRIT "arequipa_close_3rd_party: VCC %p doesn't " ++ "have ATM_VF_AQREL set\n",vcc); ++ else close_fp(vcc->sock->file); ++} ++ ++ ++static void arequipa_callback(struct atm_vcc *vcc) ++{ ++ unsigned long flags; ++ ++ DPRINTK("arequipa_callback\n"); ++ svc_callback(vcc); ++ if (!(vcc->flags & ATM_VF_RELEASED)) return; ++ vcc->callback = svc_callback; /* paranoia ... */ ++ save_flags(flags); ++ cli(); ++ if (vcc->upper) { ++ if (!vcc->upper->arequipa) ++ printk("arequipa_callback: upper pretends not to " ++ "use Arequipa\n"); ++ ip_rt_put(vcc->upper->ip_route_cache); ++ vcc->upper->ip_route_cache = NULL; ++ vcc->upper->arequipa = NULL; ++ } ++ if (vcc->flags & ATM_VF_AQREL) { ++ restore_flags(flags); ++ return; ++ } ++ vcc->flags |= ATM_VF_AQREL; ++ restore_flags(flags); ++ arequipa_close_vcc(vcc); ++ return; ++} ++ ++ ++static int check_aq_vcc(struct socket *lower) ++{ ++ if (lower->ops->family != PF_ATMSVC && lower->ops->family != PF_ATMPVC) ++ return -EPROTOTYPE; ++ if (lower->state != SS_CONNECTED) return -ENOTCONN; ++ if (ATM_SD(lower)->aal != ATM_AAL5) return -EPROTONOSUPPORT; ++ return 0; ++} ++ ++ ++/*static*/ void atm_push_arequipa(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ if (!skb) return; /* it's okay to close Arequipa VCs */ ++ /*DPRINTK("arequipa push(%ld)\n",skb->len);*/ ++ skb->dev = arequipa_dev; ++ ipcom_push(skb); ++} ++ ++ ++static void make_aq_vcc(struct socket *lower) ++{ ++ struct atm_vcc *vcc; ++ unsigned long flags; ++ ++ save_flags(flags); ++ cli(); ++ vcc = ATM_SD(lower); ++ vcc->pop = atm_pop_clip; ++ vcc->callback = arequipa_callback; ++ vcc->push = atm_push_arequipa; ++ vcc->peek = atm_peek_clip; ++ vcc->push_oam = NULL; ++ restore_flags(flags); ++ lower->file->f_count++; ++} ++ ++ ++int arequipa_attach(struct socket *lower,struct sock *upper) ++{ ++ struct rtable *rt; ++ int error; ++ ++ if (upper->arequipa) { ++ printk(KERN_WARNING "arequipa_attach: upper already uses " ++ "Arequipa\n"); ++ return -EISCONN; ++ } ++ error = check_aq_vcc(lower); ++ if (error) return error; ++ if (ATM_SD(lower)->upper) { ++ printk(KERN_WARNING "arequipa_attach: lower is already " ++ "attached\n"); ++ return -EISCONN; ++ } ++ DPRINTK("arequipa_attach %p (i_count=%d,f_count=%d)\n",upper, ++ lower->inode->i_count,lower->file->f_count); ++ upper->arequipa = lower; ++ ATM_SD(lower)->upper = upper; ++ rt = upper->ip_route_cache; /* revalidate cache */ ++ upper->ip_route_cache = NULL; ++ set_rt_cache(upper,rt); ++ return 0; ++} ++ ++ ++int arequipa_expect(struct sock *upper,int on) ++{ ++ DPRINTK("arequipa_expect %d\n",on); ++ if (!aqd) { ++ printk(KERN_ERR "arequipa_expect: no Arequipa demon\n"); ++ return -EUNATCH; ++ } ++ if (on) { ++ if (upper->aq_route) return 0; ++ upper->aq_route = kmalloc(sizeof(struct rtable),GFP_KERNEL); ++ return upper->aq_route ? 0 : -ENOMEM; ++ } ++ if (!upper->aq_route) return 0; ++ if (upper->arequipa) return -EBUSY; ++ kfree(upper->aq_route); ++ upper->aq_route = NULL; ++ return 0; ++} ++ ++ ++int arequipa_preset(struct socket *lower,struct sock *upper) ++{ ++ int error; ++ ++ if (!aqd) { ++ printk(KERN_ERR "arequipa_preset: no Arequipa demon\n"); ++ return -EUNATCH; ++ } ++ error = arequipa_expect(upper,1); ++ if (error) return error; ++ error = arequipa_attach(lower,upper); ++ if (!error) make_aq_vcc(lower); ++ return error; ++} ++ ++ ++int arequipa_incoming(struct socket *lower) ++{ ++ int error; ++ ++ if (!suser()) return -EPERM; ++ error = check_aq_vcc(lower); ++ if (error) return error; ++ ATM_SD(lower)->upper = NULL; ++ make_aq_vcc(lower); ++ DPRINTK("aq_incoming %d\n",lower->file->f_count); ++ return 0; ++} ++ ++ ++static int arequipa_xmit(struct sk_buff *skb,struct device *dev) ++{ ++ struct atm_vcc *vcc; ++ ++ /*DPRINTK("arequipa xmit\n");*/ ++ if (!skb->sk || !skb->sk->arequipa || ++ !ATM_SD(skb->sk->arequipa)) { ++ printk("arequipa_xmit: discarding orphaned packets\n"); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return 0; ++ } ++ vcc = ATM_SD(skb->sk->arequipa); ++ if (!(vcc->flags & ATM_VF_READY)) { ++ printk("arequipa_xmit: not ready\n"); ++ dev_kfree_skb(skb,FREE_WRITE); ++ return 0; ++ } ++ ipcom_xmit(arequipa_dev,vcc,skb); ++ CLIP(arequipa_dev)->stats.tx_packets++; ++ return 0; ++} ++ ++ ++static int arequipa_init(struct device *dev) ++{ ++ ipcom_init(dev,arequipa_xmit,IFF_UP); ++ dev->pa_addr = 0x01020304; ++ dev->pa_mask = ~0L; ++ dev->pa_alen = 4; ++ return 0; ++} ++ ++ ++int atm_init_arequipa(void) ++{ ++ DPRINTK("atm_init_arequipa\n"); ++ if (!suser()) return -EPERM; ++ arequipa_dev = kmalloc(sizeof(struct device)+sizeof(struct clip_priv), ++ GFP_KERNEL); ++ if (!arequipa_dev) return -ENOMEM; ++ arequipa_rt.rt_dev = arequipa_dev; ++ memset(arequipa_dev,0,sizeof(struct device)+sizeof(struct clip_priv)); ++ arequipa_dev->name = "arequipa"; ++ arequipa_dev->init = arequipa_init; ++ arequipa_init(arequipa_dev); ++ return 0; ++} ++ ++ ++static void aqd_close(struct atm_vcc *vcc) ++{ ++ struct sk_buff *skb; ++ ++ DPRINTK("aqd_close\n"); ++ aqd = NULL; /* assumed to be atomic */ ++ barrier(); ++ if (skb_peek(&vcc->recvq)) ++ printk(KERN_CRIT "aqd_close: closing with requests " ++ "pending\n"); ++ while ((skb = skb_dequeue(&vcc->recvq))) kfree_skb(skb,FREE_READ); ++} ++ ++ ++static struct atmdev_ops aqd_dev_ops = { ++ NULL, /* no open */ ++ aqd_close, /* close */ ++ NULL, /* no ioctl */ ++ NULL, /* no getsockopt */ ++ NULL, /* no setsockopt */ ++ NULL, /* no send */ ++ NULL, /* no sg_send */ ++ NULL, /* no poll */ ++ NULL, /* no phy_put */ ++ NULL, /* no phy_get */ ++ NULL /* no feedback */ ++}; ++ ++ ++static struct atm_dev aqd_dev = { ++ &aqd_dev_ops, ++ NULL, /* no PHY */ ++ "aqd", /* type */ ++ 999, /* dummy device number */ ++ NULL,NULL, /* pretend not to have any VCCs */ ++ NULL,NULL, /* no data */ ++ 0, /* no flags */ ++ NULL, /* no local address */ ++ { 0 } /* no ESI, no statistics */ ++}; ++ ++ ++int arequipad_attach(struct atm_vcc *vcc) ++{ ++ if (aqd) return -EADDRINUSE; ++ aqd = vcc; ++ vcc->flags |= ATM_VF_READY | ATM_VF_META; ++ /* allow replies and avoid getting closed if signaling dies */ ++ vcc->dev = &aqd_dev; ++ vcc->aal = ATM_AAL5; /* lie */ ++ vcc->push = NULL; ++ vcc->peek = NULL; /* crash */ ++ vcc->pop = NULL; /* crash */ ++ vcc->push_oam = NULL; /* crash */ ++ return 0; ++ ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/tunable.h Tue Jul 30 22:30:54 1996 +@@ -0,0 +1,26 @@ ++/* net/atm/tunable.h - Tunable parameters of ATM support */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_TUNABLE_H ++#define NET_ATM_TUNABLE_H ++ ++#if 0 ++/* this is just a reminder - TTS is a device-specific parameter and shall be ++ used inside device drivers only */ ++#define ATM_TTS 1000 /* worst-case time to service of device ++ drivers, in microseconds */ ++#endif ++ ++#define ATM_RXBQ_DEF ( 64*1024) /* default RX buffer quota, in bytes */ ++#define ATM_TXBQ_DEF ( 64*1024) /* default TX buffer quota, in bytes */ ++#define ATM_RXBQ_MIN ( 1*1024) /* RX buffer minimum, in bytes */ ++#define ATM_TXBQ_MIN ( 1*1024) /* TX buffer minimum, in bytes */ ++#define ATM_RXBQ_MAX (1024*1024) /* RX buffer quota limit, in bytes */ ++#define ATM_TXBQ_MAX (1024*1024) /* TX buffer quota limit, in bytes */ ++ ++#define ATM_PDU_OVHD 0 /* number of bytes to charge against buffer ++ quota per PDU */ ++ ++#endif +--- ref/net/ipv4/af_inet.c Fri Jun 7 09:14:29 1996 ++++ work/net/ipv4/af_inet.c Mon Jun 10 17:51:57 1996 +@@ -105,6 +105,14 @@ + #include + #endif + ++#ifdef CONFIG_ATM_TCP ++#include ++int (*atmtcp_attach_hook)(struct socket *sock) = NULL; ++#endif ++#ifdef CONFIG_AREQUIPA ++#include ++#endif ++ + #define min(a,b) ((a)<(b)?(a):(b)) + + extern struct proto packet_prot; +@@ -415,6 +423,10 @@ + + if (sk->rmem_alloc == 0 && sk->wmem_alloc == 0) + { ++#ifdef CONFIG_AREQUIPA ++ if (sk->arequipa) arequipa_close(sk); ++ if (sk->aq_route) kfree_s(sk->aq_route,sizeof(struct rtable)); ++#endif + if(sk->opt) + kfree(sk->opt); + ip_rt_put(sk->ip_route_cache); +@@ -662,6 +674,10 @@ + sk_free(sk); + return(-ESOCKTNOSUPPORT); + } ++#ifdef CONFIG_AREQUIPA ++ sk->arequipa = NULL; ++ sk->aq_route = NULL; ++#endif + sk->socket = sock; + #ifdef CONFIG_TCP_NAGLE_OFF + sk->nonagle = 1; +@@ -1334,7 +1350,18 @@ + return((*dlci_ioctl_hook)(cmd, (void *) arg)); + #endif + return -ENOPKG; +- ++#ifdef CONFIG_ATM_TCP ++ case SIOCSIFATMTCP: ++ if (atmtcp_attach_hook) ++ return atmtcp_attach_hook(sock); ++ return -EINVAL; ++#endif ++#ifdef CONFIG_AREQUIPA ++ case AREQUIPA_EXPECT: ++ return arequipa_expect(sk,arg); ++ case AREQUIPA_CLOSE: ++ return arequipa_close(sk); ++#endif + default: + if ((cmd >= SIOCDEVPRIVATE) && + (cmd <= (SIOCDEVPRIVATE + 15))) +--- ref/net/protocols.c Sat Mar 30 12:20:34 1996 ++++ work/net/protocols.c Mon Jun 10 17:52:25 1996 +@@ -42,6 +42,10 @@ + #include + extern void rif_init(struct net_proto *); + #endif ++#ifdef CONFIG_ATM ++#include ++#endif ++ + /* + * Protocol Table + */ +@@ -73,6 +77,10 @@ + #endif + #ifdef CONFIG_ATALK + { "DDP", atalk_proto_init }, /* Netatalk Appletalk driver */ ++#endif ++#ifdef CONFIG_ATM ++ { "ATMPVC", atmpvc_proto_init }, ++ { "ATMSVC", atmsvc_proto_init }, + #endif + { NULL, NULL } /* End marker */ + }; +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/mmuio.c Mon Jul 29 13:00:29 1996 +@@ -0,0 +1,455 @@ ++/* net/atm/mmuio.c - MMU-supported high-speed I/O */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++ ++ ++#ifdef CONFIG_MMU_HACKS ++ ++#include ++#include ++ ++ ++#define invalidate flush_tlb_all /* @@@ improve this */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++ ++#include ++ ++#include ++ ++#include /* needed to include net/sock.h */ ++#include ++ ++ ++/* #define MAX_SC_LOCKS 3 */ ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++#ifndef CONFIG_MMU_HACKS_DEBUG ++ ++#define EVENT(s,a,b,c) DPRINTK(s,a,b,c) ++ ++static void event_dump(void) {} ++ ++#else ++ ++/* ++ * Very extensive activity logging. Greatly improves bug detection speed but ++ * costs a few Mbps if enabled. ++ */ ++ ++#define EV 64 ++ ++static const char *ev[EV]; ++ ++static unsigned long ev_a[EV],ev_b[EV],ev_c[EV]; ++static int ec = 0; ++ ++ ++static void EVENT(const char *s,unsigned long a,unsigned long b,unsigned long c) ++{ ++ ev[ec] = s; ++ ev_a[ec] = a; ++ ev_b[ec] = b; ++ ev_c[ec] = c; ++ ec = (ec+1) % EV; ++} ++ ++ ++static void event_dump(void) ++{ ++ int n,i; ++ ++ printk(KERN_NOTICE "----- Event dump follows -----\n"); ++ for (n = 0; n < EV; n++) { ++ i = (ec+n) % EV; ++ printk(KERN_NOTICE); ++ printk(ev[i] ? ev[i] : "(null)",ev_a[i],ev_b[i],ev_c[i]); ++ } ++ printk(KERN_NOTICE "----- Event dump ends here -----\n"); ++} ++ ++ ++#endif /* CONFIG_MMU_HACKS_DEBUG */ ++ ++/* ++ * Helper functions to walk through page tables. If CREATE is set, they add ++ * new entries if needed to reach a given PTE. PTEs are never created. If ++ * CREATE is not set, *PMD and *PTE might become NULL while passing unavailable ++ * memory regions. ++ */ ++ ++ ++static inline int mmu_resolve(unsigned long addr,pgd_t **pgd,pmd_t **pmd, ++ pte_t **pte,int create) ++{ ++ *pgd = pgd_offset(current->mm,addr); ++ *pmd = create ? pmd_alloc(*pgd,addr) : pmd_offset(*pgd,addr); ++ if (!*pmd) { ++ if (create) invalidate(); ++ *pte = NULL; ++ return -ENOMEM; ++ } ++ *pte = create ? pte_alloc(*pmd,addr) : pte_offset(*pmd,addr); ++ if (*pte) return 0; ++ if (create) invalidate(); ++ return -ENOMEM; ++} ++ ++ ++static inline int mmu_step(unsigned long addr,pgd_t **pgd,pmd_t **pmd, ++ pte_t **pte,int create) ++{ ++ if (addr & (PTRS_PER_PTE*PAGE_SIZE-1)) { ++ if (*pte) (*pte)++; ++ } ++ else { ++ if (addr & (PTRS_PER_PMD*PTRS_PER_PTE*PAGE_SIZE-1)) { ++ if (*pmd) (*pmd)++; ++ } ++ else { ++ (*pgd)++; ++ *pmd = create ? pmd_alloc(*pgd,addr) : ++ pmd_offset(*pgd,addr); ++ if (!*pmd) { ++ if (create) invalidate(); ++ *pte = NULL; ++ return -ENOMEM; ++ } ++ } ++ *pte = create ? pte_alloc(*pmd,addr) : pte_offset(*pmd,addr); ++ if (!*pte) { ++ if (create) invalidate(); ++ return -ENOMEM; ++ } ++ } ++ return 0; ++} ++ ++ ++/* ++ * Removes a range of pages belonging to the current process. This helps to ++ * avoid undesirable copying when COW or swapped-out pages are overwritten in ++ * one sweep. ++ */ ++ ++ ++void free_range(unsigned long start,unsigned long size) ++{ ++ pgd_t *pgd; ++ pmd_t *pmd; ++ pte_t *pte; ++ unsigned long end; ++ ++ end = (start+size) & ~(PAGE_SIZE-1); ++ start = (start+PAGE_SIZE-1) & ~(PAGE_SIZE-1); ++ if (start <= end) return; ++ (void) mmu_resolve(start,&pgd,&pmd,&pte,0); ++ while (1) { ++ if (pte && !pte_none(*pte)) { ++ pte_t old_page; ++ ++ old_page = *pte; ++ pte_clear(pte); ++ if (!pte_present(old_page)) ++ swap_free(pte_val(old_page)); ++ else { ++ current->mm->rss--; ++ free_page(pte_page(old_page)); ++ } ++ } ++ if ((start += PAGE_SIZE) >= end) break; ++ (void) mmu_step(start,&pgd,&pmd,&pte,0); ++ } ++ invalidate(); ++} ++ ++ ++/* ++ * Copies data by mapping kernel pages into the current process. If the data is ++ * mis-aligned or if no whole pages can be copied, ordinary memory-to-memory ++ * copies are done. ++ * ++ * TODO: Speed improvement: if copying "almost" a page, don't copy from kernel ++ * to user, but still map the kernel page and copy the user data instead. ++ * This may also reduce the number of bad COW/swap activity. ++ * ++ */ ++ ++ ++struct page_descriptor { ++ struct page_descriptor *next; ++ struct block_header *firstfree; ++ int order; ++ int nfree; ++}; ++ ++ ++/* ++ * Since we always work on "big" buffers (>= one memory page), kmalloc's ++ * page sharing doesn't get in the way. ++ */ ++ ++ ++extern volatile unsigned long net_skbcount; ++ ++ ++static void free_around(struct sk_buff *skb,unsigned long start, ++ unsigned long end) ++{ ++ struct page_descriptor *dsc; ++ unsigned long order,first,last; ++ ++ net_skbcount--; ++ /* FIXME: should also update kmalloc counters @@@ */ ++ dsc = (struct page_descriptor *) ((unsigned long) skb->head & ++ PAGE_MASK); ++ order = dsc->order; ++ order = order < 7 ? 0 : order-7; ++ first = (unsigned long) dsc; ++ last = first+(PAGE_SIZE << order); ++ if (mem_map[MAP_NR(first)].count != 1) { ++ printk(KERN_CRIT "free_around: mem_map[%ld].count is 0x%x\n", ++ MAP_NR(first),mem_map[MAP_NR(first)].count); ++ event_dump(); ++ return; ++ } ++ while (first < last) { ++ mem_map[MAP_NR(first)].count = 1; ++ if (first < start || first >= end) free_page(first); ++ first += PAGE_SIZE; ++ } ++} ++ ++ ++/* fixme: what if reading into shared memory region ? */ ++void mmucp_tofs(unsigned long user,unsigned long size,struct sk_buff *skb, ++ unsigned long kernel) ++{ ++ unsigned long extra; ++ pgd_t *pgd; ++ pmd_t *pmd; ++ pte_t *pte; ++ int error; ++ unsigned long hole_start; ++ ++ if (size > skb->len) size = skb->len; ++ EVENT("mmucp_tofs 0x%lx to 0x%lx+%ld\n",kernel,user,size); ++ if (skb->prev || skb->next || skb->lock || skb->users > 1) { ++ memcpy_tofs((void *) user,(void *) kernel,size); ++ return; ++ } ++ if (((kernel^user) & (PAGE_SIZE-1)) || size < PAGE_SIZE) { ++ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel,size); ++ memcpy_tofs((void *) user,(void *) kernel,size); ++ kfree_skb(skb,FREE_READ); ++ return; ++ } ++ if ((extra = -user & (PAGE_SIZE-1))) { ++ if ((size -= extra) < PAGE_SIZE) { ++ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel, ++ size+extra); ++ memcpy_tofs((void *) user,(void *) kernel,size+extra); ++ kfree_skb(skb,FREE_READ); ++ return; ++ } ++ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel,size); ++ memcpy_tofs((void *) user,(void *) kernel,extra); ++ user += extra; ++ kernel += extra; ++ } ++ if ((error = mmu_resolve(user,&pgd,&pmd,&pte,1)) < 0) { ++ invalidate(); ++ oom(current); ++ return; ++ } ++ hole_start = kernel; ++ while (1) { ++ pte_t old_page; ++ ++ if (mem_map[MAP_NR(pte_page(*pte))].count > 1) { ++ EVENT("memcpy(0x%lx,0x%lx,PAGE_SIZE);\n",user,kernel,0); ++ memcpy_tofs((void *) user,(void *) kernel,PAGE_SIZE); ++ } ++ else { ++ old_page = *pte; ++ pte_clear(pte); ++ if (!pte_none(old_page)) ++ if (!pte_present(old_page)) ++ swap_free(pte_val(old_page)); ++ else { ++ current->mm->rss--; ++ free_page(pte_page(old_page)); ++ } ++ mem_map[MAP_NR(kernel)].count = 1; ++ /* Page is now owned only by user. */ ++ *pte = mk_pte(kernel,PAGE_SHARED); ++ *pte = pte_mkdirty(*pte); ++ EVENT("mapped 0x%lx at 0x%lx\n",kernel,user,0); ++ current->mm->rss++; ++ } ++ user += PAGE_SIZE; ++ kernel += PAGE_SIZE; ++ if ((size -= PAGE_SIZE) < PAGE_SIZE) break; ++ if ((error = mmu_step(user,&pgd,&pmd,&pte,1)) < 0) { ++ kernel -= PAGE_SIZE; /* back off */ ++ size = 0; ++ oom(current); ++ break; ++ } ++ } ++ if (size) { ++ EVENT("memcpy(0x%lx,0x%lx,%ld);\n",user,kernel,size); ++ memcpy_tofs((void *) user,(void *) kernel,size); ++ } ++ invalidate(); ++ /* use skb code for all the administrative overhead */ ++ skb->count++; ++ kfree_skb(skb,FREE_READ); ++ if (skb->count == 1) free_around(skb,hole_start,kernel); ++ else { ++ printk(KERN_CRIT "mmu_tofs: skb->count == %d\n",skb->count); ++ event_dump(); ++ } ++} ++ ++ ++/* ++ * Fault user pages (current process) in physical memory, lock them there, ++ * and set them COW so that they stay around even if the user process tries ++ * to scribble over them. The locked physical page ranges are recorded in the ++ * scatter-gather vector IOV. ++ * ++ * FIXME: Should check user's physical memory size limit. ++ */ ++ ++ ++int lock_user(unsigned long start,unsigned long size,int iov_max, ++ struct iovec *iov) ++{ ++ struct vm_area_struct *vma; ++ unsigned long end,last,from,page; ++ pgd_t *pgd; ++ pmd_t *pmd; ++ pte_t *pte; ++ int iovcnt,error; ++ ++ EVENT("lock_user: %ld@0x%lx\n",size,start,0); ++ end = start+size; ++ if (start >= end) return 0; ++ for (vma = find_vma(current,start); vma; vma = vma->vm_next) ++ if (vma->vm_flags & (VM_SHARED | VM_SHM)) return -EAGAIN; ++ else if (vma->vm_end >= end) break; ++ iovcnt = 0; ++ if ((error = mmu_resolve(start,&pgd,&pmd,&pte,1)) < 0) return error; ++ last = from = 0; ++ while (1) { ++ mem_map_t *map; ++ ++ EVENT("<0x%lx|0x%lx|0x%lx>\n",(unsigned long) pgd, ++ (unsigned long) pmd,(unsigned long) pte); ++ EVENT("0x%lx,0x%lx,%d\n",start,end,iovcnt); ++ if (pte_none(*pte) || !pte_present(*pte)) { ++ struct vm_area_struct *vma; ++ ++ EVENT("handling missing page\n",0,0,0); ++ if (!(vma = find_vma(current,start))) { ++ printk(KERN_CRIT "lock_user: VMA (0x%lx) not " ++ "found",start); ++ event_dump(); ++ return -EINVAL; ++ } ++ do_no_page(current,vma,start,vma->vm_flags & VM_WRITE); ++ } ++ page = pte_page(*pte); ++ EVENT("got page 0x%lx\n",page,0,0); ++ if (!page) { ++ printk(KERN_ERR "lock_user: Gnorf, no page\n"); ++ event_dump(); ++ return -EINVAL; ++ } ++ map = mem_map+MAP_NR(page); ++ if (PageReserved(map)) { ++ printk(KERN_ERR "lock_user: reserved\n"); ++ event_dump(); ++ return -EINVAL; ++ } ++ atomic_inc(&map->count); ++ *pte = pte_wrprotect(*pte); ++ if (!last) { ++ from = page+(start & (PAGE_SIZE-1)); ++ start &= ~(PAGE_SIZE-1); ++ } ++ else if (page != last+PAGE_SIZE) { ++ if (iovcnt >= iov_max) return -ENOSPC; ++ iov->iov_base = (caddr_t) from; ++ iov->iov_len = last+PAGE_SIZE-from; ++ EVENT("putting ... last=0x%lx,from=0x%lx\n", ++ last,from,0); ++ iovcnt++; ++ iov++; ++ from = page; ++ } ++ last = page; ++ if ((start += PAGE_SIZE) >= end) break; ++ if ((error = mmu_step(start,&pgd,&pmd,&pte,1)) < 0) ++ return error; ++ } ++ invalidate(); ++ if (iovcnt >= iov_max) return -ENOSPC; ++ iov->iov_base = (caddr_t) from; ++ iov->iov_len = last+(end & (PAGE_SIZE-1))-from; ++ if (start == end) iov->iov_len += PAGE_SIZE; ++/* ++for (i = 0; i <= iovcnt; i++) ++ printk("iov[%d].iov_base = 0x%lx\niov[%d].iov_len = 0x%lx\n", ++i,(unsigned long) iov[i-iovcnt].iov_base,i,iov[i-iovcnt].iov_len); ++*/ ++ return iovcnt+1; ++} ++ ++ ++/* ++ * Release user pages locked with lock_user. wrprotect isn't cleared, so we'll ++ * get a few extra protection faults (COW handling doesn't copy pages that are ++ * not shared), but that shouldn't do any harm. ++ */ ++ ++ ++void unlock_user(int iovcnt,struct iovec *iov) ++{ ++ unsigned long walk,end; ++ ++ while (iovcnt--) { ++ end = (unsigned long) iov->iov_base+iov->iov_len; ++ for (walk = (unsigned long) iov->iov_base & ~(PAGE_SIZE-1); ++ walk < end; walk += PAGE_SIZE) { ++ mem_map_t *map; ++ ++ map = mem_map+MAP_NR(walk); ++ free_page(walk); ++ } ++ iov++; ++ } ++} ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/mmuio.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,25 @@ ++/* mmuio.h - MMU-supported high-speed I/O */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_MMUIO_H ++#define _LINUX_MMUIO_H ++ ++#include ++ ++#ifdef CONFIG_MMU_HACKS ++ ++#include ++#include ++ ++void free_range(unsigned long start,unsigned long size); ++void mmucp_tofs(unsigned long user,unsigned long size,struct sk_buff *skb, ++ unsigned long kernel); ++int lock_user(unsigned long start,unsigned long size,int iov_max, ++ struct iovec *iov); ++void unlock_user(int iovcnt,struct iovec *iov); ++ ++#endif ++ ++#endif +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/raw.c Tue Jul 30 19:13:44 1996 +@@ -0,0 +1,139 @@ ++/* net/atm/raw.c - Raw AAL0 and AAL5 transports */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++ ++#include "common.h" ++#include "protocols.h" ++#include "tunable.h" /* tunable parameters */ ++ ++ ++#if 0 ++#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args) ++#else ++#define DPRINTK(format,args...) ++#endif ++ ++ ++/* ++ * SKB == NULL indicates that the link is being closed ++ */ ++ ++void atm_push_raw(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++ if (skb) { ++ DPRINTK("APushR %d += %d\n",vcc->rx_inuse,skb->truesize); ++ atomic_add(skb->truesize+ATM_PDU_OVHD,&vcc->rx_inuse); ++ skb_queue_tail(&vcc->recvq,skb); ++ wake_up(&vcc->sleep); ++ } ++} ++ ++ ++/* ++ * A return value of NULL means to discard the PDU ++ */ ++ ++ ++static struct sk_buff *atm_peek_aal0(struct atm_vcc *vcc,unsigned long pdu_size, ++ __u32 (*fetch)(struct atm_vcc *vcc,int i)) ++{ ++ struct sk_buff *skb; ++ ++ if (pdu_size+vcc->rx_inuse+ATM_PDU_OVHD <= vcc->rx_quota) { ++ skb = alloc_skb(pdu_size,GFP_ATOMIC); ++ if (skb) return skb; ++ } ++ vcc->stats->rx_drop++; ++ return NULL; ++} ++ ++ ++/* ++ * atm_peek_aal5 is currently also used for AAL3/4 ++ */ ++ ++ ++static struct sk_buff *atm_peek_aal5(struct atm_vcc *vcc,unsigned long pdu_size, ++ __u32 (*fetch)(struct atm_vcc *vcc,int i)) ++{ ++ struct sk_buff *skb; ++ ++ if (pdu_size+vcc->rx_inuse+ATM_PDU_OVHD <= vcc->rx_quota) ++ if (pdu_size < PAGE_SIZE) { ++ skb = alloc_skb((pdu_size+3) & ~3,GFP_ATOMIC); ++ if (skb) return skb; ++ } ++ else { ++ skb = alloc_skb(((pdu_size+3) & ~3)+PAGE_SIZE-1, ++ GFP_ATOMIC); ++ if (skb) { ++ skb->data = (unsigned char *) ++ (((unsigned long) skb->data+PAGE_SIZE-1) & ++ ~(PAGE_SIZE-1)); ++DPRINTK("PEEK: data at 0x%lx\n",(unsigned long) skb->data); ++ return skb; ++ } ++ } ++ vcc->stats->rx_drop++; ++ return NULL; ++} ++ ++ ++static void atm_pop_raw(struct atm_vcc *vcc,struct sk_buff *skb) ++{ ++#ifdef CONFIG_MMU_HACKS ++ if (skb->atm.iovcnt) ++ unlock_user(skb->atm.iovcnt,(struct iovec *) skb->data); ++#endif ++ DPRINTK("APopR (%d) %d -= %d\n",vcc->vci,vcc->tx_inuse,skb->truesize); ++ atomic_sub(skb->truesize+ATM_PDU_OVHD,&vcc->tx_inuse); ++ dev_kfree_skb(skb,FREE_WRITE); ++#if 0 /* experimental */ ++if (vcc->dev->sending != 1) printk("sending == %d !!!\n",vcc->dev->sending); ++ vcc->dev->sending--; ++#endif ++ wake_up(&vcc->sleep); ++} ++ ++ ++int atm_init_aal0(struct atm_vcc *vcc) ++{ ++ vcc->aal = ATM_AAL0; ++ vcc->push = atm_push_raw; ++ vcc->peek = atm_peek_aal0; ++ vcc->pop = atm_pop_raw; ++ vcc->push_oam = NULL; ++ return 0; ++} ++ ++ ++int atm_init_aal34(struct atm_vcc *vcc) ++{ ++ vcc->aal = ATM_AAL34; ++ vcc->push = atm_push_raw; ++ vcc->peek = atm_peek_aal5; /* same procedure */ ++ vcc->pop = atm_pop_raw; ++ vcc->push_oam = NULL; ++ return 0; ++} ++ ++ ++int atm_init_aal5(struct atm_vcc *vcc) ++{ ++ vcc->aal = ATM_AAL5; ++ vcc->push = atm_push_raw; ++ vcc->peek = atm_peek_aal5; ++ vcc->pop = atm_pop_raw; ++ vcc->push_oam = NULL; ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/protocols.h Mon Jun 10 17:36:28 1996 +@@ -0,0 +1,17 @@ ++/* net/atm/protocols.h - ATM protocol handler entry points */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef NET_ATM_PROTOCOLS_H ++#define NET_ATM_PROTOCOLS_H ++ ++void atm_push_raw(struct atm_vcc *vcc,struct sk_buff *skb); ++ ++int atm_init_aal0(struct atm_vcc *vcc); /* "raw" AAL0 */ ++int atm_init_aal34(struct atm_vcc *vcc);/* "raw" AAL3/4 transport */ ++int atm_init_aal5(struct atm_vcc *vcc); /* "raw" AAL5 transport */ ++int atm_init_clip(struct atm_vcc *vcc); /* Classical IP over ATM (RFC1577) */ ++int atm_init_atmarp(struct atm_vcc *vcc);/* ATM ARP */ ++ ++#endif +--- ref/include/linux/netdevice.h Sun Jun 9 11:25:36 1996 ++++ work/include/linux/netdevice.h Wed Jul 31 19:30:44 1996 +@@ -182,6 +182,8 @@ + int (*set_mac_address)(struct device *dev, void *addr); + #define HAVE_PRIVATE_IOCTL + int (*do_ioctl)(struct device *dev, struct ifreq *ifr, int cmd); ++ int (*ip_arp)(struct device *dev,unsigned int cmd, ++ void *arg); + #define HAVE_SET_CONFIG + int (*set_config)(struct device *dev, struct ifmap *map); + #define HAVE_HEADER_CACHE +@@ -284,6 +286,8 @@ + /* These functions live elsewhere (drivers/net/net_init.c, but related) */ + + extern void ether_setup(struct device *dev); ++extern int ether_arp(struct device *dev,unsigned int cmd, ++ void *arg); + extern void tr_setup(struct device *dev); + extern int ether_config(struct device *dev, struct ifmap *map); + /* Support for loadable net-drivers */ +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmarp.h Wed Jul 31 18:20:20 1996 +@@ -0,0 +1,98 @@ ++/* atmarp.h - ATM ARP protocol and kernel-demon interface definitions */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_ATMARP_H ++#define _LINUX_ATMARP_H ++ ++#include ++#include ++#include ++ ++ ++/* RFC 1577 ATM ARP header */ ++ ++struct atmarphdr { ++ unsigned short ar_hrd; /* Hardware type */ ++ unsigned short ar_pro; /* Protocol type */ ++ unsigned char ar_shtl;/* Type & length of source ATM number (q) */ ++ unsigned char ar_sstl;/* Type & length of source ATM subaddress (r) */ ++ unsigned short ar_op; /* Operation code (request, reply, or NAK) */ ++ unsigned char ar_spln;/* Length of source protocol address (s) */ ++ unsigned char ar_thtl;/* Type & length of target ATM number (x) */ ++ unsigned char ar_tstl;/* Type & length of target ATM subaddress (y) */ ++ unsigned char ar_tpln;/* Length of target protocol address (z) */ ++ /* ar_sha, at_ssa, ar_spa, ar_tha, ar_tsa, ar_tpa */ ++ unsigned char data[1]; ++}; ++ ++#define TL_LEN 0x3f /* ATMARP Type/Length field structure */ ++#define TL_E164 0x40 ++ ++ ++#define ATF_NULL 0x040 /* use NULL encapsulation */ ++#define ATF_ARPSRV 0x080 /* entry describes ARP server */ ++ ++ ++#define MAX_ATMARP_SIZE (sizeof(struct atmarphdr)-1+2*(ATM_E164_LEN+ \ ++ ATM_ESA_LEN+4)) ++ ++#define ATMARP_RETRY_DELAY 30 /* request next resolution or forget ++ NAK after 30 sec - should go into ++ atmclip.h */ ++ ++/* These really ought to go into include/linux/if_arp.h */ ++ ++/* ARP protocol HARDWARE identifiers. */ ++#define ARPHRD_ATM 19 /* ATM Forum */ ++ ++/* ARP protocol opcodes. */ ++#define ARPOP_InREQUEST 8 /* InARP request */ ++#define ARPOP_InREPLY 9 /* InARP reply */ ++#define ARPOP_NAK 10 /* (ATM)ARP NAK */ ++ ++ ++#define ATMARPD_CTRL _IO('a',ATMIOC_CLIP+1) /* become atmarpd ctrl sock */ ++#define ATMARP_MKIP _IO('a',ATMIOC_CLIP+2) /* attach socket to IP */ ++#define ATMARP_SETENTRY _IO('a',ATMIOC_CLIP+3) /* fill or hide ARP entry */ ++#define ATMARP_ENCAP _IO('a',ATMIOC_CLIP+5) /* change encapsulation */ ++ ++/* ATMARP ioctl request. */ ++struct atmarpreq { ++ struct sockaddr arp_pa; /* protocol address */ ++ struct sockaddr_atmsvc arp_ha; /* PVC or SVC address */ ++ struct atm_qos arp_qos; /* requested QOS */ ++ int arp_flags; /* flags */ ++}; ++ ++ ++struct atmarp_arpsioc { ++ struct sockaddr pa; /* protocol address */ ++ int aa_len; /* size of ATM address */ ++ struct sockaddr_atmsvc aa; /* SVC address */ ++}; ++ ++ ++#define ATMARP_CTRL_MAGIC 0xac /* put this into the magic byte */ ++ ++enum atmarp_ctrl_type { ++ act_invalid, /* catch uninitialized structures */ ++ act_need, /* need address resolution */ ++ act_create, /* interface has been created */ ++ act_up, /* interface is coming up */ ++ act_down, /* interface is going down */ ++ act_ioctl, /* ioctl follows */ ++ act_complete /* demon indicates completion */ ++}; ++ ++struct atmarp_ctrl { ++ unsigned char magic; /* constant */ ++ enum atmarp_ctrl_type type; /* message type */ ++ volatile int *reply; /* reply address, NULL is asynch */ ++ int itf_num;/* interface number (if present) */ ++ unsigned long arg; /* argument, e.g. IP address */ ++ unsigned char data[1];/*optional data */ ++}; ++ ++#endif +--- ref/net/ipv4/udp.c Tue Jun 4 14:34:43 1996 ++++ work/net/ipv4/udp.c Mon Jun 10 19:11:22 1996 +@@ -109,6 +109,11 @@ + #include + #include + ++#ifdef CONFIG_AREQUIPA ++#include ++#include ++#endif ++ + /* + * Snmp MIB for the UDP layer + */ +@@ -616,7 +621,7 @@ + sk->dummy_th.dest = usin->sin_port; + sk->state = TCP_ESTABLISHED; + udp_cache_zap(); +- sk->ip_route_cache = rt; ++ set_rt_cache(sk,rt); + return(0); + } + +@@ -655,6 +660,12 @@ + + static inline void udp_deliver(struct sock *sk, struct sk_buff *skb) + { ++#ifdef CONFIG_AREQUIPA ++ if (skb->dev == arequipa_dev && !sk->arequipa && sk->aq_route) { ++ if (!sk->ip_route_cache) printk("WNG: no route\n"); ++ (void) arequipa_attach(skb->atm.vcc->sock,sk); ++ } ++#endif + skb->sk = sk; + + if (sk->users) { +--- ref/net/ipv4/tcp.c Sat Jun 8 11:09:09 1996 ++++ work/net/ipv4/tcp.c Wed Jul 17 19:39:31 1996 +@@ -1926,6 +1926,11 @@ + * Put in the IP header and routing stuff. + */ + ++#ifdef CONFIG_AREQUIPA ++ ip_rt_put(sk->ip_route_cache); ++ set_rt_cache(sk,ip_rt_route(sk->daddr,sk->localroute)); ++#endif ++ + tmp = sk->prot->build_header(buff, sk->saddr, sk->daddr, &dev, + IPPROTO_TCP, sk->opt, MAX_SYN_SIZE,sk->ip_tos,sk->ip_ttl,&sk->ip_route_cache); + if (tmp < 0) +--- ref/include/linux/proc_fs.h Sun Jun 9 11:23:42 1996 ++++ work/include/linux/proc_fs.h Wed Jul 31 17:57:46 1996 +@@ -34,6 +34,7 @@ + PROC_KSYMS, + PROC_DMA, + PROC_IOPORTS, ++ PROC_ATM, + #ifdef __SMP_PROF__ + PROC_SMP_PROF, + #endif +@@ -148,6 +149,16 @@ + #define PROC_DYNAMIC_FIRST 4096 + #define PROC_NDYNAMIC 4096 + ++enum atm_directory_inos { ++ PROC_ATM_DEVICES = 384, ++ PROC_ATM_ARP, ++ PROC_ATM_LEC, ++ PROC_ATM_SVC, ++ PROC_ATM_PVC, ++ PROC_ATM_AREQUIPA, ++ PROC_ATM_LAST ++}; ++ + #define PROC_SUPER_MAGIC 0x9fa0 + + /* +@@ -187,6 +198,7 @@ + extern struct proc_dir_entry proc_root; + extern struct proc_dir_entry proc_net; + extern struct proc_dir_entry proc_scsi; ++extern struct proc_dir_entry proc_atm; + extern struct proc_dir_entry proc_sys; + extern struct proc_dir_entry proc_pid; + extern struct proc_dir_entry proc_pid_fd; +@@ -275,5 +287,6 @@ + extern struct inode_operations proc_kmsg_inode_operations; + extern struct inode_operations proc_link_inode_operations; + extern struct inode_operations proc_fd_inode_operations; ++extern struct inode_operations proc_atm_inode_operations; + + #endif +--- ref/fs/proc/root.c Tue Apr 30 12:09:45 1996 ++++ work/fs/proc/root.c Mon Jun 10 17:36:31 1996 +@@ -15,6 +15,10 @@ + #include + #include + ++ ++extern void atm_proc_init(void); ++ ++ + /* + * Offset of the first process in the /proc root directory.. + */ +@@ -148,6 +152,16 @@ + NULL, NULL /* parent, subdir */ + }; + ++struct proc_dir_entry proc_atm = { ++ PROC_ATM, 3, "atm", ++ S_IFDIR | S_IRUGO | S_IXUGO, 2, 0, 0, ++ 0, &proc_dir_inode_operations, ++ NULL, NULL, ++ NULL, ++ &proc_root, NULL ++}; ++ ++ + int proc_register(struct proc_dir_entry * dir, struct proc_dir_entry * dp) + { + dp->next = dir->subdir; +@@ -296,6 +310,11 @@ + proc_register(&proc_root, &proc_net); + proc_register(&proc_root, &proc_scsi); + proc_register(&proc_root, &proc_sys_root); ++ ++#ifdef CONFIG_ATM ++ proc_register(&proc_root, &proc_atm); ++ atm_proc_init(); ++#endif + + #ifdef CONFIG_DEBUG_MALLOC + proc_register(&proc_root, &(struct proc_dir_entry) { +--- ref/fs/proc/inode.c Thu Apr 25 15:32:45 1996 ++++ work/fs/proc/inode.c Mon Jun 10 17:36:32 1996 +@@ -4,6 +4,7 @@ + * Copyright (C) 1991, 1992 Linus Torvalds + */ + ++#include + #include + #include + #include +@@ -161,6 +162,14 @@ + return; + } + ++#ifdef CONFIG_ATM ++ if (ino >= PROC_ATM_DEVICES && ino < PROC_ATM_LAST) { ++ inode->i_mode = S_IFREG | S_IRUGO; ++ inode->i_op = &proc_atm_inode_operations; ++ return; ++ } ++#endif ++ + if (!pid) { + switch (ino) { + case PROC_KMSG: +@@ -175,6 +184,13 @@ + inode->i_nlink = 2; + inode->i_op = &proc_scsi_inode_operations; + break; ++#ifdef CONFIG_ATM ++ case PROC_ATM: ++ inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO; ++ inode->i_nlink = 2; ++ inode->i_op = &proc_atm_inode_operations; ++ break; ++#endif + case PROC_KCORE: + inode->i_mode = S_IFREG | S_IRUSR; + inode->i_op = &proc_kcore_inode_operations; +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/proc.c Wed Jul 31 16:34:28 1996 +@@ -0,0 +1,484 @@ ++/* net/atm/proc.c - ATM /proc interface */ ++ ++/* Written 1995,1996 by Werner Almesberger, EPFL LRC */ ++ ++ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include /* to get aqd */ ++#include /* for HZ */ ++ ++#include "static.h" /* ugly */ ++#include "signaling.h" /* to get sigd - ugly too */ ++#include "atmarp.h" ++ ++#ifdef CONFIG_ATM_LANE ++#include "lec_arpc.h" ++extern struct lec_arp_table *lec_arp_tables[LEC_ARP_TABLE_SIZE]; ++extern struct lec_arp_table *lec_arp_empty_ones; ++extern struct lec_arp_table *lec_no_forward; ++#endif ++ ++#ifdef CONFIG_AREQUIPA ++void atm_push_arequipa(struct atm_vcc *vcc,struct sk_buff *skb); ++#endif ++ ++/*extern void eni_proc(int i,char *buf); - not yet @@@ */ ++extern void atm_push_clip(struct atm_vcc *vcc,struct sk_buff *skb); ++ ++ ++static int atm_header(ino_t ino,char *buf) ++{ ++ switch (ino) { ++ case PROC_ATM_DEVICES: ++ sprintf(buf,"Itf Type ESI/\"MAC\"addr " ++ "AAL(TX,err,RX,err,drop) ...\n"); ++ break; ++ case PROC_ATM_ARP: ++ sprintf(buf,"IPitf TypeEncp Idle IP address " ++ "ATM address\n"); ++ break; ++ case PROC_ATM_SVC: ++ sprintf(buf,"Itf VPI VCI State Remote\n"); ++ break; ++ case PROC_ATM_PVC: ++ sprintf(buf,"Itf VPI VCI AAL RX(PCR,Class) " ++ "TX(PCR,Class)\n"); ++ break; ++#ifdef CONFIG_ATM_LANE ++ case PROC_ATM_LEC: ++ sprintf(buf," MAC ATM destination Status Flags VPI/VCI Recv VPI/VCI\n"); ++ break; ++#endif ++#ifdef CONFIG_AREQUIPA ++ case PROC_ATM_AREQUIPA: ++ sprintf(buf,"Itf VPI VCI State Socket\n"); ++ break; ++#endif ++ default: ++ return -EINVAL; ++ } ++ return strlen(buf); ++} ++ ++ ++static void add_stats(char *buf,const char *aal, ++ const struct atm_aal_stats *stats) ++{ ++ sprintf(strchr(buf,0),"%s ( %ld %ld %ld %ld %ld )",aal,stats->tx, ++ stats->tx_err,stats->rx,stats->rx_err,stats->rx_drop); ++} ++ ++ ++static void dev_info(const struct atm_dev *dev,char *buf) ++{ ++ int off,i; ++ ++ off = sprintf(buf,"%3d %-8s",dev->number,dev->type); ++ for (i = 0; i < ESI_LEN; i++) ++ off += sprintf(buf+off,"%02x",dev->esi[i]); ++ strcat(buf," "); ++ add_stats(buf,"0",&dev->stats.aal0); ++ strcat(buf," "); ++ add_stats(buf,"5",&dev->stats.aal5); ++ strcat(buf,"\n"); ++} ++ ++ ++#ifdef CONFIG_ATM_ATMARP ++ ++ ++static int svc_addr(char *buf,struct sockaddr_atmsvc *addr) ++{ ++ static int code[] = { 1,2,10,6,1,0 }; ++ static int e164[] = { 1,8,4,6,1,0 }; ++ int *fields; ++ int len,i,j,pos; ++ ++ len = 0; ++ if (*addr->sas_addr.pub) { ++ strcpy(buf,addr->sas_addr.pub); ++ len = strlen(addr->sas_addr.pub); ++ buf += len; ++ if (*addr->sas_addr.pub) { ++ *buf += '+'; ++ len++; ++ } ++ } ++ else if (!*addr->sas_addr.prv) { ++ strcpy(buf,"(none)"); ++ return strlen(buf); ++ } ++ if (*addr->sas_addr.prv) { ++ len += 44; ++ pos = 0; ++ fields = *addr->sas_addr.prv == ATM_AFI_E164 ? e164 : code; ++ for (i = 0; fields[i]; i++) { ++ for (j = fields[i]; j; j--) { ++ sprintf(buf,"%02X",addr->sas_addr.prv[pos++]); ++ buf += 2; ++ } ++ if (fields[i+1]) *buf++ = '.'; ++ } ++ } ++ return len; ++} ++ ++ ++static void atmarp_info(struct device *dev,struct atmarp_entry *entry, ++ char *buf) ++{ ++ unsigned char *ip; ++ int svc,off,ip_len; ++ ++ svc = !entry->vcc || entry->vcc->family == AF_ATMSVC; ++ off = sprintf(buf,"%-6s%-4s%-4s%5ld ",dev->name,svc ? "SVC" : "PVC", ++ entry->encap ? "LLC" : "NULL",(jiffies-entry->last_use)/HZ); ++ ip = (unsigned char *) &entry->ip; ++ ip_len = sprintf(buf+off,"%d.%d.%d.%d",ip[0],ip[1],ip[2],ip[3]); ++ off += ip_len; ++ while (ip_len++ < 16) buf[off++] = ' '; ++ if (!entry->vcc) strcpy(buf+off,"(incomplete)\n"); ++ else if (!svc) ++ sprintf(buf+off,"%d.%d.%d\n",entry->vcc->dev->number, ++ entry->vcc->vpi,entry->vcc->vci); ++ else { ++ off += svc_addr(buf+off,&entry->vcc->remote); ++ strcpy(buf+off,"\n"); ++ } ++} ++ ++ ++#endif ++ ++ ++static void pvc_info(struct atm_vcc *vcc,char *buf) ++{ ++ static const char *class_name[] = { "off","UBR","CBR","VBR","ABR" }; ++ static const char *aal_name[] = { ++ "0", "1", "2", "3/4", /* 0- 3 */ ++ "???", "5", "???", "???" };/* 4- 7 */ ++ int off; ++ ++ off = sprintf(buf,"%3d %3d %5d %-3s %7d %-5s %7d %-6s", ++ vcc->dev->number,vcc->vpi,vcc->vci, ++ vcc->aal >= sizeof(aal_name)/sizeof(aal_name[0]) ? "err" : ++ aal_name[vcc->aal],vcc->qos.rxtp.min_pcr, ++ class_name[vcc->qos.rxtp.traffic_class],vcc->qos.txtp.min_pcr, ++ class_name[vcc->qos.txtp.traffic_class]); ++#ifdef CONFIG_ATM_CLIP ++ if (vcc->push == atm_push_clip) { ++ struct device *dev; ++ ++ dev = (struct device *) vcc->proto_data; ++ off += sprintf(buf+off,"CLIP, Itf:%s, Encap:",dev->name); ++ if (dev->hard_header_len == RFC1483LLC_LEN) ++ off += sprintf(buf+off,"LLC/SNAP"); ++ else if (dev->hard_header_len == 0) ++ off += sprintf(buf+off,"None"); ++ else off += sprintf(buf+off,"Unknown"); ++ } ++#endif ++ strcpy(buf+off,"\n"); ++} ++ ++ ++static const char *vcc_state(struct atm_vcc *vcc) ++{ ++ if (vcc->flags & ATM_VF_READY) return "CONNECTED"; ++ if (vcc->flags & ATM_VF_RELEASED) return "CLOSING"; ++ if (vcc->flags & ATM_VF_LISTEN) return "LISTEN"; ++ if (vcc->flags & ATM_VF_REGIS) return "INUSE"; ++ if (vcc->flags & ATM_VF_BOUND) return "BOUND"; ++ return "IDLE"; ++} ++ ++ ++static void svc_info(struct atm_vcc *vcc,char *buf) ++{ ++ char *here; ++ int i; ++ ++ if (!vcc->dev) sprintf(buf,"Unassigned "); ++ else sprintf(buf,"%3d %3d %5d ",vcc->dev->number,vcc->vpi,vcc->vci); ++ here = strchr(buf,0); ++ here += sprintf(here,"%-10s ",vcc == sigd ? "Signaling" : ++#ifdef CONFIG_ATM_ATMARP ++ vcc == atmarpd ? "ATMARPctrl" : ++#endif ++#ifdef CONFIG_AREQUIPA ++ vcc == aqd ? "Arequipa" : ++#endif ++ vcc_state(vcc)); ++ here += sprintf(here,"%s%s",vcc->remote.sas_addr.pub, ++ *vcc->remote.sas_addr.pub && *vcc->remote.sas_addr.prv ? "+" : ""); ++ if (*vcc->remote.sas_addr.prv) ++ for (i = 0; i < ATM_ESA_LEN; i++) ++ here += sprintf(here,"%02x", ++ vcc->remote.sas_addr.prv[i]); ++ strcat(here,"\n"); ++} ++ ++ ++#ifdef CONFIG_AREQUIPA ++ ++ ++static const char *arequipa_state(const struct atm_vcc *vcc) ++{ ++ if (!(vcc->flags & ATM_VF_REGIS)) return "DOOMED"; ++ if (vcc->upper) return "ATTACHED"; ++ return "DANGLING"; ++} ++ ++ ++static void arequipa_info(struct atm_vcc *vcc,char *buf) ++{ ++ char *here; ++ ++ if (!vcc->dev) sprintf(buf,"Unassigned "); ++ else sprintf(buf,"%3d %3d %5d ",vcc->dev->number,vcc->vpi,vcc->vci); ++ here = strchr(buf,0); ++ here += sprintf(here,"%-8s ",arequipa_state(vcc)); ++ if (vcc->upper) ++ here += sprintf(here,"%ld",vcc->upper->socket && ++ SOCK_INODE(vcc->upper->socket) ? ++ SOCK_INODE(vcc->upper->socket)->i_ino : 0); ++ strcat(here,"\n"); ++} ++ ++ ++#endif ++ ++ ++#ifdef CONFIG_ATM_LANE ++static char* ++lec_arp_get_status_string(unsigned char status) ++{ ++ switch(status) { ++ case ESI_UNKNOWN: ++ return "ESI_UNKNOWN "; ++ case ESI_ARP_PENDING: ++ return "ESI_ARP_PENDING "; ++ case ESI_VC_PENDING: ++ return "ESI_VC_PENDING "; ++ case ESI_FLUSH_PENDING: ++ return "ESI_FLUSH_PENDING "; ++ case ESI_FORWARD_DIRECT: ++ return "ESI_FORWARD_DIRECT"; ++ default: ++ return " "; ++ } ++} ++ ++static void ++lec_info(struct lec_arp_table *entry, char *buf) ++{ ++ int j, offset=0; ++ ++ ++ for(j=0;jmac_addr[j]); ++ } ++ offset+=sprintf(buf+offset, " "); ++ for(j=0;jatm_addr[j]); ++ } ++ offset+=sprintf(buf+offset, " %s %4.4x", ++ lec_arp_get_status_string(entry->status), ++ entry->flags&0xffff); ++ if (entry->vcc) { ++ offset+=sprintf(buf+offset, "%3d %3d ", entry->vcc->vpi, ++ entry->vcc->vci); ++ } ++ if (entry->recv_vcc) { ++ offset+=sprintf(buf+offset, " %3d %3d", ++ entry->recv_vcc->vpi, entry->recv_vcc->vci); ++ } ++ ++ sprintf(buf+offset,"\n"); ++} ++#endif ++ ++ ++static int atm_info(ino_t ino,loff_t *pos,char *buf) ++{ ++ switch (ino) { ++ case PROC_ATM_DEVICES: ++ while (*pos <= MAX_ATM_ITF) ++ if (atm_dev[*pos-1].ops) break; ++ else (*pos)++; ++ if (*pos > MAX_ATM_ITF) return 0; ++ dev_info(atm_dev+*pos-1,buf); ++ break; ++#ifdef CONFIG_ATM_ATMARP ++ case PROC_ATM_ARP: ++ { ++ struct device *dev; ++ struct atmarp_entry *entry; ++ int count; ++ ++ count = *pos; ++ for (dev = clip_devs; dev; ++ dev = PRIV(dev)->next) ++ for (entry = PRIV(dev)->table; entry; ++ entry = entry->next) ++ if (!--count) { ++ atmarp_info(dev,entry, ++ buf); ++ return strlen(buf); ++ } ++ return 0; ++ } ++ return 0; ++#endif ++ case PROC_ATM_SVC: ++ while (*pos <= MAX_ATM_VCC) ++ if (atm_vcc[*pos-1].family == PF_ATMSVC) break; ++ else (*pos)++; ++ if (*pos > MAX_ATM_VCC) return 0; ++ svc_info(atm_vcc+*pos-1,buf); ++ break; ++ case PROC_ATM_PVC: ++ while (*pos <= MAX_ATM_VCC) ++ if (atm_vcc[*pos-1].family == PF_ATMPVC && ++ atm_vcc[*pos-1].dev) break; ++ else (*pos)++; ++ if (*pos > MAX_ATM_VCC) return 0; ++ pvc_info(atm_vcc+*pos-1,buf); ++ break; ++#ifdef CONFIG_AREQUIPA ++ case PROC_ATM_AREQUIPA: ++ while (*pos <= MAX_ATM_VCC) ++ if (atm_vcc[*pos-1].family == PF_ATMSVC && ++ atm_vcc[*pos-1].push == atm_push_arequipa) ++ break; ++ else (*pos)++; ++ if (*pos > MAX_ATM_VCC) return 0; ++ arequipa_info(atm_vcc+*pos-1,buf); ++ break; ++#endif ++#ifdef CONFIG_ATM_LANE ++ case PROC_ATM_LEC: ++ { ++ struct lec_arp_table *entry; ++ int i, count; ++ ++ count = *pos; ++ for(i=0;inext) { ++ if (!--count) { ++ lec_info(entry, buf); ++ return strlen(buf); ++ } ++ } ++ for(entry=lec_arp_empty_ones; ++ entry; entry=entry->next) { ++ if (!--count) { ++ lec_info(entry, buf); ++ return strlen(buf); ++ } ++ } ++ for(entry=lec_no_forward; ++ entry; entry=entry->next) { ++ if (!--count) { ++ lec_info(entry, buf); ++ return strlen(buf); ++ } ++ } ++ return 0; ++ } ++#endif ++ default: ++ return -EINVAL; ++ } ++ return strlen(buf); ++} ++ ++ ++static int proc_atm_read(struct inode *inode,struct file *file,char *buf, ++ int count) ++{ ++ unsigned long page; ++ int length; ++ ++ if (count < 0) return -EINVAL; ++ page = get_free_page(GFP_KERNEL); ++ if (!page) return -ENOMEM; ++ if (file->f_pos) ++ length = atm_info(inode->i_ino,&file->f_pos,(char *) page); ++ else length = atm_header(inode->i_ino,(char *) page); ++ if (length > count) length = -EINVAL; ++ if (length >= 0) { ++ memcpy_tofs(buf,(char *) page,length); ++ file->f_pos++; ++ } ++ free_page(page); ++ return length; ++} ++ ++ ++static struct file_operations proc_atm_operations = { ++ NULL, /* lseek */ ++ proc_atm_read, /* read */ ++ NULL, /* write */ ++ NULL, /* readdir */ ++ NULL, /* select */ ++ NULL, /* ioctl */ ++ NULL, /* mmap */ ++ NULL, /* no special open code */ ++ NULL, /* no special release */ ++ NULL /* can't fsync */ ++}; ++ ++struct inode_operations proc_atm_inode_operations = { ++ &proc_atm_operations, /* default ATM directory file-ops */ ++ NULL, /* create */ ++ NULL, /* lookup */ ++ NULL, /* link */ ++ NULL, /* unlink */ ++ NULL, /* symlink */ ++ NULL, /* mkdir */ ++ NULL, /* rmdir */ ++ NULL, /* mknod */ ++ NULL, /* rename */ ++ NULL, /* readlink */ ++ NULL, /* follow_link */ ++ NULL, /* readpage */ ++ NULL, /* writepage */ ++ NULL, /* bmap */ ++ NULL, /* truncate */ ++ NULL /* permission */ ++}; ++ ++ ++#define FILE(ino,name,len) &proc_atm, \ ++ (&(struct proc_dir_entry) { ino, len, name, \ ++ S_IFREG | S_IRUGO, 1, 0, 0, 0, &proc_atm_inode_operations, NULL }) ++ ++ ++void atm_proc_init(void) ++{ ++ proc_register(FILE(PROC_ATM_DEVICES,"devices",7)); ++ proc_register(FILE(PROC_ATM_ARP,"arp",3)); ++ proc_register(FILE(PROC_ATM_SVC,"svc",3)); ++ proc_register(FILE(PROC_ATM_PVC,"pvc",3)); ++#ifdef CONFIG_ATM_LANE ++ proc_register(FILE(PROC_ATM_LEC,"lec",3)); ++#endif ++#ifdef CONFIG_AREQUIPA ++ proc_register(FILE(PROC_ATM_AREQUIPA,"arequipa",8)); ++#endif ++} +--- ref/drivers/char/console.c Wed May 15 08:06:55 1996 ++++ work/drivers/char/console.c Mon Jun 10 17:36:33 1996 +@@ -1972,6 +1972,43 @@ + } + } + ++ ++static unsigned long tty_base = 0; ++ ++ ++static void put_scon(char ch) ++{ ++ unsigned long flags; ++ ++ while (1) { ++ while (!(inb_p(tty_base+5) & 0x20)); ++ save_flags(flags); ++ cli(); ++ if (inb_p(tty_base+5) & 0x20) break; ++ restore_flags(flags); ++ } ++ outb_p(ch,tty_base); ++ restore_flags(flags); ++} ++ ++ ++static void print_scon(const char *str) ++{ ++ if (!tty_base) return; ++ while (*str) { ++ if (*str == '\n') put_scon('\r'); ++ put_scon(*str++); ++ } ++} ++ ++ ++void serial_console_setup(char *str,int *ints) ++{ ++ if (ints[0] != 1 || ints[1] < 0 || ints[1] > 3) return; ++ tty_base = ((unsigned short *) 0x400)[ints[1]]; ++} ++ ++ + /* + * unsigned long con_init(unsigned long); + * +@@ -2090,6 +2127,11 @@ + display_desc, video_num_columns, video_num_lines, + MIN_NR_CONSOLES, (MIN_NR_CONSOLES == 1) ? "" : "s", + MAX_NR_CONSOLES); ++ ++ if (tty_base) { ++ register_console(print_scon); ++ return kmem_start; ++ } + + /* + * can't register TGA yet, because PCI bus probe has *not* taken +--- ref/init/main.c Mon May 20 19:33:57 1996 ++++ work/init/main.c Mon Jun 10 17:36:34 1996 +@@ -172,6 +172,8 @@ + #endif + + ++void serial_console_setup(char *str,int *ints); ++ + #if defined(CONFIG_SYSVIPC) || defined(CONFIG_KERNELD) + extern void ipc_init(void); + #endif +@@ -409,6 +411,7 @@ + #ifdef CONFIG_BAYCOM + { "baycom=", baycom_setup }, + #endif ++ { "scon=", serial_console_setup }, + { 0, 0 } + }; + +--- ref/drivers/block/genhd.c Sun May 19 12:29:22 1996 ++++ work/drivers/block/genhd.c Thu Jul 18 21:05:07 1996 +@@ -52,6 +52,7 @@ + extern int blk_dev_init(void); + extern int scsi_dev_init(void); + extern int net_dev_init(void); ++extern int atmdev_init(void); + + /* + * disk_name() is used by genhd.c and md.c. +@@ -654,6 +655,9 @@ + #endif + #ifdef CONFIG_INET + net_dev_init(); ++#endif ++#ifdef CONFIG_ATM ++ (void) atmdev_init(); + #endif + console_map_init(); + +--- ref/drivers/net/net_init.c Mon Mar 25 07:58:21 1996 ++++ work/drivers/net/net_init.c Mon Jun 10 17:36:34 1996 +@@ -170,6 +170,7 @@ + dev->set_mac_address = eth_mac_addr; + dev->header_cache_bind = eth_header_cache_bind; + dev->header_cache_update= eth_header_cache_update; ++ dev->ip_arp = ether_arp; + + dev->type = ARPHRD_ETHER; + dev->hard_header_len = ETH_HLEN; +--- ref/drivers/net/eql.c Mon May 6 11:26:08 1996 ++++ work/drivers/net/eql.c Mon Jun 10 17:36:35 1996 +@@ -248,6 +248,7 @@ + dev->open = eql_open; + dev->stop = eql_close; + dev->do_ioctl = eql_ioctl; ++ dev->ip_arp = ether_arp; + dev->hard_start_xmit = eql_slave_xmit; + dev->get_stats = eql_get_stats; + +--- ref/drivers/net/pi2.c Fri Mar 1 06:50:45 1996 ++++ work/drivers/net/pi2.c Mon Jun 10 17:36:37 1996 +@@ -1414,6 +1414,7 @@ + dev->open = pi_open; + dev->stop = pi_close; + dev->do_ioctl = pi_ioctl; ++ dev->ip_arp = ether_arp; + dev->hard_start_xmit = pi_send_packet; + dev->get_stats = pi_get_stats; + +--- ref/drivers/net/ppp.c Wed May 29 06:32:38 1996 ++++ work/drivers/net/ppp.c Mon Jun 10 17:36:38 1996 +@@ -399,6 +399,7 @@ + dev->stop = ppp_dev_close; + dev->get_stats = ppp_dev_stats; + dev->do_ioctl = ppp_dev_ioctl; ++ dev->ip_arp = ether_arp; + dev->addr_len = 0; + dev->tx_queue_len = 10; + dev->type = ARPHRD_PPP; +--- ref/net/ipv4/arp.c Wed Jun 5 13:42:27 1996 ++++ work/net/ipv4/arp.c Mon Jun 10 17:36:38 1996 +@@ -2165,7 +2165,7 @@ + * Handle an ARP layer I/O control request. + */ + +-int arp_ioctl(unsigned int cmd, void *arg) ++static int do_arp_ioctl(unsigned int cmd, void *arg) + { + int err; + struct arpreq r; +@@ -2176,12 +2176,7 @@ + { + case SIOCDARP: + case SIOCSARP: +- if (!suser()) +- return -EPERM; + case SIOCGARP: +- err = verify_area(VERIFY_READ, arg, sizeof(struct arpreq)); +- if (err) +- return err; + memcpy_fromfs(&r, arg, sizeof(struct arpreq)); + break; + case OLD_SIOCDARP: +@@ -2370,6 +2365,47 @@ + + + ++int ether_arp(struct device *dev,unsigned int cmd,void *arg) ++{ ++ return do_arp_ioctl(cmd,arg); ++} ++ ++ ++int arp_ioctl(unsigned int cmd,void *arg) ++{ ++ struct arpreq req; ++ struct rtable *route; ++ int error; ++ ++ switch (cmd) { ++ case SIOCSARP: ++ case SIOCDARP: ++ if (!suser()) return -EPERM; ++ /* fall through */ ++ case SIOCGARP: ++ error = verify_area(VERIFY_READ,arg,sizeof(req)); ++ if (error) return error; ++ memcpy_fromfs(&req,arg,sizeof(req)); ++ if (req.arp_pa.sa_family != AF_INET) ++ return -EPFNOSUPPORT; ++ break; ++ default: ++ /* Here's the deal: unknown ioctls are passed, but ++ their request structure _must_ begin with a struct ++ sockaddr. */ ++ error = verify_area(VERIFY_READ,arg, ++ sizeof(struct sockaddr)); ++ if (error) return error; ++ memcpy_fromfs(&req.arp_pa,arg,sizeof(struct sockaddr)); ++ } ++ route = ip_rt_route(((struct sockaddr_in *) &req.arp_pa)->sin_addr. ++ s_addr,1); ++ if (!route) return -EHOSTUNREACH; ++ if (!route->rt_dev->ip_arp) return -EINVAL; ++ return route->rt_dev->ip_arp(route->rt_dev,cmd,arg); ++} ++ ++ + /* + * Called once on startup. + */ +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/atmlec.h Wed Jul 31 18:20:21 1996 +@@ -0,0 +1,58 @@ ++/* ++ * ++ * ATM Lan Emulation Daemon vs. driver interface ++ * ++ * carnil@cs.tut.fi ++ * ++ */ ++ ++#ifndef _ATMLEC_H_ ++#define _ATMLEC_H_ ++ ++#include ++#include ++#include ++/* ATM lec daemon control socket */ ++#define ATMLEC_CTRL _IO('a',ATMIOC_LANE) ++#define ATMLEC_DATA _IO('a',ATMIOC_LANE+1) ++#define ATMLEC_MCAST _IO('a',ATMIOC_LANE+2) ++ ++typedef enum { l_set_mac_addr, l_del_mac_addr, ++ l_flush_xmt, l_svc_setup, ++ l_add_permanent, l_addr_delete, ++ l_topology_change, l_flush_complete, ++ l_arp_update, l_reset, l_config, ++ l_flush_tran_id, l_set_lecid, ++ l_arp_xmt } atmlec_msg_type; ++#define ATMLEC_MSG_TYPE_MAX l_arp_xmt ++ ++struct atmlec_config_msg { ++ unsigned int maximum_unknown_frame_count; ++ unsigned long max_unknown_frame_time; ++ unsigned short max_retry_count; ++ unsigned long aging_time; ++ unsigned long forward_delay_time; ++ unsigned long arp_response_time; ++ unsigned long flush_timeout; ++ unsigned long path_switching_delay; ++}; ++ ++struct atmlec_msg { ++ atmlec_msg_type type; ++ union { ++ struct { ++ unsigned char mac_addr[ETH_ALEN]; ++ unsigned char atm_addr[ATM_ESA_LEN]; ++ unsigned long flag;/* Topology_change flag, ++ remoteflag, permanent flag, ++ lecid, transaction id */ ++ } normal; ++ struct atmlec_config_msg config; ++ } content; ++}; ++ ++struct atmlec_ioc { ++ unsigned char atm_addr[ATM_ESA_LEN]; ++ unsigned char receive; /* 1= receive vcc, 0 = send_vcc */ ++}; ++#endif /* _ATMLEC_H_ */ +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/lec.c Tue Jul 30 18:43:49 1996 +@@ -0,0 +1,589 @@ ++/* ++ * lec.c: Lan Emulation driver ++ * Marko Kiiskila carnil@cs.tut.fi ++ * ++ */ ++ ++#include ++ ++/* We are ethernet device */ ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++#include ++ ++/* And atm device */ ++#include ++#include ++ ++#include "lec.h" ++#include "lec_arpc.h" ++ ++#define DPRINTK(format,args...) ++ ++struct atm_vcc *lecd = NULL; ++ ++#define DUMP_PACKETS 0 /* 0 = None, ++ * 1 = 30 first bytes ++ * 2 = Whole packet ++ */ ++ ++static int lec_open(struct device *dev); ++static int lec_send_packet(struct sk_buff *skb, struct device *dev); ++static int lec_close(struct device *dev); ++static struct enet_statistics *lec_get_stats(struct device *dev); ++static int lec_init(struct device *dev); ++ ++static char myname[] = "lec0"; ++ ++extern struct lec_arp_table *lec_arp_empty_ones; ++ ++/* Have we register_netdev() yet? */ ++unsigned char registered = 0; ++ ++static struct device dev_lec = { ++ myname, ++ 0, 0, /* rmem_end, rmem_start */ ++ 0, 0, /* mem_end, mem_start */ ++ 0, 0, /* base_addr, irq */ ++ 0, 0, /* start, interrupt */ ++ 0, NULL, /* tbusy, *next */ ++ lec_init /* Initialization func */ ++}; ++ ++struct lec_priv { ++ struct enet_statistics stats; ++ unsigned short lecid; /* Lecid of this client */ ++}; ++ ++/* ++ * Open/initialize the netdevice. This is called (in the current kernel) ++ * sometime after booting when the 'ifconfig' program is run. ++ * ++ * This routine should set everything up anew at each open, even ++ * registers that "should" only need to be set once at boot, so that ++ * there is non-reboot way to recover if something goes wrong. ++ */ ++ ++static int ++lec_open(struct device *dev) ++{ ++ struct lec_priv *priv = (struct lec_priv *)dev->priv; ++ ++ dev->tbusy = 0; ++ dev->start = 1; ++ dev->interrupt = 1; ++ if (priv) ++ memset(&priv->stats,0,sizeof(struct enet_statistics)); ++ ++ return 0; ++} ++ ++static int ++lec_send_packet(struct sk_buff *skb, struct device *dev) ++{ ++ struct lec_priv *priv = (struct lec_priv *)dev->priv; ++ struct lecdatahdr_8023 *lec_h; ++ struct atm_vcc *send_vcc; ++#if DUMP_PACKETS > 0 ++ char buf[300]; ++ int i=0; ++#endif /* DUMP_PACKETS >0 */ ++ ++ DPRINTK("Lec_send_packet called\n"); ++ if (!lecd) { ++ printk("LEC:No lecd attached\n"); ++ if (priv) ++ priv->stats.tx_errors++; ++ return -EUNATCH; ++ } ++ if (dev->tbusy) { ++ /* ++ * If we get here, some higher level has decided we are broken. ++ * There should really be a "kick me" function call instead. ++ */ ++ printk(KERN_WARNING "%s: transmit timed out.\n", dev->name); ++ dev->tbusy=0; ++ } ++ /* ++ * If some higher layer thinks we've missed an tx-done interrupt ++ * we are passed NULL. Caution: dev_tint() handles the cli()/sti() ++ * itself. ++ */ ++ if (skb == NULL) { ++ dev_tint(dev); ++ return 0; ++ } ++ /* ++ * Block a timer-based transmit from overlapping. This could better be ++ * done with atomic_swap(1, dev->tbusy), but set_bit() works as well. ++ */ ++ ++ if (set_bit(0, (void*)&dev->tbusy) != 0) { ++ printk(KERN_WARNING "%s: Transmitter access conflict.\n", ++ dev->name); ++ } else { ++ DPRINTK("skbuff head:%lx data:%lx tail:%lx end:%lx\n", ++ (long)skb->head, (long)skb->data, (long)skb->tail, ++ (long)skb->end); ++ ++ /* Put le header to place */ ++ lec_h = (struct lecdatahdr_8023*)skb->data; ++ lec_h->le_header = htons(priv->lecid); ++ ++#if DUMP_PACKETS > 0 ++ printk("LEC: send datalen:%ld lecid:%4.4x\n", ++ skb->len, priv->lecid); ++#if DUMP_PACKETS >= 2 ++ for(i=0;ilen && i <99;i++) { ++ sprintf(buf+i*3,"%2.2x ",0xff&skb->data[i]); ++ } ++#elif DUMP_PACKETS >= 1 ++ for(i=0;ilen && i < 30;i++) { ++ sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]); ++ } ++#endif /* DUMP_PACKETS >= 1 */ ++ if (i==skb->len) ++ printk("%s\n",buf); ++ else ++ printk("%s...\n",buf); ++#endif /* DUMP_PACKETS > 0 */ ++ /* Send to right vcc */ ++ send_vcc = lec_arp_resolve(lec_h->h_dest); ++ if (!send_vcc || !(send_vcc->flags & ATM_VF_READY)) { ++ if (priv) ++ priv->stats.tx_errors++; ++ DPRINTK("LEC:lec_send_packet: dropping ..\n"); ++ dev_kfree_skb(skb, FREE_WRITE); ++ return 0; ++ } else { ++#if DUMP_PACKETS > 0 ++ printk("LEC:sending to vpi:%d vci:%d\n", ++ send_vcc->vpi, send_vcc->vci); ++#endif /* DUMP_PACKETS > 0 */ ++ /* Minimum ethernet-frame size */ ++ if (skb->len <62) ++ skb->len = 62; ++ atomic_add(skb->truesize,&send_vcc->tx_inuse); ++ skb->atm.iovcnt = 0; ++ send_vcc->dev->ops->send(send_vcc, skb); ++ if (priv) ++ priv->stats.tx_packets++; ++ } ++ } ++ /* Should we wait for card's device driver to notify us? */ ++ dev->tbusy=0; ++ ++ return 0; ++} ++ ++/* The inverse routine to net_open(). */ ++static int ++lec_close(struct device *dev) ++{ ++ dev->tbusy = 1; ++ dev->start = 0; ++ return 0; ++} ++ ++/* ++ * Get the current statistics. ++ * This may be called with the card open or closed. ++ */ ++static struct enet_statistics * ++lec_get_stats(struct device *dev) ++{ ++ struct lec_priv *priv = (struct lec_priv *)dev->priv; ++ ++ return (struct enet_statistics *)&priv->stats; ++} ++ ++int ++lec_hard_header(struct sk_buff *skb, struct device *dev, ++ unsigned short type, void *daddr, void *saddr, ++ unsigned len) ++{ ++ struct lec_priv *priv = (struct lec_priv *)dev->priv; ++ struct lecdatahdr_8023 *hdr = ++ (struct lecdatahdr_8023 *)skb_push(skb, LEC_HEADER_LEN); ++ ++ /* Set lecid header */ ++ if (priv) ++ hdr->le_header = htons(priv->lecid); ++ else ++ hdr->le_header = 0; ++ ++ /* Set the protocol type. */ ++ if(type!=ETH_P_802_3) ++ hdr->h_type = htons(type); ++ else ++ hdr->h_type = htons(len); ++ ++ /* Source hw address */ ++ if (saddr) ++ memcpy(hdr->h_source, saddr, dev->addr_len); ++ else ++ memcpy(hdr->h_source, dev->dev_addr, dev->addr_len); ++ ++ /* Destination addr */ ++ if (daddr) { ++ memcpy(hdr->h_dest, daddr, dev->addr_len); ++ hdr->le_header = 0; ++ return dev->hard_header_len; ++ } ++ return -dev->hard_header_len; ++} ++ ++int ++lec_rebuild_header(void *buff, struct device *dev, unsigned long dst, ++ struct sk_buff *skb) ++{ ++ struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023*)buff; ++ ++ /* ++ * Only ARP/IP is currently supported ++ */ ++ if (hdr->h_type != htons(ETH_P_IP)) { ++ printk(KERN_DEBUG "%s: unable to resolve type %X addresses.\n", ++ dev->name,(int)hdr->h_type); ++ memcpy(hdr->h_source, dev->dev_addr, dev->addr_len); ++ return 0; ++ } ++ /* ++ * Try and get ARP to resolve the header. ++ */ ++#ifdef CONFIG_INET ++ return arp_find(hdr->h_dest, dst, dev, dev->pa_addr, skb)? 1 : 0; ++#else ++ return 0; ++#endif ++} ++ ++/* ++ * Upper level calls this function to bind hardware header cache entry. ++ * If the call is successful, then corresponding Address Resolution Protocol ++ * (maybe, not ARP) takes responsibility for updating cache content. ++ */ ++void ++lec_header_cache_bind(struct hh_cache ** hhp, struct device *dev, ++ unsigned short htype, __u32 daddr) ++{ ++ struct hh_cache *hh; ++ ++ if (htype != ETH_P_IP) { ++ printk("eth_header_cache_bind: %04x cache is not implemented\n", ++ htype); ++ return; ++ } ++ if (arp_bind_cache(hhp, dev, htype, daddr)) ++ return; ++ if ((hh=*hhp) != NULL) { ++ memcpy(hh->hh_data+8, dev->dev_addr, ETH_ALEN); ++ hh->hh_data[14] = htype>>8; ++ hh->hh_data[15] = htype&0xFF; ++ } ++} ++ ++/* ++ * Called by Address Resolution module to notify changes in address. ++ */ ++void ++lec_header_cache_update(struct hh_cache *hh, struct device *dev, ++ unsigned char *haddr) ++{ ++ if (hh->hh_type != ETH_P_IP) { ++ printk("lec_header_cache_update: %04x cache is not implemented\n", ++ hh->hh_type); ++ return; ++ } ++ memcpy(hh->hh_data+2, haddr, ETH_ALEN); ++ hh->hh_uptodate = 1; ++} ++ ++static int ++lec_atm_send(struct atm_vcc *vcc, struct sk_buff *skb) ++{ ++ struct lec_priv *priv = (struct lec_priv *)dev_lec.priv; ++ struct atmlec_msg *mesg; ++ int i; ++ ++ mesg = (struct atmlec_msg *)skb->data; ++ switch(mesg->type) { ++ case l_set_mac_addr: ++ for (i=0;i<6;i++) { ++ dev_lec.dev_addr[i] = mesg->content.normal.mac_addr[i]; ++ } ++ break; ++ case l_del_mac_addr: ++ for(i=0;i<6;i++) { ++ dev_lec.dev_addr[i] = 0; ++ } ++ break; ++ case l_add_permanent: ++ lec_add_permanent(mesg->content.normal.mac_addr, ++ mesg->content.normal.atm_addr); ++ break; ++ case l_addr_delete: ++ lec_addr_delete(mesg->content.normal.atm_addr, ++ mesg->content.normal.flag); ++ break; ++ case l_topology_change: ++ lec_topology_flag_change_set(mesg->content.normal.flag); ++ break; ++ case l_flush_complete: ++ lec_flush_complete(mesg->content.normal.atm_addr, ++ mesg->content.normal.flag); ++ break; ++ case l_arp_update: ++ lec_arp_update(mesg->content.normal.mac_addr, ++ mesg->content.normal.atm_addr, ++ mesg->content.normal.flag); ++ break; ++ case l_reset: ++ lec_reset(); ++ break; ++ case l_config: ++ lec_config(&mesg->content.config); ++ break; ++ case l_flush_tran_id: ++ lec_set_flush_tran_id(mesg->content.normal.mac_addr, ++ mesg->content.normal.flag); ++ break; ++ case l_set_lecid: ++ if (priv) ++ priv->lecid = (unsigned short)(0xffff&mesg->content.normal.flag); ++ break; ++ default: ++ printk("LEC: Unknown message type %d\n",mesg->type); ++ dev_kfree_skb(skb, FREE_WRITE); ++ return -EINVAL; ++ } ++ dev_kfree_skb(skb, FREE_WRITE); ++ return 0; ++} ++ ++static void ++lec_atm_close(struct atm_vcc *vcc) ++{ ++ struct sk_buff *skb; ++ ++ lecd = NULL; ++ /* Do something needful? */ ++ ++ dev_lec.tbusy = 1; ++ dev_lec.start = 0; ++ ++ lec_arp_destroy(); ++ ++#if 0 ++ unregister_netdev(&dev_lec); ++ /* Should we do this? */ ++ if (priv) { ++ kfree_s(priv, sizeof(struct lec_priv)); ++ dev_lec.priv = NULL; ++ } ++#endif ++ if (skb_peek(&vcc->recvq)) ++ printk("LEC lec_atm_close: closing with messages pending\n"); ++ while ((skb = skb_dequeue(&vcc->recvq))) ++ dev_kfree_skb(skb,FREE_READ); ++ ++ printk("LEC: Shut down!\n"); ++} ++ ++static struct atmdev_ops lecdev_ops = { ++ NULL, /*open*/ ++ lec_atm_close, /*close*/ ++ NULL, /*ioctl*/ ++ NULL, /*getsockopt */ ++ NULL, /*setsockopt */ ++ lec_atm_send, /*send */ ++ NULL, /*sg_send */ ++ NULL, /*poll */ ++ NULL, /*phy_put*/ ++ NULL, /*phy_get*/ ++ NULL /*feedback*/ ++}; ++ ++static struct atm_dev lecatm_dev = { ++ &lecdev_ops, ++ NULL, /*PHY*/ ++ "lec", /*type*/ ++ 999, /*dummy device number*/ ++ NULL,NULL, /*no VCCs*/ ++ NULL,NULL, /*no data*/ ++ 0, /*no flags*/ ++ NULL, /* no local address*/ ++ { 0 } /*no ESI, no statistics */ ++}; ++ ++int ++send_to_lecd(atmlec_msg_type type, unsigned char *mac_addr, ++ unsigned char *atm_addr) ++{ ++ struct sk_buff *skb; ++ struct atmlec_msg *mesg; ++ ++ if (!lecd) { ++ return -1; ++ } ++ skb = alloc_skb(sizeof(struct atmlec_msg), GFP_ATOMIC); ++ if (!skb) ++ return -1; ++ skb->free = 1; ++ skb->len = sizeof(struct atmlec_msg); ++ mesg = (struct atmlec_msg *)skb->data; ++ mesg->type = type; ++ if (mac_addr) ++ memcpy(&mesg->content.normal.mac_addr, mac_addr, ETH_ALEN); ++ if (atm_addr) ++ memcpy(&mesg->content.normal.atm_addr, atm_addr, ATM_ESA_LEN); ++ ++ skb_queue_tail(&lecd->recvq, skb); ++ wake_up(&lecd->sleep); ++ return 0; ++} ++ ++static int ++lec_init(struct device *dev) ++{ ++ dev->priv = kmalloc(sizeof(struct lec_priv), GFP_KERNEL); ++ if (dev->priv == NULL) ++ return -ENOMEM; ++ ++ memset(dev->priv,0,sizeof(struct lec_priv)); ++ ++ ether_setup(dev); ++ dev->open = lec_open; ++ dev->stop = lec_close; ++ dev->hard_start_xmit = lec_send_packet; ++ dev->hard_header_len = LEC_HEADER_LEN; ++ ++ dev->hard_header = lec_hard_header; ++ dev->rebuild_header = lec_rebuild_header; ++ dev->header_cache_bind = lec_header_cache_bind; ++ dev->header_cache_update= lec_header_cache_update; ++ ++ dev->get_stats = lec_get_stats; ++ dev->set_multicast_list = NULL; ++ dev->do_ioctl = NULL; ++ printk("LEC: Initialized!\n"); ++ return 0; ++} ++ ++static unsigned char lec_ctrl_magic[] = { ++ 0xff, ++ 0x00, ++ 0x01, ++ 0x01 }; ++ ++void ++lec_push(struct atm_vcc *vcc, struct sk_buff *skb) ++{ ++ struct lec_priv *priv = (struct lec_priv *)dev_lec.priv; ++ struct lecdatahdr_8023 *hdr; ++#if DUMP_PACKETS >0 ++ int i=0; ++ char buf[300]; ++ ++ printk("LEC: lec_push vcc vpi:%d vci:%d\n",vcc->vpi, vcc->vci); ++#endif ++ if (!skb) { ++ DPRINTK("LEC: null skb\n"); ++ lec_vcc_close(vcc); ++ return; ++ } ++#if DUMP_PACKETS > 0 ++ printk("LEC: rcv datalen:%ld lecid:%4.4x\n", skb->len, priv->lecid); ++#if DUMP_PACKETS >= 2 ++ for(i=0;ilen && i <99;i++) { ++ sprintf(buf+i*3,"%2.2x ",0xff&skb->data[i]); ++ } ++#elif DUMP_PACKETS >= 1 ++ for(i=0;ilen && i < 30;i++) { ++ sprintf(buf+i*3,"%2.2x ", 0xff&skb->data[i]); ++ } ++#endif /* DUMP_PACKETS >= 1 */ ++ if (i==skb->len) ++ printk("%s\n",buf); ++ else ++ printk("%s...\n",buf); ++#endif /* DUMP_PACKETS > 0 */ ++ if (memcmp(skb->data, lec_ctrl_magic, 4) ==0) { /* Control frame, to daemon*/ ++ DPRINTK("LEC: To daemon\n"); ++ skb_queue_tail(&vcc->recvq, skb); ++ wake_up(&vcc->sleep); ++ } else { /* Data frame, queue to protocol handlers */ ++ hdr = (struct lecdatahdr_8023 *)skb->data; ++ if (hdr->le_header == htons(priv->lecid) || ++ !lecd) { /* Probably looping back, or if lecd is missing, ++ lecd has gone down */ ++ DPRINTK("Ignoring loopback frame...\n"); ++ dev_kfree_skb(skb, FREE_READ); ++ return; ++ } ++ if (lec_arp_empty_ones) { /* FILTER DATA!!!! */ ++ lec_arp_check_empties(vcc, skb); ++ } ++ skb->dev = &dev_lec; ++ skb->mac.raw = (unsigned char *)skb->data; ++ skb->mac.ethernet = (struct ethhdr *)skb_pull(skb, 2); ++ if (*hdr->h_dest&1) { ++ if (memcmp(hdr->h_dest,dev_lec.broadcast, ETH_ALEN)==0) ++ skb->pkt_type=PACKET_BROADCAST; ++ else ++ skb->pkt_type=PACKET_MULTICAST; ++ } else if (dev_lec.flags&(IFF_PROMISC|IFF_ALLMULTI)) { ++ if (memcmp(hdr->h_dest,dev_lec.dev_addr, ETH_ALEN)) ++ skb->pkt_type=PACKET_OTHERHOST; ++ } ++ if (ntohs(hdr->h_type)>=1536) ++ skb->protocol = hdr->h_type; ++ else ++ skb->protocol = htons(ETH_P_802_2); ++ skb->h.raw = skb_pull(skb, ETH_HLEN); ++ netif_rx(skb); ++ if (priv) ++ priv->stats.rx_packets++; ++ } ++} ++ ++int ++lec_vcc_attach(struct atm_vcc *vcc, void *arg) ++{ ++ struct atmlec_ioc ioc_data; ++ ++ /* Lecd must be up in this case */ ++ memcpy_fromfs(&ioc_data, arg, sizeof(struct atmlec_ioc)); ++ lec_vcc_added(&ioc_data, vcc, vcc->push); ++ vcc->push = lec_push; ++ return 0; ++} ++ ++/* Initialize device. */ ++int ++lecd_attach(struct atm_vcc *vcc) ++{ ++ int result; ++ ++ if (lecd) { ++ printk("LEC: Lecd already contacted\n"); ++ return -EADDRINUSE; ++ } ++ ++ lec_arp_init(); ++ if (!registered) { ++ registered = 1; ++ if ((result =register_netdev(&dev_lec)) != 0) ++ return result; ++ } ++ lecd = vcc; ++ vcc->dev = &lecatm_dev; ++ vcc->flags |= ATM_VF_READY; ++ ++ return 0; ++} +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/lec.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,53 @@ ++/* ++ * ++ * Lan Emulation client header file ++ * ++ * Marko Kiiskila carnil@cs.tut.fi ++ * ++ */ ++ ++#ifndef _LEC_H_ ++#define _LEC_H_ ++ ++#include ++#include ++ ++#define LEC_HEADER_LEN 16 ++ ++struct lecdatahdr_8023 { ++ unsigned short le_header; ++ unsigned char h_dest[ETH_ALEN]; ++ unsigned char h_source[ETH_ALEN]; ++ unsigned short h_type; ++}; ++ ++struct lecdatahdr_8025 { ++ unsigned short le_header; ++ unsigned char ac_pad; ++ unsigned char fc; ++ unsigned char h_dst[ETH_ALEN]; ++ unsigned char h_source[ETH_ALEN]; ++}; ++ ++/* ++ * ATM LAN Emulation supports both LLC & Dix Ethernet EtherType ++ * frames. ++ * 1. Dix Ethernet EtherType frames encoded by placing EtherType ++ * field in h_type field. Data follows immediatelly after header. ++ * 2. LLC Data frames whose total length, including LLC field and data, ++ * but not padding required to meet the minimum data frame length, ++ * is less than 1536(0x0600) MUST be encoded by placing that length ++ * in the the h_type field. The LLC field follows header immediatelly. ++ * 3. LLC data frames longer than this maximum MUST be encoded by placing ++ * the value 0 in the h_type field. ++ * ++ */ ++ ++int lecd_attach(struct atm_vcc *vcc); ++int lec_vcc_attach(struct atm_vcc *vcc, void *arg); ++int make_lec(struct atm_vcc *vcc); ++int send_to_lecd(atmlec_msg_type type, unsigned char *mac_addr, ++ unsigned char *atm_addr); ++void lec_push(struct atm_vcc *vcc, struct sk_buff *skb); ++#endif _LEC_H_ ++ +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/lec_arpc.c Thu Jul 11 13:11:57 1996 +@@ -0,0 +1,1090 @@ ++#include ++#include ++#include ++#include ++#include ++#include ++ ++#include ++ ++#include "lec.h" ++#include "lec_arpc.h" ++ ++#define DPRINTK(format,args...) ++#define DEBUG_ARP_TABLE 0 ++ ++struct lec_arp_table *lec_arp_tables[LEC_ARP_TABLE_SIZE] = ++{ NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, /* At least this gets */ ++ NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL}; /* initialized */ ++ ++/* Used for storing VCC's that don't have a MAC address attached yet */ ++struct lec_arp_table *lec_arp_empty_ones = NULL; ++ ++/* Used for storing VCC's (and forward packets from) which are to ++ age out by not using them to forward packets. ++ This is because to some LE clients there will be 2 VCCs. Only ++ one of them gets used. */ ++struct lec_arp_table *lec_no_forward = NULL; ++ ++static atomic_t lec_arp_lock_var = 0; ++ ++struct atm_vcc *mcast_vcc = NULL; ++ ++#define LEC_ARP_REFRESH_INTERVAL (3*HZ) ++ ++static void lec_arp_check_expire(unsigned long dumle); ++static __inline__ void lec_arp_expire_arp(unsigned long dumb); ++static void lec_clear_all(void); ++void dump_arp_table(void); ++ ++static struct timer_list lec_arp_timer = ++{ NULL,NULL, LEC_ARP_REFRESH_INTERVAL, 0L, &lec_arp_check_expire }; ++static unsigned char lec_freeze; ++ ++/* C10 */ ++static unsigned int lec_maximum_unknown_frame_count = 1; ++/* Within the period of time defined by this variable, the client will send ++ no more than C10 frames to BUS for a given unicast destination. (C11) */ ++static unsigned long lec_max_unknown_frame_time = (1*HZ); ++/* If no traffic has been sent in this vcc for this period of time, ++ vcc will be torn down (C12)*/ ++static unsigned long lec_vcc_timeout_period = (1200*HZ); ++/* An LE Client MUST not retry an LE_ARP_REQUEST for a ++ given frame's LAN Destination more than maximum retry count times, ++ after the first LEC_ARP_REQUEST (C13)*/ ++static unsigned short lec_max_retry_count = 1; ++/* Max time the client will maintain an entry in its arp cache in ++ absence of a verification of that relationship (C17)*/ ++static unsigned long lec_aging_time = (300*HZ); ++/* Max time the client will maintain an entry in cache when ++ topology change flag is true (C18) */ ++static unsigned long lec_forward_delay_time = (15*HZ); ++/* Topology change flag (C19)*/ ++static int lec_topology_change = 0; ++/* Max time the client expects an LE_ARP_REQUEST/LE_ARP_RESPONSE ++ cycle to take (C20)*/ ++static unsigned long lec_arp_response_time = (1*HZ); ++/* Time limit ot wait to receive an LE_FLUSH_RESPONSE after the ++ LE_FLUSH_REQUEST has been sent before taking recover action. (C21)*/ ++static unsigned long lec_flush_timeout = (4*HZ); ++/* The time since sending a frame to the bus after which the ++ LE Client may assume that the frame has been either discarded or ++ delivered to the recipient (C22) */ ++static unsigned long lec_path_switching_delay = (6*HZ); ++ ++/* ++ * Arp table funcs ++ */ ++ ++#define HASH(ch) (ch & (LEC_ARP_TABLE_SIZE -1)) ++ ++static __inline__ void ++lec_arp_lock(void) ++{ ++ atomic_inc(&lec_arp_lock_var); ++} ++ ++static __inline__ void ++lec_arp_unlock(void) ++{ ++ atomic_dec(&lec_arp_lock_var); ++} ++ ++/* ++ * Initialization of arp-cache ++ */ ++void ++lec_arp_init(void) ++{ ++ unsigned short i; ++ ++ for (i=0;ivcc) { ++ entry->vcc->push = entry->old_push; ++ entry->vcc->flags |= ATM_VF_RELEASED; ++ entry->vcc->flags &= ~ATM_VF_READY; ++ entry->vcc = NULL; ++ } ++ if (entry->recv_vcc) { ++ entry->recv_vcc->push = entry->old_recv_push; ++ entry->recv_vcc->flags |= ATM_VF_RELEASED; ++ entry->recv_vcc->flags &= ~ATM_VF_READY; ++ entry->recv_vcc = NULL; ++ } ++} ++ ++/* ++ * Insert entry to lec_arp_table ++ */ ++static __inline__ void ++lec_arp_put(struct lec_arp_table *to_put) ++{ ++ unsigned short place; ++ unsigned long flags; ++ ++ save_flags(flags); ++ cli(); ++ ++ place = HASH(to_put->mac_addr[ETH_ALEN-1]); ++ to_put->next = lec_arp_tables[place]; ++ lec_arp_tables[place] = to_put; ++ ++ restore_flags(flags); ++ DPRINTK("LEC_ARP: Added entry:%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n", ++ 0xff&to_put->mac_addr[0], 0xff&to_put->mac_addr[1], ++ 0xff&to_put->mac_addr[2], 0xff&to_put->mac_addr[3], ++ 0xff&to_put->mac_addr[4], 0xff&to_put->mac_addr[5]); ++ dump_arp_table(); ++} ++ ++/* ++ * Remove entry from lec_arp_table ++ */ ++static __inline__ int ++lec_arp_remove(struct lec_arp_table *to_remove) ++{ ++ unsigned short place; ++ struct lec_arp_table *tmp; ++ unsigned long flags; ++ int remove_vcc=1; ++ ++ save_flags(flags); ++ cli(); ++ ++ if (!to_remove) { ++ restore_flags(flags); ++ return -1; ++ } ++ place = HASH(to_remove->mac_addr[ETH_ALEN-1]); ++ tmp = lec_arp_tables[place]; ++ if (tmp == to_remove) { ++ lec_arp_tables[place] = tmp->next; ++ } else { ++ while(tmp && tmp->next != to_remove) { ++ tmp = tmp->next; ++ } ++ if (!tmp) {/* Entry was not found */ ++ restore_flags(flags); ++ return -1; ++ } ++ } ++ tmp->next = to_remove->next; ++ del_timer(&to_remove->timer); ++ ++ /* If this is the only MAC connected to this VCC, also tear down ++ the VCC */ ++ if (to_remove->status >= ESI_FLUSH_PENDING) { ++ /* ++ * ESI_FLUSH_PENDING, ESI_FORWARD_DIRECT ++ */ ++ for(place=0;placenext){ ++ if (memcmp(tmp->atm_addr, to_remove->atm_addr, ++ ATM_ESA_LEN)==0) { ++ remove_vcc=0; ++ break; ++ } ++ } ++ } ++ if (remove_vcc) ++ lec_arp_clear_vccs(to_remove); ++ } ++ restore_flags(flags); ++ ++ DPRINTK("LEC_ARP: Removed entry:%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n", ++ 0xff&to_remove->mac_addr[0], 0xff&to_remove->mac_addr[1], ++ 0xff&to_remove->mac_addr[2], 0xff&to_remove->mac_addr[3], ++ 0xff&to_remove->mac_addr[4], 0xff&to_remove->mac_addr[5]); ++ ++ dump_arp_table(); ++ return 0; ++} ++ ++#if DEBUG_ARP_TABLE ++static char* ++get_status_string(unsigned char st) ++{ ++ switch(st) { ++ case ESI_UNKNOWN: ++ return "ESI_UNKNOWN"; ++ case ESI_ARP_PENDING: ++ return "ESI_ARP_PENDING"; ++ case ESI_VC_PENDING: ++ return "ESI_VC_PENDING"; ++ case ESI_FLUSH_PENDING: ++ return "ESI_FLUSH_PENDING"; ++ case ESI_FORWARD_DIRECT: ++ return "ESI_FORWARD_DIRECT"; ++ default: ++ return ""; ++ } ++} ++#endif ++ ++void ++dump_arp_table(void) ++{ ++#if DEBUG_ARP_TABLE ++ int i,j, offset; ++ struct lec_arp_table *rulla; ++ char buf[512]; ++ ++ printk("Dump:\n"); ++ for (i=0;imac_addr[j]&0xff); ++ } ++ offset +=sprintf(buf+offset,"Atm:"); ++ for(j=0;jatm_addr[j]&0xff); ++ } ++ offset+=sprintf(buf+offset, ++ "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ", ++ rulla->vcc?rulla->vcc->vpi:0, ++ rulla->vcc?rulla->vcc->vci:0, ++ rulla->recv_vcc?rulla->recv_vcc->vpi:0, ++ rulla->recv_vcc?rulla->recv_vcc->vci:0, ++ rulla->last_used, ++ rulla->timestamp, rulla->no_tries); ++ offset+=sprintf(buf+offset, ++ "Flags:%x, Packets_flooded:%x, Status: %s ", ++ rulla->flags, rulla->packets_flooded, ++ get_status_string(rulla->status)); ++ offset+=sprintf(buf+offset,"->%p\n",rulla->next); ++ rulla = rulla->next; ++ } ++ printk("%s",buf); ++ } ++ rulla = lec_arp_empty_ones; ++ if (rulla) ++ printk("Empty ones\n"); ++ while(rulla) { ++ offset=0; ++ offset += sprintf(buf+offset,"Mac:"); ++ for(j=0;jmac_addr[j]&0xff); ++ } ++ offset +=sprintf(buf+offset,"Atm:"); ++ for(j=0;jatm_addr[j]&0xff); ++ } ++ offset+=sprintf(buf+offset, ++ "Vcc vpi:%d vci:%d, Recv_vcc vpi:%d vci:%d Last_used:%lx, Timestamp:%lx, No_tries:%d ", ++ rulla->vcc?rulla->vcc->vpi:0, ++ rulla->vcc?rulla->vcc->vci:0, ++ rulla->recv_vcc?rulla->recv_vcc->vpi:0, ++ rulla->recv_vcc?rulla->recv_vcc->vci:0, ++ rulla->last_used, ++ rulla->timestamp, rulla->no_tries); ++ offset+=sprintf(buf+offset, ++ "Flags:%x, Packets_flooded:%x, Status: %s ", ++ rulla->flags, rulla->packets_flooded, ++ get_status_string(rulla->status)); ++ offset+=sprintf(buf+offset,"->%lx\n",(long)rulla->next); ++ rulla = rulla->next; ++ printk("%s",buf); ++ } ++#endif ++} ++ ++ ++/* ++ * Find entry by mac_address ++ */ ++static __inline__ struct lec_arp_table* ++lec_arp_find(unsigned char *mac_addr) ++{ ++ unsigned short place; ++ struct lec_arp_table *to_return; ++ ++ DPRINTK("LEC_ARP: lec_arp_find :%2.2x %2.2x %2.2x %2.2x %2.2x %2.2x\n", ++ mac_addr[0]&0xff, mac_addr[1]&0xff, mac_addr[2]&0xff, ++ mac_addr[3]&0xff, mac_addr[4]&0xff, mac_addr[5]&0xff); ++ lec_arp_lock(); ++ place = HASH(mac_addr[ETH_ALEN-1]); ++ ++ to_return = lec_arp_tables[place]; ++ while(to_return) { ++ if (memcmp(mac_addr, to_return->mac_addr, ETH_ALEN) == 0) { ++ to_return->last_used = jiffies; ++ lec_arp_unlock(); ++ return to_return; ++ } ++ to_return = to_return->next; ++ } ++ lec_arp_unlock(); ++ return NULL; ++} ++ ++static struct lec_arp_table* ++make_entry(unsigned char *mac_addr) ++{ ++ struct lec_arp_table *to_return; ++ ++ to_return=(struct lec_arp_table *)kmalloc(sizeof(struct lec_arp_table), ++ GFP_ATOMIC); ++ if (!to_return) { ++ printk("LEC: Arp entry kmalloc failed\n"); ++ return NULL; ++ } ++ memset(to_return,0,sizeof(struct lec_arp_table)); ++ memcpy(to_return->mac_addr, mac_addr, ETH_ALEN); ++ to_return->timer.function = lec_arp_expire_arp; ++ to_return->timer.data = (unsigned long)to_return; ++ return to_return; ++} ++ ++/* ++ * ++ * Arp sent timer expired ++ * ++ */ ++static void ++lec_arp_expire_arp(unsigned long data) ++{ ++ struct lec_arp_table *entry; ++ ++ entry = (struct lec_arp_table *)data; ++ del_timer(&entry->timer); ++ ++ if (entry->status == ESI_ARP_PENDING) { ++ send_to_lecd(l_arp_xmt, entry->mac_addr, NULL); ++ entry->no_tries++; ++ if(entry->no_tries <= lec_max_retry_count) { ++ entry->timer.expires = jiffies + (1*HZ); ++ add_timer(&entry->timer); ++ } else ++ /* For safety */ ++ entry->timer.next = entry->timer.prev = NULL; ++ } ++} ++ ++/* ++ * ++ * Unknown/unused vcc expire, remove associated entry ++ * ++ */ ++static void ++lec_arp_expire_vcc(unsigned long data) ++{ ++ struct lec_arp_table *to_remove = (struct lec_arp_table*)data; ++ struct lec_arp_table *entry = NULL; ++ ++ del_timer(&to_remove->timer); ++ ++ DPRINTK("LEC_ARP: lec_arp_expire_vcc vpi:%d vci:%d\n", ++ to_remove->vcc?to_remove->vcc->vpi:0, ++ to_remove->vcc?to_remove->vcc->vci:0); ++ if (to_remove == lec_arp_empty_ones) ++ lec_arp_empty_ones = to_remove->next; ++ else { ++ entry = lec_arp_empty_ones; ++ while (entry && entry->next != to_remove) ++ entry = entry->next; ++ if (entry) ++ entry->next = to_remove->next; ++ } ++ if (!entry) ++ if (to_remove == lec_no_forward) { ++ lec_no_forward = to_remove->next; ++ } else { ++ entry = lec_no_forward; ++ while (entry && entry->next != to_remove) ++ entry = entry->next; ++ if (entry) ++ entry->next = to_remove->next; ++ } ++ lec_arp_clear_vccs(to_remove); ++ kfree_s(to_remove, sizeof(struct lec_arp_table)); ++} ++ ++/* ++ * Expire entries. ++ * 1. Re-set timer ++ * 2. For each entry, delete entries that have aged past the age limit. ++ * 3. For each entry, depending on the status of the entry, perform ++ * the following maintenance. ++ * a. If status is ESI_VC_PENDING or ESI_ARP_PENDING then if the ++ * tick_count is above the max_unknown_frame_time, clear ++ * the tick_count to zero and clear the packets_flooded counter ++ * to zero. This supports the packet rate limit per address ++ * while flooding unknowns. ++ * b. If the status is ESI_FLUSH_PENDING and the tick_count is greater ++ * than or equal to the path_switching_delay, change the status ++ * to ESI_FORWARD_DIRECT. This causes the flush period to end ++ * regardless of the progress of the flush protocol. ++ */ ++static void ++lec_arp_check_expire(unsigned long dumle) ++{ ++ struct lec_arp_table *entry, *next; ++ unsigned long now; ++ unsigned long time_to_check; ++ int i; ++ ++ del_timer(&lec_arp_timer); ++ ++ DPRINTK("lec_arp_check_expire\n"); ++ if (!lec_arp_lock_var) { ++ lec_arp_lock(); ++ now = jiffies; ++ for(i=0;iflags) & LEC_REMOTE_FLAG && ++ lec_topology_change) ++ time_to_check = lec_forward_delay_time; ++ else ++ time_to_check = lec_aging_time; ++ ++ if((now-entry->last_used > time_to_check) && ++ !(entry->flags & LEC_PERMANENT_FLAG)) { ++ /* Remove entry */ ++ printk("LEC:Remove entry1\n"); ++ del_timer(&entry->timer); ++ next = entry->next; ++ lec_arp_remove(entry); ++ kfree_s(entry, ++ sizeof(struct lec_arp_table)); ++ entry = next; ++ } else { ++ /* Something else */ ++ if ((entry->status == ESI_VC_PENDING || ++ entry->status == ESI_ARP_PENDING) ++ && ++ now-entry->timestamp >= ++ lec_max_unknown_frame_time) { ++ entry->timestamp = jiffies; ++ entry->packets_flooded = 0; ++ } ++ if (entry->status == ESI_FLUSH_PENDING ++ && ++ now-entry->timestamp >= ++ lec_path_switching_delay) { ++ entry->last_used = jiffies; ++ entry->status = ++ ESI_FORWARD_DIRECT; ++ } ++ entry = entry->next; ++ } ++ } ++ } ++ lec_arp_unlock(); ++ } ++ lec_arp_timer.expires = jiffies + LEC_ARP_REFRESH_INTERVAL; ++ if (!lec_freeze) ++ add_timer(&lec_arp_timer); ++} ++ ++/* ++ * Remove all entries ++ */ ++static void ++lec_clear_all(void) ++{ ++ struct lec_arp_table *entry, *next; ++ unsigned long flags; ++ int i; ++ ++ save_flags(flags); ++ cli(); ++ ++ for (i=0;inext; ++ lec_arp_remove(entry); ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ } ++ } ++ entry = lec_arp_empty_ones; ++ while(entry) { ++ next = entry->next; ++ del_timer(&entry->timer); ++ lec_arp_clear_vccs(entry); ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ entry = next; ++ } ++ lec_arp_empty_ones = NULL; ++ entry = lec_no_forward; ++ while(entry) { ++ next = entry->next; ++ del_timer(&entry->timer); ++ lec_arp_clear_vccs(entry); ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ entry = next; ++ } ++ lec_no_forward = NULL; ++ mcast_vcc = NULL; /* To make sure... */ ++ memset(lec_arp_tables, 0, ++ sizeof(struct lec_arp_table*)*LEC_ARP_TABLE_SIZE); ++ restore_flags(flags); ++} ++ ++/* ++ * Remove all entries not marked permanent ++ */ ++void ++lec_reset(void) ++{ ++ int i; ++ struct lec_arp_table *entry, *next; ++ ++ lec_arp_lock(); ++ ++ printk("lec_reset\n"); ++ for(i=0;inext; ++ if (!(entry->flags & LEC_PERMANENT_FLAG)) { ++ lec_arp_remove(entry); ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ } ++ } ++ } ++ lec_arp_unlock(); ++} ++ ++/* ++ * Try to find vcc where mac_address is attached. ++ * ++ */ ++struct atm_vcc* ++lec_arp_resolve(unsigned char *mac_to_find) ++{ ++ struct lec_arp_table *entry; ++ ++ if (mac_to_find[0]&0x01) { ++ return mcast_vcc; ++ } ++ entry = lec_arp_find(mac_to_find); ++ ++ if (entry) { ++ if (entry->status == ESI_FORWARD_DIRECT) { ++ /* Connection Ok */ ++ return entry->vcc; ++ } ++ if (entry->status == ESI_UNKNOWN) { ++ /* We want arp-request to be sent */ ++ entry->status = ESI_ARP_PENDING; ++ entry->timestamp = jiffies; ++ entry->no_tries = 1; ++ entry->packets_flooded=1; ++ send_to_lecd(l_arp_xmt, mac_to_find, NULL); ++ del_timer(&entry->timer); ++ entry->timer.expires = jiffies + (1*HZ); ++ entry->timer.function = lec_arp_expire_arp; ++ add_timer(&entry->timer); ++ return mcast_vcc; ++ } ++ /* Data direct VC not yet set up, check to see if the unknown ++ frame count is greater than the limit. If the limit has ++ not been reached, allow the caller to send packet to ++ BUS. */ ++ if (entry->packets_flooded < lec_maximum_unknown_frame_count) { ++ entry->packets_flooded++; ++ DPRINTK("LEC_ARP: Flooding..\n"); ++ return mcast_vcc; ++ } ++ return NULL; ++ } else { ++ /* No matching entry was found */ ++ entry = make_entry(mac_to_find); ++ DPRINTK("LEC_ARP: Making entry\n"); ++ if (!entry) { ++ return mcast_vcc; ++ } ++ entry->packets_flooded =1; ++ entry->status = ESI_ARP_PENDING; ++ entry->no_tries = 1; ++ entry->last_used = entry->timestamp = jiffies; ++ send_to_lecd(l_arp_xmt, mac_to_find, NULL); ++ ++ entry->timer.expires = jiffies + (1*HZ); ++ add_timer(&entry->timer); ++ lec_arp_put(entry); ++ return mcast_vcc; ++ } ++} ++ ++/* ++ * Add permanent entry to arp table. ++ */ ++struct lec_arp_table* ++lec_add_permanent(unsigned char *mac_addr, unsigned char *atmaddr) ++{ ++ struct lec_arp_table *to_add; ++ ++ to_add = make_entry(mac_addr); ++ if (!to_add) { ++ return NULL; ++ } ++ memcpy(to_add->atm_addr, atmaddr, ATM_ESA_LEN); ++ to_add->flags |= LEC_PERMANENT_FLAG; ++ to_add->last_used = jiffies; ++ /* Connection forming must be started */ ++ send_to_lecd(l_svc_setup, NULL, atmaddr); ++ lec_arp_lock(); ++ lec_arp_put(to_add); ++ lec_arp_unlock(); ++ return to_add; ++} ++ ++int ++lec_addr_delete(unsigned char *atm_addr, unsigned long permanent) ++{ ++ struct lec_arp_table *entry, *next; ++ int i; ++ ++ lec_arp_lock(); ++ printk("lec_addr_delete\n"); ++ for(i=0;inext; ++ if (!memcmp(atm_addr, entry->atm_addr, ATM_ESA_LEN) ++ && (permanent || ++ !(entry->flags & LEC_PERMANENT_FLAG))) ++ lec_arp_remove(entry); ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ lec_arp_unlock(); ++ return 0; ++ } ++ } ++ lec_arp_unlock(); ++ return -1; ++} ++ ++/* ++ * Notifies: Response to arp_request (atm_addr != NULL) ++ */ ++void ++lec_arp_update(unsigned char *mac_addr, ++ unsigned char *atm_addr, ++ unsigned long remoteflag) ++{ ++ struct lec_arp_table *entry, *tmp; ++ int i; ++ ++ lec_arp_lock(); ++ ++ if (lec_arp_empty_ones) { ++ entry = lec_arp_empty_ones; ++ if (!memcmp(entry->atm_addr, atm_addr, ATM_ESA_LEN)) { ++ lec_arp_empty_ones = entry->next; ++ } else { ++ while(entry->next && memcmp(entry->next->atm_addr, ++ atm_addr, ATM_ESA_LEN)) ++ entry = entry->next; ++ if (entry->next) { ++ tmp = entry; ++ entry = entry->next; ++ tmp->next = entry->next; ++ } else ++ entry = NULL; ++ ++ } ++ if (entry) { ++ del_timer(&entry->timer); ++ tmp = lec_arp_find(mac_addr); ++ if (tmp) { ++ del_timer(&tmp->timer); ++ tmp->status = ESI_FORWARD_DIRECT; ++ memcpy(tmp->atm_addr, atm_addr, ATM_ESA_LEN); ++ tmp->vcc = entry->vcc; ++ tmp->old_push = entry->old_push; ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ entry=tmp; ++ } else { ++ entry->status = ESI_FORWARD_DIRECT; ++ memcpy(entry->mac_addr, mac_addr, ETH_ALEN); ++ lec_arp_put(tmp); ++ } ++ if (remoteflag) ++ entry->flags|=LEC_REMOTE_FLAG; ++ else ++ entry->flags&=~LEC_REMOTE_FLAG; ++ lec_arp_unlock(); ++ return; ++ } ++ } ++ entry = lec_arp_find(mac_addr); ++ if (!entry) { ++ entry = make_entry(mac_addr); ++ memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN); ++ entry->status = ESI_UNKNOWN; ++ lec_arp_put(entry); ++ /* Temporary, changes before end of function */ ++ } ++ memcpy(entry->atm_addr, atm_addr, ATM_ESA_LEN); ++ del_timer(&entry->timer); ++ for(i=0;inext) { ++ if (entry != tmp && ++ !memcmp(tmp->atm_addr, atm_addr, ++ ATM_ESA_LEN)) { ++ /* Vcc to this host exists */ ++ if (tmp->status > ESI_VC_PENDING) { ++ /* ++ * ESI_FLUSH_PENDING, ++ * ESI_FORWARD_DIRECT ++ */ ++ entry->vcc = tmp->vcc; ++ entry->old_push=tmp->old_push; ++ } ++ entry->status=tmp->status; ++ break; ++ } ++ } ++ } ++ if (remoteflag) ++ entry->flags|=LEC_REMOTE_FLAG; ++ else ++ entry->flags&=~LEC_REMOTE_FLAG; ++ if (entry->status == ESI_ARP_PENDING || ++ entry->status == ESI_UNKNOWN) { ++ entry->status = ESI_VC_PENDING; ++ send_to_lecd(l_svc_setup, NULL, atm_addr); ++ } ++ lec_arp_unlock(); ++} ++ ++/* ++ * Notifies: Vcc setup ready ++ */ ++void ++lec_vcc_added(struct atmlec_ioc *ioc_data, ++ struct atm_vcc *vcc, ++ void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb)) ++{ ++ struct lec_arp_table *entry; ++ int i, found_entry=0; ++ unsigned char bus_mac[ETH_ALEN] = { 0xff, 0xff, 0xff, 0xff, 0xff,0xff}; ++ ++ lec_arp_lock(); ++ if (ioc_data->receive == 2) { ++ /* Vcc for BUS distribute */ ++ DPRINTK("LEC_ARP: Attaching mcast distribute\n"); ++ entry = lec_arp_find(bus_mac); ++ if (!entry) { ++ printk("LEC_ARP: Multicast entry not found!\n"); ++ lec_arp_unlock(); ++ return; ++ } ++ memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); ++ entry->recv_vcc = vcc; ++ entry->old_recv_push = old_push; ++ lec_arp_unlock(); ++ return; ++ } else if (ioc_data->receive == 1) { ++ /* Vcc which we don't want to make default vcc, attach it ++ anyway. */ ++ DPRINTK("LEC_ARP:Attaching data direct, not default :%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", ++ ioc_data->atm_addr[0],ioc_data->atm_addr[1], ++ ioc_data->atm_addr[2],ioc_data->atm_addr[3], ++ ioc_data->atm_addr[4],ioc_data->atm_addr[5], ++ ioc_data->atm_addr[6],ioc_data->atm_addr[7], ++ ioc_data->atm_addr[8],ioc_data->atm_addr[9], ++ ioc_data->atm_addr[10],ioc_data->atm_addr[11], ++ ioc_data->atm_addr[12],ioc_data->atm_addr[13], ++ ioc_data->atm_addr[14],ioc_data->atm_addr[15], ++ ioc_data->atm_addr[16],ioc_data->atm_addr[17], ++ ioc_data->atm_addr[18],ioc_data->atm_addr[19]); ++ entry = make_entry(bus_mac); ++ memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); ++ memset(entry->mac_addr, 0, ETH_ALEN); ++ entry->recv_vcc = vcc; ++ entry->old_recv_push = old_push; ++ entry->status = ESI_UNKNOWN; ++ entry->timer.expires = jiffies + lec_vcc_timeout_period; ++ entry->timer.function = lec_arp_expire_vcc; ++ entry->next = lec_no_forward; ++ lec_no_forward = entry; ++ lec_arp_unlock(); ++ return; ++ } ++ DPRINTK("LEC_ARP:Attaching data direct, default:%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", ++ ioc_data->atm_addr[0],ioc_data->atm_addr[1], ++ ioc_data->atm_addr[2],ioc_data->atm_addr[3], ++ ioc_data->atm_addr[4],ioc_data->atm_addr[5], ++ ioc_data->atm_addr[6],ioc_data->atm_addr[7], ++ ioc_data->atm_addr[8],ioc_data->atm_addr[9], ++ ioc_data->atm_addr[10],ioc_data->atm_addr[11], ++ ioc_data->atm_addr[12],ioc_data->atm_addr[13], ++ ioc_data->atm_addr[14],ioc_data->atm_addr[15], ++ ioc_data->atm_addr[16],ioc_data->atm_addr[17], ++ ioc_data->atm_addr[18],ioc_data->atm_addr[19]); ++ for (i=0;inext) { ++ if (memcmp(ioc_data->atm_addr, entry->atm_addr, ++ ATM_ESA_LEN)==0) { ++ DPRINTK("LEC_ARP: Attaching data direct\n"); ++ DPRINTK("Currently -> Vcc: %d, Rvcc:%d\n", ++ entry->vcc?entry->vcc->vci:0, ++ entry->recv_vcc?entry->recv_vcc:0); ++ found_entry=1; ++ del_timer(&entry->timer); ++ if (vcc) { ++ lec_arp_clear_vccs(entry); ++ } ++ entry->vcc = vcc; ++ entry->old_push = old_push; ++ if (entry->status == ESI_VC_PENDING) { ++ if (lec_maximum_unknown_frame_count==0) ++ entry->status = ++ ESI_FORWARD_DIRECT; ++ else { ++ entry->timestamp = jiffies; ++ entry->status = ++ ESI_FLUSH_PENDING; ++ send_to_lecd(l_flush_xmt, ++ entry->mac_addr, ++ entry->atm_addr); ++ } ++ } else { ++ /* They were forming a connection ++ to us, and we to them. Our ++ ATM address is numerically lower ++ than theirs, so we make connection ++ we formed into default VCC (8.1.11). ++ Connection they made gets torn ++ down. This might confuse some ++ clients. Can be changed if ++ someone reports trouble... */ ++ ; ++ } ++ } ++ } ++ } ++ if (found_entry) { ++ lec_arp_unlock(); ++ dump_arp_table(); ++ return; ++ } ++ /* Not found, snatch address from first data packet that arrives from ++ this vcc */ ++ entry = make_entry(bus_mac); ++ entry->vcc = vcc; ++ entry->old_push = old_push; ++ memcpy(entry->atm_addr, ioc_data->atm_addr, ATM_ESA_LEN); ++ memset(entry->mac_addr, 0, ETH_ALEN); ++ entry->status = ESI_UNKNOWN; ++ entry->next = lec_arp_empty_ones; ++ lec_arp_empty_ones = entry; ++ entry->timer.expires = jiffies + lec_vcc_timeout_period; ++ entry->timer.function = lec_arp_expire_vcc; ++ add_timer(&entry->timer); ++ lec_arp_unlock(); ++} ++ ++void ++lec_flush_complete(unsigned char *atm_addr, unsigned long tran_id) ++{ ++ struct lec_arp_table *entry; ++ int i; ++ ++ for (i=0;inext) { ++ if (memcmp(atm_addr, entry->atm_addr,ATM_ESA_LEN)==0 && ++ entry->flush_tran_id == tran_id) { ++ entry->status = ESI_FORWARD_DIRECT; ++ return; ++ } ++ } ++ } ++ printk("LEC_ARP: Flush_complete: entry not found : %2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x%2.2x\n", ++ 0xff&atm_addr[0],0xff&atm_addr[1],0xff&atm_addr[2], ++ 0xff&atm_addr[3],0xff&atm_addr[4],0xff&atm_addr[5], ++ 0xff&atm_addr[6],0xff&atm_addr[7],0xff&atm_addr[8], ++ 0xff&atm_addr[9],0xff&atm_addr[10],0xff&atm_addr[11], ++ 0xff&atm_addr[12],0xff&atm_addr[13],0xff&atm_addr[14], ++ 0xff&atm_addr[15],0xff&atm_addr[16],0xff&atm_addr[17], ++ 0xff&atm_addr[18],0xff&atm_addr[19]); ++} ++ ++void ++lec_topology_flag_change_set(unsigned long topology_change_flag) ++{ ++ lec_topology_change = topology_change_flag; ++} ++ ++void ++lec_set_flush_tran_id(unsigned char *mac_addr, unsigned long tran_id) ++{ ++ struct lec_arp_table *entry; ++ ++ entry = lec_arp_find(mac_addr); ++ if (!entry) { ++ printk("LEC_ARP: Set_flush_tran_id: entry not found\n"); ++ return; ++ } ++ entry->flush_tran_id = tran_id; ++} ++ ++int ++lec_mcast_attach(struct atm_vcc *vcc) ++{ ++ unsigned char mac_addr[] = { ++ 0xff, 0xff, 0xff, 0xff, 0xff, 0xff }; ++ struct lec_arp_table *to_add; ++ ++ lec_arp_lock(); ++ to_add = make_entry(mac_addr); ++ if (!to_add) ++ return -ENOMEM; ++ to_add->status = ESI_FORWARD_DIRECT; ++ to_add->flags |= LEC_PERMANENT_FLAG; ++ to_add->vcc = vcc; ++ to_add->old_push = vcc->push; ++ vcc->push = lec_push; ++ mcast_vcc = vcc; ++ lec_arp_put(to_add); ++ lec_arp_unlock(); ++ return 0; ++} ++ ++void ++lec_config(struct atmlec_config_msg *conf) ++{ ++ lec_maximum_unknown_frame_count = conf->maximum_unknown_frame_count; ++ lec_max_unknown_frame_time = (conf->max_unknown_frame_time*HZ); ++ lec_max_retry_count = conf->max_retry_count; ++ lec_aging_time = (conf->aging_time*HZ); ++ lec_forward_delay_time = (conf->forward_delay_time*HZ); ++ lec_arp_response_time = (conf->arp_response_time*HZ); ++ lec_flush_timeout = (conf->flush_timeout*HZ); ++ lec_path_switching_delay = (conf->path_switching_delay*HZ); ++} ++ ++void ++lec_vcc_close(struct atm_vcc *vcc) ++{ ++ struct lec_arp_table *entry, *next; ++ int i; ++ ++ DPRINTK("LEC_ARP: lec_vcc_close vpi:%d vci:%d\n",vcc->vpi,vcc->vci); ++ dump_arp_table(); ++ lec_arp_lock(); ++ for(i=0;inext; ++ if (vcc == entry->vcc) { ++ lec_arp_remove(entry); ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ if (mcast_vcc == vcc) { ++ mcast_vcc = NULL; ++ } ++ } else if (vcc == entry->recv_vcc) { ++ /* Bus distribution closed */ ++ mcast_vcc = NULL; ++ lec_arp_remove(entry); ++ lec_arp_unlock(); ++ vcc->push(vcc, NULL); ++ return; ++ } ++ } ++ } ++ entry=lec_arp_empty_ones; ++ while(entry && entry->vcc==vcc) { ++ lec_arp_clear_vccs(entry); ++ lec_arp_empty_ones=entry->next; ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ entry=lec_arp_empty_ones; ++ } ++ for(;entry!=NULL;entry=next) { ++ next=entry->next; ++ if (vcc == next->vcc) { ++ lec_arp_clear_vccs(next); ++ entry->next = next->next; ++ kfree_s(next, sizeof(struct lec_arp_table)); ++ } ++ } ++ entry=lec_no_forward; ++ while(entry && entry->recv_vcc==vcc) { ++ lec_arp_clear_vccs(entry); ++ lec_no_forward=entry->next; ++ kfree_s(entry, sizeof(struct lec_arp_table)); ++ entry=lec_no_forward; ++ } ++ for(;entry!=NULL;entry=next) { ++ next=entry->next; ++ if (vcc == next->recv_vcc) { ++ lec_arp_clear_vccs(next); ++ entry->next = next->next; ++ kfree_s(next, sizeof(struct lec_arp_table)); ++ } ++ } ++ lec_arp_unlock(); ++} ++ ++void ++lec_arp_check_empties(struct atm_vcc *vcc, struct sk_buff *skb) ++{ ++ struct lec_arp_table *entry, *prev; ++ struct lecdatahdr_8023 *hdr = (struct lecdatahdr_8023 *)skb->data; ++ ++ lec_arp_lock(); ++ entry = lec_arp_empty_ones; ++ if (vcc == entry->vcc) { ++ del_timer(&entry->timer); ++ memcpy(entry->mac_addr, hdr->h_source, ETH_ALEN); ++ entry->status = ESI_FORWARD_DIRECT; ++ lec_arp_empty_ones = entry->next; ++ /* We might have got an entry */ ++ if ((prev=lec_arp_find(hdr->h_source))) { ++ lec_arp_remove(prev); ++ kfree_s(prev, sizeof(struct lec_arp_table)); ++ } ++ lec_arp_put(entry); ++ lec_arp_unlock(); ++ return; ++ } ++ prev = entry; ++ entry = entry->next; ++ while (entry && entry->vcc != vcc) { ++ prev= entry; ++ entry = entry->next; ++ } ++ if (!entry) { ++ DPRINTK("LEC_ARP: Arp_check_empties: entry not found!\n"); ++ lec_arp_unlock(); ++ return; ++ } ++ del_timer(&entry->timer); ++ memcpy(entry->mac_addr, hdr->h_source, ETH_ALEN); ++ entry->status = ESI_FORWARD_DIRECT; ++ prev->next = entry->next; ++ if ((prev = lec_arp_find(hdr->h_source))) { ++ lec_arp_remove(prev); ++ kfree_s(prev, sizeof(struct lec_arp_table)); ++ } ++ lec_arp_put(entry); ++ lec_arp_unlock(); ++} ++ +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/net/atm/lec_arpc.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,104 @@ ++/* ++ * Lec arp cache ++ * Marko Kiiskila carnil@cs.tut.fi ++ * ++ */ ++#ifndef _LEC_ARP_H ++#define _LEC_ARP_H ++#include ++#include ++#include ++#include ++ ++struct lec_arp_table { ++ struct lec_arp_table *next; /* Linked entry list */ ++ unsigned char atm_addr[ATM_ESA_LEN]; /* Atm address */ ++ unsigned char mac_addr[ETH_ALEN]; /* Mac address */ ++ struct atm_vcc *vcc; /* Vcc this entry is attached */ ++ struct atm_vcc *recv_vcc; /* Vcc we receive data from */ ++ void (*old_push)(struct atm_vcc *vcc,struct sk_buff *skb); ++ /* Push that leads to daemon */ ++ void (*old_recv_push)(struct atm_vcc *vcc, struct sk_buff *skb); ++ /* Push that leads to daemon */ ++ void (*old_close)(struct atm_vcc *vcc); ++ /* We want to see when this ++ * vcc gets closed */ ++ unsigned long last_used; /* For expiry */ ++ unsigned long timestamp; /* Used for various timestamping ++ * things: ++ * 1. FLUSH started ++ * (status=ESI_FLUSH_PENDING) ++ * 2. Counting to ++ * max_unknown_frame_time ++ * (status=ESI_ARP_PENDING|| ++ * status=ESI_VC_PENDING) ++ */ ++ unsigned char no_tries; /* No of times arp retry has been ++ tried */ ++ unsigned char status; /* Status of this entry */ ++ unsigned short flags; /* Flags for this entry */ ++ unsigned short packets_flooded; /* Data packets flooded */ ++ unsigned long flush_tran_id; /* Transaction id in flush protocol */ ++ struct timer_list timer; /* Arping timer */ ++}; ++ ++/* Status fields */ ++#define ESI_UNKNOWN 0 /* ++ * Next packet sent to this mac address ++ * causes ARP-request to be sent ++ */ ++#define ESI_ARP_PENDING 1 /* ++ * There is no ATM address associated with this ++ * 48-bit address. The LE-ARP protocol is in ++ * progress. ++ */ ++#define ESI_VC_PENDING 2 /* ++ * There is a valid ATM address associated with ++ * this 48-bit address but there is no VC set ++ * up to that ATM address. The signaling ++ * protocol is in process. ++ */ ++#define ESI_FLUSH_PENDING 4 /* ++ * The LEC has been notified of the FLUSH_START ++ * status and it is assumed that the flush ++ * protocol is in process. ++ */ ++#define ESI_FORWARD_DIRECT 5 /* ++ * Either the Path Switching Delay (C22) has ++ * elapsed or the LEC has notified the Mapping ++ * that the flush protocol has completed. In ++ * either case, it is safe to forward packets ++ * to this address via the data direct VC. ++ */ ++ ++/* Flag values */ ++#define LEC_REMOTE_FLAG 0x0001 ++#define LEC_PERMANENT_FLAG 0x0002 ++ ++/* Hash table size */ ++#define LEC_ARP_TABLE_SIZE 16 ++ ++/* Protos */ ++void lec_reset(void); ++void lec_arp_init(void); ++int lec_mcast_attach(struct atm_vcc *vcc); ++void lec_arp_destroy(void); ++void lec_vcc_close(struct atm_vcc *vcc); ++ ++struct atm_vcc *lec_arp_resolve(unsigned char *mac_to_addr); ++void lec_vcc_added(struct atmlec_ioc *ioc_data, struct atm_vcc *vcc, ++ void (*old_push)(struct atm_vcc *vcc, struct sk_buff *skb)); ++void lec_arp_check_empties(struct atm_vcc *vcc, struct sk_buff *skb); ++struct lec_arp_table *lec_add_permanent(unsigned char *mac_addr, ++ unsigned char *atmaddr); ++int lec_addr_delete(unsigned char *mac_addr, unsigned long permanent); ++void lec_topology_flag_change_set(unsigned long topology_change_flag); ++void lec_flush_complete(unsigned char *atm_addr, unsigned long tran_id); ++void lec_arp_update(unsigned char *mac_addr, unsigned char *atm_addr, ++ unsigned long remoteflag); ++void lec_set_flush_tran_id(unsigned char *mac_addr, unsigned long tran_id); ++void lec_config(struct atmlec_config_msg *conf); ++void lec_arp_check(unsigned char *to_check); ++void lec_proc_info(char *buf); ++ ++#endif +--- ref/include/net/route.h Sun Jun 9 11:28:48 1996 ++++ work/include/net/route.h Wed Jul 31 19:33:37 1996 +@@ -26,6 +26,7 @@ + #define _ROUTE_H + + #include ++#include + + /* + * 0 - no debugging messages +@@ -158,11 +159,17 @@ + #endif + #endif + ++ + extern __inline__ struct rtable * ip_check_route(struct rtable ** rp, + __u32 daddr, int local) + { + struct rtable * rt = *rp; + ++#ifdef CONFIG_AREQUIPA ++ extern struct device *arequipa_dev; ++ ++ if (rt && rt->rt_dev == arequipa_dev) return rt; ++#endif + if (!rt || rt->rt_dst != daddr || !(rt->rt_flags&RTF_UP) + || ((local==1)^((rt->rt_flags&RTF_LOCAL) != 0))) + { +@@ -172,6 +179,35 @@ + } + return rt; + } ++ ++ ++extern __inline__ void set_rt_cache(struct sock *sk,struct rtable *rt) ++{ ++#ifndef CONFIG_AREQUIPA ++ sk->ip_route_cache = rt; ++#else ++ extern struct rtable arequipa_rt; ++ ++ if (!sk->arequipa) { ++ sk->ip_route_cache = rt; ++ return; ++ } ++ if (!sk->aq_route) { ++ printk(KERN_CRIT "set_rt_cache: !sk->aq_route\n"); ++ sk->ip_route_cache = rt; ++ return; ++ } ++#if 0 /* only needed if preloading the route cache for Arequipa */ ++ if (sk->ip_route_cache) ip_rt_put(sk->ip_route_cache); ++#endif ++ sk->ip_route_cache = NULL; ++ if (!rt) return; ++ *sk->aq_route = arequipa_rt; ++ sk->ip_route_cache = sk->aq_route; ++ sk->aq_route->rt_src = rt->rt_src; ++ ip_rt_put(rt); ++#endif ++} + + + #endif /* _ROUTE_H */ +--- ref/include/net/sock.h Sun Jun 9 11:25:41 1996 ++++ work/include/net/sock.h Wed Jul 31 19:30:44 1996 +@@ -251,8 +251,8 @@ + unsigned char max_ack_backlog; + unsigned char priority; + unsigned char debug; +- unsigned short rcvbuf; +- unsigned short sndbuf; ++ unsigned long rcvbuf; ++ unsigned long sndbuf; + unsigned short type; + unsigned char localroute; /* Route locally only */ + #ifdef CONFIG_AX25 +@@ -301,7 +301,13 @@ + int ip_mc_loop; /* Loopback */ + char ip_mc_name[MAX_ADDR_LEN];/* Multicast device name */ + struct ip_mc_socklist *ip_mc_list; /* Group array */ +-#endif ++#endif ++#ifdef CONFIG_AREQUIPA ++ struct socket *arequipa; /* dedicated link layer socket, ++ NULL if not connected */ ++ struct rtable *aq_route; /* buffer for fake route, NULL ++ if neither present nor expect */ ++#endif + + /* + * This part is used for the timeout functions (timer.c). +--- /dev/null Mon Jul 18 01:46:18 1994 ++++ work/include/linux/arequipa.h Wed Jul 31 19:34:38 1996 +@@ -0,0 +1,45 @@ ++/* arequipa.h - Arequipa interface definitions */ ++ ++/* Written 1996 by Jean-Michel Pittet and Werner Almesberger, EPFL LRC */ ++ ++ ++#ifndef _LINUX_AREQUIPA_H ++#define _LINUX_AREQUIPA_H ++ ++#include ++ ++ ++#define AREQUIPA_PRESET _IO('a',ATMIOC_AREQUIPA) ++#define AREQUIPA_INCOMING _IO('a',ATMIOC_AREQUIPA+1) ++#define AREQUIPA_EXPECT _IO('a',ATMIOC_AREQUIPA+2) ++#define AREQUIPA_CLOSE _IO('a',ATMIOC_AREQUIPA+3) ++#define AREQUIPA_CTRL _IO('a',ATMIOC_AREQUIPA+4) ++#define AREQUIPA_CLS3RD _IO('a',ATMIOC_AREQUIPA+5) ++ ++ ++#ifdef __KERNEL__ ++ ++#include ++#include ++#include ++#include ++ ++ ++extern struct atm_vcc *aqd; /* for net/atm/proc.c */ ++/* extern struct rtable arequipa_rt; - not needed */ ++extern struct device *arequipa_dev; ++ ++int atm_init_arequipa(void); ++int arequipa_attach(struct socket *lower,struct sock *upper); ++ ++int arequipa_preset(struct socket *lower,struct sock *upper); ++int arequipa_expect(struct sock *upper,int on); ++int arequipa_incoming(struct socket *lower); ++int arequipa_close(struct sock *upper); ++ ++int arequipad_attach(struct atm_vcc *vcc); ++void arequipa_close_vcc(struct atm_vcc *vcc); ++ ++#endif /* __KERNEL__ */ ++ ++#endif +--- ref/net/socket.c Thu Jun 6 20:22:25 1996 ++++ work/net/socket.c Mon Jun 10 18:30:51 1996 +@@ -778,7 +778,7 @@ + sock_release(newsock); + return(-EINVAL); + } +- sock->file=current->files->fd[fd]; ++ newsock->file=current->files->fd[fd]; + + if (upeer_sockaddr) + { +--- ref/net/ipv4/tcp_input.c Sun Jun 9 10:39:09 1996 ++++ work/net/ipv4/tcp_input.c Mon Jun 10 17:36:44 1996 +@@ -33,6 +33,11 @@ + #include + #include + ++#ifdef CONFIG_AREQUIPA ++#include ++#include ++#endif ++ + /* + * Policy code extracted so it's now separate + */ +@@ -415,6 +420,24 @@ + return; + } + } ++#ifdef CONFIG_AREQUIPA ++ newsk->arequipa = NULL; ++ if (sk->aq_route) { ++ newsk->aq_route = kmalloc(sizeof(struct rtable),GFP_ATOMIC); ++ if (newsk->aq_route) { ++ if (dev == arequipa_dev) ++ (void) arequipa_attach(skb->atm.vcc->sock, ++ newsk); ++ } ++ else { ++ if (sk->opt) kfree(sk->opt); ++ kfree_s(newsk,sizeof(*sk)); ++ tcp_statistics.TcpAttemptFails++; ++ kfree_skb(skb,FREE_READ); ++ return; ++ } ++ } ++#endif + skb_queue_head_init(&newsk->write_queue); + skb_queue_head_init(&newsk->receive_queue); + newsk->send_head = NULL; +@@ -516,7 +539,7 @@ + */ + + rt = ip_rt_route(newsk->opt && newsk->opt->srr ? newsk->opt->faddr : saddr, 0); +- newsk->ip_route_cache = rt; ++ set_rt_cache(newsk,rt); + + if(rt!=NULL && (rt->rt_flags&RTF_WINDOW)) + newsk->window_clamp = rt->rt_window; +@@ -1771,6 +1794,12 @@ + skb->free = 1; + skb->saddr = daddr; + skb->daddr = saddr; ++ ++#ifdef CONFIG_AREQUIPA ++ if (dev == arequipa_dev && !sk->arequipa && sk->aq_route && ++ sk->state == TCP_ESTABLISHED) ++ (void) arequipa_attach(skb->atm.vcc->sock,sk); ++#endif + + /* + * We may need to add it to the backlog here. diff -ur --new-file old/atm/doc/usage.tex new/atm/doc/usage.tex --- old/atm/doc/usage.tex Fri Jul 19 15:43:12 1996 +++ new/atm/doc/usage.tex Wed Jul 31 18:25:35 1996 @@ -1,7 +1,7 @@ %%def%:= %:\begin{verbatim} -%:Usage instructions - ATM on Linux, release 0.14 (pre-alpha) +%:Usage instructions - ATM on Linux, release 0.15 (pre-alpha) %:------------------------------------------------------------- %: %:\end{verbatim} @@ -38,14 +38,14 @@ \title{ATM on Linux \\ User's guide \\ - Release 0.14 (pre-alpha)} + Release 0.15 (pre-alpha)} \author{Werner Almesberger \\ {\tt werner.almesberger@lrc.di.epfl.ch} \\ \\ Laboratoire de R\'eseaux de Communication (LRC) \\ EPFL, CH-1015 Lausanne, Switzerland} -\date{July 19, 1996} +\date{July 31, 1996} \begin{document} \maketitle @@ -81,7 +81,7 @@ In order to install this package, you need \begin{itemize} \item the package itself - \url{ftp://lrcftp.epfl.ch/pub/linux/atm/dist/atm-0.14.tar.gz} + \url{ftp://lrcftp.epfl.ch/pub/linux/atm/dist/atm-0.15.tar.gz} \item the Linux kernel, version 2.0, e.g. from \url{ftp://ftp.cs.helsinki.fi/pub/Software/Linux/Kernel/v2.0/linux-2.0.tar.gz} \item Perl, version 4 or 5 @@ -96,7 +96,7 @@ distribution: \begin{verbatim} -tar xfz atm-0.14.tar.gz +tar xfz atm-0.15.tar.gz \end{verbatim} and the kernel source: @@ -109,7 +109,7 @@ \begin{verbatim} cd linux -patch -s -p1 <../atm/atm-0.14.patch +patch -s -p1 <../atm/atm.patch \end{verbatim} The distribution installs into the following directories: @@ -117,8 +117,8 @@ \begin{description} \item[\path{atm/}] Documentation in ASCII format, kernel patch, top-level \name{Makefile}, and distribution scripts - \item[\path{atm/sigd/}] UNI 3.0 and UNI 3.1 signaling demon: \name{atmsigd}, - test program: \name{svc} + \item[\path{atm/sigd/}] UNI 3.0 and UNI 3.1 signaling demon: \name{atmsigd} + \item[\path{atm/saal/}] Signaling AAL library (SSCOP, SSCF, and SAAL) \item[\path{atm/qgen/}] Q.2931-style message handling \item[\path{atm/ilmid/}] ILMI address registration demon: \name{ilmid} \item[\path{atm/maint/}] ATM maintenance programs: \name{atmaddr}, @@ -160,9 +160,9 @@ \end{verbatim} The ``MMU hacks'' add single-copy support for raw AAL5 on adapters whose -driver supports this (currently only the ENI155p). It's generally a good -idea to enable extended debugging, although this might slow down the -drivers a bit. +driver supports this (currently only the ENI155p). Extended debugging should +only be enabled when tracing specific problems, because it slows down the +drivers, and it may introduce new race conditions. The TNETA1570 driver is for a board developed by Rolf Fiedler at TU Chemnitz, see also \url{ftp://ftp.infotech.tu-chemnitz.de/pub/linux-atm}. @@ -223,7 +223,8 @@ \end{verbatim} \verb"make install" will install executables in the directory -\path{/usr/local/bin}. Libraries and header files are installed in +\path{/usr/local/bin} and \path{/usr/local/sbin}, respectively. +Libraries and header files are installed in \path{/usr/lib} and \path{/usr/include}, respectively. Man pages are installed in \path{/usr/local/man}. @@ -452,9 +453,9 @@ \url{ftp://ftp.sgi.com/sgi/src/ttcp}. The following options have been added: \begin{description} - \item[\raw{-a}] use native ATM instead of UDP/TCP. (The address must be in - the format \raw{$[$\meta{itf}.$]$\meta{vpi}.\meta{vci}} for PVCs, or a valid - ATM end system address for SVCs.) + \item[\raw{-a}] use native ATM instead of UDP/TCP. The address must be in + the format \raw{$[$\meta{itf}.$]$\meta{vpi}.\meta{vci}} for PVCs, or a + valid ATM end system address for SVCs. \item[\raw{-P \meta{num}}] use a CBR connection with a peak cell rate of \meta{num} cells per second. Default is to use UBR. \item[\raw{-C}] disable (UDP) checksums @@ -578,9 +579,14 @@ If \name{atmsigd} is killed, all system calls requiring interaction with it will return with an error and set \name{errno} to \name{EUNATCH}. -Note that \name{atmsigd} provides only very limited functionality and not all -messages conform to UNI 3.1 yet. Signaling is known to work for Classical -IP over ATM with a Fore ASX-200 switch. +Note that \name{atmsigd} provides only very limited functionality. +Signaling is known to work for Classical IP over ATM with a Fore ASX-200 +switch. + +By default, \name{atmsigd} is configured to conform to UNI 3.0. It can be +compiled for UNI 3.1 by changing the \raw{STANDARDS=} line at the beginning +of \path{atm/Rules.make}, and running \raw{make clean; make} in +\path{atm/qgen} and \path{atm/sigd} (in this order). Note that \name{atmsigd} is configured to be paranoid. If it detects unusual problems, it frequently terminates. This will (obviously) change in the @@ -590,24 +596,15 @@ the current directory. %%% {\bf NOT YET DOCUMENTED} -The \name{svc} program is used to test SVCs: - -\begin{command} -svc \meta{atm\_address} -\end{command} - -attempts to set up a call to the specified destination (BHLI and BLLI -are omitted, so most end systems will refuse such calls). - -\begin{command} -svc -\end{command} - -listens for incoming calls (without BHLI nor BLLI) and accepts them. - \subsection{ILMI demon} +ILMI provides a mechanism for automatic address configuration. If there is +no switch or if the switch doesn't support ILMI, the ATM addresses must +be configured manually (see section \ref{atmaddr}). Note that the ILMI +demon should not be used on interfaces where addresses are manually +configured. + The ILMI demon is started as follows: \begin{command} @@ -645,7 +642,8 @@ \label{atmaddr} If your switch doesn't support ILMI, you have to set the ATM address -manually on the switch and on the PC(s). Under Linux, use the +manually on the switch and on the PC(s). On the Linux side, make sure that +\name{ilmid} doesn't run, then use the \name{atmaddr} command to set the address: \begin{command} @@ -960,8 +958,7 @@ Arequipa (Application REQUested IP over ATM, \cite{Arequipa}) is an extension to IP over ATM that adds support for using direct ATM connections (with QOS parameters, etc.) to carry traffic between INET sockets. On a system that -should accept incoming Arequipa connections, the Arequipa demon has to be -started: +should use Arequipa connections, the Arequipa demon has to be started: \begin{command} \# arequipad \[-b\] \[-d\] \[-n\] @@ -977,6 +974,9 @@ The status of Arequipa connections is shown in \path{/proc/atm/arequipa}. +If \name{atmsigd} is not running, all attempts to use Arequipa fail and +the ioctls set \name{errno} to \name{EUNATCH}. + The following example illustrates the use of Arequipa with \name{ttcp\_atm}. A machine ``a'' sends data to a machine ``b'', which is also registered with that name in the DNS. Furthermore, ``b'' has an entry with the name ``b-atm'' @@ -990,6 +990,7 @@ then run on ``a'': \begin{verbatim} +# arequipad -b # ttcp_atm -t -s -Q b-atm b \end{verbatim} diff -ur --new-file old/atm/doc/usage.txt new/atm/doc/usage.txt --- old/atm/doc/usage.txt Fri Jul 19 15:43:40 1996 +++ new/atm/doc/usage.txt Wed Jul 31 18:58:08 1996 @@ -1,4 +1,4 @@ -Usage instructions - ATM on Linux, release 0.14 (pre-alpha) +Usage instructions - ATM on Linux, release 0.15 (pre-alpha) ------------------------------------------------------------- For updates of ATM on Linux, please check the Web page at @@ -17,7 +17,7 @@ In order to install this package, you need - the package itself - ftp://lrcftp.epfl.ch/pub/linux/atm/dist/atm-0.14.tar.gz + ftp://lrcftp.epfl.ch/pub/linux/atm/dist/atm-0.15.tar.gz - the Linux kernel, version 2.0, e.g. from ftp://ftp.cs.helsinki.fi/pub/Software/Linux/Kernel/v2.0/linux-2.0.tar.gz - Perl, version 4 or 5 @@ -31,7 +31,7 @@ all the files listed above there. Then extract the ATM on Linux distribution: -tar xfz atm-0.14.tar.gz +tar xfz atm-0.15.tar.gz and the kernel source: @@ -40,14 +40,14 @@ Finally, you can extract the ATM-related patches: cd linux -patch -s -p1 <../atm/atm-0.14.patch +patch -s -p1 <../atm/atm.patch The distribution installs into the following directories: atm/ Documentation in ASCII format, kernel patch, top-level Makefile, and distribution scripts - atm/sigd/ UNI 3.0 and UNI 3.1 signaling demon: atmsigd, test program: - svc + atm/sigd/ UNI 3.0 and UNI 3.1 signaling demon: atmsigd + atm/saal/ Signaling AAL library (SSCOP, SSCF, and SAAL) atm/qgen/ Q.2931-style message handling atm/ilmid/ ILMI address registration demon: ilmid atm/maint/ ATM maintenance programs: atmaddr, atmdiag, atmdump, atmtcp, @@ -84,9 +84,9 @@ Enable extended debugging (CONFIG_ATM_TNETA1570_DEBUG) The "MMU hacks" add single-copy support for raw AAL5 on adapters whose -driver supports this (currently only the ENI155p). It's generally a good -idea to enable extended debugging, although this might slow down the -drivers a bit. +driver supports this (currently only the ENI155p). Extended debugging +should only be enabled when tracing specific problems, because it slows +down the drivers, and it may introduce new race conditions. The TNETA1570 driver is for a board developed by Rolf Fiedler at TU Chemnitz, see also ftp://ftp.infotech.tu-chemnitz.de/pub/linux-atm . @@ -139,9 +139,10 @@ make make install -make install will install executables in the directory /usr/local/bin. -Libraries and header files are installed in /usr/lib and /usr/include, -respectively. Man pages are installed in /usr/local/man. +make install will install executables in the directory /usr/local/bin and +/usr/local/sbin, respectively. Libraries and header files are installed in +/usr/lib and /usr/include, respectively. Man pages are installed in +/usr/local/man. Device setup @@ -345,9 +346,9 @@ with this package. The original is on ftp://ftp.sgi.com/sgi/src/ttcp . The following options have been added: - -a use native ATM instead of UDP/TCP. (The address must be in the + -a use native ATM instead of UDP/TCP. The address must be in the format [.]. for PVCs, or a valid ATM end system - address for SVCs.) + address for SVCs. -P use a CBR connection with a peak cell rate of cells per second. Default is to use UBR. -C disable (UDP) checksums @@ -456,9 +457,13 @@ If atmsigd is killed, all system calls requiring interaction with it will return with an error and set errno to EUNATCH. -Note that atmsigd provides only very limited functionality and not all -messages conform to UNI 3.1 yet. Signaling is known to work for Classical -IP over ATM with a Fore ASX-200 switch. +Note that atmsigd provides only very limited functionality. Signaling is +known to work for Classical IP over ATM with a Fore ASX-200 switch. + +By default, atmsigd is configured to conform to UNI 3.0. It can be compiled +for UNI 3.1 by changing the STANDARDS= line at the beginning of +atm/Rules.make, and running make clean; make in atm/qgen and atm/sigd (in +this order). Note that atmsigd is configured to be paranoid. If it detects unusual problems, it frequently terminates. This will (obviously) change in the @@ -467,21 +472,16 @@ atmsigd also looks for a configuration file atmsigd.conf in the current directory. -The svc program is used to test SVCs: - - svc - -attempts to set up a call to the specified destination (BHLI and BLLI are -omitted, so most end systems will refuse such calls). - - svc - -listens for incoming calls (without BHLI nor BLLI) and accepts them. - ILMI demon ---------- +ILMI provides a mechanism for automatic address configuration. If there is +no switch or if the switch doesn't support ILMI, the ATM addresses must be +configured manually (see section "Manual address configuration"). Note that +the ILMI demon should not be used on interfaces where addresses are +manually configured. + The ILMI demon is started as follows: # ilmid [-b] [-d] [-l ] [-x] [] @@ -511,8 +511,8 @@ ---------------------------- If your switch doesn't support ILMI, you have to set the ATM address -manually on the switch and on the PC(s). Under Linux, use the atmaddr -command to set the address: +manually on the switch and on the PC(s). On the Linux side, make sure that +ilmid doesn't run, then use the atmaddr command to set the address: # atmaddr -a [] @@ -777,8 +777,7 @@ Arequipa (Application REQUested IP over ATM, [6]) is an extension to IP over ATM that adds support for using direct ATM connections (with QOS parameters, etc.) to carry traffic between INET sockets. On a system that -should accept incoming Arequipa connections, the Arequipa demon has to be -started: +should use Arequipa connections, the Arequipa demon has to be started: # arequipad [-b] [-d] [-n] @@ -789,6 +788,9 @@ The status of Arequipa connections is shown in /proc/atm/arequipa. +If atmsigd is not running, all attempts to use Arequipa fail and the ioctls +set errno to EUNATCH. + The following example illustrates the use of Arequipa with ttcp_atm. A machine "a" sends data to a machine "b", which is also registered with that name in the DNS. Furthermore, "b" has an entry with the name "b-atm" in the @@ -799,6 +801,7 @@ then run on "a": +# arequipad -b # ttcp_atm -t -s -Q b-atm b diff -ur --new-file old/atm/ip/clip.c new/atm/ip/clip.c --- old/atm/ip/clip.c Tue Jun 11 12:17:46 1996 +++ new/atm/ip/clip.c Mon Jul 29 13:34:00 1996 @@ -28,7 +28,7 @@ struct sockaddr_atmpvc addr; struct atm_qos qos; const char *name; - int s,null; + int s,null,itf; name = argv[0]; null = 0; @@ -44,10 +44,6 @@ perror("socket"); return 1; } - if (ioctl(s,CLIP_PVC,0) < 0) { - perror("ioctl CLIP_PVC"); - return 1; - } memset(&addr,0,sizeof(addr)); if (text2atm(argv[1],(struct sockaddr *) &addr,sizeof(addr),T2A_PVC) < 0) usage(argv[0]); @@ -68,10 +64,15 @@ perror("bind"); return 1; } + if ((itf = ioctl(s,CLIP_PVC,0)) < 0) { + perror("ioctl CLIP_PVC"); + return 1; + } if (null) if (ioctl(s,CLIP_NULENCAP,0) < 0) { perror("ioctl CLIP_NULENCAP"); return 1; } + printf("atm%d\n",itf); return 0; } diff -ur --new-file old/atm/lib/arequipa.c new/atm/lib/arequipa.c --- old/atm/lib/arequipa.c Thu Jun 6 13:16:53 1996 +++ new/atm/lib/arequipa.c Wed Jul 31 15:47:49 1996 @@ -19,20 +19,23 @@ struct atm_blli blli; int s; - if ((s = socket(PF_ATMSVC,SOCK_DGRAM,ATM_AAL5)) < 0) return -1; + if ((s = socket(addr->sas_family,SOCK_DGRAM,ATM_AAL5)) < 0) return -1; if (setsockopt(s,SOL_ATM,SO_ATMQOS,qos,sizeof(struct atm_qos)) < 0) { (void) close(s); return -1; } a = *addr; - a.sas_addr.bhli.hl_type = ATM_HL_USER; - a.sas_addr.bhli.hl_length = strlen("AREQ"); - strcpy(a.sas_addr.bhli.hl_info,"AREQ"); - a.sas_addr.blli = &blli; - blli.l2_proto = ATM_L2_ISO8802; - blli.l3_proto = ATM_L3_NONE; - blli.next = NULL; - if (connect(s,(struct sockaddr *) &a,sizeof(a)) < 0) { + if (a.sas_family == AF_ATMSVC) { + a.sas_addr.bhli.hl_type = ATM_HL_USER; + a.sas_addr.bhli.hl_length = strlen("AREQ"); + strcpy(a.sas_addr.bhli.hl_info,"AREQ"); + a.sas_addr.blli = &blli; + blli.l2_proto = ATM_L2_ISO8802; + blli.l3_proto = ATM_L3_NONE; + blli.next = NULL; + } + if (connect(s,(struct sockaddr *) &a,a.sas_family == AF_ATMSVC ? sizeof(a) + : sizeof(struct sockaddr_atmpvc)) < 0) { (void) close (s); return -1; } diff -ur --new-file old/atm/lib/atm2text.c new/atm/lib/atm2text.c --- old/atm/lib/atm2text.c Thu Mar 14 11:59:59 1996 +++ new/atm/lib/atm2text.c Fri Jul 19 18:01:50 1996 @@ -73,6 +73,10 @@ if (!*addr->sas_addr.pub && !*addr->sas_addr.prv) return FATAL; if (*addr->sas_addr.pub) { len = strlen(addr->sas_addr.pub); + if (!*addr->sas_addr.prv && length >= len+2) { + *buffer++ = '+'; + length--; + } if (length < len+1) return FATAL; strcpy(buffer,addr->sas_addr.pub); buffer += len; diff -ur --new-file old/atm/lib/text2atm.c new/atm/lib/text2atm.c --- old/atm/lib/text2atm.c Thu Apr 25 20:52:05 1996 +++ new/atm/lib/text2atm.c Fri Jul 19 17:47:57 1996 @@ -164,7 +164,7 @@ { int i,dot,result; - if (*text == ':') text++; + if (*text == ':' || *text == '+') text++; for (i = dot = 0; *text; text++) if (isdigit(*text)) { if (i == ATM_E164_LEN) return TRY_OTHER; /* too long */ diff -ur --new-file old/atm/maint/zntune.c new/atm/maint/zntune.c --- old/atm/maint/zntune.c Tue Jun 11 19:48:25 1996 +++ new/atm/maint/zntune.c Tue Jul 30 22:35:01 1996 @@ -92,13 +92,13 @@ return 1; } if (first) - printf("Pool Size Ref Low High Alarm Under Offs NxOf Count " + printf("Pool Size Ref Low High Alarm Under Offs NxOf Count " "Thres\n"); printf(" %2d ",i); size = 64 << (i < 2 ? 0 : i-2); if (size < 1024) printf("%4d",size); else printf("%3dk",size >> 10); - printf(" %3d %3d %4d %5d %5d %4d %4d%6d%6d\n", + printf(" %3d %3d %4d%8d%6d %4d %4d%6d%6d\n", req.info.ref_count,req.info.low_water,req.info.high_water, req.info.rqa_count,req.info.rqu_count,req.info.offset, req.info.next_off,req.info.next_cnt,req.info.next_thres); diff -ur --new-file old/atm/mkdiff new/atm/mkdiff --- old/atm/mkdiff Thu Jan 1 01:00:00 1970 +++ new/atm/mkdiff Wed Jul 31 19:44:59 1996 @@ -0,0 +1,80 @@ +#!/bin/sh +TMP=${TMPDIR:-/usr/tmp} +ARCH=/home/almesber/l/arch +KPATH=/usr/src:/home/almesber/k + +del_new=true +if [ "$1" = -keep -o "$1" = --keep ]; then + del_new=false + shift +fi +if [ -z "$*" ]; then + if [ ! -r VERSION ]; then + echo "need ./VERSION for fully automated procedure" 1>&2 + exit 1 + fi + read version &2 + exit 1 + fi +else + if [ -r "$1" ] && echo $1 | grep ^/ >/dev/null 2>&1; then + first=$1 + else + first=$ARCH/$1 + if [ ! -r $first ]; then + echo "$1: not found (also tried $first)" 1>&2 + exit 1 + fi + fi + if [ -r "$2" ] && echo $2 | grep ^/ >/dev/null 2>&1; then + second=$2 + else + second=`dirname $first`/$2 + if [ ! -r $second ]; then + echo "$2: not found (also tried $second)" 1>&2 + exit 1 + fi + fi +fi +echo $first '->' $second +cd $TMP || exit 1 +mkdir old new || exit 1 +cd old +tar xfz $first || exit 1 +cd ../new +tar xfz $second || exit 1 +cd .. +for n in old new; do + cd $n + { + read version + read version + } &2 + exit 1 + fi + tar xfz $m/$file || exit 1 + cd linux + patch -s -p1 <../atm/atm*.patch || exit 1 + find . -name \*.orig -exec rm {} \; + cd ../.. +done +base=`basename $second .tar.gz` +diff -ur --new-file old/linux new/linux >$base.kernel-diff +diff -ur --new-file old/atm new/atm >$base.dist-diff +gzip -9 -f $base.kernel-diff || exit 1 +gzip -9 -f $base.dist-diff || exit 1 +rm -rf old +if $del_new; then rm -rf new; fi diff -ur --new-file old/atm/mkdist new/atm/mkdist --- old/atm/mkdist Fri Jul 19 15:46:36 1996 +++ new/atm/mkdist Wed Jul 31 19:26:08 1996 @@ -7,7 +7,7 @@ cd $SRCDIR ./mkpatch ) -cp $SRCDIR/atm.patch atm-$VERSION.patch +cp $SRCDIR/atm.patch . cd doc make usage.txt cd ../.. @@ -15,15 +15,15 @@ atm/VERSION atm/README atm/README.DRIVERS atm/CREDITS atm/USAGE \ atm/CHANGES atm/BUGS \ atm/COPYING atm/COPYING.GPL \ - atm/Makefile atm/Rules.make atm/mkdist atm/.kernel \ + atm/Makefile atm/Rules.make atm/mkdist atm/mkdiff atm/.kernel \ atm/doc/README atm/doc/usage.tex atm/doc/usage.txt atm/doc/url.sty \ atm/doc/Makefile atm/doc/rlatex atm/doc/t2a.pl \ atm/sigd/Makefile atm/sigd/atmsigd.c atm/sigd/cfg.l atm/sigd/cfg.y \ atm/sigd/io.h atm/sigd/io.c atm/sigd/kernel.c atm/sigd/proto.h \ - atm/sigd/proto.c atm/sigd/q2931.c atm/sigd/saal.h atm/sigd/saal.c \ - atm/sigd/sscf.h atm/sigd/sscf.c atm/sigd/sscop.h atm/sigd/sscop.c \ - atm/sigd/timeout.c atm/sigd/timeout.h atm/sigd/svc.c \ + atm/sigd/proto.c atm/sigd/q2931.c atm/sigd/timeout.c atm/sigd/timeout.h \ atm/sigd/sap.h atm/sigd/sap.c atm/sigd/mkmess.pl \ + atm/saal/Makefile atm/saal/saal.h atm/saal/saal.c atm/saal/sscf.h \ + atm/saal/sscf.c atm/saal/sscop.h atm/saal/sscop.c \ atm/qgen/TODO atm/qgen/Makefile atm/qgen/common.h \ atm/qgen/common.c atm/qgen/file.h atm/qgen/file.c atm/qgen/first.c \ atm/qgen/second.c atm/qgen/third.c atm/qgen/op.h atm/qgen/qgen.h \ @@ -78,4 +78,4 @@ atm/led/address.c atm/led/conn.c atm/led/main.c atm/led/kernel_itf.c \ atm/led/Makefile \ atm/aqd/Makefile atm/aqd/arequipad.c atm/aqd/io.h atm/aqd/io.c \ - atm/atm-$VERSION.patch | gzip -9 >$ARCHDIR/atm-$VERSION.tar.gz + atm/atm.patch | gzip -9 >$ARCHDIR/atm-$VERSION.tar.gz diff -ur --new-file old/atm/qgen/Makefile new/atm/qgen/Makefile --- old/atm/qgen/Makefile Thu Jul 18 21:41:42 1996 +++ new/atm/qgen/Makefile Fri Jul 26 12:14:25 1996 @@ -2,7 +2,6 @@ OBJS=common.o file.o first.o lex.yy.o qgen.o second.o third.o y.tab.o TRASH=q.out.h q.out.c qd.out.c qd.dump.c PGMS=qgen q.out.o #qtest -STANDARDS=-DUNI31 -DALLOW_UNI30 include ../Rules.make diff -ur --new-file old/atm/qgen/qlib.c new/atm/qgen/qlib.c --- old/atm/qgen/qlib.c Tue Mar 12 17:40:48 1996 +++ new/atm/qgen/qlib.c Tue Jul 30 23:05:04 1996 @@ -182,6 +182,7 @@ perror("out of memory"); return -1; } + memset(dsc->length,0,sizeof(int)*Q_VARLEN_FIELDS); } dsc->error = 0; return 0; diff -ur --new-file old/atm/saal/Makefile new/atm/saal/Makefile --- old/atm/saal/Makefile Thu Jan 1 01:00:00 1970 +++ new/atm/saal/Makefile Wed Jul 31 14:37:04 1996 @@ -0,0 +1,11 @@ +LIBS= +OBJS=saal.o sscf.o sscop.o + +all: libsaal.a + +include ../Rules.make + +../saal/libsaal.a: libsaal.a + +libsaal.a: $(OBJS) + ar rcs libsaal.a $(OBJS) diff -ur --new-file old/atm/saal/saal.c new/atm/saal/saal.c --- old/atm/saal/saal.c Thu Jan 1 01:00:00 1970 +++ new/atm/saal/saal.c Wed Sep 27 15:14:45 1995 @@ -0,0 +1,13 @@ +/* saal.c - SAAL = SSCF+SSCOP */ + +/* Written 1995 by Werner Almesberger, EPFL-LRC */ + + +#include "sscop.h" +#include "saal.h" + + +void saal_pdu(SAAL_DSC *dsc,void *buffer,int length) +{ + sscop_pdu(&dsc->sscop,buffer,length); +} diff -ur --new-file old/atm/saal/saal.h new/atm/saal/saal.h --- old/atm/saal/saal.h Thu Jan 1 01:00:00 1970 +++ new/atm/saal/saal.h Wed Sep 27 11:07:23 1995 @@ -0,0 +1,24 @@ +/* saal.h - SAAL user interface */ + +/* Written 1995 by Werner Almesberger, EPFL-LRC */ + + +#ifndef SAAL_H +#define SAAL_H + +#include "sscf.h" +#include "sscop.h" + + +#define SAAL_DSC SSCF_DSC +#define SAAL_USER_OPS SSCF_USER_OPS +#define start_saal start_sscf +#define stop_saal stop_sscf +#define saal_estab_req sscf_estab_req +#define saal_rel_req sscf_rel_req +#define saal_send sscf_send +#define saal_unitdata sscf_unitdata + +void saal_pdu(SAAL_DSC *dsc,void *buffer,int length); + +#endif diff -ur --new-file old/atm/saal/sscf.c new/atm/saal/sscf.c --- old/atm/saal/sscf.c Thu Jan 1 01:00:00 1970 +++ new/atm/saal/sscf.c Fri Feb 9 17:36:05 1996 @@ -0,0 +1,278 @@ +/* sscf.c - SSCF (Q.2130) protocol */ + +/* Written 1995 by Werner Almesberger, EPFL-LRC */ + + +#include "atmd.h" + +#include "sscop.h" +#include "sscf.h" + + +#define COMPONENT "SSCF" + + +/* --- SSCOP configuration ------------------------------------------------- */ + + +#define SSCF_MaxCC 4 /* give up after 4 retries */ +#define SSCF_MaxPD 25 /* POLL after 25 SDs */ +#define SSCF_Timer_CC 1000000 /* 1 sec */ +#define SSCF_Timer_KEEPALIVE 2000000 /* 2 sec */ +#define SSCF_Timer_NORESP 7000000 /* 7 sec */ +#define SSCF_Timer_POLL 750000 /* 750 ms */ +#define SSCF_Timer_IDLE 15000000 /* 15 sec */ + + +static const char *state_name[] = { "1/2","2/2","4/10","3/4","2/5" }; + + +/* --- Helper function(s) -------------------------------------------------- */ + + +static void next_state(SSCF_DSC *dsc,SSCF_STATE state) +{ + diag(COMPONENT,DIAG_DEBUG,"entering state %s",state_name[state]); + dsc->state = state; +} + + +/* --- Invocation from SSCOP ----------------------------------------------- */ + + +static void sscf_estab_ind(void *user_data,void *uu_data,int uu_length) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_11) + diag(COMPONENT,DIAG_FATAL,"sscf_estab_ind in state %s", + state_name[dsc->state]); + next_state(dsc,sscf_410); + sscop_estab_resp(&dsc->sscop,NULL,0,1); + if (dsc->ops->estab_ind) dsc->ops->estab_ind(dsc->user,uu_data,uu_length); +} + + +static void sscf_estab_conf(void *user_data, + void *uu_data,int uu_length) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_22) + diag(COMPONENT,DIAG_FATAL,"sscf_estab_conf in state %s", + state_name[dsc->state]); + next_state(dsc,sscf_410); + if (dsc->ops->estab_conf) + dsc->ops->estab_conf(dsc->user,uu_data,uu_length); + +} + + +static void sscf_restart(void *user_data,void *uu_data,int uu_length,int ind) +{ + SSCF_DSC *dsc = user_data; + + if ((!ind && dsc->state != sscf_34) || (ind && (dsc->state == sscf_11 || + dsc->state == sscf_34))) + diag(COMPONENT,DIAG_FATAL,"sscf_restart (ind = %d) in state %s", + state_name[dsc->state],ind); + sscop_estab_resp(&dsc->sscop,NULL,0,1); + next_state(dsc,sscf_410); + if (dsc->ops->restart) dsc->ops->restart(dsc->user,uu_data,uu_length,ind); +} + + +static void sscf_rec_ind(void *user_data) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_410) + diag(COMPONENT,DIAG_FATAL,"sscf_rec_ind in state %s", + state_name[dsc->state]); + sscop_rec_resp(&dsc->sscop); + if (dsc->ops->estab_ind) dsc->ops->estab_ind(dsc->user,NULL,0); +} + + +static void sscf_rel_ind(void *user_data,void *uu_data,int uu_length,int user) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state == sscf_11 || dsc->state == sscf_34) + diag(COMPONENT,DIAG_FATAL,"sscf_rel_ind in state %s", + state_name[dsc->state]); + next_state(dsc,sscf_11); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,user ? uu_data : NULL,uu_length); +} + + +static void sscf_rel_conf(void *user_data) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_34) + diag(COMPONENT,DIAG_FATAL,"sscf_rel_conf in state %s", + state_name[dsc->state]); + next_state(dsc,sscf_11); + if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); +} + + +static void sscf_data_ind(void *user_data,void *data,int length,int sn) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_410) + diag(COMPONENT,DIAG_FATAL,"sscf_data_ind in state %s", + state_name[dsc->state]); + if (dsc->ops->data_ind) dsc->ops->data_ind(dsc->user,data,length); + +} + + +static void sscf_res_ind(void *user_data,void *uu_data,int uu_length) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_410) + diag(COMPONENT,DIAG_FATAL,"sscf_res_ind in state %s", + state_name[dsc->state]); + sscop_res_resp(&dsc->sscop); + if (dsc->ops->estab_ind) dsc->ops->estab_ind(dsc->user,uu_data,uu_length); +} + + +static void sscf_res_conf(void *user_data) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->state != sscf_25) + diag(COMPONENT,DIAG_FATAL,"sscf_res_conf in state %s", + state_name[dsc->state]); + next_state(dsc,sscf_410); + if (dsc->ops->estab_conf) dsc->ops->estab_conf(dsc->user,NULL,0); +} + + +static void sscf_unitdata_ind(void *user_data,void *data,int length) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->ops->unitdata) dsc->ops->unitdata(dsc->user,data,length); +} + + +static void sscf_cpcs_send(void *user_data,void *data,int length) +{ + SSCF_DSC *dsc = user_data; + + if (dsc->ops->cpcs_send) + dsc->ops->cpcs_send(dsc->user,data,length); +} + + +static SSCOP_USER_OPS sscf_ops = { + sscf_estab_ind, * + sscf_estab_conf, * + sscf_rel_ind, * + sscf_rel_conf, * + sscf_restart, + sscf_res_ind, + sscf_res_conf, + sscf_rec_ind, + sscf_data_ind, + sscf_unitdata_ind, + NULL, /* no retr_ind */ + NULL, /* no retr_comp */ + NULL, /* no maa_data */ + NULL, /* no maa_error */ + sscf_cpcs_send +}; + + +/* --- Invocation from user ------------------------------------------------ */ + + +void start_sscf(SSCF_DSC *dsc,SSCF_USER_OPS *ops,void *user_data) +{ + dsc->state = sscf_11; + dsc->ops = ops; + dsc->user = user_data; + start_sscop(&dsc->sscop,&sscf_ops,dsc); + dsc->sscop.cf_max_cc = SSCF_MaxCC; + dsc->sscop.cf_max_pd = SSCF_MaxPD; + dsc->sscop.cf_timer_cc = SSCF_Timer_CC; + dsc->sscop.cf_timer_poll = SSCF_Timer_POLL; + dsc->sscop.cf_timer_noresp = SSCF_Timer_NORESP; + dsc->sscop.cf_timer_keepalive = SSCF_Timer_KEEPALIVE; + dsc->sscop.cf_timer_idle = SSCF_Timer_IDLE; +} + + +void stop_sscf(SSCF_DSC *dsc) +{ + stop_sscop(&dsc->sscop); +} + + +void sscf_estab_req(SSCF_DSC *dsc,void *uu_data,int uu_length) +{ + switch (dsc->state) { + case sscf_11: + case sscf_34: + next_state(dsc,sscf_22); + sscop_estab_req(&dsc->sscop,uu_data,uu_length,1); + return; + case sscf_410: + next_state(dsc,sscf_25); + sscop_res_req(&dsc->sscop,uu_data,uu_length); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"sscf_estab_req invoked in state %s", + state_name[dsc->state]); +} + + +void sscf_rel_req(SSCF_DSC *dsc,void *uu_data,int uu_length) +{ + switch (dsc->state) { + case sscf_11: + if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); + return; + case sscf_22: + case sscf_410: + case sscf_25: + next_state(dsc,sscf_34); + sscop_rel_req(&dsc->sscop,uu_data,uu_length); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"sscf_rel_req invoked in state %s", + state_name[dsc->state]); +} + + +void sscf_send(SSCF_DSC *dsc,void *data,int length) +{ + switch (dsc->state) { + case sscf_11: + return; + case sscf_410: + sscop_send(&dsc->sscop,data,length); + return; + default: + break; + } + diag(COMPONENT,DIAG_WARN,"sscf_send invoked in state %s", + state_name[dsc->state]); /* make fatal later @@@ */ +} + + +void sscf_unitdata(SSCF_DSC *dsc,void *data,int length) +{ + sscop_unitdata(&dsc->sscop,data,length); +} diff -ur --new-file old/atm/saal/sscf.h new/atm/saal/sscf.h --- old/atm/saal/sscf.h Thu Jan 1 01:00:00 1970 +++ new/atm/saal/sscf.h Fri Oct 6 11:33:07 1995 @@ -0,0 +1,56 @@ +/* sscf.h - SSCF (Q.2130) user interface */ + +/* Written 1995 by Werner Almesberger, EPFL-LRC */ + + +#ifndef SSCF_H +#define SSCF_H + +#include "sscop.h" + + +typedef enum { sscf_11,sscf_22,sscf_410,sscf_34,sscf_25 } SSCF_STATE; + +typedef struct { + SSCF_STATE state; + struct _sscf_user_ops *ops; + void *user; + SSCOP_DSC sscop; +} SSCF_DSC; + + +typedef struct _sscf_user_ops { + void (*estab_ind)(void *user_data,void *uu_data,int uu_length); + /* AAL-ESTABLISH.indication */ + void (*estab_conf)(void *user_data,void *uu_data,int uu_length); + /* AAL-ESTABLISH.confirm */ + void (*rel_ind)(void *user_data,void *uu_data,int uu_length); + /* AAL-RELEASE.indication */ + void (*rel_conf)(void *user_data); /* AAL-RELEASE.confirm */ + void (*restart)(void *user_data,void *uu_data,int uu_length,int ind); + /* AAL-RELEASE.indication or AAL-RELEASE.confirm immediately followed + by AAL-ESTABLISH.indication */ + void (*data_ind)(void *user_data,void *data,int length); + /* AAL-DATA.indication */ + void (*unitdata)(void *user_data,void *data,int length); + /* AAL-UNITDATA.indication */ + void (*cpcs_send)(void *user_data,void *data,int length); +} SSCF_USER_OPS; + + +/* Attach/detach protocol */ + +void start_sscf(SSCF_DSC *dsc,SSCF_USER_OPS *ops,void *user_data); +void stop_sscf(SSCF_DSC *dsc); + +/* Connection control */ + +void sscf_estab_req(SSCF_DSC *dsc,void *uu_data,int uu_length); +void sscf_rel_req(SSCF_DSC *dsc,void *uu_data,int uu_length); + +/* Send data */ + +void sscf_send(SSCF_DSC *dsc,void *data,int length); +void sscf_unitdata(SSCF_DSC *dsc,void *data,int length); + +#endif diff -ur --new-file old/atm/saal/sscop.c new/atm/saal/sscop.c --- old/atm/saal/sscop.c Thu Jan 1 01:00:00 1970 +++ new/atm/saal/sscop.c Fri May 31 15:44:11 1996 @@ -0,0 +1,1995 @@ +/* sscop.c - SSCOP (Q.2110) protocol */ + +/* Written 1995-1996 by Werner Almesberger, EPFL-LRC */ + + +#if 1 /* debugging only */ +#include +#endif +#include +#include +#include /* for htonl, ntohl */ + +#include "atmd.h" + +#include "sscop.h" + + +/* + * This is a quite exact translation of the ITU-T SSCOP SDL diagrams. They + * are a pleasant example of how protocols _should_ be specified. It took me + * less than a week to implement this. + * + * Calls back to the SSCOP user are always done last in a sequence of actions + * to avoid reentrancy problems if the user invokes SSCOP from the callback + * function. (Exception: data indications are delivered when needed. So you + * shouldn't kill the protocol stack in the middle of this. Releasing the + * call and such is fine, though.) + * + * Sequences of an AA-RELASE.indication/confirm immediately followed by a + * AA-ESTABLISH.indication have been replaced by a new primitive called + * "restart". This way, the SSCOP user is able to distinguish conditions where + * SSCOP is in idle state after a callback from conditions where SSCOP wants to + * continue (and where the user many not want to stop SSCOP). + * + * The entity receiving management information (e.g. maa_error) must not issue + * any SSCOP primitives from that callback routine. Instead, actions must be + * queued until SSCOP finishes processing of the current event. + * + * Comments of the type xx.yy are section or figure numbers in Q.2110 + * + * KNOWN BUGS: The queue and buffer management stinks, especially the "buffer + * cloning". All this ought to be rewritten to use skbuffs. Since + * this will happen anyway if SSCOP ever gets integrated into the + * kernel, we can safely ignore the problem for now. + * + * The lower layer is always assumed to be ready for sending. If + * this is not the case (shouldn't happen), the PDU should be + * discarded (or the process might be blocked for a few cycles). + */ + + +#define COMPONENT "SSCOP" + + +/*#define debug (void)*/ + +/* Configurable SSCOP parameters */ + +#define SSCOP_CF_MR 30 /* buffer size */ +#define SSCOP_CF_MaxCC 10 /* max timeouts */ +#define SSCOP_CF_MaxPD 100 /* SD/POLL ratio */ +#define SSCOP_CF_MaxSTAT 67 /* max elements in STAT PDU, 7.7 */ + +#undef POLL_AFTER_RETRANSMISSION /* 20.38, #define this if needed */ + + +/* Timers */ + +/* + * Assumptions: RTT = 1 sec, remote needs about 1 sec to wake up. SSCF changes + * all this anyway. + */ + +#define TIMER_CC 2000000 /* 2 sec (== RTT+eps) */ +#define TIMER_POLL 1000000 /* 1 sec (== RTT) */ +#define TIMER_NORESP 7000000 /* 7 sec (keepalive+RTT+eps) */ +#define TIMER_KEEPALIVE 5000000 /* 5 sec (> poll && > RTT) */ +#define TIMER_IDLE 30000000 /* 30 sec (>> keepalive) */ + + +/* SSCOP PDU types, 7.1 */ + +#define SSCOP_BGN 1 /* Request Initialization */ +#define SSCOP_BGAK 2 /* Request Acknowledgement */ +#define SSCOP_BGREJ 7 /* Connection Reject */ +#define SSCOP_END 3 /* Disconnect Command */ +#define SSCOP_ENDAK 4 /* Disconnect Acknowledgement */ +#define SSCOP_RS 5 /* Resynchronization Command */ +#define SSCOP_RSAK 6 /* Resynchronization Acknowledgement */ +#define SSCOP_ER 9 /* Recovery Command */ +#define SSCOP_ERAK 15 /* Recovery Acknowledgement */ +#define SSCOP_SD 8 /* Sequence Connection-mode Data */ +#define SSCOP_POLL 10 /* Transmitter State Information with request ... */ +#define SSCOP_STAT 11 /* Solicited Receiver State Information */ +#define SSCOP_USTAT 12 /* Unsolicited Receiver State Information */ +#define SSCOP_UD 13 /* Unnumbered User Data */ +#define SSCOP_MD 14 /* Unnumbered Management Data */ + + +/* Trailer format macros */ + +#define SSCOP_TRAIL(type,pad,n) (htonl((n) | ((type) << 24) | ((pad) << 30))) +#define SSCOP_S_BIT 0x10000000 +#define SSCOP_TYPE(last) ((ntohl(last) >> 24) & 15) +#define SSCOP_PAD(last) (ntohl(last) >> 30) +#define SSCOP_N(last) (ntohl(last) & 0xffffff) +#define SSCOP_S(last) (ntohl(last) & SSCOP_S_BIT) + + +/* Some helper macros */ + +#define START_TIMER(t) ({ STOP_TIMER(dsc->timer_##t); \ + dsc->timer_##t = start_timer(dsc->cf_timer_##t, sscop_##t##_exp,dsc); }) +#define STOP_TIMER(t) ({ if (t) stop_timer(t); t = NULL; }) +#define MOD24(x) ((x) & ((1 << 24)-1)) +#define INC24(v) (v = MOD24(v+1)) +#define INC8(v) (v = (v+1) & 255) +#define NORMALIZE(x,b) ( \ + (b) < (1 << 23) ? \ + (x) < (b)+(1 << 23) ? (x)+(1 << 24) : x : \ + (x) < (b)-(1 << 23) ? (x)+(1 << 24) : x) +#define NORM_RX(v) NORMALIZE((v),dsc->vr_r) +#define NORM_TX(v) NORMALIZE((v),dsc->vt_a) + + +/* Helper macros for PDU construction and decomposition */ + +#define PDU_VARS \ + unsigned char type; \ + int length; \ + int s,ps,r,mr,sq +#define DECOMPOSE_PDU(dsc,msg,size) decompose_pdu(dsc,msg,size,&type, \ + &length,&s,&ps,&r,&mr,&sq) +#define PRINT_PDU(dsc,label,data) print_pdu(dsc,label,type,data,&length, \ + &s,&ps,&r,&mr,&sq) + + +static const char *pdu_name[] = { "???","BGN","BGAK","END","ENDAK","RS","RSAK", + "BGREJ","SD","ER","POLL","STAT","USTAT","UD","MD","ERAK" }; + +static const char *state_name[] = { "Idle","OutConnPend","InConnPend", + "OutDiscPend","OutResyPend","InResyPend","OutRecPend","RecRespPend", + "InRecPend","DataTransReady" }; + + +static void maa_error(SSCOP_DSC *dsc,char code,int count) +{ + static const char *const msgs[] = { + "A:SD PDU","B:BGN PDU","C:BGAK PDU","D:BGREJ PDU","E:END PDU", + "F:ENDAK PDU","G:POLL PDU","H:STAT PDU","I:USTAT PDU","J:RS", + "K:RSAK PDU","L:ER","M:ERAK","O:VT(CC)>=MaxCC", + "P:Timer_NO_RESPONSE expiry","Q:SD or POLL, N(S) error", + "R:STAT N(PS) error","S:STAT N(R) or list elements error", + "T:USTAT N(R) or list elements error","U:PDU length violation", + "V:SD PDUs must be retransmitted","W:Lack of credit", + "X:Credit obtained","\0:Unknown error code" }; + const char *const *walk; + + if (dsc->ops->maa_error) + if (!dsc->ops->maa_error(dsc->user,code,count)) return; + for (walk = msgs; **walk; walk++) + if (**walk == code) break; + if (code != 'V') + diag(COMPONENT,DIAG_WARN,"layer management - error %c \"%s\"",code, + (*walk)+2); + else diag(COMPONENT,DIAG_WARN,"layer management - error %c,%d \"%s\"",code, + count,(*walk)+2); +} + + +static void print_pdu(SSCOP_DSC *dsc,const char *label,unsigned char type, + void *data,const int *length,const int *s,const int *ps,const int *r, + const int *mr,const int *sq) +{ + int len; + int *list; + + switch (type) { + case SSCOP_SD: + diag(COMPONENT,DIAG_DEBUG,"%s SD(S=%d,len=%d)",label,*s,*length); + break; + case SSCOP_POLL: + diag(COMPONENT,DIAG_DEBUG,"%s POLL(PS=%d,S=%d)",label,*ps,*s); + break; + case SSCOP_STAT: + if (*length & 3) { + diag(COMPONENT,DIAG_WARN,"%s STAT PDU has wrong size (%d)", + label,*length); + break; + } + len = *length/4; + diag(COMPONENT,DIAG_DEBUG,"%s STAT(PS=%d,MR=%d,R=%d,items=%d:", + label,*ps,*mr,*r,len); + list = (int *) data; + while (len > 1) { + diag(COMPONENT,DIAG_DEBUG,"%s %d..%d",label,ntohl(list[0]), + ntohl(list[1])); + list += 2; + len -= 2; + } + if (!len) + diag(COMPONENT,DIAG_DEBUG,"%s )",label); + else diag(COMPONENT,DIAG_DEBUG,"%s %d)",label, + ntohl(*list)); + break; + case SSCOP_USTAT: + if (*length != 8) { + diag(COMPONENT,DIAG_WARN,"%s USTAT PDU has wrong size (%d)", + label,*length); + break; + } + list = (int *) data; + diag(COMPONENT,DIAG_DEBUG,"%s USTAT(MR=%d,R=%d,%d..%d)",label,*mr, + *r,ntohl(list[0]), + ntohl(list[1])); + break; + case SSCOP_UD: + diag(COMPONENT,DIAG_DEBUG,"%s UD(len=%d)",label,*length); + break; + case SSCOP_MD: + diag(COMPONENT,DIAG_DEBUG,"%s MD(len=%d)",label,*length); + break; + case SSCOP_BGN: + diag(COMPONENT,DIAG_DEBUG,"%s BGN(SQ=%d,MR=%d,len=%d)",label,*sq, + *mr,*length); + break; + case SSCOP_BGAK: + diag(COMPONENT,DIAG_DEBUG,"%s BGAK(MR=%d,len=%d)",label,*mr, + *length); + break; + case SSCOP_BGREJ: + diag(COMPONENT,DIAG_DEBUG,"%s BGREJ(len=%d)",label,*length); + break; + case SSCOP_END: + diag(COMPONENT,DIAG_DEBUG,"%s END(S=%d,len=%d)",label,*s,*length); + break; + case SSCOP_ENDAK: + diag(COMPONENT,DIAG_DEBUG,"%s ENDAK()",label); + break; + case SSCOP_RS: + diag(COMPONENT,DIAG_DEBUG,"%s RS(SQ=%d,MR=%d,len=%d)",label,*sq, + *mr,*length); + break; + case SSCOP_RSAK: + diag(COMPONENT,DIAG_DEBUG,"%s RSAK(MR=%d)",label,*mr); + break; + case SSCOP_ER: + diag(COMPONENT,DIAG_DEBUG,"%s ER(MR=%d)",label,*mr); + break; + case SSCOP_ERAK: + diag(COMPONENT,DIAG_DEBUG,"%s ERAK(MR=%d)",label,*mr); + break; + default: + diag(COMPONENT,DIAG_ERROR,"%s unknown PDU type %d\n",label,type); + } +} + + +static int decompose_pdu(SSCOP_DSC *dsc,void *msg,int size, + unsigned char *type,int *length,int *s,int *ps,int *r,int *mr,int *sq) +{ + unsigned long *last; + unsigned char pad; + int n; + +/* + * *length is undefined if PDU has no variable-length data part + */ + + if (size < 4 || (size & 3)) { + diag(COMPONENT,DIAG_DEBUG,"invalid message length (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + last = (unsigned long *) ((char *) msg+size-4); + *type = SSCOP_TYPE(*last); + pad = SSCOP_PAD(*last); + n = SSCOP_N(*last); + *length = size-4-pad; + switch (*type) { + case SSCOP_SD: + *s = n; + break; + case SSCOP_POLL: + if (size != 8) { + diag(COMPONENT,DIAG_DEBUG,"POLL PDU has bad length (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *s = n; + *ps = SSCOP_N(*(unsigned long *) msg); + break; + case SSCOP_STAT: + if (size < 12) { + diag(COMPONENT,DIAG_DEBUG,"STAT PDU too short (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + if (*length & 3) { + diag(COMPONENT,DIAG_DEBUG,"STAT PDU has bad length (%d)", + length); + maa_error(dsc,'U',0); + return -1; + } + *r = n; + *mr = SSCOP_N(last[-1]); + *ps = SSCOP_N(last[-2]); + *length -= 8; + break; + case SSCOP_USTAT: + if (size != 16) { + diag(COMPONENT,DIAG_DEBUG,"USTAT PDU has bad length (%d)", + size); + maa_error(dsc,'U',0); + return -1; + } + *r = n; + *mr = SSCOP_N(last[-1]); + *length -= 4; + break; + case SSCOP_UD: + case SSCOP_MD: + break; + case SSCOP_BGN: + if (size < 8) { + diag(COMPONENT,DIAG_DEBUG,"BGN PDU too short (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *mr = n; + *sq = SSCOP_N(last[-1]) & 0xff; + *length -= 4; + break; + case SSCOP_BGAK: + if (size < 8) { + diag(COMPONENT,DIAG_DEBUG,"BGAK PDU too short (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *mr = n; + *length -= 4; + break; + case SSCOP_BGREJ: + if (size < 8) { + diag(COMPONENT,DIAG_DEBUG,"BGREJ PDU too short (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *length -= 4; + break; + case SSCOP_END: + if (size < 8) { + diag(COMPONENT,DIAG_DEBUG,"END PDU too short (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *s = !!(ntohl(*last) & SSCOP_S_BIT); + *length -= 4; + break; + case SSCOP_ENDAK: + if (size != 8) { + diag(COMPONENT,DIAG_DEBUG,"ENDAK PDU has bad length (%d)", + size); + maa_error(dsc,'U',0); + if (size < 4) return -1; /* make it work with Fore */ + } + break; + case SSCOP_RS: + if (size < 8) { + diag(COMPONENT,DIAG_DEBUG,"RS PDU too short (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *mr = n; + *sq = SSCOP_N(last[-1]) & 0xff; + *length -= 4; + break; + case SSCOP_RSAK: + if (size != 8) { + diag(COMPONENT,DIAG_DEBUG,"RSAK PDU has bad length (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *mr = n; + break; + case SSCOP_ER: + if (size != 8) { + diag(COMPONENT,DIAG_DEBUG,"ER PDU has bad length (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *mr = n; + *sq = SSCOP_N(last[-1]) & 0xff; + break; + case SSCOP_ERAK: + if (size != 8) { + diag(COMPONENT,DIAG_DEBUG,"ERAK PDU has bad length (%d)",size); + maa_error(dsc,'U',0); + return -1; + } + *mr = n; + break; + default: + diag(COMPONENT,DIAG_DEBUG,"unknown PDU type %d (0x%x)",*type, + *type); + return -1; + } + return 0; +} + + +static BUFFER *build_pdu(SSCOP_DSC *dsc,unsigned char type,void *data, + int num) +{ + BUFFER *buf; + unsigned long *trailer; + int pad; + + buf = buffer_create(num+12,dsc->vt_s); /* space for trailers */ + if (data && num) { + memset((char *) buf->data+(num & ~3),0,4); /* clear padding area */ + memcpy((unsigned char *) buf->data,data,num); + pad = (4-(num & 3)) & 3; + trailer = (unsigned long *) ((char *) buf->data+num+pad); + } + else { + pad = 0; + trailer = (unsigned long *) buf->data; + } + diag(COMPONENT,DIAG_DEBUG,"generating %s PDU",pdu_name[type]); + switch (type) { + case SSCOP_BGN: + case SSCOP_RS: + case SSCOP_ER: + *trailer++ = SSCOP_TRAIL(0,0,dsc->vt_sq); + *trailer++ = SSCOP_TRAIL(type,pad,dsc->vr_mr); + break; + case SSCOP_BGAK: + case SSCOP_RSAK: + case SSCOP_ERAK: + *trailer++ = SSCOP_TRAIL(0,0,0); + *trailer++ = SSCOP_TRAIL(type,pad,dsc->vr_mr); + break; + case SSCOP_END: /* S bit is indicated by "num" */ + *trailer++ = SSCOP_TRAIL(0,0,0); + *trailer++ = SSCOP_TRAIL(type,pad,0) | (num ? htonl(SSCOP_S_BIT) : + 0); + break; + case SSCOP_BGREJ: + case SSCOP_ENDAK: + *trailer++ = SSCOP_TRAIL(0,0,0); + *trailer++ = SSCOP_TRAIL(type,pad,0); + break; + case SSCOP_POLL: + *trailer++ = SSCOP_TRAIL(0,0,dsc->vt_ps); + /* fall through */ + case SSCOP_SD: + *trailer++ = SSCOP_TRAIL(type,pad,dsc->vt_s); + break; + case SSCOP_STAT: + *trailer++ = SSCOP_TRAIL(0,0,dsc->vr_ps); + /* fall through */ + case SSCOP_USTAT: + *trailer++ = SSCOP_TRAIL(0,0,dsc->vr_mr); + *trailer++ = SSCOP_TRAIL(type,0,dsc->vr_r); + break; + case SSCOP_UD: + case SSCOP_MD: + *trailer++ = SSCOP_TRAIL(type,pad,0); + break; + default: + diag(COMPONENT,DIAG_FATAL, + "requested construction of unknown PDU type %d",type); + } + buf->length = (char *) trailer-(char *) buf->data; + return buf; +} + + +static void dump_pdu(void *data,int len) +{ + int i; + + if (!debug) return; + for (i = 0; i < len; i++) { + if (!(i & 15)) printf("%s%04X:",i ? "\n" : "",i); + printf(" %02X",((unsigned char *) data)[i]); + } + putchar('\n'); +} + + +static void emit_pdu(SSCOP_DSC *dsc,BUFFER *buf) +{ + BUFFER **last; + + dump_pdu(buf->data,buf->length); + { + PDU_VARS; + + if (DECOMPOSE_PDU(dsc,buf->data,buf->length)) + diag(COMPONENT,DIAG_FATAL,"composed garbage"); + PRINT_PDU(dsc,"SEND",buf->data); + } + if (dsc->ops->cpcs_send) + dsc->ops->cpcs_send(dsc->user,buf->data,buf->length); + switch (SSCOP_TYPE(*(unsigned long *) ((char *) buf->data+buf->length-4))) { + case SSCOP_BGN: + last = &dsc->last_bgn; + break; + case SSCOP_END: + last = &dsc->last_end; + break; + case SSCOP_RS: + last = &dsc->last_rs; + break; + case SSCOP_ER: + last = &dsc->last_er; + break; + default: + buffer_discard(buf); + return; + } + if (*last && *last != buf) { + buffer_discard(*last); + *last = NULL; + } + *last = buf; +} + + +static void resend_pdu(SSCOP_DSC *dsc,BUFFER *buf) +{ + if (!buf) diag(COMPONENT,DIAG_FATAL,"resend buffer is NULL"); + emit_pdu(dsc,buf); +} + + +static void send_pdu(SSCOP_DSC *dsc,unsigned char type,void *data,int size) +{ + BUFFER *buf; + + buf = build_pdu(dsc,type,data,size); + emit_pdu(dsc,buf); +} + + +static void next_state(SSCOP_DSC *dsc,SSCOP_STATE state) +{ + diag(COMPONENT,DIAG_DEBUG,"entering state %s (%d)",state_name[state], + (int) state); + dsc->state = state; +} + + +static void bad_pdu(SSCOP_DSC *dsc,unsigned char type) +{ + /* 111111 */ + /* 0123456789012345 */ + maa_error(dsc,"?BCxFJKDALGHIyzM"[type],0); +} + + +static void send_ustat(SSCOP_DSC *dsc,int first,int last) +{ + unsigned long range[2]; + + range[0] = htonl(first); + range[1] = htonl(last); + send_pdu(dsc,SSCOP_USTAT,range,8); +} + + +/* --- Utility functions --------------------------------------------------- */ + + +static void clear_receive_buffer(SSCOP_DSC *dsc) +{ + queue_clear(&dsc->rx_buf); +} + + +static void clear_transmission_buffer(SSCOP_DSC *dsc) +{ + queue_clear(&dsc->tx_buf); +} + + +static void clear_transmission_queue(SSCOP_DSC *dsc) +{ + queue_clear(&dsc->tx_q); +} + + +static void clear_retransmission_queue(SSCOP_DSC *dsc) +{ + queue_clear(&dsc->rt_q); +} + + +/* --- SSCOP subroutines --------------------------------------------------- */ + + +static void sscop_poll_exp(void *user); +static void sscop_keepalive_exp(void *user); +static void sscop_noresp_exp(void *user); + + +static void release_buffers(SSCOP_DSC *dsc) /* 20.49 */ +{ + clear_transmission_queue(dsc); + clear_transmission_buffer(dsc); + clear_retransmission_queue(dsc); + clear_receive_buffer(dsc); +} + + +static void clear_transmitter(SSCOP_DSC *dsc) /* 20.49 */ +{ + if (!dsc->clear_buffers) { + clear_transmission_queue(dsc); + clear_transmission_buffer(dsc); + } +} + + +static void prepare_recovery(SSCOP_DSC *dsc) /* 20.49 */ +{ + if (dsc->clear_buffers) { + clear_transmission_queue(dsc); + clear_transmission_buffer(dsc); + } + clear_retransmission_queue(dsc); +} + + +static void prepare_retrieval(SSCOP_DSC *dsc) /* 20.49 */ +{ + prepare_recovery(dsc); + clear_receive_buffer(dsc); +} + + +static void deliver_data(SSCOP_DSC *dsc) /* 20.49 */ +{ + BUFFER *buf; + + if (!dsc->clear_buffers) { + while ((buf = queue_get(&dsc->rx_buf))) { + if (dsc->ops->data_ind) + dsc->ops->data_ind(dsc->user,buf->data,buf->length,buf->key); + buffer_discard(buf); + } + } + clear_receive_buffer(dsc); +} + + +static void initialize_state_variables(SSCOP_DSC *dsc) /* 20.49 */ +{ + dsc->vt_s = dsc->vt_ps = dsc->vt_a = 0; + dsc->vt_pa = 1; + dsc->vt_pd = 0; + dsc->credit = 1; + dsc->vr_r = dsc->vr_h = 0; +} + + +static int detect_retransmission(SSCOP_DSC *dsc,int sq) /* 20.50 */ +{ + if (dsc->vr_sq == sq) return 1; + dsc->vr_sq = sq; + return 0; +} + + +static void set_poll_timer(SSCOP_DSC *dsc) /* 20.50 */ +{ + if (queue_peek(&dsc->tx_q) || dsc->vt_s != dsc->vt_a) START_TIMER(poll); + else START_TIMER(keepalive); +} + + +static void reset_data_transfer_timers(SSCOP_DSC *dsc) /* 20.51 */ +{ + STOP_TIMER(dsc->timer_poll); + STOP_TIMER(dsc->timer_keepalive); + STOP_TIMER(dsc->timer_noresp); + STOP_TIMER(dsc->timer_idle); +} + + +static void set_data_transfer_timers(SSCOP_DSC *dsc) /* 20.51 */ +{ + START_TIMER(poll); + START_TIMER(noresp); +} + + +static void initialize_vr_mr(SSCOP_DSC *dsc) +{ + dsc->vr_mr = MOD24(dsc->vr_h+SSCOP_CF_MR); +} + + +static void update_vr_mr(SSCOP_DSC *dsc) +{ + initialize_vr_mr(dsc); +} + + +/* --- Timer handlers ------------------------------------------------------ */ + + +static void sscop_cc_exp(void *user) +{ + SSCOP_DSC *dsc = user; + + diag(COMPONENT,DIAG_DEBUG,"Timer CC has expired"); + dsc->timer_cc = NULL; + switch (dsc->state) { + case sscop_outconn: /* 20.9 */ + if (dsc->vt_cc < dsc->cf_max_cc) { + dsc->vt_cc++; + resend_pdu(dsc,dsc->last_bgn); + START_TIMER(cc); + return; + } + maa_error(dsc,'O',0); + send_pdu(dsc,SSCOP_END,NULL,1); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); + return; + case sscop_outdisc: /* 20.15 */ + if (dsc->vt_cc < dsc->cf_max_cc) { + dsc->vt_cc++; + resend_pdu(dsc,dsc->last_end); + START_TIMER(cc); + return; + } + maa_error(dsc,'O',0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); + return; + case sscop_outres: /* 20.18 */ + if (dsc->vt_cc < dsc->cf_max_cc) { + dsc->vt_cc++; + resend_pdu(dsc,dsc->last_rs); + START_TIMER(cc); + return; + } + maa_error(dsc,'O',0); + send_pdu(dsc,SSCOP_END,NULL,1); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); + return; + case sscop_outrec: /* 20.24 */ + if (dsc->vt_cc < dsc->cf_max_cc) { + dsc->vt_cc++; + resend_pdu(dsc,dsc->last_er); + START_TIMER(cc); + return; + } + maa_error(dsc,'O',0); + send_pdu(dsc,SSCOP_END,NULL,1); + clear_receive_buffer(dsc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"Timer CC expired in state %s", + state_name[dsc->state]); +} + + +static void sscop_common_exp(void *user) +{ + SSCOP_DSC *dsc = user; + + if (dsc->state != sscop_ready) { + diag(COMPONENT,DIAG_FATAL,"sscop_common_exp invoked in state %s", + state_name[dsc->state]); + return; + } + INC24(dsc->vt_ps); + send_pdu(dsc,SSCOP_POLL,NULL,0); + dsc->vt_pd = 0; + set_poll_timer(dsc); +} + + +static void sscop_poll_exp(void *user) +{ + SSCOP_DSC *dsc = user; + + diag(COMPONENT,DIAG_DEBUG,"Timer POLL has expired"); + dsc->timer_poll = NULL; + sscop_common_exp(user); +} + + +static void sscop_keepalive_exp(void *user) +{ + SSCOP_DSC *dsc = user; + + diag(COMPONENT,DIAG_DEBUG,"Timer KEEPALIVE has expired"); + dsc->timer_keepalive = NULL; + sscop_common_exp(user); +} + + +static void sscop_idle_exp(void *user) +{ + SSCOP_DSC *dsc = user; + + diag(COMPONENT,DIAG_DEBUG,"Timer IDLE has expired"); + dsc->timer_idle = NULL; + START_TIMER(noresp); + sscop_poll_exp(user); +} + + +static void sscop_noresp_exp(void *user) +{ + SSCOP_DSC *dsc = user; + + diag(COMPONENT,DIAG_DEBUG,"Timer NORESP has expired"); + dsc->timer_noresp = NULL; + if (dsc->state != sscop_ready) { + diag(COMPONENT,DIAG_FATAL,"Timer NORESP expired in state %s", + state_name[dsc->state]); + return; + } + reset_data_transfer_timers(dsc); + maa_error(dsc,'P',0); + send_pdu(dsc,SSCOP_END,NULL,1); + prepare_retrieval(dsc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); +} + + +/* --- Transmit engine ----------------------------------------------------- */ + + +static void try_to_send(SSCOP_DSC *dsc) +{ + BUFFER *buf,*buf2; + + if (dsc->state != sscop_ready) return; + while (queue_peek(&dsc->rt_q) || NORM_TX(dsc->vt_s) < + NORM_TX(dsc->vt_ms) || dsc->timer_idle) { + buf = queue_get(&dsc->rt_q); + if (buf) { + if (!(buf2 = queue_lookup(&dsc->tx_buf,buf->key))) + diag(COMPONENT,DIAG_FATAL,"didn't find PDU %d in TX buffer", + buf->key); + emit_pdu(dsc,buf); + buf2->extra = dsc->vt_ps; +#ifdef POLL_AFTER_RETRANSMISSION + if (!queue_peek(dsc->rt_q)) + /* fall through to goto */ +#endif + goto B; /* sigh ... */ + } + else { + if (!queue_peek(&dsc->tx_q)) return; + if (NORM_TX(dsc->vt_s) < NORM_TX(dsc->vt_ms)) { + buf = queue_get(&dsc->tx_q); + buf2 = build_pdu(dsc,SSCOP_SD,buf->data,buf->length); + buffer_discard(buf); + buf2->key = dsc->vt_s; + buf2->extra = dsc->vt_ps; + emit_pdu(dsc,buffer_clone(buf2)); + queue_put(&dsc->tx_buf,buf2); + INC24(dsc->vt_s); + B: + /* B */ + dsc->vt_pd++; + if (dsc->timer_poll) { + if (dsc->vt_pd < dsc->cf_max_pd) continue; + } + else { + if (!dsc->timer_idle) STOP_TIMER(dsc->timer_keepalive); + else { + STOP_TIMER(dsc->timer_idle); + START_TIMER(noresp); + } + if (dsc->vt_pd < dsc->cf_max_pd) { + START_TIMER(poll); + continue; + } + } + } + else { + STOP_TIMER(dsc->timer_idle); + START_TIMER(noresp); + } + } + /* A */ + INC24(dsc->vt_ps); + send_pdu(dsc,SSCOP_POLL,NULL,0); + dsc->vt_pd = 0; + START_TIMER(poll); + } +} + + +/* --- Incoming non-CC PDUs in Data Transfer Ready state ------------------- */ + + +static void start_error_recov(SSCOP_DSC *dsc,char code) +{ + reset_data_transfer_timers(dsc); + maa_error(dsc,code,0); + /* D */ + dsc->vt_cc = 1; + INC8(dsc->vt_sq); + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_ER,NULL,0); + prepare_recovery(dsc); + START_TIMER(cc); + next_state(dsc,sscop_outrec); +} + + +static void data_sd(SSCOP_DSC *dsc,int s,void *msg,int length) /* 20.38-39 */ +{ + BUFFER *buf; + + if (NORM_RX(s) >= NORM_RX(dsc->vr_mr)) { + if (NORM_RX(dsc->vr_h) >= NORM_RX(dsc->vr_mr)) { + send_ustat(dsc,dsc->vr_h,dsc->vr_mr); + dsc->vr_h = dsc->vr_mr; + } + return; + } + if (s == dsc->vr_r) { + if (dsc->ops->data_ind) dsc->ops->data_ind(dsc->user,msg,length,s); + if (s == dsc->vr_h) { + dsc->vr_r = dsc->vr_h = MOD24(s+1); + update_vr_mr(dsc); + return; + } + while (1) { + INC24(dsc->vr_r); + buf = queue_lookup(&dsc->rx_buf,dsc->vr_r); + if (!buf) break; + queue_remove(&dsc->rx_buf,buf); + if (dsc->ops->data_ind) + dsc->ops->data_ind(dsc->user,buf->data,buf->length,buf->key); + buffer_discard(buf); + } + return; + } + buf = buffer_create(length,s); + memcpy(buf->data,msg,length); + if (s == dsc->vr_h) { + queue_put(&dsc->rx_buf,buf); + INC24(dsc->vr_h); + update_vr_mr(dsc); + return; + } + if (NORM_RX(dsc->vr_h) < NORM_RX(s)) { + queue_put(&dsc->rx_buf,buf); + send_ustat(dsc,dsc->vr_h,s); + dsc->vr_h = MOD24(s+1); + update_vr_mr(dsc); + return; + } + if (queue_lookup(&dsc->rx_buf,s)) queue_put(&dsc->rx_buf,buf); + else { + buffer_discard(buf); + start_error_recov(dsc,'Q'); + } +} + + +/* + * Some of the NORM_RXs in data_poll are certainly unnecessary. Maybe even + * all of them could be removed ... + */ + + +static void data_poll(SSCOP_DSC *dsc,int s) /* 20.41-42 */ +{ + int curr,i; + + if (!dsc->list) dsc->list = alloc(dsc->cf_max_stat*sizeof(int)); + if (NORM_RX(dsc->vr_h) > NORM_RX(s)) { + start_error_recov(dsc,'Q'); + return; + } + dsc->vr_h = NORM_RX(dsc->vr_mr) < NORM_RX(s) ? dsc->vr_mr : s; + update_vr_mr(dsc); + /* K */ + curr = 0; + i = dsc->vr_r; + while (NORM_RX(i) < NORM_RX(dsc->vr_h)) { + if (queue_lookup(&dsc->rx_buf,i)) { + INC24(i); + continue; + } + dsc->list[curr++] = htonl(i); + if (curr >= dsc->cf_max_stat) { + send_pdu(dsc,SSCOP_STAT,dsc->list,curr*4); + curr = 0; + dsc->list[curr++] = htonl(i); + } + do INC24(i); + while (i != dsc->vr_h && !queue_lookup(&dsc->rx_buf,i)); + dsc->list[curr++] = htonl(i); + } + if (NORM_RX(i) > NORM_RX(dsc->vr_h)) dsc->list[curr++] = htonl(i); + send_pdu(dsc,SSCOP_STAT,dsc->list,curr*4); +} + + +static void data_ustat(SSCOP_DSC *dsc,int mr,int r,int e1,int e2) /* 20.43 */ +{ + BUFFER *buf,*buf2; + int seq1,seq2,i; + + if (NORM_TX(dsc->vt_a) <= NORM_TX(r) && NORM_TX(r) < NORM_TX(dsc->vt_s)) { + for (i = dsc->vt_a; i != r; INC24(i)) { + buf = queue_lookup(&dsc->tx_buf,i); + if (buf) { + queue_remove(&dsc->tx_buf,buf); + buffer_discard(buf); + } + } + dsc->vt_a = r; + dsc->vt_ms = mr; + seq1 = e1; + seq2 = e2; + if (NORM_TX(dsc->vt_a) <= NORM_TX(seq1) && NORM_TX(seq1) < + NORM_TX(seq2) && NORM_TX(seq2) < NORM_TX(dsc->vt_s)) { + /* G */ + while ((buf = queue_lookup(&dsc->tx_buf,seq1))) { + buf2 = buffer_clone(buf); + queue_put(&dsc->rt_q,buf2); + INC24(seq1); + if (seq1 == seq2) { + maa_error(dsc,'V',e2-e1); + return; + } + } + } + } + /* F */ + start_error_recov(dsc,'T'); +} + + +static void data_stat(SSCOP_DSC *dsc,int ps,int mr,int r,unsigned long *list, + int length) /* 20.44-46 */ +{ + BUFFER *buf,*buf2; + unsigned long *curr,tmp; + int i,count,seq1,seq2; + + if (NORM_TX(dsc->vt_pa) > NORM_TX(ps) || NORM_TX(ps) > + NORM_TX(dsc->vt_ps)) { + start_error_recov(dsc,'R'); + return; + } + if (NORM_TX(dsc->vt_a) > NORM_TX(r) || NORM_TX(r) > + NORM_TX(dsc->vt_s)) { + /* H */ + start_error_recov(dsc,'S'); + return; + } + for (i = dsc->vt_a; i != r; INC24(i)) { + buf = queue_lookup(&dsc->tx_buf,i); + if (buf) { + queue_remove(&dsc->tx_buf,buf); + buffer_discard(buf); + } + } + dsc->vt_a = r; + dsc->vt_pa = ps; + dsc->vt_ms = mr; + i = length; + curr = list; + count = 0; + if (i > 1) { + tmp = *curr++; + seq1 = SSCOP_N(tmp); + i--; + if (NORM_TX(seq1) >= NORM_TX(dsc->vt_s)) { + /* H */ + start_error_recov(dsc,'S'); + return; + } + /* I */ + do { + tmp = *curr++; + seq2 = SSCOP_N(tmp); + i--; + if (NORM_TX(seq1) >= NORM_TX(seq2) || + NORM_TX(seq2) > NORM_TX(dsc->vt_s)) { + /* H */ + start_error_recov(dsc,'S'); + return; + } + do { + if (!(buf = queue_lookup(&dsc->tx_buf,seq1))) { + /* H */ + start_error_recov(dsc,'S'); + return; + } + if (NORM_TX(buf->extra) < NORM_TX(ps) && + NORM_TX(ps) <= NORM_TX(dsc->vt_ps) && + !queue_lookup(&dsc->rt_q,seq1)) { + buf2 = buffer_clone(buf); + queue_put(&dsc->rt_q,buf2); + count++; + } + INC24(seq1); + } + while (seq1 != seq2); + /* J */ + if (!i) break; + tmp = *curr++; + seq2 = SSCOP_N(tmp); + i--; + if (NORM_TX(seq1) >= NORM_TX(seq2) || + NORM_TX(seq2) > NORM_TX(dsc->vt_s)) { + /* H */ + start_error_recov(dsc,'S'); + return; + } + do { + if (dsc->clear_buffers) { + buf = queue_lookup(&dsc->tx_buf,seq1); + if (buf) { + queue_remove(&dsc->tx_buf,buf); + buffer_discard(buf); + } + } + INC24(seq1); + } + while (seq1 != seq2); + } + while (i); + maa_error(dsc,'V',count); + } + /* L */ + if (dsc->credit != (NORM_TX(dsc->vt_s) < NORM_TX(dsc->vt_ms))) + maa_error(dsc,(dsc->credit = !dsc->credit) ? 'X' : 'W',0); + if (dsc->timer_poll) START_TIMER(noresp); + else if (!dsc->timer_idle) { + STOP_TIMER(dsc->timer_keepalive); + STOP_TIMER(dsc->timer_noresp); + START_TIMER(idle); + } +} + + +/* --- Incoming PDUs ------------------------------------------------------- */ + + +/* + * Returns 0 if the descriptor might conceivably be gone when returning, + * 1 otherwise. + */ + +static int handle_sscop_pdu(SSCOP_DSC *dsc,void *msg,int size) +{ + PDU_VARS; + + dump_pdu(msg,size); + if (DECOMPOSE_PDU(dsc,msg,size)) return 1; + PRINT_PDU(dsc,"RECV",msg); + switch (type) { + case SSCOP_UD: + if (dsc->ops->unitdata) dsc->ops->unitdata(dsc->user,msg,length); + return 1; + case SSCOP_MD: + if (dsc->ops->maa_data) dsc->ops->maa_data(dsc->user,msg,length); + return 1; + default: + break; + } + switch (dsc->state) { + case sscop_idle: + switch (type) { + case SSCOP_BGREJ: + bad_pdu(dsc,type); + return 1; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + send_pdu(dsc,SSCOP_BGREJ,NULL,0); /* no SSCOP-UU */ + return 1; + } + dsc->vt_ms = mr; + next_state(dsc,sscop_inconn); + if (dsc->ops->estab_ind) + dsc->ops->estab_ind(dsc->user,msg,length); + return 1; + case SSCOP_ENDAK: + return 1; + case SSCOP_END: + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + return 1; + case SSCOP_ER: + case SSCOP_POLL: + case SSCOP_SD: + case SSCOP_BGAK: + case SSCOP_ERAK: + case SSCOP_STAT: + case SSCOP_USTAT: + case SSCOP_RS: + case SSCOP_RSAK: + bad_pdu(dsc,type); + send_pdu(dsc,SSCOP_END,NULL,1); + return 1; + default: + break; + } + break; + case sscop_outconn: /* 20.8-10 */ + switch (type) { + case SSCOP_ENDAK: + case SSCOP_SD: + case SSCOP_ERAK: + case SSCOP_END: + case SSCOP_STAT: + case SSCOP_USTAT: + case SSCOP_POLL: + case SSCOP_ER: + case SSCOP_RSAK: + case SSCOP_RS: + return 1; /* ignore PDU */ + case SSCOP_BGAK: + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + if (dsc->ops->estab_conf) + dsc->ops->estab_conf(dsc->user,msg,length); + return 1; + case SSCOP_BGREJ: + STOP_TIMER(dsc->timer_cc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,1); + return 0; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) return 1; + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_BGAK,NULL,0); + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + if (dsc->ops->estab_conf) + dsc->ops->estab_conf(dsc->user,msg,length); + return 1; + default: + break; + } + break; + case sscop_inconn: /* 20.11-13 */ + switch (type) { + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) return 1; + dsc->vt_ms = mr; + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + case SSCOP_ER: + case SSCOP_BGAK: + case SSCOP_ERAK: + case SSCOP_RSAK: + case SSCOP_RS: + bad_pdu(dsc,type); + return 1; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + bad_pdu(dsc,type); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,1); + return 0; + case SSCOP_SD: + case SSCOP_USTAT: + case SSCOP_STAT: + case SSCOP_POLL: + bad_pdu(dsc,type); + send_pdu(dsc,SSCOP_END,NULL,1); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_END: + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + default: + break; + } + break; + case sscop_outdisc: /* 20.14-16 */ + switch (type) { + case SSCOP_SD: + case SSCOP_BGAK: + case SSCOP_POLL: + case SSCOP_STAT: + case SSCOP_USTAT: + case SSCOP_ERAK: + case SSCOP_RS: + case SSCOP_RSAK: + case SSCOP_ER: + return 1; + case SSCOP_END: + STOP_TIMER(dsc->timer_cc); + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); + return 0; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + STOP_TIMER(dsc->timer_cc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); + return 0; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + send_pdu(dsc,SSCOP_BGAK,NULL,0); + resend_pdu(dsc,dsc->last_end); + return 1; + } + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,0); + return 1; + } + case sscop_outres: /* 20.17-19 */ + switch (type) { + case SSCOP_ER: + case SSCOP_POLL: + case SSCOP_STAT: + case SSCOP_USTAT: + case SSCOP_BGAK: + case SSCOP_ERAK: + case SSCOP_SD: + return 1; /* ignore */ + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + send_pdu(dsc,SSCOP_BGAK,NULL,0); + resend_pdu(dsc,dsc->last_rs); + return 1; + } + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + STOP_TIMER(dsc->timer_cc); + bad_pdu(dsc,type); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_END: + STOP_TIMER(dsc->timer_cc); + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + case SSCOP_RS: + if (detect_retransmission(dsc,sq)) return 1; + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_RSAK,NULL,0); + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + if (dsc->ops->res_conf) dsc->ops->res_conf(dsc->user); + return 1; + case SSCOP_RSAK: + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + if (dsc->ops->res_conf) dsc->ops->res_conf(dsc->user); + return 1; + default: + break; + } + break; + case sscop_inres: /* 20.20-22 */ + switch (type) { + case SSCOP_SD: + case SSCOP_POLL: + case SSCOP_STAT: + case SSCOP_USTAT: + send_pdu(dsc,SSCOP_END,NULL,1); + /* fall through */ + case SSCOP_ENDAK: + case SSCOP_BGREJ: + bad_pdu(dsc,type); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_END: + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + case SSCOP_ER: + case SSCOP_BGAK: + case SSCOP_ERAK: + case SSCOP_RSAK: + bad_pdu(dsc,type); + return 1; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + dsc->vt_ms = mr; + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + case SSCOP_RS: + if (!detect_retransmission(dsc,sq)) bad_pdu(dsc,type); + return 1; + default: + break; + } + break; + case sscop_outrec: /* 20.23-26 */ + switch (type) { + case SSCOP_BGAK: + case SSCOP_RSAK: + bad_pdu(dsc,type); + return 1; + case SSCOP_ERAK: + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + next_state(dsc,sscop_recresp); + deliver_data(dsc); + if (dsc->ops->rec_ind) dsc->ops->rec_ind(dsc->user); + return 1; + case SSCOP_END: + STOP_TIMER(dsc->timer_cc); + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + clear_receive_buffer(dsc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + bad_pdu(dsc,type); + STOP_TIMER(dsc->timer_cc); + clear_receive_buffer(dsc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_STAT: + case SSCOP_USTAT: + case SSCOP_POLL: + case SSCOP_SD: + return 1; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + clear_receive_buffer(dsc); + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + case SSCOP_ER: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_ERAK,NULL,0); + deliver_data(dsc); + next_state(dsc,sscop_recresp); + if (dsc->ops->rec_ind) dsc->ops->rec_ind(dsc->user); + return 1; + case SSCOP_RS: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + STOP_TIMER(dsc->timer_cc); + dsc->vt_ms = mr; + clear_receive_buffer(dsc); + next_state(dsc,sscop_inres); + if (dsc->ops->res_ind) + dsc->ops->res_ind(dsc->user,msg,length); + return 0; + default: + break; + } + case sscop_recresp: /* 20.27-29 */ + switch (type) { + case SSCOP_BGAK: + case SSCOP_RSAK: + bad_pdu(dsc,type); + return 1; + case SSCOP_ERAK: + case SSCOP_SD: + case SSCOP_POLL: + return 1; + case SSCOP_END: + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + bad_pdu(dsc,type); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_RS: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + dsc->vt_ms = mr; + next_state(dsc,sscop_inres); + if (dsc->ops->res_ind) + dsc->ops->res_ind(dsc->user,msg,length); + return 1; + case SSCOP_ER: + if (!detect_retransmission(dsc,sq)) bad_pdu(dsc,type); + else send_pdu(dsc,SSCOP_ERAK,NULL,0); + return 1; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + dsc->vt_ms = mr; + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + case SSCOP_STAT: + case SSCOP_USTAT: + bad_pdu(dsc,type); + send_pdu(dsc,SSCOP_END,NULL,1); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + default: + break; + } + case sscop_inrec: /* 20.30-33 */ + switch (type) { + case SSCOP_END: + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + bad_pdu(dsc,type); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_USTAT: + case SSCOP_STAT: + case SSCOP_POLL: + case SSCOP_SD: + bad_pdu(dsc,type); + send_pdu(dsc,SSCOP_END,NULL,1); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_RSAK: + case SSCOP_BGAK: + case SSCOP_ERAK: + bad_pdu(dsc,type); + return 1; + case SSCOP_RS: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + dsc->vt_ms = mr; + next_state(dsc,sscop_inres); + if (dsc->ops->res_ind) + dsc->ops->res_ind(dsc->user,msg,length); + return 1; + case SSCOP_ER: + if (!detect_retransmission(dsc,sq)) bad_pdu(dsc,type); + return 1; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + bad_pdu(dsc,type); + return 1; + } + dsc->vt_ms = mr; + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + default: + break; + } + case sscop_ready: /* 20.34-46 */ + switch (type) { + case SSCOP_BGAK: + case SSCOP_ERAK: + case SSCOP_RSAK: + return 1; + case SSCOP_ER: + if (detect_retransmission(dsc,sq)) { + START_TIMER(noresp); + send_pdu(dsc,SSCOP_ERAK,NULL,0); + return 1; + } + reset_data_transfer_timers(dsc); + dsc->vt_ms = mr; + prepare_recovery(dsc); + next_state(dsc,sscop_inrec); + deliver_data(dsc); + if (dsc->ops->rec_ind) dsc->ops->rec_ind(dsc->user); + return 1; + case SSCOP_BGN: + if (detect_retransmission(dsc,sq)) { + START_TIMER(noresp); + send_pdu(dsc,SSCOP_BGAK,NULL,0); + return 1; + } + reset_data_transfer_timers(dsc); + dsc->vt_ms = mr; + prepare_retrieval(dsc); + next_state(dsc,sscop_inconn); + if (dsc->ops->restart) + dsc->ops->restart(dsc->user,msg,length,1); + return 1; + case SSCOP_ENDAK: + case SSCOP_BGREJ: + reset_data_transfer_timers(dsc); + bad_pdu(dsc,type); + prepare_retrieval(dsc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,NULL,0,0); + return 0; + case SSCOP_RS: + if (detect_retransmission(dsc,sq)) { + START_TIMER(noresp); + send_pdu(dsc,SSCOP_RSAK,NULL,0); + return 1; + } + reset_data_transfer_timers(dsc); + dsc->vt_ms = mr; + prepare_retrieval(dsc); + next_state(dsc,sscop_inres); + if (dsc->ops->res_ind) + dsc->ops->res_ind(dsc->user,msg,length); + return 1; + case SSCOP_END: + reset_data_transfer_timers(dsc); + send_pdu(dsc,SSCOP_ENDAK,NULL,0); + prepare_retrieval(dsc); + next_state(dsc,sscop_idle); + if (dsc->ops->rel_ind) + dsc->ops->rel_ind(dsc->user,msg,length,!s); + return 0; + case SSCOP_SD: + data_sd(dsc,s,msg,length); + return 1; + case SSCOP_POLL: + dsc->vr_ps = ps; /* store */ + data_poll(dsc,s); + return 1; + case SSCOP_USTAT: + data_ustat(dsc,mr,r,SSCOP_N(((unsigned long *) msg)[0]), + SSCOP_N(((unsigned long *) msg)[1])); + return 1; + case SSCOP_STAT: + data_stat(dsc,ps,mr,r,msg,length/4); + return 1; + default: + break; + } + } + return 1; +} + + +void sscop_pdu(SSCOP_DSC *dsc,void *msg,int size) +{ + if (handle_sscop_pdu(dsc,msg,size)) + if (dsc->state == sscop_ready) try_to_send(dsc); +} + + +/* --- From SSCOP user ----------------------------------------------------- */ + + +void sscop_retrieve(SSCOP_DSC *dsc,int rn) +{ + BUFFER *buf; + int i; + + if (dsc->state != sscop_idle && dsc->state != sscop_inconn && + dsc->state != sscop_outdisc && dsc->state != sscop_inres && + dsc->state != sscop_recresp && dsc->state != sscop_inrec) + diag(COMPONENT,DIAG_FATAL,"sscop_retrieve invoked in state %s", + state_name[dsc->state]); + if (rn != SSCOP_RN_UNKNOWN) + for (i = rn == SSCOP_RN_TOTAL ? dsc->vt_a : MOD24(rn+1); + NORM_TX(dsc->vt_a) <= NORM_TX(i) && NORM_TX(i) < NORM_TX(dsc->vt_s); + INC24(i)) { + buf = queue_lookup(&dsc->tx_buf,i); + if (buf) { + queue_remove(&dsc->tx_buf,buf); + if (dsc->ops->retr_ind) + dsc->ops->retr_ind(dsc->user,buf->data,buf->length); + buffer_discard(buf); + } + } + while ((buf = queue_get(&dsc->tx_q))) { + if (dsc->ops->retr_ind) + dsc->ops->retr_ind(dsc->user,buf->data,buf->length); + buffer_discard(buf); + } + if (dsc->ops->retr_comp) dsc->ops->retr_comp(dsc->user); +} + + +void sscop_send(SSCOP_DSC *dsc,void *buffer,int size) /* 20.38 */ +{ + BUFFER *buf; + + if (dsc->state != sscop_ready && (dsc->state != sscop_outrec || + dsc->clear_buffers)) return; /* 20.23 */ + buf = buffer_create(size,0); + memcpy(buf->data,buffer,size); + queue_put(&dsc->tx_q,buf); + try_to_send(dsc); +} + + +void sscop_estab_req(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel) +{ + switch (dsc->state) { + case sscop_outdisc: /* 20.14 */ + STOP_TIMER(dsc->timer_cc); + /* fall through */ + case sscop_idle: /* 20.5 */ + clear_transmitter(dsc); + dsc->clear_buffers = buf_rel; + dsc->vt_cc = 1; + INC8(dsc->vt_sq); + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_BGN,uu_data,uu_length); + START_TIMER(cc); + next_state(dsc,sscop_outconn); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"sscop_estab_req invoked in state %s", + state_name[dsc->state]); +} + + +void sscop_estab_resp(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel) + /* 20.11 */ +{ + if (dsc->state != sscop_inconn) + diag(COMPONENT,DIAG_FATAL,"sscop_estab_resp invoked in state %s", + state_name[dsc->state]); + clear_transmitter(dsc); + dsc->clear_buffers = buf_rel; + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_BGAK,uu_data,uu_length); + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + try_to_send(dsc); /* probably not ... */ +} + + +void sscop_rel_req(SSCOP_DSC *dsc,void *uu_data,int uu_length) +{ + switch (dsc->state) { + case sscop_outrec: /* 20.24 */ + clear_receive_buffer(dsc); + /* fall through */ + case sscop_outconn: /* 20.9 */ + case sscop_outres: /* 20.18 */ + STOP_TIMER(dsc->timer_cc); + /* fall through */ + case sscop_inres: /* 20.20 */ + case sscop_recresp: /* 20.28 */ + case sscop_inrec: /* 20.30 */ + dsc->vt_cc = 1; + send_pdu(dsc,SSCOP_END,uu_data,uu_length); + START_TIMER(cc); + next_state(dsc,sscop_outdisc); + return; + case sscop_inconn: /* 20.11 */ + send_pdu(dsc,SSCOP_BGREJ,uu_data,uu_length); + next_state(dsc,sscop_idle); + return; + case sscop_ready: /* 20.34 */ + reset_data_transfer_timers(dsc); + dsc->vt_cc = 1; + send_pdu(dsc,SSCOP_END,uu_data,uu_length); + prepare_retrieval(dsc); + START_TIMER(cc); + next_state(dsc,sscop_outdisc); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"sscop_rel_req invoked in state %s", + state_name[dsc->state]); +} + + +void sscop_res_req(SSCOP_DSC *dsc,void *uu_data,int uu_length) +{ + switch (dsc->state) { + case sscop_outrec: /* 20.25 */ + STOP_TIMER(dsc->timer_cc); + clear_receive_buffer(dsc); + /* fall through */ + case sscop_recresp: /* 20.29 */ + dsc->vt_cc = 1; + INC8(dsc->vt_sq); + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_RS,uu_data,uu_length); + clear_transmitter(dsc); + START_TIMER(cc); + next_state(dsc,sscop_outres); + return; + case sscop_inrec: /* 20.30 */ + clear_transmitter(dsc); + dsc->vt_cc = 1; + INC8(dsc->vt_sq); + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_RS,uu_data,uu_length); + START_TIMER(cc); + next_state(dsc,sscop_outres); + return; + case sscop_ready: /* 20.34 */ + reset_data_transfer_timers(dsc); + dsc->vt_cc = 1; + INC8(dsc->vt_sq); + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_RS,uu_data,uu_length); + release_buffers(dsc); + START_TIMER(cc); + next_state(dsc,sscop_outres); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"sscop_res_req invoked in state %s", + state_name[dsc->state]); +} + + +void sscop_res_resp(SSCOP_DSC *dsc) /* 20.20 */ +{ + if (dsc->state != sscop_inres) + diag(COMPONENT,DIAG_FATAL,"sscop_res_resp invoked in state %s", + state_name[dsc->state]); + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_RSAK,NULL,0); + clear_transmitter(dsc); + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + try_to_send(dsc); /* probably not ... */ +} + + +void sscop_rec_resp(SSCOP_DSC *dsc) +{ + switch (dsc->state) { + case sscop_inrec: /* 20.30 */ + initialize_vr_mr(dsc); + send_pdu(dsc,SSCOP_ERAK,NULL,0); + /* fall through */ + case sscop_recresp: /* 20.28 */ + if (!dsc->clear_buffers) clear_transmission_buffer(dsc); + initialize_state_variables(dsc); + set_data_transfer_timers(dsc); + next_state(dsc,sscop_ready); + try_to_send(dsc); + return; + default: + break; + } + diag(COMPONENT,DIAG_FATAL,"sscop_rec_resp invoked in state %s", + state_name[dsc->state]); +} + + +void sscop_unitdata(SSCOP_DSC *dsc,void *buffer,int size) /* 20.47-48 */ +{ + send_pdu(dsc,SSCOP_UD,buffer,size); +} + + +void sscop_maa_data(SSCOP_DSC *dsc,void *buffer,int size) /* 20.47-48 */ +{ + send_pdu(dsc,SSCOP_MD,buffer,size); +} + + +void start_sscop(SSCOP_DSC *dsc,SSCOP_USER_OPS *ops,void *user_data) +{ + dsc->ops = ops; + dsc->user = user_data; + dsc->vt_sq = dsc->vr_sq = 0; /* 20.5 */ + dsc->clear_buffers = 1; + dsc->state = sscop_idle; + dsc->timer_cc = dsc->timer_poll = dsc->timer_noresp = + dsc->timer_keepalive = dsc->timer_idle = NULL; + queue_init(&dsc->rx_buf); + queue_init(&dsc->tx_q); + queue_init(&dsc->tx_buf); + queue_init(&dsc->rt_q); + dsc->last_bgn = dsc->last_end = dsc->last_rs = dsc->last_er = NULL; + dsc->cf_max_cc = SSCOP_CF_MaxCC; + dsc->cf_max_pd = SSCOP_CF_MaxPD; + dsc->cf_max_stat = SSCOP_CF_MaxSTAT; + dsc->cf_timer_cc = TIMER_CC; + dsc->cf_timer_poll = TIMER_POLL; + dsc->cf_timer_noresp = TIMER_NORESP; + dsc->cf_timer_keepalive = TIMER_KEEPALIVE; + dsc->cf_timer_idle = TIMER_IDLE; + dsc->list = NULL; +} + + +void stop_sscop(SSCOP_DSC *dsc) +{ + if (dsc->state != sscop_idle) + diag(COMPONENT,DIAG_WARN,"stopping dsc in state %s", + state_name[dsc->state]); + dsc->state = sscop_idle; /* avoid send attempts */ + STOP_TIMER(dsc->timer_cc); + STOP_TIMER(dsc->timer_poll); + STOP_TIMER(dsc->timer_noresp); + STOP_TIMER(dsc->timer_keepalive); + STOP_TIMER(dsc->timer_idle); + queue_clear(&dsc->rx_buf); + queue_clear(&dsc->tx_q); + queue_clear(&dsc->tx_buf); + queue_clear(&dsc->rt_q); + if (dsc->last_bgn) buffer_discard(dsc->last_bgn); + if (dsc->last_end) buffer_discard(dsc->last_end); + if (dsc->last_rs) buffer_discard(dsc->last_rs); + if (dsc->last_er) buffer_discard(dsc->last_er); + if (dsc->list) free(dsc->list); +} diff -ur --new-file old/atm/saal/sscop.h new/atm/saal/sscop.h --- old/atm/saal/sscop.h Thu Jan 1 01:00:00 1970 +++ new/atm/saal/sscop.h Tue Oct 24 17:55:57 1995 @@ -0,0 +1,132 @@ +/* sscop.h - SSCOP (Q.2110) user interface */ + +/* Written 1995 by Werner Almesberger, EPFL-LRC */ + + +#ifndef SSCOP_H +#define SSCOP_H + +#include "atmd.h" + + +typedef enum { sscop_idle,sscop_outconn,sscop_inconn,sscop_outdisc, + sscop_outres,sscop_inres,sscop_outrec,sscop_recresp,sscop_inrec, + sscop_ready } SSCOP_STATE; + +typedef struct { + SSCOP_STATE state; + struct _sscop_user_ops *ops; + void *user; + /* --- Configurable parameters ----------------------------------------- */ + int cf_max_cc,cf_max_pd,cf_max_stat; + int cf_timer_cc,cf_timer_poll,cf_timer_noresp,cf_timer_keepalive, + cf_timer_idle; + /* --- SSCOP information, TX part -------------------------------------- */ + int vt_s; /* send sequence number */ + int vt_ps; /* poll send sequence number */ + int vt_a; /* acknowledge sequence number */ + int vt_pa; /* poll sequence number */ + int vt_ms; /* maximum send sequence */ + int vt_pd; /* SD PDUs between POLL PDUs */ + int vt_cc; /* number of unacknowledged BSG, END, ER or RS PDUs */ + int vt_sq; /* connection number */ + /* --- SSCOP information, RX part -------------------------------------- */ + int vr_r; /* receiver sequence number */ + int vr_h; /* highest expected SD PDU */ + int vr_mr; /* maximum acceptable (receiver) */ + int vr_sq; /* connection number */ + int vr_ps; /* non-Q.2110: keeps N(PS) received in last POLL for STAT */ + /* Other variables */ + int clear_buffers; + int credit; + /* Timers */ + TIMER *timer_cc,*timer_poll,*timer_noresp,*timer_keepalive,*timer_idle; + /* Queues and buffers */ + QUEUE tx_buf,tx_q,rx_buf,rt_q; + BUFFER *last_bgn,*last_end,*last_rs,*last_er; /* for retransmission */ + /* Misc items */ + int *list; /* STAT construction list */ +} SSCOP_DSC; + + +/* + * Note: UU data of primitives carrying such is only available if + * - the "user" flag is set (if available) and + * - uu_data is non-NULL, and + * - uu_length is non-zero + * in all other cases, uu_data must not be dereferenced. + * + * Note: the "ind" parameter in restart indicates whether the release primitive + * is an AA-RELEASE.indication (ind = 1) or to an AA-RELEASE.confirm (ind = 0). + */ + + +typedef struct _sscop_user_ops { + void (*estab_ind)(void *user_data,void *uu_data,int uu_length); + /* AA-ESTABLISH.indication */ + void (*estab_conf)(void *user_data,void *uu_data,int uu_length); + /* AA-ESTABLISH.confirm */ + void (*rel_ind)(void *user_data,void *uu_data,int uu_length,int user); + /* AA-RELEASE.indication */ + void (*rel_conf)(void *user_data); /* AA-RELEASE.confirm */ + void (*restart)(void *user_data,void *uu_data,int uu_length,int ind); + /* AA-RELEASE.indication or AA-RELEASE.confirm immediately followed by + AA-ESTABLISH.indication */ + void (*res_ind)(void *user_data,void *uu_data,int uu_length); + /* AA-RESYNC.indication */ + void (*res_conf)(void *user_data); /* AA-RESYNC.confirm */ + void (*rec_ind)(void *user_data); /* AA-RECOVER.indication */ + void (*data_ind)(void *user_data,void *data,int length,int sn); + /* AA-DATA.indication */ + void (*unitdata)(void *user_data,void *data,int length); + /* AA-UNITDATA.indication */ + void (*retr_ind)(void *user_data,void *data,int length); + /* AA-RETRIEVE.indication */ + void (*retr_comp)(void *user_data); /* AA-RETRIEVE_COMPLETE.indication */ + void (*maa_data)(void *user_data,void *data,int length); + /* MAA-UNITDATA.indication */ + int (*maa_error)(void *user_data,char code,int count); + /* MAA-ERROR.indication */ + void (*cpcs_send)(void *user_data,void *data,int length); +} SSCOP_USER_OPS; + + +/* Attach/detach protocol */ + +void start_sscop(SSCOP_DSC *dsc,SSCOP_USER_OPS *ops,void *user_data); +void stop_sscop(SSCOP_DSC *dsc); + +/* Connection control */ + +void sscop_estab_req(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel); + /* AA-ESTABLISH.request */ +void sscop_estab_resp(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel); + /* AA-ESTABLISH.response */ +void sscop_rel_req(SSCOP_DSC *dsc,void *uu_data,int uu_length); + /* AA-RELEASE.request */ +void sscop_res_req(SSCOP_DSC *dsc,void *uu_data,int uu_length); + /* AA-RESYNC.request */ +void sscop_res_resp(SSCOP_DSC *dsc); /* AA-RESYNC.response */ +void sscop_rec_resp(SSCOP_DSC *dsc); /* AA-RECOVER.response */ + +/* Incoming PDU from lower layer */ + +void sscop_pdu(SSCOP_DSC *dsc,void *msg,int size); /* CPCS-UNITDATA.request */ + +/* Send data */ + +void sscop_send(SSCOP_DSC *dsc,void *buffer,int size); + /* AA-DATA.request, 20.38 */ +void sscop_unitdata(SSCOP_DSC *dsc,void *buffer,int size); + /* AA-UNIDATA.request, 20.47 */ +void sscop_maa_data(SSCOP_DSC *dsc,void *buffer,int size); + /* MAA-UNITDATA.request, 20.47 */ + +/* Retrieve unsent data */ + +#define SSCOP_RN_UNKNOWN -2 /* -1 is (theoretically) a valid rn ... */ +#define SSCOP_RN_TOTAL -3 + +void sscop_retrieve(SSCOP_DSC *dsc,int rn); /* AA-RETRIEVE.request */ + +#endif diff -ur --new-file old/atm/sigd/Makefile new/atm/sigd/Makefile --- old/atm/sigd/Makefile Thu Jul 18 21:42:01 1996 +++ new/atm/sigd/Makefile Wed Jul 31 14:40:52 1996 @@ -1,17 +1,13 @@ -LIBS=-latmd -lfl # lex may want -ll here -INCLUDES=-I../qgen -I. -OBJS=atmsigd.o io.o kernel.o mess.o proto.o q2931.o saal.o sap.o sscf.o \ - sscop.o timeout.o q.out.o lex.yy.o y.tab.o -SSCOP_OBJS=sscop.o +LIBS=-L../saal -lsaal -latmd -lfl # lex may want -ll here +INCLUDES=-I../qgen -I../saal -I. +OBJS=atmsigd.o io.o kernel.o mess.o proto.o q2931.o sap.o timeout.o q.out.o \ + lex.yy.o y.tab.o BOOTPGMS=atmsigd -USRPGMS=svc #test doesn't work anymore TRASH=q.out.h q.out.o mess.c MANS= include ../Rules.make - - -test: $(SSCOP_OBJS) +CFLAGS += $(STANDARDS) atmsigd: $(OBJS) $(CC) $(LDFLAGS) -o atmsigd $(OBJS) $(LDLIBS) $(LIBS) @@ -24,8 +20,6 @@ q.out.o: ln -s ../qgen/q.out.o - -svc: svc.o # don't collapse compile and link phase depend: fake_q.out.h diff -ur --new-file old/atm/sigd/atmsigd.c new/atm/sigd/atmsigd.c --- old/atm/sigd/atmsigd.c Thu May 9 20:27:00 1996 +++ new/atm/sigd/atmsigd.c Tue Jul 30 20:19:21 1996 @@ -230,8 +230,10 @@ break; case 'd': set_verbosity(NULL,DIAG_DEBUG); + set_verbosity("QMSG",DIAG_INFO); + set_verbosity("SSCOP",DIAG_INFO); debug = 1; - q_dump = 1; + /*q_dump = 1;*/ break; case 'l': set_logfile(optarg); @@ -246,8 +248,17 @@ usage(argv[0]); } if (optind != argc) usage(argv[0]); - diag(COMPONENT,DIAG_INFO,"Linux ATM signaling UNI 3.x(red)/AAL5, version " - VERSION); + diag(COMPONENT,DIAG_INFO,"Linux ATM signaling " +#ifdef UNI30 + "UNI 3.0" +#endif +#ifdef UNI31 + "UNI 3.1" +#ifdef ALLOW_UNI30 + "+3.0compat" +#endif +#endif + "/AAL5, version " VERSION); if (!(yyin = fopen(config_file,"r"))) diag(COMPONENT,DIAG_WARN,"%s not found. - Using defaults.",config_file); else if (yyparse()) { diff -ur --new-file old/atm/sigd/io.c new/atm/sigd/io.c --- old/atm/sigd/io.c Thu Mar 14 13:58:07 1996 +++ new/atm/sigd/io.c Wed Jul 31 15:40:56 1996 @@ -64,26 +64,20 @@ size = read(kernel,buffer,KERNEL_BUFFER_SIZE); if (size < 0) { - perror("read kernel"); + diag(COMPONENT,DIAG_ERROR,"read kernel: %s",strerror(errno)); return; } - if (size < KERNEL_BASE_LEN) { + if (size < KERNEL_BASE_LEN) diag(COMPONENT,DIAG_FATAL,"kernel message too short (%d < %d)",size, KERNEL_BASE_LEN); - return; - } - if (size == KERNEL_BUFFER_SIZE) { /* gotcha ! */ + if (size == KERNEL_BUFFER_SIZE) /* gotcha ! */ diag(COMPONENT,DIAG_FATAL,"kernel message too big (>= %d)", KERNEL_BUFFER_SIZE); - return; - } bllis = (size-KERNEL_BASE_LEN)/sizeof(struct atm_blli); - if (size != KERNEL_BASE_LEN+bllis*sizeof(struct atm_blli)) { + if (size != KERNEL_BASE_LEN+bllis*sizeof(struct atm_blli)) diag(COMPONENT,DIAG_FATAL, "kernel message has bad length (got %d, base is %d, incr is %d)", size,KERNEL_BASE_LEN,sizeof(struct atm_blli)); - return; - } from_kernel((struct atmsvc_msg *) buffer,size); } @@ -121,15 +115,21 @@ static int open_signaling(void) { + struct atm_qos qos; int s; if ((s = socket(PF_ATMPVC,SOCK_DGRAM,ATM_AAL5)) < 0) { perror("socket"); return -1; } + memset(&qos,0,sizeof(qos)); + qos.rxtp.traffic_class = qos.txtp.traffic_class = ATM_UBR; + qos.rxtp.max_sdu = qos.txtp.max_sdu = MAX_Q_MSG; + if (setsockopt(s,SOL_ATM,SO_ATMQOS,&qos,sizeof(qos)) < 0) { + perror("setsockopt SO_ATMQOS"); + return -1; + } signaling_pvc.sap_family = AF_ATMPVC; - signaling_pvc.sap_rxtp.class = signaling_pvc.sap_txtp.class = ATM_UBR; - signaling_pvc.sap_rxtp.max_sdu = signaling_pvc.sap_txtp.max_sdu = MAX_Q_MSG; if (bind(s,(struct sockaddr *) &signaling_pvc,sizeof(signaling_pvc)) < 0) { perror("bind"); return -1; diff -ur --new-file old/atm/sigd/kernel.c new/atm/sigd/kernel.c --- old/atm/sigd/kernel.c Fri May 31 19:57:47 1996 +++ new/atm/sigd/kernel.c Tue Jul 30 21:25:05 1996 @@ -51,14 +51,13 @@ this */ #endif q_assign(&dsc,QF_sscs_type,0); /* unspecified - LANE wants this */ - error = sap_encode(&dsc,sock->remote); + error = sap_encode(&dsc,sock->remote,&sock->qos); q_assign(&dsc,QF_bearer_class,16); /* BCOB-X */ q_assign(&dsc,QF_traf_type,0); /* force presence - UNI 3.0 wants this */ q_assign(&dsc,QF_upcc,0); /* p2p */ #ifndef UNI30 q_assign(&dsc,QF_qos_cs,Q2931_CS_ITU); #endif - q_assign(&dsc,QF_qos_cs,Q2931_CS_NET); q_assign(&dsc,QF_qos_fw,0); /* QOS 0 */ q_assign(&dsc,QF_qos_bw,0); local = NULL; @@ -96,7 +95,14 @@ q_assign(&dsc,QF_msg_type,QMSG_CONNECT); q_assign(&dsc,QF_call_ref,sock->call_ref); if (sock->ep_ref >= 0) q_assign(&dsc,QF_ep_ref,sock->ep_ref); - /* @@@ lots of data */ + q_assign(&dsc,QF_aal_type,5); +#ifdef UNI30 + q_assign(&dsc,QF_aal_mode,1); /* Message mode - LANE seems to really want + this */ +#endif + q_assign(&dsc,QF_sscs_type,0); /* unspecified - LANE wants this */ + q_assign(&dsc,QF_fw_max_sdu,sock->qos.rxtp.max_sdu); + q_assign(&dsc,QF_bw_max_sdu,sock->qos.txtp.max_sdu); if ((size = q_close(&dsc)) >= 0) to_signaling(q_buffer,size); return 0; } @@ -131,6 +137,10 @@ switch (msg->type) { case as_bind: /* only in NULL state */ if (sock) break; + if (msg->aal != ATM_AAL5) { + SEND_ERROR(msg->vcc,-EINVAL); + return; + } if (!*msg->svc.sas_addr.pub && !*msg->svc.sas_addr.prv) #ifdef BE_PICKY_ABOUT_BINDING_LOCAL_WILDCARD_ADDRESSES if (local_addr[0].state != ls_same) @@ -138,7 +148,7 @@ else #endif send_kernel(msg->vcc,0,as_okay,0,NULL,NULL, - &local_addr[0].addr); + &local_addr[0].addr,NULL); else { LOCAL_ADDR *walk; @@ -147,36 +157,35 @@ &msg->svc,0,0)) break; if (walk->state == ls_unused) SEND_ERROR(msg->vcc,-EADDRNOTAVAIL); - else send_kernel(msg->vcc,0,as_okay,0,NULL,NULL,NULL); + else send_kernel(msg->vcc,0,as_okay,0,NULL,NULL,NULL,NULL); } return; - case as_establish: /* NULL or LISTENING */ - if (sock && sock->state != ss_listening) break; - if (!sock) { - sock = new_sock(msg->vcc); - error = bind_check(sock,&msg->local); - if (!error) { - sock->remote = sap_copy(&msg->svc); - if (!sock->remote) error = -EINVAL; - } - if (error) { - free_sock(sock); - SEND_ERROR(msg->vcc,error); - return; - } - sock->pvc.sap_txtp = sock->remote->sas_txtp; - sock->pvc.sap_rxtp = sock->remote->sas_rxtp; - sock->state = ss_connecting; - error = send_setup(sock); - if (error) { - SEND_ERROR(msg->vcc,error); - free_sock(sock); - return; - } - START_TIMER(sock,T303); - new_state(sock,ss_connecting); + case as_connect: /* NULL state only */ + if (sock) break; + sock = new_sock(msg->vcc); + error = bind_check(sock,&msg->local); + if (!error) { + sock->remote = sap_copy(&msg->svc); + if (!sock->remote) error = -EINVAL; + } + if (error) { + free_sock(sock); + SEND_ERROR(msg->vcc,error); return; } + sock->qos = msg->qos; + sock->state = ss_connecting; + error = send_setup(sock); + if (error) { + SEND_ERROR(msg->vcc,error); + free_sock(sock); + return; + } + START_TIMER(sock,T303); + new_state(sock,ss_connecting); + return; + case as_accept: /* LISTENING only */ + if (sock->state != ss_listening) break; /* becomes INDICATED or ZOMBIE */ if (!sock->listen) { diag(COMPONENT,DIAG_WARN, @@ -213,14 +222,15 @@ if (sock) break; sap = sap_copy(&msg->svc); - if (lookup_sap(sap,NULL)) { + if (lookup_sap(sap,&msg->qos,NULL,NULL)) { free(sap); SEND_ERROR(msg->vcc,-EADDRINUSE); return; } sock = new_sock(msg->vcc); sock->local = sap_copy(&msg->svc); - send_kernel(sock->id,0,as_okay,0,NULL,NULL,NULL); + sock->qos = msg->qos; + send_kernel(sock->id,0,as_okay,0,NULL,NULL,NULL,NULL); sock->state = ss_listening; return; } diff -ur --new-file old/atm/sigd/proto.c new/atm/sigd/proto.c --- old/atm/sigd/proto.c Wed Apr 17 18:28:34 1996 +++ new/atm/sigd/proto.c Tue Jul 30 18:10:59 1996 @@ -32,8 +32,8 @@ "CONN_REQ", "IN_PROC", "ACTIVE", "REL_REQ", "REL_IND" }; -const char *as_name[] = { "","as_bind","as_establish","as_listen", - "as_okay","as_indicate","as_close" }; +const char *as_name[] = { "","as_bind","as_connect","as_accept", + "as_listen","as_okay","as_error","as_indicate","as_close" }; const Q2931_STATE state_map[] = { /* formatting aligned with STATE */ qs_null, qs_null, qs_null, qs_call_init, @@ -58,7 +58,7 @@ sock = alloc_t(SOCKET); sock->state = ss_invalid; sock->pvc.sap_addr.vpi = sock->pvc.sap_addr.vci = 0; - sock->pvc.sap_txtp.class = sock->pvc.sap_rxtp.class = ATM_UBR; + sock->qos.txtp.traffic_class = sock->qos.rxtp.traffic_class = ATM_UBR; sock->id = id; sock->local = sock->remote = NULL; sock->error = 0; @@ -107,14 +107,16 @@ } -SOCKET *lookup_sap(struct sockaddr_atmsvc *sap,struct sockaddr_atmsvc **res) +SOCKET *lookup_sap(const struct sockaddr_atmsvc *sap,const struct atm_qos *qos, + struct sockaddr_atmsvc **res_sap,struct atm_qos *res_qos) { SOCKET *walk,*wildcard; wildcard = NULL; for (walk = sockets; walk; walk = walk->next) if (walk->state == ss_listening) { - if (walk->local && sap_compat(walk->local,sap,res)) return walk; + if (walk->local && sap_compat(walk->local,sap,res_sap,&walk->qos, + qos,res_qos)) return walk; if (!walk->local) wildcard = walk; } return wildcard; @@ -161,8 +163,9 @@ void send_kernel(unsigned long vcc,unsigned long listen_vcc, - enum atmsvc_msg_type type,int reply,struct sockaddr_atmpvc *pvc, - struct sockaddr_atmsvc *svc,struct sockaddr_atmsvc *local) + enum atmsvc_msg_type type,int reply,const struct sockaddr_atmpvc *pvc, + const struct sockaddr_atmsvc *svc,const struct sockaddr_atmsvc *local, + const struct atm_qos *qos) { struct atmsvc_msg *msg; struct atm_blli *walk; @@ -178,6 +181,8 @@ msg->reply = reply; if (pvc) msg->pvc = *pvc; else memset(&msg->pvc,0,sizeof(msg->pvc)); + if (qos) msg->qos = *qos; + else memset(&msg->qos,0,sizeof(msg->qos)); if (!local) memset(&msg->local,0,sizeof(msg->local)); else { msg->local = *local; @@ -243,7 +248,7 @@ void send_close(SOCKET *sock) { if (sock->error == 1234) diag(COMPONENT,DIAG_ERROR,"BUG! BUG! BUG!"); - SEND_ERROR(sock->id,sock->error); + send_kernel(sock->id,0L,as_close,sock->error,NULL,NULL,NULL,NULL); sock->error = 1234; } diff -ur --new-file old/atm/sigd/proto.h new/atm/sigd/proto.h --- old/atm/sigd/proto.h Wed Apr 17 18:25:02 1996 +++ new/atm/sigd/proto.h Tue Jul 30 18:10:49 1996 @@ -32,6 +32,7 @@ unsigned long id; struct sockaddr_atmsvc *local; /* local SAP */ struct sockaddr_atmsvc *remote; /* remote SAP */ + struct atm_qos qos; /* QOS parameters */ int error; /* error code for close */ /* --- Q.93B/Q.2931 information ---------------------------------------- */ Q2931_STATE q2931_state; @@ -66,7 +67,8 @@ (int) sizeof(struct atm_blli)+1) #define bllis2msg(n) (sizeof(struct atmsvc_msg)+sizeof(struct atm_blli)*((n)-1)) -#define SEND_ERROR(vcc,code) send_kernel(vcc,0L,as_close,code,NULL,NULL,NULL) +#define SEND_ERROR(vcc,code) \ + send_kernel(vcc,0L,as_error,code,NULL,NULL,NULL,NULL) void from_kernel(struct atmsvc_msg *msg,int size); @@ -74,8 +76,9 @@ void to_q2931(void *msg,int size); void send_kernel(unsigned long vcc,unsigned long listen_vcc, - enum atmsvc_msg_type type,int reply,struct sockaddr_atmpvc *pvc, - struct sockaddr_atmsvc *svc,struct sockaddr_atmsvc *local); + enum atmsvc_msg_type type,int reply,const struct sockaddr_atmpvc *pvc, + const struct sockaddr_atmsvc *svc,const struct sockaddr_atmsvc *local, + const struct atm_qos *qos); void from_net(void *msg,int size); void to_signaling(void *msg,int size); void saal_failure(void); @@ -85,7 +88,8 @@ SOCKET *new_sock(unsigned long id); void free_sock(SOCKET *sock); void new_state(SOCKET *sock,STATE state); -SOCKET *lookup_sap(struct sockaddr_atmsvc *sap,struct sockaddr_atmsvc **res); +SOCKET *lookup_sap(const struct sockaddr_atmsvc *sap,const struct atm_qos *qos, + struct sockaddr_atmsvc **res_sap,struct atm_qos *res_qos); void send_release(SOCKET *sock,unsigned char reason,...); void send_release_complete(unsigned long call_ref,unsigned char cause); diff -ur --new-file old/atm/sigd/q2931.c new/atm/sigd/q2931.c --- old/atm/sigd/q2931.c Fri Jul 19 12:00:28 1996 +++ new/atm/sigd/q2931.c Tue Jul 30 18:14:56 1996 @@ -59,12 +59,13 @@ { SOCKET *sock,*this,**walk; struct sockaddr_atmsvc *sap,*new_sap; + struct atm_qos qos,new_qos; unsigned char buf[ATM_ESA_LEN]; int len,i; - sap = sap_decode(&in_dsc); + sap = sap_decode(&in_dsc,&qos); new_sap = NULL; - sock = lookup_sap(sap,&new_sap); + sock = lookup_sap(sap,&qos,&new_sap,&new_qos); if (!sock || new_sap) free(sap); else new_sap = sap; /* @@@ should strip extra BLLIs */ if (!sock) { @@ -79,6 +80,7 @@ this->ep_ref = q_fetch(&in_dsc,QF_ep_ref); send_call_proceeding(this); this->local = new_sap; + this->qos = new_qos; /* if (sock->local) *this->local->sas_addr = sock->local->sas_addr; ??? */ diag(COMPONENT,DIAG_DEBUG,"AAL type %ld",q_fetch(&in_dsc,QF_aal_type)); len = q_read(&in_dsc,QF_cdpn_esa,(void *) &buf,sizeof(buf)); @@ -99,8 +101,6 @@ this->pvc.sap_addr.vpi,this->pvc.sap_addr.vci); this->remote = alloc_t(struct sockaddr_atmsvc); memset(this->remote,0,sizeof(struct sockaddr_atmsvc)); - this->pvc.sap_txtp = this->remote->sas_txtp = new_sap->sas_txtp; - this->pvc.sap_rxtp = this->remote->sas_rxtp = new_sap->sas_rxtp; if (q_present(&in_dsc,QF_cgpn)) { /* should handle E.164 too */ char buffer[MAX_ATM_ADDR_LEN+1]; @@ -112,7 +112,7 @@ pretty) < 0) strcpy(buffer,""); diag(COMPONENT,DIAG_DEBUG,"Incoming call from %s",buffer); } - send_kernel(0,sock->id,as_indicate,0,&this->pvc,this->remote,NULL); + send_kernel(0,sock->id,as_indicate,0,&this->pvc,this->remote,NULL,&new_qos); for (walk = &sock->listen; *walk; walk = &(*walk)->listen); *walk = this; diag(COMPONENT,DIAG_DEBUG,"SE vpi.vci=%d.%d",this->pvc.sap_addr.vpi, @@ -306,7 +306,8 @@ send_connect_ack(sock); /* @@@ fill in sock->remote */ /* @@@ fill in traffic parameters */ - send_kernel(sock->id,0,as_okay,0,&sock->pvc,NULL,sock->local); + send_kernel(sock->id,0,as_okay,0,&sock->pvc,NULL,sock->local, + &sock->qos); new_state(sock,ss_connected); diag(COMPONENT,DIAG_INFO,"Active open succeeded (CR 0x%06X)", sock->call_ref); @@ -320,7 +321,7 @@ } if (sock->state != ss_accepting) break; STOP_TIMER(sock); - send_kernel(sock->id,0,as_okay,0,NULL,NULL,sock->local); + send_kernel(sock->id,0,as_okay,0,NULL,NULL,sock->local,NULL); new_state(sock,ss_connected); diag(COMPONENT,DIAG_INFO,"Passive open succeeded (CR 0x%06X)", sock->call_ref); @@ -408,8 +409,6 @@ case ss_connected: diag(COMPONENT,DIAG_INFO,"Passive close (CR 0x%06X)", sock->call_ref); - sock->error = -sock->error; - /* context is still around */ send_close(sock); /* fall through */ case ss_hold: diff -ur --new-file old/atm/sigd/saal.c new/atm/sigd/saal.c --- old/atm/sigd/saal.c Wed Sep 27 15:14:45 1995 +++ new/atm/sigd/saal.c Thu Jan 1 01:00:00 1970 @@ -1,13 +0,0 @@ -/* saal.c - SAAL = SSCF+SSCOP */ - -/* Written 1995 by Werner Almesberger, EPFL-LRC */ - - -#include "sscop.h" -#include "saal.h" - - -void saal_pdu(SAAL_DSC *dsc,void *buffer,int length) -{ - sscop_pdu(&dsc->sscop,buffer,length); -} diff -ur --new-file old/atm/sigd/saal.h new/atm/sigd/saal.h --- old/atm/sigd/saal.h Wed Sep 27 11:07:23 1995 +++ new/atm/sigd/saal.h Thu Jan 1 01:00:00 1970 @@ -1,24 +0,0 @@ -/* saal.h - SAAL user interface */ - -/* Written 1995 by Werner Almesberger, EPFL-LRC */ - - -#ifndef SAAL_H -#define SAAL_H - -#include "sscf.h" -#include "sscop.h" - - -#define SAAL_DSC SSCF_DSC -#define SAAL_USER_OPS SSCF_USER_OPS -#define start_saal start_sscf -#define stop_saal stop_sscf -#define saal_estab_req sscf_estab_req -#define saal_rel_req sscf_rel_req -#define saal_send sscf_send -#define saal_unitdata sscf_unitdata - -void saal_pdu(SAAL_DSC *dsc,void *buffer,int length); - -#endif diff -ur --new-file old/atm/sigd/sap.c new/atm/sigd/sap.c --- old/atm/sigd/sap.c Mon Jul 15 19:24:37 1996 +++ new/atm/sigd/sap.c Mon Jul 29 17:27:25 1996 @@ -61,12 +61,14 @@ static int class_compat(const struct atm_trafprm *tx, const struct atm_trafprm *rx) { - if (tx->class == ATM_NONE || tx->class == ATM_ANYCLASS) return 1; - if (rx->class == ATM_UBR || rx->class == ATM_ANYCLASS) return 1; + if (tx->traffic_class == ATM_NONE || tx->traffic_class == ATM_ANYCLASS) + return 1; + if (rx->traffic_class == ATM_UBR || rx->traffic_class == ATM_ANYCLASS) + return 1; /* don't apply CAC to PCR */ - if (tx->class != rx->class) return 0; + if (tx->traffic_class != rx->traffic_class) return 0; /* ignore special cases like CBR to VBR for now */ - switch (tx->class) { + switch (tx->traffic_class) { case ATM_CBR: if (!rx->max_pcr || rx->max_pcr == ATM_MAX_PCR) return 1; return tx->min_pcr <= rx->max_pcr; @@ -74,7 +76,7 @@ bandwidth negotiation anyway. */ default: diag(COMPONENT,DIAG_ERROR,"unsupported traffic class %d\n", - tx->class); + tx->traffic_class); return 0; } } @@ -151,47 +153,56 @@ } -static int do_sap_compat(const struct sockaddr_atmsvc *old, - const struct sockaddr_atmsvc *new,struct sockaddr_atmsvc *res) +static int do_sap_compat(const struct sockaddr_atmsvc *old_sap, + const struct sockaddr_atmsvc *new_sap,const struct atm_qos *old_qos, + const struct atm_qos *new_qos,struct sockaddr_atmsvc *res_sap, + struct atm_qos *res_qos) { - if (old->sas_txtp.max_sdu && new->sas_rxtp.max_sdu && - old->sas_txtp.max_sdu > new->sas_rxtp.max_sdu) return 0; - if (new->sas_txtp.max_sdu && old->sas_rxtp.max_sdu && - new->sas_txtp.max_sdu > old->sas_rxtp.max_sdu) return 0; - if (!class_compat(&old->sas_txtp,&new->sas_rxtp) || - !class_compat(&new->sas_txtp,&old->sas_rxtp)) return 0; - if (!bhli_compat(&old->sas_addr.bhli,&new->sas_addr.bhli, - res ? &res->sas_addr.bhli : NULL)) return 0; - return blli_compat(old->sas_addr.blli,new->sas_addr.blli, - res ? &res->sas_addr.blli : NULL,res ? (struct atm_blli *) (res+1) : - NULL); + if (res_qos) *res_qos = *new_qos; + if (old_qos->txtp.max_sdu && new_qos->rxtp.max_sdu && + old_qos->txtp.max_sdu > new_qos->rxtp.max_sdu) return 0; + if (new_qos->txtp.max_sdu && old_qos->rxtp.max_sdu && + new_qos->txtp.max_sdu > old_qos->rxtp.max_sdu) return 0; + if (!class_compat(&old_qos->txtp,&new_qos->rxtp) || + !class_compat(&new_qos->txtp,&old_qos->rxtp)) return 0; + if (res_sap) *res_sap = *new_sap; + if (!bhli_compat(&old_sap->sas_addr.bhli,&new_sap->sas_addr.bhli, + res_sap ? &res_sap->sas_addr.bhli : NULL)) return 0; + return blli_compat(old_sap->sas_addr.blli,new_sap->sas_addr.blli, + res_sap ? &res_sap->sas_addr.blli : NULL, + res_sap ? (struct atm_blli *) (res_sap+1) : NULL); } -int sap_compat(const struct sockaddr_atmsvc *old, - const struct sockaddr_atmsvc *new,struct sockaddr_atmsvc **out) +int sap_compat(const struct sockaddr_atmsvc *old_sap, + const struct sockaddr_atmsvc *new_sap,struct sockaddr_atmsvc **out_sap, + const struct atm_qos *old_qos,const struct atm_qos *new_qos, + struct atm_qos *out_qos) { - struct sockaddr_atmsvc *res; + struct sockaddr_atmsvc *res_sap; + struct atm_qos res_qos; int compat; - if ((*old->sas_addr.prv || *old->sas_addr.pub) && !atm_equal(old,new,0,0)) - return 0; - if (!out) res = NULL; - else res = alloc(sizeof(struct sockaddr_atmsvc)+sizeof(struct atm_blli)); - compat = do_sap_compat(old,new,res); - if (out) - if (!compat) free(res); + if ((*old_sap->sas_addr.prv || *old_sap->sas_addr.pub) && + !atm_equal(old_sap,new_sap,0,0)) return 0; + if (!out_sap) res_sap = NULL; + else res_sap = alloc(sizeof(struct sockaddr_atmsvc)+ + sizeof(struct atm_blli)); + compat = do_sap_compat(old_sap,new_sap,old_qos,new_qos,res_sap,&res_qos); + if (out_sap) + if (!compat) free(res_sap); else { - *out = res; - *res = *new; - if (res->sas_addr.blli) - res->sas_addr.blli = (struct atm_blli *) (res+1); + *out_sap = res_sap; + if (res_sap->sas_addr.blli) + res_sap->sas_addr.blli = (struct atm_blli *) (res_sap+1); } + if (out_qos && compat) *out_qos = res_qos; return compat; } -int sap_encode(Q_DSC *dsc,const struct sockaddr_atmsvc *sap) +int sap_encode(Q_DSC *dsc,const struct sockaddr_atmsvc *sap, + const struct atm_qos *qos) { struct atm_blli *blli; int pcr; @@ -199,9 +210,10 @@ if (!*sap->sas_addr.prv) return -EDESTADDRREQ; else q_write(dsc,QF_cdpn_esa,(void *) sap->sas_addr.prv,ATM_ESA_LEN); /* improve @@@ */ - switch (sap->sas_txtp.class) { + switch (qos->txtp.traffic_class) { case ATM_NONE: - if (sap->sas_rxtp.class == ATM_CBR) q_assign(dsc,QF_fw_pcr_01,0); + if (qos->rxtp.traffic_class == ATM_CBR) + q_assign(dsc,QF_fw_pcr_01,0); break; case ATM_UBR: diag(COMPONENT,DIAG_DEBUG,"UBR"); @@ -211,33 +223,35 @@ break; case ATM_CBR: /* here's a bit of policy: send the highest value we have */ - pcr = SELECT_TOP_PCR(sap->sas_txtp); + pcr = SELECT_TOP_PCR(qos->txtp); diag(COMPONENT,DIAG_DEBUG,"CBR fwd %d (%d..%d)",pcr, - sap->sas_txtp.min_pcr,sap->sas_txtp.max_pcr); + qos->txtp.min_pcr,qos->txtp.max_pcr); q_assign(dsc,QF_fw_pcr_01,pcr); break; default: - diag(COMPONENT,DIAG_ERROR,"bad TX class (%d)",sap->sas_txtp.class); + diag(COMPONENT,DIAG_ERROR,"bad TX class (%d)", + qos->txtp.traffic_class); return -EINVAL; } - switch (sap->sas_txtp.class == ATM_UBR ? ATM_NONE : sap->sas_rxtp.class) { + switch (qos->txtp.traffic_class == ATM_UBR ? ATM_NONE : + qos->rxtp.traffic_class) { case ATM_NONE: - if (sap->sas_txtp.class == ATM_CBR) q_assign(dsc,QF_bw_pcr_01,0); + if (qos->txtp.traffic_class == ATM_CBR) + q_assign(dsc,QF_bw_pcr_01,0); break; case ATM_CBR: - pcr = SELECT_TOP_PCR(sap->sas_rxtp); + pcr = SELECT_TOP_PCR(qos->rxtp); diag(COMPONENT,DIAG_DEBUG,"CBR bwd %d (%d..%d)",pcr, - sap->sas_rxtp.min_pcr,sap->sas_rxtp.max_pcr); + qos->rxtp.min_pcr,qos->rxtp.max_pcr); q_assign(dsc,QF_bw_pcr_01,pcr); break; default: - diag(COMPONENT,DIAG_ERROR,"bad RX class (%d)",sap->sas_txtp.class); + diag(COMPONENT,DIAG_ERROR,"bad RX class (%d)", + qos->rxtp.traffic_class); return -EINVAL; } - if (sap->sas_txtp.max_sdu) - q_assign(dsc,QF_fw_max_sdu,sap->sas_txtp.max_sdu); - if (sap->sas_rxtp.max_sdu) - q_assign(dsc,QF_bw_max_sdu,sap->sas_rxtp.max_sdu); + if (qos->txtp.max_sdu) q_assign(dsc,QF_fw_max_sdu,qos->txtp.max_sdu); + if (qos->rxtp.max_sdu) q_assign(dsc,QF_bw_max_sdu,qos->rxtp.max_sdu); /* @@@ bearer class ? */ /* @@@ QOS class ? */ if (sap->sas_addr.bhli.hl_type != ATM_HL_NONE) { @@ -325,7 +339,7 @@ } -struct sockaddr_atmsvc *sap_decode(Q_DSC *dsc) +struct sockaddr_atmsvc *sap_decode(Q_DSC *dsc,struct atm_qos *qos) { struct sockaddr_atmsvc *sap; struct atm_blli *blli; @@ -333,6 +347,7 @@ sap = alloc(sizeof(struct sockaddr_atmsvc)+sizeof(struct atm_blli)); blli = (struct atm_blli *) (sap+1); memset(sap,0,sizeof(struct sockaddr_atmsvc)+sizeof(struct atm_blli)); + memset(qos,0,sizeof(struct atm_qos)); sap->sas_family = AF_ATMSVC; if (q_present(dsc,QF_cdpn_esa)) /* @@@ handle E.164 too */ (void) q_read(dsc,QF_cdpn_esa,(void *) &sap->sas_addr.prv,ATM_ESA_LEN); @@ -341,32 +356,32 @@ diag(COMPONENT,DIAG_ERROR,"AAL type %d requested", q_fetch(dsc,QF_aal_type)); if (q_present(dsc,QF_best_effort)) { - sap->sas_txtp.class = sap->sas_rxtp.class = ATM_UBR; + qos->txtp.traffic_class = qos->rxtp.traffic_class = ATM_UBR; diag(COMPONENT,DIAG_DEBUG,"UBR"); } else { - sap->sas_txtp.class = sap->sas_rxtp.class = ATM_CBR; - sap->sas_txtp.max_pcr = sap->sas_rxtp.max_pcr = 0; + qos->txtp.traffic_class = qos->rxtp.traffic_class = ATM_CBR; + qos->txtp.max_pcr = qos->rxtp.max_pcr = 0; /* unbalanced decoding - always sets upper bound */ if (q_present(dsc,QF_fw_pcr_01)) { - sap->sas_rxtp.min_pcr = 0; - sap->sas_rxtp.max_pcr = q_fetch(dsc,QF_fw_pcr_01); + qos->rxtp.min_pcr = 0; + qos->rxtp.max_pcr = q_fetch(dsc,QF_fw_pcr_01); } if (q_present(dsc,QF_bw_pcr_01)) { - sap->sas_txtp.min_pcr = 0; - sap->sas_txtp.max_pcr = q_fetch(dsc,QF_bw_pcr_01); + qos->txtp.min_pcr = 0; + qos->txtp.max_pcr = q_fetch(dsc,QF_bw_pcr_01); } - if (!sap->sas_txtp.max_pcr) sap->sas_txtp.class = ATM_NONE; - if (!sap->sas_rxtp.max_pcr) sap->sas_rxtp.class = ATM_NONE; + if (!qos->txtp.max_pcr) qos->txtp.traffic_class = ATM_NONE; + if (!qos->rxtp.max_pcr) qos->rxtp.traffic_class = ATM_NONE; diag(COMPONENT,DIAG_DEBUG,"CBR fwd %d..%d bwd %d..%d", - sap->sas_rxtp.min_pcr,sap->sas_rxtp.max_pcr,sap->sas_txtp.min_pcr, - sap->sas_txtp.max_pcr); + qos->rxtp.min_pcr,qos->rxtp.max_pcr,qos->txtp.min_pcr, + qos->txtp.max_pcr); /* SHOULD ... fail call if anything is missing ... @@@ */ } if (q_present(dsc,QF_bw_max_sdu)) - sap->sas_txtp.max_sdu = q_fetch(dsc,QF_bw_max_sdu); + qos->txtp.max_sdu = q_fetch(dsc,QF_bw_max_sdu); if (q_present(dsc,QF_fw_max_sdu)) - sap->sas_rxtp.max_sdu = q_fetch(dsc,QF_fw_max_sdu); + qos->rxtp.max_sdu = q_fetch(dsc,QF_fw_max_sdu); if (q_present(dsc,QG_bhli)) { sap->sas_addr.bhli.hl_type = q_fetch(dsc,QF_hli_type)+1; switch (sap->sas_addr.bhli.hl_type) { diff -ur --new-file old/atm/sigd/sap.h new/atm/sigd/sap.h --- old/atm/sigd/sap.h Wed Apr 17 19:06:49 1996 +++ new/atm/sigd/sap.h Fri Jul 26 18:01:39 1996 @@ -11,9 +11,12 @@ int sap_check_packing(const struct sockaddr_atmsvc *packed_sap,int len); struct sockaddr_atmsvc *sap_copy(const struct sockaddr_atmsvc *sap); -int sap_compat(const struct sockaddr_atmsvc *old, - const struct sockaddr_atmsvc *new,struct sockaddr_atmsvc **out); -int sap_encode(Q_DSC *dsc,const struct sockaddr_atmsvc *sap); -struct sockaddr_atmsvc *sap_decode(Q_DSC *dsc); +int sap_compat(const struct sockaddr_atmsvc *old_sap, + const struct sockaddr_atmsvc *new_sap,struct sockaddr_atmsvc **out_sap, + const struct atm_qos *old_qos,const struct atm_qos *new_qos, + struct atm_qos *out_qos); +int sap_encode(Q_DSC *dsc,const struct sockaddr_atmsvc *sap, + const struct atm_qos *qos); +struct sockaddr_atmsvc *sap_decode(Q_DSC *dsc,struct atm_qos *qos); #endif diff -ur --new-file old/atm/sigd/sscf.c new/atm/sigd/sscf.c --- old/atm/sigd/sscf.c Fri Feb 9 17:36:05 1996 +++ new/atm/sigd/sscf.c Thu Jan 1 01:00:00 1970 @@ -1,278 +0,0 @@ -/* sscf.c - SSCF (Q.2130) protocol */ - -/* Written 1995 by Werner Almesberger, EPFL-LRC */ - - -#include "atmd.h" - -#include "sscop.h" -#include "sscf.h" - - -#define COMPONENT "SSCF" - - -/* --- SSCOP configuration ------------------------------------------------- */ - - -#define SSCF_MaxCC 4 /* give up after 4 retries */ -#define SSCF_MaxPD 25 /* POLL after 25 SDs */ -#define SSCF_Timer_CC 1000000 /* 1 sec */ -#define SSCF_Timer_KEEPALIVE 2000000 /* 2 sec */ -#define SSCF_Timer_NORESP 7000000 /* 7 sec */ -#define SSCF_Timer_POLL 750000 /* 750 ms */ -#define SSCF_Timer_IDLE 15000000 /* 15 sec */ - - -static const char *state_name[] = { "1/2","2/2","4/10","3/4","2/5" }; - - -/* --- Helper function(s) -------------------------------------------------- */ - - -static void next_state(SSCF_DSC *dsc,SSCF_STATE state) -{ - diag(COMPONENT,DIAG_DEBUG,"entering state %s",state_name[state]); - dsc->state = state; -} - - -/* --- Invocation from SSCOP ----------------------------------------------- */ - - -static void sscf_estab_ind(void *user_data,void *uu_data,int uu_length) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_11) - diag(COMPONENT,DIAG_FATAL,"sscf_estab_ind in state %s", - state_name[dsc->state]); - next_state(dsc,sscf_410); - sscop_estab_resp(&dsc->sscop,NULL,0,1); - if (dsc->ops->estab_ind) dsc->ops->estab_ind(dsc->user,uu_data,uu_length); -} - - -static void sscf_estab_conf(void *user_data, - void *uu_data,int uu_length) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_22) - diag(COMPONENT,DIAG_FATAL,"sscf_estab_conf in state %s", - state_name[dsc->state]); - next_state(dsc,sscf_410); - if (dsc->ops->estab_conf) - dsc->ops->estab_conf(dsc->user,uu_data,uu_length); - -} - - -static void sscf_restart(void *user_data,void *uu_data,int uu_length,int ind) -{ - SSCF_DSC *dsc = user_data; - - if ((!ind && dsc->state != sscf_34) || (ind && (dsc->state == sscf_11 || - dsc->state == sscf_34))) - diag(COMPONENT,DIAG_FATAL,"sscf_restart (ind = %d) in state %s", - state_name[dsc->state],ind); - sscop_estab_resp(&dsc->sscop,NULL,0,1); - next_state(dsc,sscf_410); - if (dsc->ops->restart) dsc->ops->restart(dsc->user,uu_data,uu_length,ind); -} - - -static void sscf_rec_ind(void *user_data) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_410) - diag(COMPONENT,DIAG_FATAL,"sscf_rec_ind in state %s", - state_name[dsc->state]); - sscop_rec_resp(&dsc->sscop); - if (dsc->ops->estab_ind) dsc->ops->estab_ind(dsc->user,NULL,0); -} - - -static void sscf_rel_ind(void *user_data,void *uu_data,int uu_length,int user) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state == sscf_11 || dsc->state == sscf_34) - diag(COMPONENT,DIAG_FATAL,"sscf_rel_ind in state %s", - state_name[dsc->state]); - next_state(dsc,sscf_11); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,user ? uu_data : NULL,uu_length); -} - - -static void sscf_rel_conf(void *user_data) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_34) - diag(COMPONENT,DIAG_FATAL,"sscf_rel_conf in state %s", - state_name[dsc->state]); - next_state(dsc,sscf_11); - if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); -} - - -static void sscf_data_ind(void *user_data,void *data,int length,int sn) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_410) - diag(COMPONENT,DIAG_FATAL,"sscf_data_ind in state %s", - state_name[dsc->state]); - if (dsc->ops->data_ind) dsc->ops->data_ind(dsc->user,data,length); - -} - - -static void sscf_res_ind(void *user_data,void *uu_data,int uu_length) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_410) - diag(COMPONENT,DIAG_FATAL,"sscf_res_ind in state %s", - state_name[dsc->state]); - sscop_res_resp(&dsc->sscop); - if (dsc->ops->estab_ind) dsc->ops->estab_ind(dsc->user,uu_data,uu_length); -} - - -static void sscf_res_conf(void *user_data) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->state != sscf_25) - diag(COMPONENT,DIAG_FATAL,"sscf_res_conf in state %s", - state_name[dsc->state]); - next_state(dsc,sscf_410); - if (dsc->ops->estab_conf) dsc->ops->estab_conf(dsc->user,NULL,0); -} - - -static void sscf_unitdata_ind(void *user_data,void *data,int length) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->ops->unitdata) dsc->ops->unitdata(dsc->user,data,length); -} - - -static void sscf_cpcs_send(void *user_data,void *data,int length) -{ - SSCF_DSC *dsc = user_data; - - if (dsc->ops->cpcs_send) - dsc->ops->cpcs_send(dsc->user,data,length); -} - - -static SSCOP_USER_OPS sscf_ops = { - sscf_estab_ind, * - sscf_estab_conf, * - sscf_rel_ind, * - sscf_rel_conf, * - sscf_restart, - sscf_res_ind, - sscf_res_conf, - sscf_rec_ind, - sscf_data_ind, - sscf_unitdata_ind, - NULL, /* no retr_ind */ - NULL, /* no retr_comp */ - NULL, /* no maa_data */ - NULL, /* no maa_error */ - sscf_cpcs_send -}; - - -/* --- Invocation from user ------------------------------------------------ */ - - -void start_sscf(SSCF_DSC *dsc,SSCF_USER_OPS *ops,void *user_data) -{ - dsc->state = sscf_11; - dsc->ops = ops; - dsc->user = user_data; - start_sscop(&dsc->sscop,&sscf_ops,dsc); - dsc->sscop.cf_max_cc = SSCF_MaxCC; - dsc->sscop.cf_max_pd = SSCF_MaxPD; - dsc->sscop.cf_timer_cc = SSCF_Timer_CC; - dsc->sscop.cf_timer_poll = SSCF_Timer_POLL; - dsc->sscop.cf_timer_noresp = SSCF_Timer_NORESP; - dsc->sscop.cf_timer_keepalive = SSCF_Timer_KEEPALIVE; - dsc->sscop.cf_timer_idle = SSCF_Timer_IDLE; -} - - -void stop_sscf(SSCF_DSC *dsc) -{ - stop_sscop(&dsc->sscop); -} - - -void sscf_estab_req(SSCF_DSC *dsc,void *uu_data,int uu_length) -{ - switch (dsc->state) { - case sscf_11: - case sscf_34: - next_state(dsc,sscf_22); - sscop_estab_req(&dsc->sscop,uu_data,uu_length,1); - return; - case sscf_410: - next_state(dsc,sscf_25); - sscop_res_req(&dsc->sscop,uu_data,uu_length); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"sscf_estab_req invoked in state %s", - state_name[dsc->state]); -} - - -void sscf_rel_req(SSCF_DSC *dsc,void *uu_data,int uu_length) -{ - switch (dsc->state) { - case sscf_11: - if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); - return; - case sscf_22: - case sscf_410: - case sscf_25: - next_state(dsc,sscf_34); - sscop_rel_req(&dsc->sscop,uu_data,uu_length); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"sscf_rel_req invoked in state %s", - state_name[dsc->state]); -} - - -void sscf_send(SSCF_DSC *dsc,void *data,int length) -{ - switch (dsc->state) { - case sscf_11: - return; - case sscf_410: - sscop_send(&dsc->sscop,data,length); - return; - default: - break; - } - diag(COMPONENT,DIAG_WARN,"sscf_send invoked in state %s", - state_name[dsc->state]); /* make fatal later @@@ */ -} - - -void sscf_unitdata(SSCF_DSC *dsc,void *data,int length) -{ - sscop_unitdata(&dsc->sscop,data,length); -} diff -ur --new-file old/atm/sigd/sscf.h new/atm/sigd/sscf.h --- old/atm/sigd/sscf.h Fri Oct 6 11:33:07 1995 +++ new/atm/sigd/sscf.h Thu Jan 1 01:00:00 1970 @@ -1,56 +0,0 @@ -/* sscf.h - SSCF (Q.2130) user interface */ - -/* Written 1995 by Werner Almesberger, EPFL-LRC */ - - -#ifndef SSCF_H -#define SSCF_H - -#include "sscop.h" - - -typedef enum { sscf_11,sscf_22,sscf_410,sscf_34,sscf_25 } SSCF_STATE; - -typedef struct { - SSCF_STATE state; - struct _sscf_user_ops *ops; - void *user; - SSCOP_DSC sscop; -} SSCF_DSC; - - -typedef struct _sscf_user_ops { - void (*estab_ind)(void *user_data,void *uu_data,int uu_length); - /* AAL-ESTABLISH.indication */ - void (*estab_conf)(void *user_data,void *uu_data,int uu_length); - /* AAL-ESTABLISH.confirm */ - void (*rel_ind)(void *user_data,void *uu_data,int uu_length); - /* AAL-RELEASE.indication */ - void (*rel_conf)(void *user_data); /* AAL-RELEASE.confirm */ - void (*restart)(void *user_data,void *uu_data,int uu_length,int ind); - /* AAL-RELEASE.indication or AAL-RELEASE.confirm immediately followed - by AAL-ESTABLISH.indication */ - void (*data_ind)(void *user_data,void *data,int length); - /* AAL-DATA.indication */ - void (*unitdata)(void *user_data,void *data,int length); - /* AAL-UNITDATA.indication */ - void (*cpcs_send)(void *user_data,void *data,int length); -} SSCF_USER_OPS; - - -/* Attach/detach protocol */ - -void start_sscf(SSCF_DSC *dsc,SSCF_USER_OPS *ops,void *user_data); -void stop_sscf(SSCF_DSC *dsc); - -/* Connection control */ - -void sscf_estab_req(SSCF_DSC *dsc,void *uu_data,int uu_length); -void sscf_rel_req(SSCF_DSC *dsc,void *uu_data,int uu_length); - -/* Send data */ - -void sscf_send(SSCF_DSC *dsc,void *data,int length); -void sscf_unitdata(SSCF_DSC *dsc,void *data,int length); - -#endif diff -ur --new-file old/atm/sigd/sscop.c new/atm/sigd/sscop.c --- old/atm/sigd/sscop.c Fri May 31 15:44:11 1996 +++ new/atm/sigd/sscop.c Thu Jan 1 01:00:00 1970 @@ -1,1995 +0,0 @@ -/* sscop.c - SSCOP (Q.2110) protocol */ - -/* Written 1995-1996 by Werner Almesberger, EPFL-LRC */ - - -#if 1 /* debugging only */ -#include -#endif -#include -#include -#include /* for htonl, ntohl */ - -#include "atmd.h" - -#include "sscop.h" - - -/* - * This is a quite exact translation of the ITU-T SSCOP SDL diagrams. They - * are a pleasant example of how protocols _should_ be specified. It took me - * less than a week to implement this. - * - * Calls back to the SSCOP user are always done last in a sequence of actions - * to avoid reentrancy problems if the user invokes SSCOP from the callback - * function. (Exception: data indications are delivered when needed. So you - * shouldn't kill the protocol stack in the middle of this. Releasing the - * call and such is fine, though.) - * - * Sequences of an AA-RELASE.indication/confirm immediately followed by a - * AA-ESTABLISH.indication have been replaced by a new primitive called - * "restart". This way, the SSCOP user is able to distinguish conditions where - * SSCOP is in idle state after a callback from conditions where SSCOP wants to - * continue (and where the user many not want to stop SSCOP). - * - * The entity receiving management information (e.g. maa_error) must not issue - * any SSCOP primitives from that callback routine. Instead, actions must be - * queued until SSCOP finishes processing of the current event. - * - * Comments of the type xx.yy are section or figure numbers in Q.2110 - * - * KNOWN BUGS: The queue and buffer management stinks, especially the "buffer - * cloning". All this ought to be rewritten to use skbuffs. Since - * this will happen anyway if SSCOP ever gets integrated into the - * kernel, we can safely ignore the problem for now. - * - * The lower layer is always assumed to be ready for sending. If - * this is not the case (shouldn't happen), the PDU should be - * discarded (or the process might be blocked for a few cycles). - */ - - -#define COMPONENT "SSCOP" - - -/*#define debug (void)*/ - -/* Configurable SSCOP parameters */ - -#define SSCOP_CF_MR 30 /* buffer size */ -#define SSCOP_CF_MaxCC 10 /* max timeouts */ -#define SSCOP_CF_MaxPD 100 /* SD/POLL ratio */ -#define SSCOP_CF_MaxSTAT 67 /* max elements in STAT PDU, 7.7 */ - -#undef POLL_AFTER_RETRANSMISSION /* 20.38, #define this if needed */ - - -/* Timers */ - -/* - * Assumptions: RTT = 1 sec, remote needs about 1 sec to wake up. SSCF changes - * all this anyway. - */ - -#define TIMER_CC 2000000 /* 2 sec (== RTT+eps) */ -#define TIMER_POLL 1000000 /* 1 sec (== RTT) */ -#define TIMER_NORESP 7000000 /* 7 sec (keepalive+RTT+eps) */ -#define TIMER_KEEPALIVE 5000000 /* 5 sec (> poll && > RTT) */ -#define TIMER_IDLE 30000000 /* 30 sec (>> keepalive) */ - - -/* SSCOP PDU types, 7.1 */ - -#define SSCOP_BGN 1 /* Request Initialization */ -#define SSCOP_BGAK 2 /* Request Acknowledgement */ -#define SSCOP_BGREJ 7 /* Connection Reject */ -#define SSCOP_END 3 /* Disconnect Command */ -#define SSCOP_ENDAK 4 /* Disconnect Acknowledgement */ -#define SSCOP_RS 5 /* Resynchronization Command */ -#define SSCOP_RSAK 6 /* Resynchronization Acknowledgement */ -#define SSCOP_ER 9 /* Recovery Command */ -#define SSCOP_ERAK 15 /* Recovery Acknowledgement */ -#define SSCOP_SD 8 /* Sequence Connection-mode Data */ -#define SSCOP_POLL 10 /* Transmitter State Information with request ... */ -#define SSCOP_STAT 11 /* Solicited Receiver State Information */ -#define SSCOP_USTAT 12 /* Unsolicited Receiver State Information */ -#define SSCOP_UD 13 /* Unnumbered User Data */ -#define SSCOP_MD 14 /* Unnumbered Management Data */ - - -/* Trailer format macros */ - -#define SSCOP_TRAIL(type,pad,n) (htonl((n) | ((type) << 24) | ((pad) << 30))) -#define SSCOP_S_BIT 0x10000000 -#define SSCOP_TYPE(last) ((ntohl(last) >> 24) & 15) -#define SSCOP_PAD(last) (ntohl(last) >> 30) -#define SSCOP_N(last) (ntohl(last) & 0xffffff) -#define SSCOP_S(last) (ntohl(last) & SSCOP_S_BIT) - - -/* Some helper macros */ - -#define START_TIMER(t) ({ STOP_TIMER(dsc->timer_##t); \ - dsc->timer_##t = start_timer(dsc->cf_timer_##t, sscop_##t##_exp,dsc); }) -#define STOP_TIMER(t) ({ if (t) stop_timer(t); t = NULL; }) -#define MOD24(x) ((x) & ((1 << 24)-1)) -#define INC24(v) (v = MOD24(v+1)) -#define INC8(v) (v = (v+1) & 255) -#define NORMALIZE(x,b) ( \ - (b) < (1 << 23) ? \ - (x) < (b)+(1 << 23) ? (x)+(1 << 24) : x : \ - (x) < (b)-(1 << 23) ? (x)+(1 << 24) : x) -#define NORM_RX(v) NORMALIZE((v),dsc->vr_r) -#define NORM_TX(v) NORMALIZE((v),dsc->vt_a) - - -/* Helper macros for PDU construction and decomposition */ - -#define PDU_VARS \ - unsigned char type; \ - int length; \ - int s,ps,r,mr,sq -#define DECOMPOSE_PDU(dsc,msg,size) decompose_pdu(dsc,msg,size,&type, \ - &length,&s,&ps,&r,&mr,&sq) -#define PRINT_PDU(dsc,label,data) print_pdu(dsc,label,type,data,&length, \ - &s,&ps,&r,&mr,&sq) - - -static const char *pdu_name[] = { "???","BGN","BGAK","END","ENDAK","RS","RSAK", - "BGREJ","SD","ER","POLL","STAT","USTAT","UD","MD","ERAK" }; - -static const char *state_name[] = { "Idle","OutConnPend","InConnPend", - "OutDiscPend","OutResyPend","InResyPend","OutRecPend","RecRespPend", - "InRecPend","DataTransReady" }; - - -static void maa_error(SSCOP_DSC *dsc,char code,int count) -{ - static const char *const msgs[] = { - "A:SD PDU","B:BGN PDU","C:BGAK PDU","D:BGREJ PDU","E:END PDU", - "F:ENDAK PDU","G:POLL PDU","H:STAT PDU","I:USTAT PDU","J:RS", - "K:RSAK PDU","L:ER","M:ERAK","O:VT(CC)>=MaxCC", - "P:Timer_NO_RESPONSE expiry","Q:SD or POLL, N(S) error", - "R:STAT N(PS) error","S:STAT N(R) or list elements error", - "T:USTAT N(R) or list elements error","U:PDU length violation", - "V:SD PDUs must be retransmitted","W:Lack of credit", - "X:Credit obtained","\0:Unknown error code" }; - const char *const *walk; - - if (dsc->ops->maa_error) - if (!dsc->ops->maa_error(dsc->user,code,count)) return; - for (walk = msgs; **walk; walk++) - if (**walk == code) break; - if (code != 'V') - diag(COMPONENT,DIAG_WARN,"layer management - error %c \"%s\"",code, - (*walk)+2); - else diag(COMPONENT,DIAG_WARN,"layer management - error %c,%d \"%s\"",code, - count,(*walk)+2); -} - - -static void print_pdu(SSCOP_DSC *dsc,const char *label,unsigned char type, - void *data,const int *length,const int *s,const int *ps,const int *r, - const int *mr,const int *sq) -{ - int len; - int *list; - - switch (type) { - case SSCOP_SD: - diag(COMPONENT,DIAG_DEBUG,"%s SD(S=%d,len=%d)",label,*s,*length); - break; - case SSCOP_POLL: - diag(COMPONENT,DIAG_DEBUG,"%s POLL(PS=%d,S=%d)",label,*ps,*s); - break; - case SSCOP_STAT: - if (*length & 3) { - diag(COMPONENT,DIAG_WARN,"%s STAT PDU has wrong size (%d)", - label,*length); - break; - } - len = *length/4; - diag(COMPONENT,DIAG_DEBUG,"%s STAT(PS=%d,MR=%d,R=%d,items=%d:", - label,*ps,*mr,*r,len); - list = (int *) data; - while (len > 1) { - diag(COMPONENT,DIAG_DEBUG,"%s %d..%d",label,ntohl(list[0]), - ntohl(list[1])); - list += 2; - len -= 2; - } - if (!len) - diag(COMPONENT,DIAG_DEBUG,"%s )",label); - else diag(COMPONENT,DIAG_DEBUG,"%s %d)",label, - ntohl(*list)); - break; - case SSCOP_USTAT: - if (*length != 8) { - diag(COMPONENT,DIAG_WARN,"%s USTAT PDU has wrong size (%d)", - label,*length); - break; - } - list = (int *) data; - diag(COMPONENT,DIAG_DEBUG,"%s USTAT(MR=%d,R=%d,%d..%d)",label,*mr, - *r,ntohl(list[0]), - ntohl(list[1])); - break; - case SSCOP_UD: - diag(COMPONENT,DIAG_DEBUG,"%s UD(len=%d)",label,*length); - break; - case SSCOP_MD: - diag(COMPONENT,DIAG_DEBUG,"%s MD(len=%d)",label,*length); - break; - case SSCOP_BGN: - diag(COMPONENT,DIAG_DEBUG,"%s BGN(SQ=%d,MR=%d,len=%d)",label,*sq, - *mr,*length); - break; - case SSCOP_BGAK: - diag(COMPONENT,DIAG_DEBUG,"%s BGAK(MR=%d,len=%d)",label,*mr, - *length); - break; - case SSCOP_BGREJ: - diag(COMPONENT,DIAG_DEBUG,"%s BGREJ(len=%d)",label,*length); - break; - case SSCOP_END: - diag(COMPONENT,DIAG_DEBUG,"%s END(S=%d,len=%d)",label,*s,*length); - break; - case SSCOP_ENDAK: - diag(COMPONENT,DIAG_DEBUG,"%s ENDAK()",label); - break; - case SSCOP_RS: - diag(COMPONENT,DIAG_DEBUG,"%s RS(SQ=%d,MR=%d,len=%d)",label,*sq, - *mr,*length); - break; - case SSCOP_RSAK: - diag(COMPONENT,DIAG_DEBUG,"%s RSAK(MR=%d)",label,*mr); - break; - case SSCOP_ER: - diag(COMPONENT,DIAG_DEBUG,"%s ER(MR=%d)",label,*mr); - break; - case SSCOP_ERAK: - diag(COMPONENT,DIAG_DEBUG,"%s ERAK(MR=%d)",label,*mr); - break; - default: - diag(COMPONENT,DIAG_ERROR,"%s unknown PDU type %d\n",label,type); - } -} - - -static int decompose_pdu(SSCOP_DSC *dsc,void *msg,int size, - unsigned char *type,int *length,int *s,int *ps,int *r,int *mr,int *sq) -{ - unsigned long *last; - unsigned char pad; - int n; - -/* - * *length is undefined if PDU has no variable-length data part - */ - - if (size < 4 || (size & 3)) { - diag(COMPONENT,DIAG_DEBUG,"invalid message length (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - last = (unsigned long *) ((char *) msg+size-4); - *type = SSCOP_TYPE(*last); - pad = SSCOP_PAD(*last); - n = SSCOP_N(*last); - *length = size-4-pad; - switch (*type) { - case SSCOP_SD: - *s = n; - break; - case SSCOP_POLL: - if (size != 8) { - diag(COMPONENT,DIAG_DEBUG,"POLL PDU has bad length (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *s = n; - *ps = SSCOP_N(*(unsigned long *) msg); - break; - case SSCOP_STAT: - if (size < 12) { - diag(COMPONENT,DIAG_DEBUG,"STAT PDU too short (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - if (*length & 3) { - diag(COMPONENT,DIAG_DEBUG,"STAT PDU has bad length (%d)", - length); - maa_error(dsc,'U',0); - return -1; - } - *r = n; - *mr = SSCOP_N(last[-1]); - *ps = SSCOP_N(last[-2]); - *length -= 8; - break; - case SSCOP_USTAT: - if (size != 16) { - diag(COMPONENT,DIAG_DEBUG,"USTAT PDU has bad length (%d)", - size); - maa_error(dsc,'U',0); - return -1; - } - *r = n; - *mr = SSCOP_N(last[-1]); - *length -= 4; - break; - case SSCOP_UD: - case SSCOP_MD: - break; - case SSCOP_BGN: - if (size < 8) { - diag(COMPONENT,DIAG_DEBUG,"BGN PDU too short (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *mr = n; - *sq = SSCOP_N(last[-1]) & 0xff; - *length -= 4; - break; - case SSCOP_BGAK: - if (size < 8) { - diag(COMPONENT,DIAG_DEBUG,"BGAK PDU too short (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *mr = n; - *length -= 4; - break; - case SSCOP_BGREJ: - if (size < 8) { - diag(COMPONENT,DIAG_DEBUG,"BGREJ PDU too short (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *length -= 4; - break; - case SSCOP_END: - if (size < 8) { - diag(COMPONENT,DIAG_DEBUG,"END PDU too short (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *s = !!(ntohl(*last) & SSCOP_S_BIT); - *length -= 4; - break; - case SSCOP_ENDAK: - if (size != 8) { - diag(COMPONENT,DIAG_DEBUG,"ENDAK PDU has bad length (%d)", - size); - maa_error(dsc,'U',0); - if (size < 4) return -1; /* make it work with Fore */ - } - break; - case SSCOP_RS: - if (size < 8) { - diag(COMPONENT,DIAG_DEBUG,"RS PDU too short (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *mr = n; - *sq = SSCOP_N(last[-1]) & 0xff; - *length -= 4; - break; - case SSCOP_RSAK: - if (size != 8) { - diag(COMPONENT,DIAG_DEBUG,"RSAK PDU has bad length (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *mr = n; - break; - case SSCOP_ER: - if (size != 8) { - diag(COMPONENT,DIAG_DEBUG,"ER PDU has bad length (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *mr = n; - *sq = SSCOP_N(last[-1]) & 0xff; - break; - case SSCOP_ERAK: - if (size != 8) { - diag(COMPONENT,DIAG_DEBUG,"ERAK PDU has bad length (%d)",size); - maa_error(dsc,'U',0); - return -1; - } - *mr = n; - break; - default: - diag(COMPONENT,DIAG_DEBUG,"unknown PDU type %d (0x%x)",*type, - *type); - return -1; - } - return 0; -} - - -static BUFFER *build_pdu(SSCOP_DSC *dsc,unsigned char type,void *data, - int num) -{ - BUFFER *buf; - unsigned long *trailer; - int pad; - - buf = buffer_create(num+12,dsc->vt_s); /* space for trailers */ - if (data && num) { - memset((char *) buf->data+(num & ~3),0,4); /* clear padding area */ - memcpy((unsigned char *) buf->data,data,num); - pad = (4-(num & 3)) & 3; - trailer = (unsigned long *) ((char *) buf->data+num+pad); - } - else { - pad = 0; - trailer = (unsigned long *) buf->data; - } - diag(COMPONENT,DIAG_DEBUG,"generating %s PDU",pdu_name[type]); - switch (type) { - case SSCOP_BGN: - case SSCOP_RS: - case SSCOP_ER: - *trailer++ = SSCOP_TRAIL(0,0,dsc->vt_sq); - *trailer++ = SSCOP_TRAIL(type,pad,dsc->vr_mr); - break; - case SSCOP_BGAK: - case SSCOP_RSAK: - case SSCOP_ERAK: - *trailer++ = SSCOP_TRAIL(0,0,0); - *trailer++ = SSCOP_TRAIL(type,pad,dsc->vr_mr); - break; - case SSCOP_END: /* S bit is indicated by "num" */ - *trailer++ = SSCOP_TRAIL(0,0,0); - *trailer++ = SSCOP_TRAIL(type,pad,0) | (num ? htonl(SSCOP_S_BIT) : - 0); - break; - case SSCOP_BGREJ: - case SSCOP_ENDAK: - *trailer++ = SSCOP_TRAIL(0,0,0); - *trailer++ = SSCOP_TRAIL(type,pad,0); - break; - case SSCOP_POLL: - *trailer++ = SSCOP_TRAIL(0,0,dsc->vt_ps); - /* fall through */ - case SSCOP_SD: - *trailer++ = SSCOP_TRAIL(type,pad,dsc->vt_s); - break; - case SSCOP_STAT: - *trailer++ = SSCOP_TRAIL(0,0,dsc->vr_ps); - /* fall through */ - case SSCOP_USTAT: - *trailer++ = SSCOP_TRAIL(0,0,dsc->vr_mr); - *trailer++ = SSCOP_TRAIL(type,0,dsc->vr_r); - break; - case SSCOP_UD: - case SSCOP_MD: - *trailer++ = SSCOP_TRAIL(type,pad,0); - break; - default: - diag(COMPONENT,DIAG_FATAL, - "requested construction of unknown PDU type %d",type); - } - buf->length = (char *) trailer-(char *) buf->data; - return buf; -} - - -static void dump_pdu(void *data,int len) -{ - int i; - - if (!debug) return; - for (i = 0; i < len; i++) { - if (!(i & 15)) printf("%s%04X:",i ? "\n" : "",i); - printf(" %02X",((unsigned char *) data)[i]); - } - putchar('\n'); -} - - -static void emit_pdu(SSCOP_DSC *dsc,BUFFER *buf) -{ - BUFFER **last; - - dump_pdu(buf->data,buf->length); - { - PDU_VARS; - - if (DECOMPOSE_PDU(dsc,buf->data,buf->length)) - diag(COMPONENT,DIAG_FATAL,"composed garbage"); - PRINT_PDU(dsc,"SEND",buf->data); - } - if (dsc->ops->cpcs_send) - dsc->ops->cpcs_send(dsc->user,buf->data,buf->length); - switch (SSCOP_TYPE(*(unsigned long *) ((char *) buf->data+buf->length-4))) { - case SSCOP_BGN: - last = &dsc->last_bgn; - break; - case SSCOP_END: - last = &dsc->last_end; - break; - case SSCOP_RS: - last = &dsc->last_rs; - break; - case SSCOP_ER: - last = &dsc->last_er; - break; - default: - buffer_discard(buf); - return; - } - if (*last && *last != buf) { - buffer_discard(*last); - *last = NULL; - } - *last = buf; -} - - -static void resend_pdu(SSCOP_DSC *dsc,BUFFER *buf) -{ - if (!buf) diag(COMPONENT,DIAG_FATAL,"resend buffer is NULL"); - emit_pdu(dsc,buf); -} - - -static void send_pdu(SSCOP_DSC *dsc,unsigned char type,void *data,int size) -{ - BUFFER *buf; - - buf = build_pdu(dsc,type,data,size); - emit_pdu(dsc,buf); -} - - -static void next_state(SSCOP_DSC *dsc,SSCOP_STATE state) -{ - diag(COMPONENT,DIAG_DEBUG,"entering state %s (%d)",state_name[state], - (int) state); - dsc->state = state; -} - - -static void bad_pdu(SSCOP_DSC *dsc,unsigned char type) -{ - /* 111111 */ - /* 0123456789012345 */ - maa_error(dsc,"?BCxFJKDALGHIyzM"[type],0); -} - - -static void send_ustat(SSCOP_DSC *dsc,int first,int last) -{ - unsigned long range[2]; - - range[0] = htonl(first); - range[1] = htonl(last); - send_pdu(dsc,SSCOP_USTAT,range,8); -} - - -/* --- Utility functions --------------------------------------------------- */ - - -static void clear_receive_buffer(SSCOP_DSC *dsc) -{ - queue_clear(&dsc->rx_buf); -} - - -static void clear_transmission_buffer(SSCOP_DSC *dsc) -{ - queue_clear(&dsc->tx_buf); -} - - -static void clear_transmission_queue(SSCOP_DSC *dsc) -{ - queue_clear(&dsc->tx_q); -} - - -static void clear_retransmission_queue(SSCOP_DSC *dsc) -{ - queue_clear(&dsc->rt_q); -} - - -/* --- SSCOP subroutines --------------------------------------------------- */ - - -static void sscop_poll_exp(void *user); -static void sscop_keepalive_exp(void *user); -static void sscop_noresp_exp(void *user); - - -static void release_buffers(SSCOP_DSC *dsc) /* 20.49 */ -{ - clear_transmission_queue(dsc); - clear_transmission_buffer(dsc); - clear_retransmission_queue(dsc); - clear_receive_buffer(dsc); -} - - -static void clear_transmitter(SSCOP_DSC *dsc) /* 20.49 */ -{ - if (!dsc->clear_buffers) { - clear_transmission_queue(dsc); - clear_transmission_buffer(dsc); - } -} - - -static void prepare_recovery(SSCOP_DSC *dsc) /* 20.49 */ -{ - if (dsc->clear_buffers) { - clear_transmission_queue(dsc); - clear_transmission_buffer(dsc); - } - clear_retransmission_queue(dsc); -} - - -static void prepare_retrieval(SSCOP_DSC *dsc) /* 20.49 */ -{ - prepare_recovery(dsc); - clear_receive_buffer(dsc); -} - - -static void deliver_data(SSCOP_DSC *dsc) /* 20.49 */ -{ - BUFFER *buf; - - if (!dsc->clear_buffers) { - while ((buf = queue_get(&dsc->rx_buf))) { - if (dsc->ops->data_ind) - dsc->ops->data_ind(dsc->user,buf->data,buf->length,buf->key); - buffer_discard(buf); - } - } - clear_receive_buffer(dsc); -} - - -static void initialize_state_variables(SSCOP_DSC *dsc) /* 20.49 */ -{ - dsc->vt_s = dsc->vt_ps = dsc->vt_a = 0; - dsc->vt_pa = 1; - dsc->vt_pd = 0; - dsc->credit = 1; - dsc->vr_r = dsc->vr_h = 0; -} - - -static int detect_retransmission(SSCOP_DSC *dsc,int sq) /* 20.50 */ -{ - if (dsc->vr_sq == sq) return 1; - dsc->vr_sq = sq; - return 0; -} - - -static void set_poll_timer(SSCOP_DSC *dsc) /* 20.50 */ -{ - if (queue_peek(&dsc->tx_q) || dsc->vt_s != dsc->vt_a) START_TIMER(poll); - else START_TIMER(keepalive); -} - - -static void reset_data_transfer_timers(SSCOP_DSC *dsc) /* 20.51 */ -{ - STOP_TIMER(dsc->timer_poll); - STOP_TIMER(dsc->timer_keepalive); - STOP_TIMER(dsc->timer_noresp); - STOP_TIMER(dsc->timer_idle); -} - - -static void set_data_transfer_timers(SSCOP_DSC *dsc) /* 20.51 */ -{ - START_TIMER(poll); - START_TIMER(noresp); -} - - -static void initialize_vr_mr(SSCOP_DSC *dsc) -{ - dsc->vr_mr = MOD24(dsc->vr_h+SSCOP_CF_MR); -} - - -static void update_vr_mr(SSCOP_DSC *dsc) -{ - initialize_vr_mr(dsc); -} - - -/* --- Timer handlers ------------------------------------------------------ */ - - -static void sscop_cc_exp(void *user) -{ - SSCOP_DSC *dsc = user; - - diag(COMPONENT,DIAG_DEBUG,"Timer CC has expired"); - dsc->timer_cc = NULL; - switch (dsc->state) { - case sscop_outconn: /* 20.9 */ - if (dsc->vt_cc < dsc->cf_max_cc) { - dsc->vt_cc++; - resend_pdu(dsc,dsc->last_bgn); - START_TIMER(cc); - return; - } - maa_error(dsc,'O',0); - send_pdu(dsc,SSCOP_END,NULL,1); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); - return; - case sscop_outdisc: /* 20.15 */ - if (dsc->vt_cc < dsc->cf_max_cc) { - dsc->vt_cc++; - resend_pdu(dsc,dsc->last_end); - START_TIMER(cc); - return; - } - maa_error(dsc,'O',0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); - return; - case sscop_outres: /* 20.18 */ - if (dsc->vt_cc < dsc->cf_max_cc) { - dsc->vt_cc++; - resend_pdu(dsc,dsc->last_rs); - START_TIMER(cc); - return; - } - maa_error(dsc,'O',0); - send_pdu(dsc,SSCOP_END,NULL,1); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); - return; - case sscop_outrec: /* 20.24 */ - if (dsc->vt_cc < dsc->cf_max_cc) { - dsc->vt_cc++; - resend_pdu(dsc,dsc->last_er); - START_TIMER(cc); - return; - } - maa_error(dsc,'O',0); - send_pdu(dsc,SSCOP_END,NULL,1); - clear_receive_buffer(dsc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"Timer CC expired in state %s", - state_name[dsc->state]); -} - - -static void sscop_common_exp(void *user) -{ - SSCOP_DSC *dsc = user; - - if (dsc->state != sscop_ready) { - diag(COMPONENT,DIAG_FATAL,"sscop_common_exp invoked in state %s", - state_name[dsc->state]); - return; - } - INC24(dsc->vt_ps); - send_pdu(dsc,SSCOP_POLL,NULL,0); - dsc->vt_pd = 0; - set_poll_timer(dsc); -} - - -static void sscop_poll_exp(void *user) -{ - SSCOP_DSC *dsc = user; - - diag(COMPONENT,DIAG_DEBUG,"Timer POLL has expired"); - dsc->timer_poll = NULL; - sscop_common_exp(user); -} - - -static void sscop_keepalive_exp(void *user) -{ - SSCOP_DSC *dsc = user; - - diag(COMPONENT,DIAG_DEBUG,"Timer KEEPALIVE has expired"); - dsc->timer_keepalive = NULL; - sscop_common_exp(user); -} - - -static void sscop_idle_exp(void *user) -{ - SSCOP_DSC *dsc = user; - - diag(COMPONENT,DIAG_DEBUG,"Timer IDLE has expired"); - dsc->timer_idle = NULL; - START_TIMER(noresp); - sscop_poll_exp(user); -} - - -static void sscop_noresp_exp(void *user) -{ - SSCOP_DSC *dsc = user; - - diag(COMPONENT,DIAG_DEBUG,"Timer NORESP has expired"); - dsc->timer_noresp = NULL; - if (dsc->state != sscop_ready) { - diag(COMPONENT,DIAG_FATAL,"Timer NORESP expired in state %s", - state_name[dsc->state]); - return; - } - reset_data_transfer_timers(dsc); - maa_error(dsc,'P',0); - send_pdu(dsc,SSCOP_END,NULL,1); - prepare_retrieval(dsc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) dsc->ops->rel_ind(dsc->user,NULL,0,0); -} - - -/* --- Transmit engine ----------------------------------------------------- */ - - -static void try_to_send(SSCOP_DSC *dsc) -{ - BUFFER *buf,*buf2; - - if (dsc->state != sscop_ready) return; - while (queue_peek(&dsc->rt_q) || NORM_TX(dsc->vt_s) < - NORM_TX(dsc->vt_ms) || dsc->timer_idle) { - buf = queue_get(&dsc->rt_q); - if (buf) { - if (!(buf2 = queue_lookup(&dsc->tx_buf,buf->key))) - diag(COMPONENT,DIAG_FATAL,"didn't find PDU %d in TX buffer", - buf->key); - emit_pdu(dsc,buf); - buf2->extra = dsc->vt_ps; -#ifdef POLL_AFTER_RETRANSMISSION - if (!queue_peek(dsc->rt_q)) - /* fall through to goto */ -#endif - goto B; /* sigh ... */ - } - else { - if (!queue_peek(&dsc->tx_q)) return; - if (NORM_TX(dsc->vt_s) < NORM_TX(dsc->vt_ms)) { - buf = queue_get(&dsc->tx_q); - buf2 = build_pdu(dsc,SSCOP_SD,buf->data,buf->length); - buffer_discard(buf); - buf2->key = dsc->vt_s; - buf2->extra = dsc->vt_ps; - emit_pdu(dsc,buffer_clone(buf2)); - queue_put(&dsc->tx_buf,buf2); - INC24(dsc->vt_s); - B: - /* B */ - dsc->vt_pd++; - if (dsc->timer_poll) { - if (dsc->vt_pd < dsc->cf_max_pd) continue; - } - else { - if (!dsc->timer_idle) STOP_TIMER(dsc->timer_keepalive); - else { - STOP_TIMER(dsc->timer_idle); - START_TIMER(noresp); - } - if (dsc->vt_pd < dsc->cf_max_pd) { - START_TIMER(poll); - continue; - } - } - } - else { - STOP_TIMER(dsc->timer_idle); - START_TIMER(noresp); - } - } - /* A */ - INC24(dsc->vt_ps); - send_pdu(dsc,SSCOP_POLL,NULL,0); - dsc->vt_pd = 0; - START_TIMER(poll); - } -} - - -/* --- Incoming non-CC PDUs in Data Transfer Ready state ------------------- */ - - -static void start_error_recov(SSCOP_DSC *dsc,char code) -{ - reset_data_transfer_timers(dsc); - maa_error(dsc,code,0); - /* D */ - dsc->vt_cc = 1; - INC8(dsc->vt_sq); - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_ER,NULL,0); - prepare_recovery(dsc); - START_TIMER(cc); - next_state(dsc,sscop_outrec); -} - - -static void data_sd(SSCOP_DSC *dsc,int s,void *msg,int length) /* 20.38-39 */ -{ - BUFFER *buf; - - if (NORM_RX(s) >= NORM_RX(dsc->vr_mr)) { - if (NORM_RX(dsc->vr_h) >= NORM_RX(dsc->vr_mr)) { - send_ustat(dsc,dsc->vr_h,dsc->vr_mr); - dsc->vr_h = dsc->vr_mr; - } - return; - } - if (s == dsc->vr_r) { - if (dsc->ops->data_ind) dsc->ops->data_ind(dsc->user,msg,length,s); - if (s == dsc->vr_h) { - dsc->vr_r = dsc->vr_h = MOD24(s+1); - update_vr_mr(dsc); - return; - } - while (1) { - INC24(dsc->vr_r); - buf = queue_lookup(&dsc->rx_buf,dsc->vr_r); - if (!buf) break; - queue_remove(&dsc->rx_buf,buf); - if (dsc->ops->data_ind) - dsc->ops->data_ind(dsc->user,buf->data,buf->length,buf->key); - buffer_discard(buf); - } - return; - } - buf = buffer_create(length,s); - memcpy(buf->data,msg,length); - if (s == dsc->vr_h) { - queue_put(&dsc->rx_buf,buf); - INC24(dsc->vr_h); - update_vr_mr(dsc); - return; - } - if (NORM_RX(dsc->vr_h) < NORM_RX(s)) { - queue_put(&dsc->rx_buf,buf); - send_ustat(dsc,dsc->vr_h,s); - dsc->vr_h = MOD24(s+1); - update_vr_mr(dsc); - return; - } - if (queue_lookup(&dsc->rx_buf,s)) queue_put(&dsc->rx_buf,buf); - else { - buffer_discard(buf); - start_error_recov(dsc,'Q'); - } -} - - -/* - * Some of the NORM_RXs in data_poll are certainly unnecessary. Maybe even - * all of them could be removed ... - */ - - -static void data_poll(SSCOP_DSC *dsc,int s) /* 20.41-42 */ -{ - int curr,i; - - if (!dsc->list) dsc->list = alloc(dsc->cf_max_stat*sizeof(int)); - if (NORM_RX(dsc->vr_h) > NORM_RX(s)) { - start_error_recov(dsc,'Q'); - return; - } - dsc->vr_h = NORM_RX(dsc->vr_mr) < NORM_RX(s) ? dsc->vr_mr : s; - update_vr_mr(dsc); - /* K */ - curr = 0; - i = dsc->vr_r; - while (NORM_RX(i) < NORM_RX(dsc->vr_h)) { - if (queue_lookup(&dsc->rx_buf,i)) { - INC24(i); - continue; - } - dsc->list[curr++] = htonl(i); - if (curr >= dsc->cf_max_stat) { - send_pdu(dsc,SSCOP_STAT,dsc->list,curr*4); - curr = 0; - dsc->list[curr++] = htonl(i); - } - do INC24(i); - while (i != dsc->vr_h && !queue_lookup(&dsc->rx_buf,i)); - dsc->list[curr++] = htonl(i); - } - if (NORM_RX(i) > NORM_RX(dsc->vr_h)) dsc->list[curr++] = htonl(i); - send_pdu(dsc,SSCOP_STAT,dsc->list,curr*4); -} - - -static void data_ustat(SSCOP_DSC *dsc,int mr,int r,int e1,int e2) /* 20.43 */ -{ - BUFFER *buf,*buf2; - int seq1,seq2,i; - - if (NORM_TX(dsc->vt_a) <= NORM_TX(r) && NORM_TX(r) < NORM_TX(dsc->vt_s)) { - for (i = dsc->vt_a; i != r; INC24(i)) { - buf = queue_lookup(&dsc->tx_buf,i); - if (buf) { - queue_remove(&dsc->tx_buf,buf); - buffer_discard(buf); - } - } - dsc->vt_a = r; - dsc->vt_ms = mr; - seq1 = e1; - seq2 = e2; - if (NORM_TX(dsc->vt_a) <= NORM_TX(seq1) && NORM_TX(seq1) < - NORM_TX(seq2) && NORM_TX(seq2) < NORM_TX(dsc->vt_s)) { - /* G */ - while ((buf = queue_lookup(&dsc->tx_buf,seq1))) { - buf2 = buffer_clone(buf); - queue_put(&dsc->rt_q,buf2); - INC24(seq1); - if (seq1 == seq2) { - maa_error(dsc,'V',e2-e1); - return; - } - } - } - } - /* F */ - start_error_recov(dsc,'T'); -} - - -static void data_stat(SSCOP_DSC *dsc,int ps,int mr,int r,unsigned long *list, - int length) /* 20.44-46 */ -{ - BUFFER *buf,*buf2; - unsigned long *curr,tmp; - int i,count,seq1,seq2; - - if (NORM_TX(dsc->vt_pa) > NORM_TX(ps) || NORM_TX(ps) > - NORM_TX(dsc->vt_ps)) { - start_error_recov(dsc,'R'); - return; - } - if (NORM_TX(dsc->vt_a) > NORM_TX(r) || NORM_TX(r) > - NORM_TX(dsc->vt_s)) { - /* H */ - start_error_recov(dsc,'S'); - return; - } - for (i = dsc->vt_a; i != r; INC24(i)) { - buf = queue_lookup(&dsc->tx_buf,i); - if (buf) { - queue_remove(&dsc->tx_buf,buf); - buffer_discard(buf); - } - } - dsc->vt_a = r; - dsc->vt_pa = ps; - dsc->vt_ms = mr; - i = length; - curr = list; - count = 0; - if (i > 1) { - tmp = *curr++; - seq1 = SSCOP_N(tmp); - i--; - if (NORM_TX(seq1) >= NORM_TX(dsc->vt_s)) { - /* H */ - start_error_recov(dsc,'S'); - return; - } - /* I */ - do { - tmp = *curr++; - seq2 = SSCOP_N(tmp); - i--; - if (NORM_TX(seq1) >= NORM_TX(seq2) || - NORM_TX(seq2) > NORM_TX(dsc->vt_s)) { - /* H */ - start_error_recov(dsc,'S'); - return; - } - do { - if (!(buf = queue_lookup(&dsc->tx_buf,seq1))) { - /* H */ - start_error_recov(dsc,'S'); - return; - } - if (NORM_TX(buf->extra) < NORM_TX(ps) && - NORM_TX(ps) <= NORM_TX(dsc->vt_ps) && - !queue_lookup(&dsc->rt_q,seq1)) { - buf2 = buffer_clone(buf); - queue_put(&dsc->rt_q,buf2); - count++; - } - INC24(seq1); - } - while (seq1 != seq2); - /* J */ - if (!i) break; - tmp = *curr++; - seq2 = SSCOP_N(tmp); - i--; - if (NORM_TX(seq1) >= NORM_TX(seq2) || - NORM_TX(seq2) > NORM_TX(dsc->vt_s)) { - /* H */ - start_error_recov(dsc,'S'); - return; - } - do { - if (dsc->clear_buffers) { - buf = queue_lookup(&dsc->tx_buf,seq1); - if (buf) { - queue_remove(&dsc->tx_buf,buf); - buffer_discard(buf); - } - } - INC24(seq1); - } - while (seq1 != seq2); - } - while (i); - maa_error(dsc,'V',count); - } - /* L */ - if (dsc->credit != (NORM_TX(dsc->vt_s) < NORM_TX(dsc->vt_ms))) - maa_error(dsc,(dsc->credit = !dsc->credit) ? 'X' : 'W',0); - if (dsc->timer_poll) START_TIMER(noresp); - else if (!dsc->timer_idle) { - STOP_TIMER(dsc->timer_keepalive); - STOP_TIMER(dsc->timer_noresp); - START_TIMER(idle); - } -} - - -/* --- Incoming PDUs ------------------------------------------------------- */ - - -/* - * Returns 0 if the descriptor might conceivably be gone when returning, - * 1 otherwise. - */ - -static int handle_sscop_pdu(SSCOP_DSC *dsc,void *msg,int size) -{ - PDU_VARS; - - dump_pdu(msg,size); - if (DECOMPOSE_PDU(dsc,msg,size)) return 1; - PRINT_PDU(dsc,"RECV",msg); - switch (type) { - case SSCOP_UD: - if (dsc->ops->unitdata) dsc->ops->unitdata(dsc->user,msg,length); - return 1; - case SSCOP_MD: - if (dsc->ops->maa_data) dsc->ops->maa_data(dsc->user,msg,length); - return 1; - default: - break; - } - switch (dsc->state) { - case sscop_idle: - switch (type) { - case SSCOP_BGREJ: - bad_pdu(dsc,type); - return 1; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - send_pdu(dsc,SSCOP_BGREJ,NULL,0); /* no SSCOP-UU */ - return 1; - } - dsc->vt_ms = mr; - next_state(dsc,sscop_inconn); - if (dsc->ops->estab_ind) - dsc->ops->estab_ind(dsc->user,msg,length); - return 1; - case SSCOP_ENDAK: - return 1; - case SSCOP_END: - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - return 1; - case SSCOP_ER: - case SSCOP_POLL: - case SSCOP_SD: - case SSCOP_BGAK: - case SSCOP_ERAK: - case SSCOP_STAT: - case SSCOP_USTAT: - case SSCOP_RS: - case SSCOP_RSAK: - bad_pdu(dsc,type); - send_pdu(dsc,SSCOP_END,NULL,1); - return 1; - default: - break; - } - break; - case sscop_outconn: /* 20.8-10 */ - switch (type) { - case SSCOP_ENDAK: - case SSCOP_SD: - case SSCOP_ERAK: - case SSCOP_END: - case SSCOP_STAT: - case SSCOP_USTAT: - case SSCOP_POLL: - case SSCOP_ER: - case SSCOP_RSAK: - case SSCOP_RS: - return 1; /* ignore PDU */ - case SSCOP_BGAK: - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - if (dsc->ops->estab_conf) - dsc->ops->estab_conf(dsc->user,msg,length); - return 1; - case SSCOP_BGREJ: - STOP_TIMER(dsc->timer_cc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,1); - return 0; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) return 1; - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_BGAK,NULL,0); - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - if (dsc->ops->estab_conf) - dsc->ops->estab_conf(dsc->user,msg,length); - return 1; - default: - break; - } - break; - case sscop_inconn: /* 20.11-13 */ - switch (type) { - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) return 1; - dsc->vt_ms = mr; - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - case SSCOP_ER: - case SSCOP_BGAK: - case SSCOP_ERAK: - case SSCOP_RSAK: - case SSCOP_RS: - bad_pdu(dsc,type); - return 1; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - bad_pdu(dsc,type); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,1); - return 0; - case SSCOP_SD: - case SSCOP_USTAT: - case SSCOP_STAT: - case SSCOP_POLL: - bad_pdu(dsc,type); - send_pdu(dsc,SSCOP_END,NULL,1); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_END: - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - default: - break; - } - break; - case sscop_outdisc: /* 20.14-16 */ - switch (type) { - case SSCOP_SD: - case SSCOP_BGAK: - case SSCOP_POLL: - case SSCOP_STAT: - case SSCOP_USTAT: - case SSCOP_ERAK: - case SSCOP_RS: - case SSCOP_RSAK: - case SSCOP_ER: - return 1; - case SSCOP_END: - STOP_TIMER(dsc->timer_cc); - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); - return 0; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - STOP_TIMER(dsc->timer_cc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_conf) dsc->ops->rel_conf(dsc->user); - return 0; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - send_pdu(dsc,SSCOP_BGAK,NULL,0); - resend_pdu(dsc,dsc->last_end); - return 1; - } - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,0); - return 1; - } - case sscop_outres: /* 20.17-19 */ - switch (type) { - case SSCOP_ER: - case SSCOP_POLL: - case SSCOP_STAT: - case SSCOP_USTAT: - case SSCOP_BGAK: - case SSCOP_ERAK: - case SSCOP_SD: - return 1; /* ignore */ - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - send_pdu(dsc,SSCOP_BGAK,NULL,0); - resend_pdu(dsc,dsc->last_rs); - return 1; - } - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - STOP_TIMER(dsc->timer_cc); - bad_pdu(dsc,type); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_END: - STOP_TIMER(dsc->timer_cc); - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - case SSCOP_RS: - if (detect_retransmission(dsc,sq)) return 1; - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_RSAK,NULL,0); - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - if (dsc->ops->res_conf) dsc->ops->res_conf(dsc->user); - return 1; - case SSCOP_RSAK: - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - if (dsc->ops->res_conf) dsc->ops->res_conf(dsc->user); - return 1; - default: - break; - } - break; - case sscop_inres: /* 20.20-22 */ - switch (type) { - case SSCOP_SD: - case SSCOP_POLL: - case SSCOP_STAT: - case SSCOP_USTAT: - send_pdu(dsc,SSCOP_END,NULL,1); - /* fall through */ - case SSCOP_ENDAK: - case SSCOP_BGREJ: - bad_pdu(dsc,type); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_END: - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - case SSCOP_ER: - case SSCOP_BGAK: - case SSCOP_ERAK: - case SSCOP_RSAK: - bad_pdu(dsc,type); - return 1; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - dsc->vt_ms = mr; - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - case SSCOP_RS: - if (!detect_retransmission(dsc,sq)) bad_pdu(dsc,type); - return 1; - default: - break; - } - break; - case sscop_outrec: /* 20.23-26 */ - switch (type) { - case SSCOP_BGAK: - case SSCOP_RSAK: - bad_pdu(dsc,type); - return 1; - case SSCOP_ERAK: - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - next_state(dsc,sscop_recresp); - deliver_data(dsc); - if (dsc->ops->rec_ind) dsc->ops->rec_ind(dsc->user); - return 1; - case SSCOP_END: - STOP_TIMER(dsc->timer_cc); - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - clear_receive_buffer(dsc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - bad_pdu(dsc,type); - STOP_TIMER(dsc->timer_cc); - clear_receive_buffer(dsc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_STAT: - case SSCOP_USTAT: - case SSCOP_POLL: - case SSCOP_SD: - return 1; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - clear_receive_buffer(dsc); - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - case SSCOP_ER: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_ERAK,NULL,0); - deliver_data(dsc); - next_state(dsc,sscop_recresp); - if (dsc->ops->rec_ind) dsc->ops->rec_ind(dsc->user); - return 1; - case SSCOP_RS: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - STOP_TIMER(dsc->timer_cc); - dsc->vt_ms = mr; - clear_receive_buffer(dsc); - next_state(dsc,sscop_inres); - if (dsc->ops->res_ind) - dsc->ops->res_ind(dsc->user,msg,length); - return 0; - default: - break; - } - case sscop_recresp: /* 20.27-29 */ - switch (type) { - case SSCOP_BGAK: - case SSCOP_RSAK: - bad_pdu(dsc,type); - return 1; - case SSCOP_ERAK: - case SSCOP_SD: - case SSCOP_POLL: - return 1; - case SSCOP_END: - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - bad_pdu(dsc,type); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_RS: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - dsc->vt_ms = mr; - next_state(dsc,sscop_inres); - if (dsc->ops->res_ind) - dsc->ops->res_ind(dsc->user,msg,length); - return 1; - case SSCOP_ER: - if (!detect_retransmission(dsc,sq)) bad_pdu(dsc,type); - else send_pdu(dsc,SSCOP_ERAK,NULL,0); - return 1; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - dsc->vt_ms = mr; - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - case SSCOP_STAT: - case SSCOP_USTAT: - bad_pdu(dsc,type); - send_pdu(dsc,SSCOP_END,NULL,1); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - default: - break; - } - case sscop_inrec: /* 20.30-33 */ - switch (type) { - case SSCOP_END: - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - bad_pdu(dsc,type); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_USTAT: - case SSCOP_STAT: - case SSCOP_POLL: - case SSCOP_SD: - bad_pdu(dsc,type); - send_pdu(dsc,SSCOP_END,NULL,1); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_RSAK: - case SSCOP_BGAK: - case SSCOP_ERAK: - bad_pdu(dsc,type); - return 1; - case SSCOP_RS: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - dsc->vt_ms = mr; - next_state(dsc,sscop_inres); - if (dsc->ops->res_ind) - dsc->ops->res_ind(dsc->user,msg,length); - return 1; - case SSCOP_ER: - if (!detect_retransmission(dsc,sq)) bad_pdu(dsc,type); - return 1; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - bad_pdu(dsc,type); - return 1; - } - dsc->vt_ms = mr; - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - default: - break; - } - case sscop_ready: /* 20.34-46 */ - switch (type) { - case SSCOP_BGAK: - case SSCOP_ERAK: - case SSCOP_RSAK: - return 1; - case SSCOP_ER: - if (detect_retransmission(dsc,sq)) { - START_TIMER(noresp); - send_pdu(dsc,SSCOP_ERAK,NULL,0); - return 1; - } - reset_data_transfer_timers(dsc); - dsc->vt_ms = mr; - prepare_recovery(dsc); - next_state(dsc,sscop_inrec); - deliver_data(dsc); - if (dsc->ops->rec_ind) dsc->ops->rec_ind(dsc->user); - return 1; - case SSCOP_BGN: - if (detect_retransmission(dsc,sq)) { - START_TIMER(noresp); - send_pdu(dsc,SSCOP_BGAK,NULL,0); - return 1; - } - reset_data_transfer_timers(dsc); - dsc->vt_ms = mr; - prepare_retrieval(dsc); - next_state(dsc,sscop_inconn); - if (dsc->ops->restart) - dsc->ops->restart(dsc->user,msg,length,1); - return 1; - case SSCOP_ENDAK: - case SSCOP_BGREJ: - reset_data_transfer_timers(dsc); - bad_pdu(dsc,type); - prepare_retrieval(dsc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,NULL,0,0); - return 0; - case SSCOP_RS: - if (detect_retransmission(dsc,sq)) { - START_TIMER(noresp); - send_pdu(dsc,SSCOP_RSAK,NULL,0); - return 1; - } - reset_data_transfer_timers(dsc); - dsc->vt_ms = mr; - prepare_retrieval(dsc); - next_state(dsc,sscop_inres); - if (dsc->ops->res_ind) - dsc->ops->res_ind(dsc->user,msg,length); - return 1; - case SSCOP_END: - reset_data_transfer_timers(dsc); - send_pdu(dsc,SSCOP_ENDAK,NULL,0); - prepare_retrieval(dsc); - next_state(dsc,sscop_idle); - if (dsc->ops->rel_ind) - dsc->ops->rel_ind(dsc->user,msg,length,!s); - return 0; - case SSCOP_SD: - data_sd(dsc,s,msg,length); - return 1; - case SSCOP_POLL: - dsc->vr_ps = ps; /* store */ - data_poll(dsc,s); - return 1; - case SSCOP_USTAT: - data_ustat(dsc,mr,r,SSCOP_N(((unsigned long *) msg)[0]), - SSCOP_N(((unsigned long *) msg)[1])); - return 1; - case SSCOP_STAT: - data_stat(dsc,ps,mr,r,msg,length/4); - return 1; - default: - break; - } - } - return 1; -} - - -void sscop_pdu(SSCOP_DSC *dsc,void *msg,int size) -{ - if (handle_sscop_pdu(dsc,msg,size)) - if (dsc->state == sscop_ready) try_to_send(dsc); -} - - -/* --- From SSCOP user ----------------------------------------------------- */ - - -void sscop_retrieve(SSCOP_DSC *dsc,int rn) -{ - BUFFER *buf; - int i; - - if (dsc->state != sscop_idle && dsc->state != sscop_inconn && - dsc->state != sscop_outdisc && dsc->state != sscop_inres && - dsc->state != sscop_recresp && dsc->state != sscop_inrec) - diag(COMPONENT,DIAG_FATAL,"sscop_retrieve invoked in state %s", - state_name[dsc->state]); - if (rn != SSCOP_RN_UNKNOWN) - for (i = rn == SSCOP_RN_TOTAL ? dsc->vt_a : MOD24(rn+1); - NORM_TX(dsc->vt_a) <= NORM_TX(i) && NORM_TX(i) < NORM_TX(dsc->vt_s); - INC24(i)) { - buf = queue_lookup(&dsc->tx_buf,i); - if (buf) { - queue_remove(&dsc->tx_buf,buf); - if (dsc->ops->retr_ind) - dsc->ops->retr_ind(dsc->user,buf->data,buf->length); - buffer_discard(buf); - } - } - while ((buf = queue_get(&dsc->tx_q))) { - if (dsc->ops->retr_ind) - dsc->ops->retr_ind(dsc->user,buf->data,buf->length); - buffer_discard(buf); - } - if (dsc->ops->retr_comp) dsc->ops->retr_comp(dsc->user); -} - - -void sscop_send(SSCOP_DSC *dsc,void *buffer,int size) /* 20.38 */ -{ - BUFFER *buf; - - if (dsc->state != sscop_ready && (dsc->state != sscop_outrec || - dsc->clear_buffers)) return; /* 20.23 */ - buf = buffer_create(size,0); - memcpy(buf->data,buffer,size); - queue_put(&dsc->tx_q,buf); - try_to_send(dsc); -} - - -void sscop_estab_req(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel) -{ - switch (dsc->state) { - case sscop_outdisc: /* 20.14 */ - STOP_TIMER(dsc->timer_cc); - /* fall through */ - case sscop_idle: /* 20.5 */ - clear_transmitter(dsc); - dsc->clear_buffers = buf_rel; - dsc->vt_cc = 1; - INC8(dsc->vt_sq); - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_BGN,uu_data,uu_length); - START_TIMER(cc); - next_state(dsc,sscop_outconn); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"sscop_estab_req invoked in state %s", - state_name[dsc->state]); -} - - -void sscop_estab_resp(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel) - /* 20.11 */ -{ - if (dsc->state != sscop_inconn) - diag(COMPONENT,DIAG_FATAL,"sscop_estab_resp invoked in state %s", - state_name[dsc->state]); - clear_transmitter(dsc); - dsc->clear_buffers = buf_rel; - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_BGAK,uu_data,uu_length); - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - try_to_send(dsc); /* probably not ... */ -} - - -void sscop_rel_req(SSCOP_DSC *dsc,void *uu_data,int uu_length) -{ - switch (dsc->state) { - case sscop_outrec: /* 20.24 */ - clear_receive_buffer(dsc); - /* fall through */ - case sscop_outconn: /* 20.9 */ - case sscop_outres: /* 20.18 */ - STOP_TIMER(dsc->timer_cc); - /* fall through */ - case sscop_inres: /* 20.20 */ - case sscop_recresp: /* 20.28 */ - case sscop_inrec: /* 20.30 */ - dsc->vt_cc = 1; - send_pdu(dsc,SSCOP_END,uu_data,uu_length); - START_TIMER(cc); - next_state(dsc,sscop_outdisc); - return; - case sscop_inconn: /* 20.11 */ - send_pdu(dsc,SSCOP_BGREJ,uu_data,uu_length); - next_state(dsc,sscop_idle); - return; - case sscop_ready: /* 20.34 */ - reset_data_transfer_timers(dsc); - dsc->vt_cc = 1; - send_pdu(dsc,SSCOP_END,uu_data,uu_length); - prepare_retrieval(dsc); - START_TIMER(cc); - next_state(dsc,sscop_outdisc); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"sscop_rel_req invoked in state %s", - state_name[dsc->state]); -} - - -void sscop_res_req(SSCOP_DSC *dsc,void *uu_data,int uu_length) -{ - switch (dsc->state) { - case sscop_outrec: /* 20.25 */ - STOP_TIMER(dsc->timer_cc); - clear_receive_buffer(dsc); - /* fall through */ - case sscop_recresp: /* 20.29 */ - dsc->vt_cc = 1; - INC8(dsc->vt_sq); - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_RS,uu_data,uu_length); - clear_transmitter(dsc); - START_TIMER(cc); - next_state(dsc,sscop_outres); - return; - case sscop_inrec: /* 20.30 */ - clear_transmitter(dsc); - dsc->vt_cc = 1; - INC8(dsc->vt_sq); - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_RS,uu_data,uu_length); - START_TIMER(cc); - next_state(dsc,sscop_outres); - return; - case sscop_ready: /* 20.34 */ - reset_data_transfer_timers(dsc); - dsc->vt_cc = 1; - INC8(dsc->vt_sq); - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_RS,uu_data,uu_length); - release_buffers(dsc); - START_TIMER(cc); - next_state(dsc,sscop_outres); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"sscop_res_req invoked in state %s", - state_name[dsc->state]); -} - - -void sscop_res_resp(SSCOP_DSC *dsc) /* 20.20 */ -{ - if (dsc->state != sscop_inres) - diag(COMPONENT,DIAG_FATAL,"sscop_res_resp invoked in state %s", - state_name[dsc->state]); - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_RSAK,NULL,0); - clear_transmitter(dsc); - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - try_to_send(dsc); /* probably not ... */ -} - - -void sscop_rec_resp(SSCOP_DSC *dsc) -{ - switch (dsc->state) { - case sscop_inrec: /* 20.30 */ - initialize_vr_mr(dsc); - send_pdu(dsc,SSCOP_ERAK,NULL,0); - /* fall through */ - case sscop_recresp: /* 20.28 */ - if (!dsc->clear_buffers) clear_transmission_buffer(dsc); - initialize_state_variables(dsc); - set_data_transfer_timers(dsc); - next_state(dsc,sscop_ready); - try_to_send(dsc); - return; - default: - break; - } - diag(COMPONENT,DIAG_FATAL,"sscop_rec_resp invoked in state %s", - state_name[dsc->state]); -} - - -void sscop_unitdata(SSCOP_DSC *dsc,void *buffer,int size) /* 20.47-48 */ -{ - send_pdu(dsc,SSCOP_UD,buffer,size); -} - - -void sscop_maa_data(SSCOP_DSC *dsc,void *buffer,int size) /* 20.47-48 */ -{ - send_pdu(dsc,SSCOP_MD,buffer,size); -} - - -void start_sscop(SSCOP_DSC *dsc,SSCOP_USER_OPS *ops,void *user_data) -{ - dsc->ops = ops; - dsc->user = user_data; - dsc->vt_sq = dsc->vr_sq = 0; /* 20.5 */ - dsc->clear_buffers = 1; - dsc->state = sscop_idle; - dsc->timer_cc = dsc->timer_poll = dsc->timer_noresp = - dsc->timer_keepalive = dsc->timer_idle = NULL; - queue_init(&dsc->rx_buf); - queue_init(&dsc->tx_q); - queue_init(&dsc->tx_buf); - queue_init(&dsc->rt_q); - dsc->last_bgn = dsc->last_end = dsc->last_rs = dsc->last_er = NULL; - dsc->cf_max_cc = SSCOP_CF_MaxCC; - dsc->cf_max_pd = SSCOP_CF_MaxPD; - dsc->cf_max_stat = SSCOP_CF_MaxSTAT; - dsc->cf_timer_cc = TIMER_CC; - dsc->cf_timer_poll = TIMER_POLL; - dsc->cf_timer_noresp = TIMER_NORESP; - dsc->cf_timer_keepalive = TIMER_KEEPALIVE; - dsc->cf_timer_idle = TIMER_IDLE; - dsc->list = NULL; -} - - -void stop_sscop(SSCOP_DSC *dsc) -{ - if (dsc->state != sscop_idle) - diag(COMPONENT,DIAG_WARN,"stopping dsc in state %s", - state_name[dsc->state]); - dsc->state = sscop_idle; /* avoid send attempts */ - STOP_TIMER(dsc->timer_cc); - STOP_TIMER(dsc->timer_poll); - STOP_TIMER(dsc->timer_noresp); - STOP_TIMER(dsc->timer_keepalive); - STOP_TIMER(dsc->timer_idle); - queue_clear(&dsc->rx_buf); - queue_clear(&dsc->tx_q); - queue_clear(&dsc->tx_buf); - queue_clear(&dsc->rt_q); - if (dsc->last_bgn) buffer_discard(dsc->last_bgn); - if (dsc->last_end) buffer_discard(dsc->last_end); - if (dsc->last_rs) buffer_discard(dsc->last_rs); - if (dsc->last_er) buffer_discard(dsc->last_er); - if (dsc->list) free(dsc->list); -} diff -ur --new-file old/atm/sigd/sscop.h new/atm/sigd/sscop.h --- old/atm/sigd/sscop.h Tue Oct 24 17:55:57 1995 +++ new/atm/sigd/sscop.h Thu Jan 1 01:00:00 1970 @@ -1,132 +0,0 @@ -/* sscop.h - SSCOP (Q.2110) user interface */ - -/* Written 1995 by Werner Almesberger, EPFL-LRC */ - - -#ifndef SSCOP_H -#define SSCOP_H - -#include "atmd.h" - - -typedef enum { sscop_idle,sscop_outconn,sscop_inconn,sscop_outdisc, - sscop_outres,sscop_inres,sscop_outrec,sscop_recresp,sscop_inrec, - sscop_ready } SSCOP_STATE; - -typedef struct { - SSCOP_STATE state; - struct _sscop_user_ops *ops; - void *user; - /* --- Configurable parameters ----------------------------------------- */ - int cf_max_cc,cf_max_pd,cf_max_stat; - int cf_timer_cc,cf_timer_poll,cf_timer_noresp,cf_timer_keepalive, - cf_timer_idle; - /* --- SSCOP information, TX part -------------------------------------- */ - int vt_s; /* send sequence number */ - int vt_ps; /* poll send sequence number */ - int vt_a; /* acknowledge sequence number */ - int vt_pa; /* poll sequence number */ - int vt_ms; /* maximum send sequence */ - int vt_pd; /* SD PDUs between POLL PDUs */ - int vt_cc; /* number of unacknowledged BSG, END, ER or RS PDUs */ - int vt_sq; /* connection number */ - /* --- SSCOP information, RX part -------------------------------------- */ - int vr_r; /* receiver sequence number */ - int vr_h; /* highest expected SD PDU */ - int vr_mr; /* maximum acceptable (receiver) */ - int vr_sq; /* connection number */ - int vr_ps; /* non-Q.2110: keeps N(PS) received in last POLL for STAT */ - /* Other variables */ - int clear_buffers; - int credit; - /* Timers */ - TIMER *timer_cc,*timer_poll,*timer_noresp,*timer_keepalive,*timer_idle; - /* Queues and buffers */ - QUEUE tx_buf,tx_q,rx_buf,rt_q; - BUFFER *last_bgn,*last_end,*last_rs,*last_er; /* for retransmission */ - /* Misc items */ - int *list; /* STAT construction list */ -} SSCOP_DSC; - - -/* - * Note: UU data of primitives carrying such is only available if - * - the "user" flag is set (if available) and - * - uu_data is non-NULL, and - * - uu_length is non-zero - * in all other cases, uu_data must not be dereferenced. - * - * Note: the "ind" parameter in restart indicates whether the release primitive - * is an AA-RELEASE.indication (ind = 1) or to an AA-RELEASE.confirm (ind = 0). - */ - - -typedef struct _sscop_user_ops { - void (*estab_ind)(void *user_data,void *uu_data,int uu_length); - /* AA-ESTABLISH.indication */ - void (*estab_conf)(void *user_data,void *uu_data,int uu_length); - /* AA-ESTABLISH.confirm */ - void (*rel_ind)(void *user_data,void *uu_data,int uu_length,int user); - /* AA-RELEASE.indication */ - void (*rel_conf)(void *user_data); /* AA-RELEASE.confirm */ - void (*restart)(void *user_data,void *uu_data,int uu_length,int ind); - /* AA-RELEASE.indication or AA-RELEASE.confirm immediately followed by - AA-ESTABLISH.indication */ - void (*res_ind)(void *user_data,void *uu_data,int uu_length); - /* AA-RESYNC.indication */ - void (*res_conf)(void *user_data); /* AA-RESYNC.confirm */ - void (*rec_ind)(void *user_data); /* AA-RECOVER.indication */ - void (*data_ind)(void *user_data,void *data,int length,int sn); - /* AA-DATA.indication */ - void (*unitdata)(void *user_data,void *data,int length); - /* AA-UNITDATA.indication */ - void (*retr_ind)(void *user_data,void *data,int length); - /* AA-RETRIEVE.indication */ - void (*retr_comp)(void *user_data); /* AA-RETRIEVE_COMPLETE.indication */ - void (*maa_data)(void *user_data,void *data,int length); - /* MAA-UNITDATA.indication */ - int (*maa_error)(void *user_data,char code,int count); - /* MAA-ERROR.indication */ - void (*cpcs_send)(void *user_data,void *data,int length); -} SSCOP_USER_OPS; - - -/* Attach/detach protocol */ - -void start_sscop(SSCOP_DSC *dsc,SSCOP_USER_OPS *ops,void *user_data); -void stop_sscop(SSCOP_DSC *dsc); - -/* Connection control */ - -void sscop_estab_req(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel); - /* AA-ESTABLISH.request */ -void sscop_estab_resp(SSCOP_DSC *dsc,void *uu_data,int uu_length,int buf_rel); - /* AA-ESTABLISH.response */ -void sscop_rel_req(SSCOP_DSC *dsc,void *uu_data,int uu_length); - /* AA-RELEASE.request */ -void sscop_res_req(SSCOP_DSC *dsc,void *uu_data,int uu_length); - /* AA-RESYNC.request */ -void sscop_res_resp(SSCOP_DSC *dsc); /* AA-RESYNC.response */ -void sscop_rec_resp(SSCOP_DSC *dsc); /* AA-RECOVER.response */ - -/* Incoming PDU from lower layer */ - -void sscop_pdu(SSCOP_DSC *dsc,void *msg,int size); /* CPCS-UNITDATA.request */ - -/* Send data */ - -void sscop_send(SSCOP_DSC *dsc,void *buffer,int size); - /* AA-DATA.request, 20.38 */ -void sscop_unitdata(SSCOP_DSC *dsc,void *buffer,int size); - /* AA-UNIDATA.request, 20.47 */ -void sscop_maa_data(SSCOP_DSC *dsc,void *buffer,int size); - /* MAA-UNITDATA.request, 20.47 */ - -/* Retrieve unsent data */ - -#define SSCOP_RN_UNKNOWN -2 /* -1 is (theoretically) a valid rn ... */ -#define SSCOP_RN_TOTAL -3 - -void sscop_retrieve(SSCOP_DSC *dsc,int rn); /* AA-RETRIEVE.request */ - -#endif diff -ur --new-file old/atm/sigd/svc.c new/atm/sigd/svc.c --- old/atm/sigd/svc.c Fri Mar 15 14:17:52 1996 +++ new/atm/sigd/svc.c Thu Jan 1 01:00:00 1970 @@ -1,97 +0,0 @@ -#include -#include -#include -#include -#include -#include -#include - -#include "atm.h" - - -static void usage(const char *name) -{ - fprintf(stderr,"usage: %s [ ]\n",name); - exit(1); -} - - -int main(int argc,char **argv) -{ - struct sockaddr_atmsvc addr; - struct atm_blli blli; - char buffer[MAX_ATM_ADDR_LEN+1]; - char *here; - int s,passive,len; -int l2_proto; - if ((s = socket(PF_ATMSVC,SOCK_DGRAM,ATM_AAL5)) < 0) { - perror("socket"); - return 1; - } -if (argc == 1) l2_proto = 1; -else { -l2_proto = atoi(argv[1]); -argc--; -argv++; -} - memset(&addr,0,sizeof(addr)); - memset(&blli,0,sizeof(blli)); - addr.sas_family = AF_ATMSVC; - addr.sas_family = AF_ATMSVC; - addr.sas_addr.blli = &blli; - addr.sas_txtp.class = addr.sas_rxtp.class = ATM_UBR; - blli.l2_proto = l2_proto; - blli.next = NULL; - if (bind(s,(struct sockaddr *) &addr,sizeof(addr)) < 0) { - perror("bind"); - return 1; - } - if (!(passive = argc == 1)) { - if (argc != 2) usage(argv[0]); - if (text2atm(argv[1],(struct sockaddr *) &addr,sizeof(addr),T2A_NAME) - < 0) { - fprintf(stderr,"%s: invalid ATM address\n",argv[1]); - return 1; - } - } - addr.sas_addr.blli = &blli; - addr.sas_txtp.class = addr.sas_rxtp.class = ATM_UBR; - here = strrchr(argv[0],'/'); - if (!passive) { - if (connect(s,(struct sockaddr *) &addr,sizeof(addr)) < 0) { - perror("connect"); - return 1; - } - } - else { - if (listen(s,0) < 0) { - perror("listen"); - return 1; - } - if ((s = accept(s,NULL,0)) < 0) { /* loses listening socket dsc */ - perror("accept"); - return 1; - } - } - len = sizeof(addr); - if (getsockname(s,(struct sockaddr *) &addr,&len) < 0) - perror("getsockname"); - else { - if (atm2text(buffer,MAX_ATM_ADDR_LEN+1,(struct sockaddr *) &addr, - A2T_NAME | A2T_PRETTY) < 0) strcpy(buffer,""); - printf("Local: %s\n",buffer); - } - fflush(stdout); - len = sizeof(addr); - if (getpeername(s,(struct sockaddr *) &addr,&len) < 0) - perror("getpeername"); - else { - if (atm2text(buffer,MAX_ATM_ADDR_LEN+1,(struct sockaddr *) &addr, - A2T_NAME | A2T_PRETTY) < 0) strcpy(buffer,""); - printf("Remote: %s\n",buffer); - } - printf("Press [Enter] to continue "); - fflush(stdout); - (void) getchar(); - return 0; -} diff -ur --new-file old/atm/test/ttcp.c new/atm/test/ttcp.c --- old/atm/test/ttcp.c Thu Jun 6 18:47:44 1996 +++ new/atm/test/ttcp.c Wed Jul 31 18:47:25 1996 @@ -178,6 +178,7 @@ { struct timeval td; unsigned long addr_tmp; + const char *port_name; int c; double mbps; int no_check = 0; @@ -227,7 +228,7 @@ sinkmode = !sinkmode; break; case 'p': - port = atoi(optarg); + port_name = optarg; break; case 'P': pcr = atoi(optarg); @@ -263,7 +264,22 @@ goto usage; } } - + + if (port_name) + if (atm) goto usage; + else { + struct servent *se; + + se = getservbyname(port_name,udp ? "udp" : "tcp"); + if (se) port = ntohs(se->s_port); + else { + const char *end; + + port = strtoul(port_name,&end,0); + if (*end) goto usage; + } + } + host = argv[optind]; if (atm && arequipa) { fprintf(stderr,"-Q must not be used with -a\n"); @@ -369,19 +385,27 @@ /* set socket buffer size */ #if defined(SO_SNDBUF) || defined(SO_RCVBUF) if (sockbufsize) { +int l; if (trans) { /* set send socket buffer if we are transmitting */ if (setsockopt(fd, SOL_SOCKET, SO_SNDBUF, &sockbufsize, sizeof sockbufsize) < 0) err("setsockopt: sndbuf"); +l = sizeof sockbufsize; +if (getsockopt(fd, SOL_SOCKET, SO_SNDBUF, &sockbufsize, &l) < 0) +perror("grr"); mes("sndbuf"); } else { /* set receive socket buffer if we are receiving */ if (setsockopt(fd, SOL_SOCKET, SO_RCVBUF, &sockbufsize, sizeof sockbufsize) < 0) err("setsockopt: rcvbuf"); +l = sizeof sockbufsize; +if (getsockopt(fd, SOL_SOCKET, SO_RCVBUF, &sockbufsize, &l) < 0) +perror("grr"); mes("rcvbuf"); } +printf("sbs=%d\n",sockbufsize); } #endif @@ -421,6 +445,7 @@ err("setsockopt: nodelay"); mes("nodelay"); } + if (atm) sleep(1); /* grr ... */ #endif } else if (!arequipa || !udp) { /* otherwise, we are the server and .