Merge /spare/repo/linux-2.6/
[linux-2.6] / drivers / atm / suni.c
1 /* drivers/atm/suni.c - PMC PM5346 SUNI (PHY) driver */
2  
3 /* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */
4
5
6 #include <linux/module.h>
7 #include <linux/jiffies.h>
8 #include <linux/kernel.h>
9 #include <linux/mm.h>
10 #include <linux/errno.h>
11 #include <linux/atmdev.h>
12 #include <linux/sonet.h>
13 #include <linux/delay.h>
14 #include <linux/timer.h>
15 #include <linux/init.h>
16 #include <linux/capability.h>
17 #include <linux/atm_suni.h>
18 #include <asm/system.h>
19 #include <asm/param.h>
20 #include <asm/uaccess.h>
21 #include <asm/atomic.h>
22
23 #include "suni.h"
24
25
26 #if 0
27 #define DPRINTK(format,args...) printk(KERN_DEBUG format,##args)
28 #else
29 #define DPRINTK(format,args...)
30 #endif
31
32
33 struct suni_priv {
34         struct k_sonet_stats sonet_stats; /* link diagnostics */
35         int loop_mode;                  /* loopback mode */
36         struct atm_dev *dev;            /* device back-pointer */
37         struct suni_priv *next;         /* next SUNI */
38 };
39
40
41 #define PRIV(dev) ((struct suni_priv *) dev->phy_data)
42
43 #define PUT(val,reg) dev->ops->phy_put(dev,val,SUNI_##reg)
44 #define GET(reg) dev->ops->phy_get(dev,SUNI_##reg)
45 #define REG_CHANGE(mask,shift,value,reg) \
46   PUT((GET(reg) & ~(mask)) | ((value) << (shift)),reg)
47
48
49 static struct timer_list poll_timer;
50 static struct suni_priv *sunis = NULL;
51 static DEFINE_SPINLOCK(sunis_lock);
52
53
54 #define ADD_LIMITED(s,v) \
55     atomic_add((v),&stats->s); \
56     if (atomic_read(&stats->s) < 0) atomic_set(&stats->s,INT_MAX);
57
58
59 static void suni_hz(unsigned long from_timer)
60 {
61         struct suni_priv *walk;
62         struct atm_dev *dev;
63         struct k_sonet_stats *stats;
64
65         for (walk = sunis; walk; walk = walk->next) {
66                 dev = walk->dev;
67                 stats = &walk->sonet_stats;
68                 PUT(0,MRI); /* latch counters */
69                 udelay(1);
70                 ADD_LIMITED(section_bip,(GET(RSOP_SBL) & 0xff) |
71                     ((GET(RSOP_SBM) & 0xff) << 8));
72                 ADD_LIMITED(line_bip,(GET(RLOP_LBL) & 0xff) |
73                     ((GET(RLOP_LB) & 0xff) << 8) |
74                     ((GET(RLOP_LBM) & 0xf) << 16));
75                 ADD_LIMITED(path_bip,(GET(RPOP_PBL) & 0xff) |
76                     ((GET(RPOP_PBM) & 0xff) << 8));
77                 ADD_LIMITED(line_febe,(GET(RLOP_LFL) & 0xff) |
78                     ((GET(RLOP_LF) & 0xff) << 8) |
79                     ((GET(RLOP_LFM) & 0xf) << 16));
80                 ADD_LIMITED(path_febe,(GET(RPOP_PFL) & 0xff) |
81                     ((GET(RPOP_PFM) & 0xff) << 8));
82                 ADD_LIMITED(corr_hcs,GET(RACP_CHEC) & 0xff);
83                 ADD_LIMITED(uncorr_hcs,GET(RACP_UHEC) & 0xff);
84                 ADD_LIMITED(rx_cells,(GET(RACP_RCCL) & 0xff) |
85                     ((GET(RACP_RCC) & 0xff) << 8) |
86                     ((GET(RACP_RCCM) & 7) << 16));
87                 ADD_LIMITED(tx_cells,(GET(TACP_TCCL) & 0xff) |
88                     ((GET(TACP_TCC) & 0xff) << 8) |
89                     ((GET(TACP_TCCM) & 7) << 16));
90         }
91         if (from_timer) mod_timer(&poll_timer,jiffies+HZ);
92 }
93
94
95 #undef ADD_LIMITED
96
97
98 static int fetch_stats(struct atm_dev *dev,struct sonet_stats __user *arg,int zero)
99 {
100         struct sonet_stats tmp;
101         int error = 0;
102
103         sonet_copy_stats(&PRIV(dev)->sonet_stats,&tmp);
104         if (arg) error = copy_to_user(arg,&tmp,sizeof(tmp));
105         if (zero && !error) sonet_subtract_stats(&PRIV(dev)->sonet_stats,&tmp);
106         return error ? -EFAULT : 0;
107 }
108
109
110 #define HANDLE_FLAG(flag,reg,bit) \
111   if (todo & flag) { \
112     if (set) PUT(GET(reg) | bit,reg); \
113     else PUT(GET(reg) & ~bit,reg); \
114     todo &= ~flag; \
115   }
116
117
118 static int change_diag(struct atm_dev *dev,void __user *arg,int set)
119 {
120         int todo;
121
122         if (get_user(todo,(int __user *)arg)) return -EFAULT;
123         HANDLE_FLAG(SONET_INS_SBIP,TSOP_DIAG,SUNI_TSOP_DIAG_DBIP8);
124         HANDLE_FLAG(SONET_INS_LBIP,TLOP_DIAG,SUNI_TLOP_DIAG_DBIP);
125         HANDLE_FLAG(SONET_INS_PBIP,TPOP_CD,SUNI_TPOP_DIAG_DB3);
126         HANDLE_FLAG(SONET_INS_FRAME,RSOP_CIE,SUNI_RSOP_CIE_FOOF);
127         HANDLE_FLAG(SONET_INS_LAIS,TSOP_CTRL,SUNI_TSOP_CTRL_LAIS);
128         HANDLE_FLAG(SONET_INS_PAIS,TPOP_CD,SUNI_TPOP_DIAG_PAIS);
129         HANDLE_FLAG(SONET_INS_LOS,TSOP_DIAG,SUNI_TSOP_DIAG_DLOS);
130         HANDLE_FLAG(SONET_INS_HCS,TACP_CS,SUNI_TACP_CS_DHCS);
131         return put_user(todo,(int __user *)arg) ? -EFAULT : 0;
132 }
133
134
135 #undef HANDLE_FLAG
136
137
138 static int get_diag(struct atm_dev *dev,void __user *arg)
139 {
140         int set;
141
142         set = 0;
143         if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DBIP8) set |= SONET_INS_SBIP;
144         if (GET(TLOP_DIAG) & SUNI_TLOP_DIAG_DBIP) set |= SONET_INS_LBIP;
145         if (GET(TPOP_CD) & SUNI_TPOP_DIAG_DB3) set |= SONET_INS_PBIP;
146         /* SONET_INS_FRAME is one-shot only */
147         if (GET(TSOP_CTRL) & SUNI_TSOP_CTRL_LAIS) set |= SONET_INS_LAIS;
148         if (GET(TPOP_CD) & SUNI_TPOP_DIAG_PAIS) set |= SONET_INS_PAIS;
149         if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DLOS) set |= SONET_INS_LOS;
150         if (GET(TACP_CS) & SUNI_TACP_CS_DHCS) set |= SONET_INS_HCS;
151         return put_user(set,(int __user *)arg) ? -EFAULT : 0;
152 }
153
154
155 static int set_loopback(struct atm_dev *dev,int mode)
156 {
157         unsigned char control;
158
159         control = GET(MCT) & ~(SUNI_MCT_DLE | SUNI_MCT_LLE);
160         switch (mode) {
161                 case ATM_LM_NONE:
162                         break;
163                 case ATM_LM_LOC_PHY:
164                         control |= SUNI_MCT_DLE;
165                         break;
166                 case ATM_LM_RMT_PHY:
167                         control |= SUNI_MCT_LLE;
168                         break;
169                 default:
170                         return -EINVAL;
171         }
172         PUT(control,MCT);
173         PRIV(dev)->loop_mode = mode;
174         return 0;
175 }
176
177
178 static int suni_ioctl(struct atm_dev *dev,unsigned int cmd,void __user *arg)
179 {
180         switch (cmd) {
181                 case SONET_GETSTATZ:
182                 case SONET_GETSTAT:
183                         return fetch_stats(dev, arg, cmd == SONET_GETSTATZ);
184                 case SONET_SETDIAG:
185                         return change_diag(dev,arg,1);
186                 case SONET_CLRDIAG:
187                         return change_diag(dev,arg,0);
188                 case SONET_GETDIAG:
189                         return get_diag(dev,arg);
190                 case SONET_SETFRAMING:
191                         if (arg != SONET_FRAME_SONET) return -EINVAL;
192                         return 0;
193                 case SONET_GETFRAMING:
194                         return put_user(SONET_FRAME_SONET,(int __user *)arg) ?
195                             -EFAULT : 0;
196                 case SONET_GETFRSENSE:
197                         return -EINVAL;
198                 case ATM_SETLOOP:
199                         return set_loopback(dev,(int)(unsigned long)arg);
200                 case ATM_GETLOOP:
201                         return put_user(PRIV(dev)->loop_mode,(int __user *)arg) ?
202                             -EFAULT : 0;
203                 case ATM_QUERYLOOP:
204                         return put_user(ATM_LM_LOC_PHY | ATM_LM_RMT_PHY,
205                             (int __user *) arg) ? -EFAULT : 0;
206                 default:
207                         return -ENOIOCTLCMD;
208         }
209 }
210
211
212 static void poll_los(struct atm_dev *dev)
213 {
214         dev->signal = GET(RSOP_SIS) & SUNI_RSOP_SIS_LOSV ? ATM_PHY_SIG_LOST :
215           ATM_PHY_SIG_FOUND;
216 }
217
218
219 static void suni_int(struct atm_dev *dev)
220 {
221         poll_los(dev);
222         printk(KERN_NOTICE "%s(itf %d): signal %s\n",dev->type,dev->number,
223             dev->signal == ATM_PHY_SIG_LOST ?  "lost" : "detected again");
224 }
225
226
227 static int suni_start(struct atm_dev *dev)
228 {
229         unsigned long flags;
230         int first;
231
232         if (!(dev->phy_data = kmalloc(sizeof(struct suni_priv),GFP_KERNEL)))
233                 return -ENOMEM;
234
235         PRIV(dev)->dev = dev;
236         spin_lock_irqsave(&sunis_lock,flags);
237         first = !sunis;
238         PRIV(dev)->next = sunis;
239         sunis = PRIV(dev);
240         spin_unlock_irqrestore(&sunis_lock,flags);
241         memset(&PRIV(dev)->sonet_stats,0,sizeof(struct k_sonet_stats));
242         PUT(GET(RSOP_CIE) | SUNI_RSOP_CIE_LOSE,RSOP_CIE);
243                 /* interrupt on loss of signal */
244         poll_los(dev); /* ... and clear SUNI interrupts */
245         if (dev->signal == ATM_PHY_SIG_LOST)
246                 printk(KERN_WARNING "%s(itf %d): no signal\n",dev->type,
247                     dev->number);
248         PRIV(dev)->loop_mode = ATM_LM_NONE;
249         suni_hz(0); /* clear SUNI counters */
250         (void) fetch_stats(dev,NULL,1); /* clear kernel counters */
251         if (first) {
252                 init_timer(&poll_timer);
253                 poll_timer.expires = jiffies+HZ;
254                 poll_timer.function = suni_hz;
255                 poll_timer.data = 1;
256 #if 0
257 printk(KERN_DEBUG "[u] p=0x%lx,n=0x%lx\n",(unsigned long) poll_timer.list.prev,
258     (unsigned long) poll_timer.list.next);
259 #endif
260                 add_timer(&poll_timer);
261         }
262         return 0;
263 }
264
265
266 static int suni_stop(struct atm_dev *dev)
267 {
268         struct suni_priv **walk;
269         unsigned long flags;
270
271         /* let SAR driver worry about stopping interrupts */
272         spin_lock_irqsave(&sunis_lock,flags);
273         for (walk = &sunis; *walk != PRIV(dev);
274             walk = &PRIV((*walk)->dev)->next);
275         *walk = PRIV((*walk)->dev)->next;
276         if (!sunis) del_timer_sync(&poll_timer);
277         spin_unlock_irqrestore(&sunis_lock,flags);
278         kfree(PRIV(dev));
279
280         return 0;
281 }
282
283
284 static const struct atmphy_ops suni_ops = {
285         .start          = suni_start,
286         .ioctl          = suni_ioctl,
287         .interrupt      = suni_int,
288         .stop           = suni_stop,
289 };
290
291
292 int suni_init(struct atm_dev *dev)
293 {
294         unsigned char mri;
295
296         mri = GET(MRI); /* reset SUNI */
297         PUT(mri | SUNI_MRI_RESET,MRI);
298         PUT(mri,MRI);
299         PUT((GET(MT) & SUNI_MT_DS27_53),MT); /* disable all tests */
300         REG_CHANGE(SUNI_TPOP_APM_S,SUNI_TPOP_APM_S_SHIFT,SUNI_TPOP_S_SONET,
301             TPOP_APM); /* use SONET */
302         REG_CHANGE(SUNI_TACP_IUCHP_CLP,0,SUNI_TACP_IUCHP_CLP,
303             TACP_IUCHP); /* idle cells */
304         PUT(SUNI_IDLE_PATTERN,TACP_IUCPOP);
305         dev->phy = &suni_ops;
306         return 0;
307 }
308
309 EXPORT_SYMBOL(suni_init);
310
311 MODULE_LICENSE("GPL");