1/*
  2 * Copyright 2012 Red Hat
  3 *
  4 * This file is subject to the terms and conditions of the GNU General
  5 * Public License version 2. See the file COPYING in the main
  6 * directory of this archive for more details.
  7 *
  8 * Authors: Matthew Garrett
  9 *          Dave Airlie
 10 */
 11#include <drm/drmP.h>
 12#include <drm/drm_crtc_helper.h>
 13
 14#include "cirrus_drv.h"
 15
 16static int cirrus_create_handle(struct drm_framebuffer *fb,
 17				struct drm_file* file_priv,
 18				unsigned int* handle)
 19{
 20	struct cirrus_framebuffer *cirrus_fb = to_cirrus_framebuffer(fb);
 21
 22	return drm_gem_handle_create(file_priv, cirrus_fb->obj, handle);
 23}
 24
 25static void cirrus_user_framebuffer_destroy(struct drm_framebuffer *fb)
 26{
 27	struct cirrus_framebuffer *cirrus_fb = to_cirrus_framebuffer(fb);
 28
 29	drm_gem_object_put_unlocked(cirrus_fb->obj);
 30	drm_framebuffer_cleanup(fb);
 31	kfree(fb);
 32}
 33
 34static const struct drm_framebuffer_funcs cirrus_fb_funcs = {
 35	.create_handle = cirrus_create_handle,
 36	.destroy = cirrus_user_framebuffer_destroy,
 37};
 38
 39int cirrus_framebuffer_init(struct drm_device *dev,
 40			    struct cirrus_framebuffer *gfb,
 41			    const struct drm_mode_fb_cmd2 *mode_cmd,
 42			    struct drm_gem_object *obj)
 43{
 44	int ret;
 45
 46	drm_helper_mode_fill_fb_struct(dev, &gfb->base, mode_cmd);
 47	gfb->obj = obj;
 48	ret = drm_framebuffer_init(dev, &gfb->base, &cirrus_fb_funcs);
 49	if (ret) {
 50		DRM_ERROR("drm_framebuffer_init failed: %d\n", ret);
 51		return ret;
 52	}
 53	return 0;
 54}
 55
 56static struct drm_framebuffer *
 57cirrus_user_framebuffer_create(struct drm_device *dev,
 58			       struct drm_file *filp,
 59			       const struct drm_mode_fb_cmd2 *mode_cmd)
 60{
 61	struct cirrus_device *cdev = dev->dev_private;
 62	struct drm_gem_object *obj;
 63	struct cirrus_framebuffer *cirrus_fb;
 64	u32 bpp;
 65	int ret;
 66
 67	bpp = drm_format_plane_cpp(mode_cmd->pixel_format, 0) * 8;
 68
 69	if (!cirrus_check_framebuffer(cdev, mode_cmd->width, mode_cmd->height,
 70				      bpp, mode_cmd->pitches[0]))
 71		return ERR_PTR(-EINVAL);
 72
 73	obj = drm_gem_object_lookup(filp, mode_cmd->handles[0]);
 74	if (obj == NULL)
 75		return ERR_PTR(-ENOENT);
 76
 77	cirrus_fb = kzalloc(sizeof(*cirrus_fb), GFP_KERNEL);
 78	if (!cirrus_fb) {
 79		drm_gem_object_put_unlocked(obj);
 80		return ERR_PTR(-ENOMEM);
 81	}
 82
 83	ret = cirrus_framebuffer_init(dev, cirrus_fb, mode_cmd, obj);
 84	if (ret) {
 85		drm_gem_object_put_unlocked(obj);
 86		kfree(cirrus_fb);
 87		return ERR_PTR(ret);
 88	}
 89	return &cirrus_fb->base;
 90}
 91
 92static const struct drm_mode_config_funcs cirrus_mode_funcs = {
 93	.fb_create = cirrus_user_framebuffer_create,
 94};
 95
 96/* Unmap the framebuffer from the core and release the memory */
 97static void cirrus_vram_fini(struct cirrus_device *cdev)
 98{
 99	iounmap(cdev->rmmio);
100	cdev->rmmio = NULL;
101	if (cdev->mc.vram_base)
102		release_mem_region(cdev->mc.vram_base, cdev->mc.vram_size);
103}
104
105/* Map the framebuffer from the card and configure the core */
106static int cirrus_vram_init(struct cirrus_device *cdev)
107{
108	/* BAR 0 is VRAM */
109	cdev->mc.vram_base = pci_resource_start(cdev->dev->pdev, 0);
110	cdev->mc.vram_size = pci_resource_len(cdev->dev->pdev, 0);
111
112	if (!request_mem_region(cdev->mc.vram_base, cdev->mc.vram_size,
113				"cirrusdrmfb_vram")) {
114		DRM_ERROR("can't reserve VRAM\n");
115		return -ENXIO;
116	}
117
118	return 0;
119}
120
121/*
122 * Our emulated hardware has two sets of memory. One is video RAM and can
123 * simply be used as a linear framebuffer - the other provides mmio access
124 * to the display registers. The latter can also be accessed via IO port
125 * access, but we map the range and use mmio to program them instead
126 */
127
128int cirrus_device_init(struct cirrus_device *cdev,
129		       struct drm_device *ddev,
130		       struct pci_dev *pdev, uint32_t flags)
131{
132	int ret;
133
134	cdev->dev = ddev;
135	cdev->flags = flags;
136
137	/* Hardcode the number of CRTCs to 1 */
138	cdev->num_crtc = 1;
139
140	/* BAR 0 is the framebuffer, BAR 1 contains registers */
141	cdev->rmmio_base = pci_resource_start(cdev->dev->pdev, 1);
142	cdev->rmmio_size = pci_resource_len(cdev->dev->pdev, 1);
143
144	if (!request_mem_region(cdev->rmmio_base, cdev->rmmio_size,
145				"cirrusdrmfb_mmio")) {
146		DRM_ERROR("can't reserve mmio registers\n");
147		return -ENOMEM;
148	}
149
150	cdev->rmmio = ioremap(cdev->rmmio_base, cdev->rmmio_size);
151
152	if (cdev->rmmio == NULL)
153		return -ENOMEM;
154
155	ret = cirrus_vram_init(cdev);
156	if (ret) {
157		release_mem_region(cdev->rmmio_base, cdev->rmmio_size);
158		return ret;
159	}
160
161	return 0;
162}
163
164void cirrus_device_fini(struct cirrus_device *cdev)
165{
166	release_mem_region(cdev->rmmio_base, cdev->rmmio_size);
167	cirrus_vram_fini(cdev);
168}
169
170/*
171 * Functions here will be called by the core once it's bound the driver to
172 * a PCI device
173 */
174
175int cirrus_driver_load(struct drm_device *dev, unsigned long flags)
176{
177	struct cirrus_device *cdev;
178	int r;
179
180	cdev = kzalloc(sizeof(struct cirrus_device), GFP_KERNEL);
181	if (cdev == NULL)
182		return -ENOMEM;
183	dev->dev_private = (void *)cdev;
184
185	r = cirrus_device_init(cdev, dev, dev->pdev, flags);
186	if (r) {
187		dev_err(&dev->pdev->dev, "Fatal error during GPU init: %d\n", r);
188		goto out;
189	}
190
191	r = cirrus_mm_init(cdev);
192	if (r) {
193		dev_err(&dev->pdev->dev, "fatal err on mm init\n");
194		goto out;
195	}
196
197	/*
198	 * cirrus_modeset_init() is initializing/registering the emulated fbdev
199	 * and DRM internals can access/test some of the fields in
200	 * mode_config->funcs as part of the fbdev registration process.
201	 * Make sure dev->mode_config.funcs is properly set to avoid
202	 * dereferencing a NULL pointer.
203	 * FIXME: mode_config.funcs assignment should probably be done in
204	 * cirrus_modeset_init() (that's a common pattern seen in other DRM
205	 * drivers).
206	 */
207	dev->mode_config.funcs = &cirrus_mode_funcs;
208	r = cirrus_modeset_init(cdev);
209	if (r) {
210		dev_err(&dev->pdev->dev, "Fatal error during modeset init: %d\n", r);
211		goto out;
212	}
213
214	return 0;
215out:
216	cirrus_driver_unload(dev);
217	return r;
218}
219
220void cirrus_driver_unload(struct drm_device *dev)
221{
222	struct cirrus_device *cdev = dev->dev_private;
223
224	if (cdev == NULL)
225		return;
226	cirrus_modeset_fini(cdev);
227	cirrus_mm_fini(cdev);
228	cirrus_device_fini(cdev);
229	kfree(cdev);
230	dev->dev_private = NULL;
231}
232
233int cirrus_gem_create(struct drm_device *dev,
234		   u32 size, bool iskernel,
235		   struct drm_gem_object **obj)
236{
237	struct cirrus_bo *cirrusbo;
238	int ret;
239
240	*obj = NULL;
241
242	size = roundup(size, PAGE_SIZE);
243	if (size == 0)
244		return -EINVAL;
245
246	ret = cirrus_bo_create(dev, size, 0, 0, &cirrusbo);
247	if (ret) {
248		if (ret != -ERESTARTSYS)
249			DRM_ERROR("failed to allocate GEM object\n");
250		return ret;
251	}
252	*obj = &cirrusbo->gem;
253	return 0;
254}
255
256int cirrus_dumb_create(struct drm_file *file,
257		    struct drm_device *dev,
258		    struct drm_mode_create_dumb *args)
259{
260	int ret;
261	struct drm_gem_object *gobj;
262	u32 handle;
263
264	args->pitch = args->width * ((args->bpp + 7) / 8);
265	args->size = args->pitch * args->height;
266
267	ret = cirrus_gem_create(dev, args->size, false,
268			     &gobj);
269	if (ret)
270		return ret;
271
272	ret = drm_gem_handle_create(file, gobj, &handle);
273	drm_gem_object_put_unlocked(gobj);
274	if (ret)
275		return ret;
276
277	args->handle = handle;
278	return 0;
279}
280
281static void cirrus_bo_unref(struct cirrus_bo **bo)
282{
283	struct ttm_buffer_object *tbo;
284
285	if ((*bo) == NULL)
286		return;
287
288	tbo = &((*bo)->bo);
289	ttm_bo_unref(&tbo);
290	*bo = NULL;
291}
292
293void cirrus_gem_free_object(struct drm_gem_object *obj)
294{
295	struct cirrus_bo *cirrus_bo = gem_to_cirrus_bo(obj);
296
297	cirrus_bo_unref(&cirrus_bo);
298}
299
300
301static inline u64 cirrus_bo_mmap_offset(struct cirrus_bo *bo)
302{
303	return drm_vma_node_offset_addr(&bo->bo.vma_node);
304}
305
306int
307cirrus_dumb_mmap_offset(struct drm_file *file,
308		     struct drm_device *dev,
309		     uint32_t handle,
310		     uint64_t *offset)
311{
312	struct drm_gem_object *obj;
313	struct cirrus_bo *bo;
314
315	obj = drm_gem_object_lookup(file, handle);
316	if (obj == NULL)
317		return -ENOENT;
318
319	bo = gem_to_cirrus_bo(obj);
320	*offset = cirrus_bo_mmap_offset(bo);
321
322	drm_gem_object_put_unlocked(obj);
323
324	return 0;
325}
326
327bool cirrus_check_framebuffer(struct cirrus_device *cdev, int width, int height,
328			      int bpp, int pitch)
329{
330	const int max_pitch = 0x1FF << 3; /* (4096 - 1) & ~111b bytes */
331	const int max_size = cdev->mc.vram_size;
332
333	if (bpp > cirrus_bpp)
334		return false;
335	if (bpp > 32)
336		return false;
337
338	if (pitch > max_pitch)
339		return false;
340
341	if (pitch * height > max_size)
342		return false;
343
344	return true;
345}