b5982894b4e65637153f2ed188eb54598b11f136
[platform/upstream/libdrm.git] / shared-core / radeon_cs.c
1 /*
2  * Copyright 2008 Jerome Glisse.
3  * All Rights Reserved.
4  *
5  * Permission is hereby granted, free of charge, to any person obtaining a
6  * copy of this software and associated documentation files (the "Software"),
7  * to deal in the Software without restriction, including without limitation
8  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9  * and/or sell copies of the Software, and to permit persons to whom the
10  * Software is furnished to do so, subject to the following conditions:
11  *
12  * The above copyright notice and this permission notice (including the next
13  * paragraph) shall be included in all copies or substantial portions of the
14  * Software.
15  *
16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
19  * PRECISION INSIGHT AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
20  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
21  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
22  * DEALINGS IN THE SOFTWARE.
23  *
24  * Authors:
25  *    Jerome Glisse <glisse@freedesktop.org>
26  */
27 #include "drmP.h"
28 #include "radeon_drm.h"
29 #include "radeon_drv.h"
30 #include "r300_reg.h"
31
32 int radeon_cs_ioctl(struct drm_device *dev, void *data, struct drm_file *fpriv)
33 {
34         struct drm_radeon_private *dev_priv = dev->dev_private;
35         struct drm_radeon_cs *cs = data;
36         uint32_t *packets = NULL;
37         uint32_t cs_id;
38         uint32_t card_offset;
39         void *ib = NULL;
40         long size;
41         int r;
42         RING_LOCALS;
43
44         /* set command stream id to 0 which is fake id */
45         cs_id = 0;
46         DRM_COPY_TO_USER(&cs->cs_id, &cs_id, sizeof(uint32_t));
47
48         if (dev_priv == NULL) {
49                 DRM_ERROR("called with no initialization\n");
50                 return -EINVAL;
51         }
52         if (!cs->dwords) {
53                 return 0;
54         }
55         /* limit cs to 64K ib */
56         if (cs->dwords > (16 * 1024)) {
57                 return -EINVAL;
58         }
59         /* copy cs from userspace maybe we should copy into ib to save
60          * one copy but ib will be mapped wc so not good for cmd checking
61          * somethings worth testing i guess (Jerome)
62          */
63         size = cs->dwords * sizeof(uint32_t);
64         packets = drm_alloc(size, DRM_MEM_DRIVER);
65         if (packets == NULL) {
66                 return -ENOMEM;
67         }
68         if (DRM_COPY_FROM_USER(packets, (void __user *)(unsigned long)cs->packets, size)) {
69                 r = -EFAULT;
70                 goto out;
71         }
72         /* get ib */
73         r = dev_priv->cs.ib_get(dev, &ib, cs->dwords, &card_offset);
74         if (r) {
75                 goto out;
76         }
77
78         /* now parse command stream */
79         r = dev_priv->cs.parse(dev, fpriv, ib, packets, cs->dwords);
80         if (r) {
81                 goto out;
82         }
83
84         BEGIN_RING(4);
85         OUT_RING(CP_PACKET0(RADEON_CP_IB_BASE, 1));
86         OUT_RING(card_offset);
87         OUT_RING(cs->dwords);
88         OUT_RING(CP_PACKET2());
89         ADVANCE_RING();
90
91         /* emit cs id sequence */
92         dev_priv->cs.id_emit(dev, &cs_id);
93         COMMIT_RING();
94
95         DRM_COPY_TO_USER(&cs->cs_id, &cs_id, sizeof(uint32_t));
96 out:
97         dev_priv->cs.ib_free(dev, ib, cs->dwords);
98         drm_free(packets, size, DRM_MEM_DRIVER);
99         return r;
100 }
101
102 /* for non-mm */
103 static int radeon_nomm_relocate(struct drm_device *dev, struct drm_file *file_priv, uint32_t *reloc, uint32_t *offset)
104 {
105         *offset = reloc[1];
106         return 0;
107 }
108 #define RELOC_SIZE 2
109 #define RADEON_2D_OFFSET_MASK 0x3fffff
110
111 static __inline__ int radeon_cs_relocate_packet0(struct drm_device *dev, struct drm_file *file_priv,
112                                                  uint32_t *packets, uint32_t offset_dw)
113 {
114         drm_radeon_private_t *dev_priv = dev->dev_private;
115         uint32_t hdr = packets[offset_dw];
116         uint32_t reg = (hdr & R300_CP_PACKET0_REG_MASK) << 2;
117         uint32_t val = packets[offset_dw + 1];
118         uint32_t packet3_hdr = packets[offset_dw+2];
119         uint32_t tmp, offset;
120         int ret;
121
122         /* this is too strict we may want to expand the length in the future and have
123          old kernels ignore it. */ 
124         if (packet3_hdr != (RADEON_CP_PACKET3 | RADEON_CP_NOP | (RELOC_SIZE << 16))) {
125                 DRM_ERROR("Packet 3 was %x should have been %x: reg is %x\n", packet3_hdr, RADEON_CP_PACKET3 | RADEON_CP_NOP | (RELOC_SIZE << 16), reg);
126                 return -EINVAL;
127         }
128         
129         switch(reg) {
130         case RADEON_DST_PITCH_OFFSET:
131         case RADEON_SRC_PITCH_OFFSET:
132                 /* pass in the start of the reloc */
133                 ret = dev_priv->cs.relocate(dev, file_priv, packets + offset_dw + 2, &offset);
134                 if (ret)
135                         return ret;
136                 tmp = (val & RADEON_2D_OFFSET_MASK) << 10;
137                 val &= ~RADEON_2D_OFFSET_MASK;
138                 offset += tmp;
139                 offset >>= 10;
140                 val |= offset;
141                 break;
142         case RADEON_RB3D_COLOROFFSET:
143         case R300_RB3D_COLOROFFSET0:
144         case R300_ZB_DEPTHOFFSET:
145         case R300_TX_OFFSET_0:
146         case R300_TX_OFFSET_0+4:
147         case R200_PP_TXOFFSET_0:
148         case R200_PP_TXOFFSET_1:
149         case RADEON_PP_TXOFFSET_0:
150         case RADEON_PP_TXOFFSET_1:
151                 ret = dev_priv->cs.relocate(dev, file_priv, packets + offset_dw + 2, &offset);
152                 if (ret)
153                         return ret;
154
155                 offset &= 0xffffffe0;
156                 val += offset;
157                 break;
158         default:
159                 break;
160         }
161
162         packets[offset_dw + 1] = val;
163         return 0;
164 }
165
166 static int radeon_cs_relocate_packet3(struct drm_device *dev, struct drm_file *file_priv,
167                                       uint32_t *packets, uint32_t offset_dw)
168 {
169         drm_radeon_private_t *dev_priv = dev->dev_private;
170         uint32_t hdr = packets[offset_dw];
171         int num_dw = (hdr & RADEON_CP_PACKET_COUNT_MASK) >> 16;
172         uint32_t reg = hdr & 0xff00;
173         uint32_t offset, val, tmp;
174         int ret;
175
176         switch(reg) {
177         case RADEON_CNTL_HOSTDATA_BLT:
178         {
179                 val = packets[offset_dw + 2];
180                 ret = dev_priv->cs.relocate(dev, file_priv, packets + offset_dw + num_dw + 2, &offset);
181                 if (ret)
182                         return ret;
183
184                 tmp = (val & RADEON_2D_OFFSET_MASK) << 10;
185                 val &= ~RADEON_2D_OFFSET_MASK;
186                 offset += tmp;
187                 offset >>= 10;
188                 val |= offset;
189
190                 packets[offset_dw + 2] = val;
191         }
192         default:
193                 return -EINVAL;
194         }
195         return 0;
196 }
197
198 int radeon_cs_packet0(struct drm_device *dev, struct drm_file *file_priv,
199                       uint32_t *packets, uint32_t offset_dw)
200 {
201         drm_radeon_private_t *dev_priv = dev->dev_private;
202         uint32_t hdr = packets[offset_dw];
203         int num_dw = ((hdr & RADEON_CP_PACKET_COUNT_MASK) >> 16) + 2;
204         int need_reloc = 0;
205         int reg = (hdr & R300_CP_PACKET0_REG_MASK) << 2;
206         int count_dw = 1;
207         int ret;
208
209         while (count_dw < num_dw) {
210                 /* need to have something like the r300 validation here - 
211                    list of allowed registers */
212                 int flags;
213
214                 ret = r300_check_range(reg, 1);
215                 switch(ret) {
216                 case -1:
217                         DRM_ERROR("Illegal register %x\n", reg);
218                         break;
219                 case 0:
220                         break;
221                 case 1:
222                         flags = r300_get_reg_flags(reg);
223                         if (flags == MARK_CHECK_OFFSET) {
224                                 if (num_dw > 2) {
225                                         DRM_ERROR("Cannot relocate inside type stream of reg0 packets\n");
226                                         return -EINVAL;
227                                 }
228
229                                 ret = radeon_cs_relocate_packet0(dev, file_priv, packets, offset_dw);
230                                 if (ret)
231                                         return ret;
232                                 DRM_DEBUG("need to relocate %x %d\n", reg, flags);
233                                 /* okay it should be followed by a NOP */
234                         } else if (flags == MARK_CHECK_SCISSOR) {
235                                 DRM_DEBUG("need to validate scissor %x %d\n", reg, flags);
236                         } else {
237                                 DRM_DEBUG("illegal register %x %d\n", reg, flags);
238                                 return -EINVAL;
239                         }
240                         break;
241                 }
242                 count_dw++;
243                 reg += 4;
244         }
245         return 0;
246 }
247
248 int radeon_cs_parse(struct drm_device *dev, struct drm_file *file_priv,
249                     void *ib, uint32_t *packets, uint32_t dwords)
250 {
251         drm_radeon_private_t *dev_priv = dev->dev_private;
252         volatile int rb;
253         int size_dw = dwords;
254         /* scan the packet for various things */
255         int count_dw = 0;
256         int ret = 0;
257
258         while (count_dw < size_dw && ret == 0) {
259                 int hdr = packets[count_dw];
260                 int num_dw = (hdr & RADEON_CP_PACKET_COUNT_MASK) >> 16;
261                 int reg;
262
263                 switch (hdr & RADEON_CP_PACKET_MASK) {
264                 case RADEON_CP_PACKET0:
265                         ret = radeon_cs_packet0(dev, file_priv, packets, count_dw);
266                         break;
267                 case RADEON_CP_PACKET1:
268                 case RADEON_CP_PACKET2:
269                         reg = hdr & RADEON_CP_PACKET0_REG_MASK;
270                         DRM_DEBUG("Packet 1/2: %d  %x\n", num_dw, reg);
271                         break;
272
273                 case RADEON_CP_PACKET3:
274                         reg = hdr & 0xff00;
275                         
276                         switch(reg) {
277                         case RADEON_CNTL_HOSTDATA_BLT:
278                                 radeon_cs_relocate_packet3(dev, file_priv, packets, count_dw);
279                                 break;
280
281                         case RADEON_CNTL_BITBLT_MULTI:
282                         case RADEON_3D_LOAD_VBPNTR:     /* load vertex array pointers */
283                         case RADEON_CP_INDX_BUFFER:
284                                 DRM_ERROR("need relocate packet 3 for %x\n", reg);
285                                 break;
286
287                         case RADEON_3D_DRAW_IMMD:       /* triggers drawing using in-packet vertex data */
288                         case RADEON_CP_3D_DRAW_IMMD_2:  /* triggers drawing using in-packet vertex data */
289                         case RADEON_CP_3D_DRAW_VBUF_2:  /* triggers drawing of vertex buffers setup elsewhere */
290                         case RADEON_CP_3D_DRAW_INDX_2:  /* triggers drawing using indices to vertex buffer */
291                         case RADEON_WAIT_FOR_IDLE:
292                         case RADEON_CP_NOP:
293                                 break;
294                         default:
295                                 DRM_ERROR("unknown packet 3 %x\n", reg);
296                                 ret = -EINVAL;
297                         }
298                         break;
299                 }
300
301                 count_dw += num_dw+2;
302         }
303
304         if (ret)
305                 return ret;
306              
307
308         /* copy the packet into the IB */
309         memcpy(ib, packets, dwords * sizeof(uint32_t));
310
311         /* read back last byte to flush WC buffers */
312         rb = readl((ib + (dwords-1) * sizeof(uint32_t)));
313
314         return 0;
315 }
316
317 uint32_t radeon_cs_id_get(struct drm_radeon_private *radeon)
318 {
319         /* FIXME: protect with a spinlock */
320         /* FIXME: check if wrap affect last reported wrap & sequence */
321         radeon->cs.id_scnt = (radeon->cs.id_scnt + 1) & 0x00FFFFFF;
322         if (!radeon->cs.id_scnt) {
323                 /* increment wrap counter */
324                 radeon->cs.id_wcnt += 0x01000000;
325                 /* valid sequence counter start at 1 */
326                 radeon->cs.id_scnt = 1;
327         }
328         return (radeon->cs.id_scnt | radeon->cs.id_wcnt);
329 }
330
331 void r100_cs_id_emit(struct drm_device *dev, uint32_t *id)
332 {
333         drm_radeon_private_t *dev_priv = dev->dev_private;
334         RING_LOCALS;
335
336         /* ISYNC_CNTL should have CPSCRACTH bit set */
337         *id = radeon_cs_id_get(dev_priv);
338         /* emit id in SCRATCH4 (not used yet in old drm) */
339         BEGIN_RING(2);
340         OUT_RING(CP_PACKET0(RADEON_SCRATCH_REG4, 0));
341         OUT_RING(*id);
342         ADVANCE_RING(); 
343 }
344
345 void r300_cs_id_emit(struct drm_device *dev, uint32_t *id)
346 {
347         drm_radeon_private_t *dev_priv = dev->dev_private;
348         RING_LOCALS;
349
350         /* ISYNC_CNTL should not have CPSCRACTH bit set */
351         *id = radeon_cs_id_get(dev_priv);
352         /* emit id in SCRATCH6 */
353         BEGIN_RING(8);
354         OUT_RING(CP_PACKET0(R300_CP_RESYNC_ADDR, 0));
355         OUT_RING(6);
356         OUT_RING(CP_PACKET0(R300_CP_RESYNC_DATA, 0));
357         OUT_RING(*id);
358         OUT_RING(CP_PACKET0(R300_RB3D_DSTCACHE_CTLSTAT, 0));
359         OUT_RING(R300_RB3D_DC_FINISH);
360         RADEON_WAIT_UNTIL_3D_IDLE();
361         ADVANCE_RING(); 
362 }
363
364 uint32_t r100_cs_id_last_get(struct drm_device *dev)
365 {
366         drm_radeon_private_t *dev_priv = dev->dev_private;
367
368         return GET_SCRATCH(4);
369 }
370
371 uint32_t r300_cs_id_last_get(struct drm_device *dev)
372 {
373         drm_radeon_private_t *dev_priv = dev->dev_private;
374
375         return GET_SCRATCH(6);
376 }
377
378 int radeon_cs_init(struct drm_device *dev)
379 {
380         drm_radeon_private_t *dev_priv = dev->dev_private;
381
382         if (dev_priv->chip_family < CHIP_RV280) {
383                 dev_priv->cs.id_emit = r100_cs_id_emit;
384                 dev_priv->cs.id_last_get = r100_cs_id_last_get;
385         } else if (dev_priv->chip_family < CHIP_R600) {
386                 dev_priv->cs.id_emit = r300_cs_id_emit;
387                 dev_priv->cs.id_last_get = r300_cs_id_last_get;
388         }
389
390         dev_priv->cs.parse = radeon_cs_parse;
391         /* ib get depends on memory manager or not so memory manager */
392         dev_priv->cs.relocate = radeon_nomm_relocate;
393         return 0;
394 }