Merge branch 'master'
[sfrench/cifs-2.6.git] / drivers / video / cg14.c
1 /* cg14.c: CGFOURTEEN frame buffer driver
2  *
3  * Copyright (C) 2003 David S. Miller (davem@redhat.com)
4  * Copyright (C) 1996,1998 Jakub Jelinek (jj@ultra.linux.cz)
5  * Copyright (C) 1995 Miguel de Icaza (miguel@nuclecu.unam.mx)
6  *
7  * Driver layout based loosely on tgafb.c, see that file for credits.
8  */
9
10 #include <linux/module.h>
11 #include <linux/kernel.h>
12 #include <linux/errno.h>
13 #include <linux/string.h>
14 #include <linux/slab.h>
15 #include <linux/delay.h>
16 #include <linux/init.h>
17 #include <linux/fb.h>
18 #include <linux/mm.h>
19
20 #include <asm/io.h>
21 #include <asm/sbus.h>
22 #include <asm/oplib.h>
23 #include <asm/fbio.h>
24
25 #include "sbuslib.h"
26
27 /*
28  * Local functions.
29  */
30
31 static int cg14_setcolreg(unsigned, unsigned, unsigned, unsigned,
32                          unsigned, struct fb_info *);
33
34 static int cg14_mmap(struct fb_info *, struct file *, struct vm_area_struct *);
35 static int cg14_ioctl(struct inode *, struct file *, unsigned int,
36                       unsigned long, struct fb_info *);
37 static int cg14_pan_display(struct fb_var_screeninfo *, struct fb_info *);
38
39 /*
40  *  Frame buffer operations
41  */
42
43 static struct fb_ops cg14_ops = {
44         .owner                  = THIS_MODULE,
45         .fb_setcolreg           = cg14_setcolreg,
46         .fb_pan_display         = cg14_pan_display,
47         .fb_fillrect            = cfb_fillrect,
48         .fb_copyarea            = cfb_copyarea,
49         .fb_imageblit           = cfb_imageblit,
50         .fb_mmap                = cg14_mmap,
51         .fb_ioctl               = cg14_ioctl,
52 };
53
54 #define CG14_MCR_INTENABLE_SHIFT        7
55 #define CG14_MCR_INTENABLE_MASK         0x80
56 #define CG14_MCR_VIDENABLE_SHIFT        6
57 #define CG14_MCR_VIDENABLE_MASK         0x40
58 #define CG14_MCR_PIXMODE_SHIFT          4
59 #define CG14_MCR_PIXMODE_MASK           0x30
60 #define CG14_MCR_TMR_SHIFT              2
61 #define CG14_MCR_TMR_MASK               0x0c
62 #define CG14_MCR_TMENABLE_SHIFT         1
63 #define CG14_MCR_TMENABLE_MASK          0x02
64 #define CG14_MCR_RESET_SHIFT            0
65 #define CG14_MCR_RESET_MASK             0x01
66 #define CG14_REV_REVISION_SHIFT         4
67 #define CG14_REV_REVISION_MASK          0xf0
68 #define CG14_REV_IMPL_SHIFT             0
69 #define CG14_REV_IMPL_MASK              0x0f
70 #define CG14_VBR_FRAMEBASE_SHIFT        12
71 #define CG14_VBR_FRAMEBASE_MASK         0x00fff000
72 #define CG14_VMCR1_SETUP_SHIFT          0
73 #define CG14_VMCR1_SETUP_MASK           0x000001ff
74 #define CG14_VMCR1_VCONFIG_SHIFT        9
75 #define CG14_VMCR1_VCONFIG_MASK         0x00000e00
76 #define CG14_VMCR2_REFRESH_SHIFT        0
77 #define CG14_VMCR2_REFRESH_MASK         0x00000001
78 #define CG14_VMCR2_TESTROWCNT_SHIFT     1
79 #define CG14_VMCR2_TESTROWCNT_MASK      0x00000002
80 #define CG14_VMCR2_FBCONFIG_SHIFT       2
81 #define CG14_VMCR2_FBCONFIG_MASK        0x0000000c
82 #define CG14_VCR_REFRESHREQ_SHIFT       0
83 #define CG14_VCR_REFRESHREQ_MASK        0x000003ff
84 #define CG14_VCR1_REFRESHENA_SHIFT      10
85 #define CG14_VCR1_REFRESHENA_MASK       0x00000400
86 #define CG14_VCA_CAD_SHIFT              0
87 #define CG14_VCA_CAD_MASK               0x000003ff
88 #define CG14_VCA_VERS_SHIFT             10
89 #define CG14_VCA_VERS_MASK              0x00000c00
90 #define CG14_VCA_RAMSPEED_SHIFT         12
91 #define CG14_VCA_RAMSPEED_MASK          0x00001000
92 #define CG14_VCA_8MB_SHIFT              13
93 #define CG14_VCA_8MB_MASK               0x00002000
94
95 #define CG14_MCR_PIXMODE_8              0
96 #define CG14_MCR_PIXMODE_16             2
97 #define CG14_MCR_PIXMODE_32             3
98
99 struct cg14_regs{
100         volatile u8 mcr;        /* Master Control Reg */
101         volatile u8 ppr;        /* Packed Pixel Reg */
102         volatile u8 tms[2];     /* Test Mode Status Regs */
103         volatile u8 msr;        /* Master Status Reg */
104         volatile u8 fsr;        /* Fault Status Reg */
105         volatile u8 rev;        /* Revision & Impl */
106         volatile u8 ccr;        /* Clock Control Reg */
107         volatile u32 tmr;       /* Test Mode Read Back */
108         volatile u8 mod;        /* Monitor Operation Data Reg */
109         volatile u8 acr;        /* Aux Control */
110         u8 xxx0[6];
111         volatile u16 hct;       /* Hor Counter */
112         volatile u16 vct;       /* Vert Counter */
113         volatile u16 hbs;       /* Hor Blank Start */
114         volatile u16 hbc;       /* Hor Blank Clear */
115         volatile u16 hss;       /* Hor Sync Start */
116         volatile u16 hsc;       /* Hor Sync Clear */
117         volatile u16 csc;       /* Composite Sync Clear */
118         volatile u16 vbs;       /* Vert Blank Start */
119         volatile u16 vbc;       /* Vert Blank Clear */
120         volatile u16 vss;       /* Vert Sync Start */
121         volatile u16 vsc;       /* Vert Sync Clear */
122         volatile u16 xcs;
123         volatile u16 xcc;
124         volatile u16 fsa;       /* Fault Status Address */
125         volatile u16 adr;       /* Address Registers */
126         u8 xxx1[0xce];
127         volatile u8 pcg[0x100]; /* Pixel Clock Generator */
128         volatile u32 vbr;       /* Frame Base Row */
129         volatile u32 vmcr;      /* VBC Master Control */
130         volatile u32 vcr;       /* VBC refresh */
131         volatile u32 vca;       /* VBC Config */
132 };
133
134 #define CG14_CCR_ENABLE 0x04
135 #define CG14_CCR_SELECT 0x02    /* HW/Full screen */
136
137 struct cg14_cursor {
138         volatile u32 cpl0[32];  /* Enable plane 0 */
139         volatile u32 cpl1[32];  /* Color selection plane */
140         volatile u8 ccr;        /* Cursor Control Reg */
141         u8 xxx0[3];
142         volatile u16 cursx;     /* Cursor x,y position */
143         volatile u16 cursy;     /* Cursor x,y position */
144         volatile u32 color0;
145         volatile u32 color1;
146         u32 xxx1[0x1bc];
147         volatile u32 cpl0i[32]; /* Enable plane 0 autoinc */
148         volatile u32 cpl1i[32]; /* Color selection autoinc */
149 };
150
151 struct cg14_dac {
152         volatile u8 addr;       /* Address Register */
153         u8 xxx0[255];
154         volatile u8 glut;       /* Gamma table */
155         u8 xxx1[255];
156         volatile u8 select;     /* Register Select */
157         u8 xxx2[255];
158         volatile u8 mode;       /* Mode Register */
159 };
160
161 struct cg14_xlut{
162         volatile u8 x_xlut [256];
163         volatile u8 x_xlutd [256];
164         u8 xxx0[0x600];
165         volatile u8 x_xlut_inc [256];
166         volatile u8 x_xlutd_inc [256];
167 };
168
169 /* Color look up table (clut) */
170 /* Each one of these arrays hold the color lookup table (for 256
171  * colors) for each MDI page (I assume then there should be 4 MDI
172  * pages, I still wonder what they are.  I have seen NeXTStep split
173  * the screen in four parts, while operating in 24 bits mode.  Each
174  * integer holds 4 values: alpha value (transparency channel, thanks
175  * go to John Stone (johns@umr.edu) from OpenBSD), red, green and blue
176  *
177  * I currently use the clut instead of the Xlut
178  */
179 struct cg14_clut {
180         u32 c_clut [256];
181         u32 c_clutd [256];    /* i wonder what the 'd' is for */
182         u32 c_clut_inc [256];
183         u32 c_clutd_inc [256];
184 };
185
186 #define CG14_MMAP_ENTRIES       16
187
188 struct cg14_par {
189         spinlock_t              lock;
190         struct cg14_regs        __iomem *regs;
191         struct cg14_clut        __iomem *clut;
192         struct cg14_cursor      __iomem *cursor;
193
194         u32                     flags;
195 #define CG14_FLAG_BLANKED       0x00000001
196
197         unsigned long           physbase;
198         unsigned long           iospace;
199         unsigned long           fbsize;
200
201         struct sbus_mmap_map    mmap_map[CG14_MMAP_ENTRIES];
202
203         int                     mode;
204         int                     ramsize;
205         struct sbus_dev         *sdev;
206         struct list_head        list;
207 };
208
209 static void __cg14_reset(struct cg14_par *par)
210 {
211         struct cg14_regs __iomem *regs = par->regs;
212         u8 val;
213
214         val = sbus_readb(&regs->mcr);
215         val &= ~(CG14_MCR_PIXMODE_MASK);
216         sbus_writeb(val, &regs->mcr);
217 }
218
219 static int cg14_pan_display(struct fb_var_screeninfo *var, struct fb_info *info)
220 {
221         struct cg14_par *par = (struct cg14_par *) info->par;
222         unsigned long flags;
223
224         /* We just use this to catch switches out of
225          * graphics mode.
226          */
227         spin_lock_irqsave(&par->lock, flags);
228         __cg14_reset(par);
229         spin_unlock_irqrestore(&par->lock, flags);
230
231         if (var->xoffset || var->yoffset || var->vmode)
232                 return -EINVAL;
233         return 0;
234 }
235
236 /**
237  *      cg14_setcolreg - Optional function. Sets a color register.
238  *      @regno: boolean, 0 copy local, 1 get_user() function
239  *      @red: frame buffer colormap structure
240  *      @green: The green value which can be up to 16 bits wide
241  *      @blue:  The blue value which can be up to 16 bits wide.
242  *      @transp: If supported the alpha value which can be up to 16 bits wide.
243  *      @info: frame buffer info structure
244  */
245 static int cg14_setcolreg(unsigned regno,
246                           unsigned red, unsigned green, unsigned blue,
247                           unsigned transp, struct fb_info *info)
248 {
249         struct cg14_par *par = (struct cg14_par *) info->par;
250         struct cg14_clut __iomem *clut = par->clut;
251         unsigned long flags;
252         u32 val;
253
254         if (regno >= 256)
255                 return 1;
256
257         red >>= 8;
258         green >>= 8;
259         blue >>= 8;
260         val = (red | (green << 8) | (blue << 16));
261
262         spin_lock_irqsave(&par->lock, flags);
263         sbus_writel(val, &clut->c_clut[regno]);
264         spin_unlock_irqrestore(&par->lock, flags);
265
266         return 0;
267 }
268
269 static int cg14_mmap(struct fb_info *info, struct file *file, struct vm_area_struct *vma)
270 {
271         struct cg14_par *par = (struct cg14_par *) info->par;
272
273         return sbusfb_mmap_helper(par->mmap_map,
274                                   par->physbase, par->fbsize,
275                                   par->iospace, vma);
276 }
277
278 static int cg14_ioctl(struct inode *inode, struct file *file, unsigned int cmd,
279                       unsigned long arg, struct fb_info *info)
280 {
281         struct cg14_par *par = (struct cg14_par *) info->par;
282         struct cg14_regs __iomem *regs = par->regs;
283         struct mdi_cfginfo kmdi, __user *mdii;
284         unsigned long flags;
285         int cur_mode, mode, ret = 0;
286
287         switch (cmd) {
288         case MDI_RESET:
289                 spin_lock_irqsave(&par->lock, flags);
290                 __cg14_reset(par);
291                 spin_unlock_irqrestore(&par->lock, flags);
292                 break;
293
294         case MDI_GET_CFGINFO:
295                 memset(&kmdi, 0, sizeof(kmdi));
296
297                 spin_lock_irqsave(&par->lock, flags);
298                 kmdi.mdi_type = FBTYPE_MDICOLOR;
299                 kmdi.mdi_height = info->var.yres;
300                 kmdi.mdi_width = info->var.xres;
301                 kmdi.mdi_mode = par->mode;
302                 kmdi.mdi_pixfreq = 72; /* FIXME */
303                 kmdi.mdi_size = par->ramsize;
304                 spin_unlock_irqrestore(&par->lock, flags);
305
306                 mdii = (struct mdi_cfginfo __user *) arg;
307                 if (copy_to_user(mdii, &kmdi, sizeof(kmdi)))
308                         ret = -EFAULT;
309                 break;
310
311         case MDI_SET_PIXELMODE:
312                 if (get_user(mode, (int __user *) arg)) {
313                         ret = -EFAULT;
314                         break;
315                 }
316
317                 spin_lock_irqsave(&par->lock, flags);
318                 cur_mode = sbus_readb(&regs->mcr);
319                 cur_mode &= ~CG14_MCR_PIXMODE_MASK;
320                 switch(mode) {
321                 case MDI_32_PIX:
322                         cur_mode |= (CG14_MCR_PIXMODE_32 <<
323                                      CG14_MCR_PIXMODE_SHIFT);
324                         break;
325
326                 case MDI_16_PIX:
327                         cur_mode |= (CG14_MCR_PIXMODE_16 <<
328                                      CG14_MCR_PIXMODE_SHIFT);
329                         break;
330
331                 case MDI_8_PIX:
332                         break;
333
334                 default:
335                         ret = -ENOSYS;
336                         break;
337                 };
338                 if (!ret) {
339                         sbus_writeb(cur_mode, &regs->mcr);
340                         par->mode = mode;
341                 }
342                 spin_unlock_irqrestore(&par->lock, flags);
343                 break;
344
345         default:
346                 ret = sbusfb_ioctl_helper(cmd, arg, info,
347                                           FBTYPE_MDICOLOR, 8, par->fbsize);
348                 break;
349         };
350
351         return ret;
352 }
353
354 /*
355  *  Initialisation
356  */
357
358 static void cg14_init_fix(struct fb_info *info, int linebytes)
359 {
360         struct cg14_par *par = (struct cg14_par *)info->par;
361         const char *name;
362
363         name = "cgfourteen";
364         if (par->sdev)
365                 name = par->sdev->prom_name;
366
367         strlcpy(info->fix.id, name, sizeof(info->fix.id));
368
369         info->fix.type = FB_TYPE_PACKED_PIXELS;
370         info->fix.visual = FB_VISUAL_PSEUDOCOLOR;
371
372         info->fix.line_length = linebytes;
373
374         info->fix.accel = FB_ACCEL_SUN_CG14;
375 }
376
377 static struct sbus_mmap_map __cg14_mmap_map[CG14_MMAP_ENTRIES] __initdata = {
378         {
379                 .voff   = CG14_REGS,
380                 .poff   = 0x80000000,
381                 .size   = 0x1000
382         },
383         {
384                 .voff   = CG14_XLUT,
385                 .poff   = 0x80003000,
386                 .size   = 0x1000
387         },
388         {
389                 .voff   = CG14_CLUT1,
390                 .poff   = 0x80004000,
391                 .size   = 0x1000
392         },
393         {
394                 .voff   = CG14_CLUT2,
395                 .poff   = 0x80005000,
396                 .size   = 0x1000
397         },
398         {
399                 .voff   = CG14_CLUT3,
400                 .poff   = 0x80006000,
401                 .size   = 0x1000
402         },
403         {
404                 .voff   = CG3_MMAP_OFFSET - 0x7000,
405                 .poff   = 0x80000000,
406                 .size   = 0x7000
407         },
408         {
409                 .voff   = CG3_MMAP_OFFSET,
410                 .poff   = 0x00000000,
411                 .size   = SBUS_MMAP_FBSIZE(1)
412         },
413         {
414                 .voff   = MDI_CURSOR_MAP,
415                 .poff   = 0x80001000,
416                 .size   = 0x1000
417         },
418         {
419                 .voff   = MDI_CHUNKY_BGR_MAP,
420                 .poff   = 0x01000000,
421                 .size   = 0x400000
422         },
423         {
424                 .voff   = MDI_PLANAR_X16_MAP,
425                 .poff   = 0x02000000,
426                 .size   = 0x200000
427         },
428         {
429                 .voff   = MDI_PLANAR_C16_MAP,
430                 .poff   = 0x02800000,
431                 .size   = 0x200000
432         },
433         {
434                 .voff   = MDI_PLANAR_X32_MAP,
435                 .poff   = 0x03000000,
436                 .size   = 0x100000
437         },
438         {
439                 .voff   = MDI_PLANAR_B32_MAP,
440                 .poff   = 0x03400000,
441                 .size   = 0x100000
442         },
443         {
444                 .voff   = MDI_PLANAR_G32_MAP,
445                 .poff   = 0x03800000,
446                 .size   = 0x100000
447         },
448         {
449                 .voff   = MDI_PLANAR_R32_MAP,
450                 .poff   = 0x03c00000,
451                 .size   = 0x100000
452         },
453         { .size = 0 }
454 };
455
456 struct all_info {
457         struct fb_info info;
458         struct cg14_par par;
459         struct list_head list;
460 };
461 static LIST_HEAD(cg14_list);
462
463 static void cg14_init_one(struct sbus_dev *sdev, int node, int parent_node)
464 {
465         struct all_info *all;
466         unsigned long phys, rphys;
467         u32 bases[6];
468         int is_8mb, linebytes, i;
469
470         if (!sdev) {
471                 if (prom_getproperty(node, "address",
472                                      (char *) &bases[0], sizeof(bases)) <= 0
473                     || !bases[0]) {
474                         printk(KERN_ERR "cg14: Device is not mapped.\n");
475                         return;
476                 }
477                 if (__get_iospace(bases[0]) != __get_iospace(bases[1])) {
478                         printk(KERN_ERR "cg14: I/O spaces don't match.\n");
479                         return;
480                 }
481         }
482
483         all = kmalloc(sizeof(*all), GFP_KERNEL);
484         if (!all) {
485                 printk(KERN_ERR "cg14: Cannot allocate memory.\n");
486                 return;
487         }
488         memset(all, 0, sizeof(*all));
489
490         INIT_LIST_HEAD(&all->list);
491
492         spin_lock_init(&all->par.lock);
493
494         sbusfb_fill_var(&all->info.var, node, 8);
495         all->info.var.red.length = 8;
496         all->info.var.green.length = 8;
497         all->info.var.blue.length = 8;
498
499         linebytes = prom_getintdefault(node, "linebytes",
500                                        all->info.var.xres);
501         all->par.fbsize = PAGE_ALIGN(linebytes * all->info.var.yres);
502
503         all->par.sdev = sdev;
504         if (sdev) {
505                 rphys = sdev->reg_addrs[0].phys_addr;
506                 all->par.physbase = phys = sdev->reg_addrs[1].phys_addr;
507                 all->par.iospace = sdev->reg_addrs[0].which_io;
508
509                 all->par.regs = sbus_ioremap(&sdev->resource[0], 0,
510                                      sizeof(struct cg14_regs),
511                                      "cg14 regs");
512                 all->par.clut = sbus_ioremap(&sdev->resource[0], CG14_CLUT1,
513                                      sizeof(struct cg14_clut),
514                                      "cg14 clut");
515                 all->par.cursor = sbus_ioremap(&sdev->resource[0], CG14_CURSORREGS,
516                                      sizeof(struct cg14_cursor),
517                                      "cg14 cursor");
518                 all->info.screen_base = sbus_ioremap(&sdev->resource[1], 0,
519                                      all->par.fbsize, "cg14 ram");
520         } else {
521                 rphys = __get_phys(bases[0]);
522                 all->par.physbase = phys = __get_phys(bases[1]);
523                 all->par.iospace = __get_iospace(bases[0]);
524                 all->par.regs = (struct cg14_regs __iomem *)(unsigned long)bases[0];
525                 all->par.clut = (struct cg14_clut __iomem *)((unsigned long)bases[0] +
526                                                      CG14_CLUT1);
527                 all->par.cursor =
528                         (struct cg14_cursor __iomem *)((unsigned long)bases[0] +
529                                                CG14_CURSORREGS);
530
531                 all->info.screen_base = (char __iomem *)(unsigned long)bases[1];
532         }
533
534         prom_getproperty(node, "reg", (char *) &bases[0], sizeof(bases));
535         is_8mb = (bases[5] == 0x800000);
536
537         if (sizeof(all->par.mmap_map) != sizeof(__cg14_mmap_map)) {
538                 extern void __cg14_mmap_sized_wrongly(void);
539
540                 __cg14_mmap_sized_wrongly();
541         }
542                 
543         memcpy(&all->par.mmap_map, &__cg14_mmap_map, sizeof(all->par.mmap_map));
544         for (i = 0; i < CG14_MMAP_ENTRIES; i++) {
545                 struct sbus_mmap_map *map = &all->par.mmap_map[i];
546
547                 if (!map->size)
548                         break;
549                 if (map->poff & 0x80000000)
550                         map->poff = (map->poff & 0x7fffffff) + rphys - phys;
551                 if (is_8mb &&
552                     map->size >= 0x100000 &&
553                     map->size <= 0x400000)
554                         map->size *= 2;
555         }
556
557         all->par.mode = MDI_8_PIX;
558         all->par.ramsize = (is_8mb ? 0x800000 : 0x400000);
559
560         all->info.flags = FBINFO_DEFAULT | FBINFO_HWACCEL_YPAN;
561         all->info.fbops = &cg14_ops;
562         all->info.par = &all->par;
563
564         __cg14_reset(&all->par);
565
566         if (fb_alloc_cmap(&all->info.cmap, 256, 0)) {
567                 printk(KERN_ERR "cg14: Could not allocate color map.\n");
568                 kfree(all);
569                 return;
570         }
571         fb_set_cmap(&all->info.cmap, &all->info);
572
573         cg14_init_fix(&all->info, linebytes);
574
575         if (register_framebuffer(&all->info) < 0) {
576                 printk(KERN_ERR "cg14: Could not register framebuffer.\n");
577                 fb_dealloc_cmap(&all->info.cmap);
578                 kfree(all);
579                 return;
580         }
581
582         list_add(&all->list, &cg14_list);
583
584         printk("cg14: cgfourteen at %lx:%lx, %dMB\n",
585                all->par.iospace, all->par.physbase, all->par.ramsize >> 20);
586
587 }
588
589 int __init cg14_init(void)
590 {
591         struct sbus_bus *sbus;
592         struct sbus_dev *sdev;
593
594         if (fb_get_options("cg14fb", NULL))
595                 return -ENODEV;
596
597 #ifdef CONFIG_SPARC32
598         {
599                 int root, node;
600
601                 root = prom_getchild(prom_root_node);
602                 root = prom_searchsiblings(root, "obio");
603                 if (root) {
604                         node = prom_searchsiblings(prom_getchild(root),
605                                                    "cgfourteen");
606                         if (node)
607                                 cg14_init_one(NULL, node, root);
608                 }
609         }
610 #endif
611         for_all_sbusdev(sdev, sbus) {
612                 if (!strcmp(sdev->prom_name, "cgfourteen"))
613                         cg14_init_one(sdev, sdev->prom_node, sbus->prom_node);
614         }
615
616         return 0;
617 }
618
619 void __exit cg14_exit(void)
620 {
621         struct list_head *pos, *tmp;
622
623         list_for_each_safe(pos, tmp, &cg14_list) {
624                 struct all_info *all = list_entry(pos, typeof(*all), list);
625
626                 unregister_framebuffer(&all->info);
627                 fb_dealloc_cmap(&all->info.cmap);
628                 kfree(all);
629         }
630 }
631
632 int __init
633 cg14_setup(char *arg)
634 {
635         /* No cmdline options yet... */
636         return 0;
637 }
638
639 module_init(cg14_init);
640
641 #ifdef MODULE
642 module_exit(cg14_exit);
643 #endif
644
645 MODULE_DESCRIPTION("framebuffer driver for CGfourteen chipsets");
646 MODULE_AUTHOR("David S. Miller <davem@redhat.com>");
647 MODULE_LICENSE("GPL");