[deliverable/linux.git] / drivers / gpu / drm / mgag200 / mgag200_main.c

/*
 * Copyright 2010 Matt Turner.
 * Copyright 2012 Red Hat
 *
 * This file is subject to the terms and conditions of the GNU General
 * Public License version 2. See the file COPYING in the main
 * directory of this archive for more details.
 *
 * Authors: Matthew Garrett
 *          Matt Turner
 *          Dave Airlie
 */
#include <drm/drmP.h>
#include <drm/drm_crtc_helper.h>
#include "mgag200_drv.h"

static void mga_user_framebuffer_destroy(struct drm_framebuffer *fb)
{
	struct mga_framebuffer *mga_fb = to_mga_framebuffer(fb);
	if (mga_fb->obj)
		drm_gem_object_unreference_unlocked(mga_fb->obj);
	drm_framebuffer_cleanup(fb);
	kfree(fb);
}

static const struct drm_framebuffer_funcs mga_fb_funcs = {
	.destroy = mga_user_framebuffer_destroy,
};

int mgag200_framebuffer_init(struct drm_device *dev,
			     struct mga_framebuffer *gfb,
			     struct drm_mode_fb_cmd2 *mode_cmd,
			     struct drm_gem_object *obj)
{
	int ret;
	
	drm_helper_mode_fill_fb_struct(&gfb->base, mode_cmd);
	gfb->obj = obj;
	ret = drm_framebuffer_init(dev, &gfb->base, &mga_fb_funcs);
	if (ret) {
		DRM_ERROR("drm_framebuffer_init failed: %d\n", ret);
		return ret;
	}
	return 0;
}

static struct drm_framebuffer *
mgag200_user_framebuffer_create(struct drm_device *dev,
				struct drm_file *filp,
				struct drm_mode_fb_cmd2 *mode_cmd)
{
	struct drm_gem_object *obj;
	struct mga_framebuffer *mga_fb;
	int ret;

	obj = drm_gem_object_lookup(dev, filp, mode_cmd->handles[0]);
	if (obj == NULL)
		return ERR_PTR(-ENOENT);

	mga_fb = kzalloc(sizeof(*mga_fb), GFP_KERNEL);
	if (!mga_fb) {
		drm_gem_object_unreference_unlocked(obj);
		return ERR_PTR(-ENOMEM);
	}

	ret = mgag200_framebuffer_init(dev, mga_fb, mode_cmd, obj);
	if (ret) {
		drm_gem_object_unreference_unlocked(obj);
		kfree(mga_fb);
		return ERR_PTR(ret);
	}
	return &mga_fb->base;
}

static const struct drm_mode_config_funcs mga_mode_funcs = {
	.fb_create = mgag200_user_framebuffer_create,
};

/* Unmap the framebuffer from the core and release the memory */
static void mga_vram_fini(struct mga_device *mdev)
{
	pci_iounmap(mdev->dev->pdev, mdev->rmmio);
	mdev->rmmio = NULL;
	if (mdev->mc.vram_base)
		release_mem_region(mdev->mc.vram_base, mdev->mc.vram_window);
}

static int mga_probe_vram(struct mga_device *mdev, void __iomem *mem)
{
	int offset;
	int orig;
	int test1, test2;
	int orig1, orig2;

	/* Probe */
	orig = ioread16(mem);
	iowrite16(0, mem);

	for (offset = 0x100000; offset < mdev->mc.vram_window; offset += 0x4000) {
		orig1 = ioread8(mem + offset);
		orig2 = ioread8(mem + offset + 0x100);

		iowrite16(0xaa55, mem + offset);
		iowrite16(0xaa55, mem + offset + 0x100);

		test1 = ioread16(mem + offset);
		test2 = ioread16(mem);

		iowrite16(orig1, mem + offset);
		iowrite16(orig2, mem + offset + 0x100);

		if (test1 != 0xaa55) {
			break;
		}

		if (test2) {
			break;
		}
	}

	iowrite16(orig, mem);
	return offset - 65536;
}

/* Map the framebuffer from the card and configure the core */
static int mga_vram_init(struct mga_device *mdev)
{
	void __iomem *mem;
	struct apertures_struct *aper = alloc_apertures(1);
	if (!aper)
		return -ENOMEM;

	/* BAR 0 is VRAM */
	mdev->mc.vram_base = pci_resource_start(mdev->dev->pdev, 0);
	mdev->mc.vram_window = pci_resource_len(mdev->dev->pdev, 0);

	aper->ranges[0].base = mdev->mc.vram_base;
	aper->ranges[0].size = mdev->mc.vram_window;

	remove_conflicting_framebuffers(aper, "mgafb", true);
	kfree(aper);

	if (!request_mem_region(mdev->mc.vram_base, mdev->mc.vram_window,
				"mgadrmfb_vram")) {
		DRM_ERROR("can't reserve VRAM\n");
		return -ENXIO;
	}

	mem = pci_iomap(mdev->dev->pdev, 0, 0);

	mdev->mc.vram_size = mga_probe_vram(mdev, mem);

	pci_iounmap(mdev->dev->pdev, mem);

	return 0;
}

static int mgag200_device_init(struct drm_device *dev,
			       uint32_t flags)
{
	struct mga_device *mdev = dev->dev_private;
	int ret, option;

	mdev->type = flags;

	/* Hardcode the number of CRTCs to 1 */
	mdev->num_crtc = 1;

	pci_read_config_dword(dev->pdev, PCI_MGA_OPTION, &option);
	mdev->has_sdram = !(option & (1 << 14));

	/* BAR 0 is the framebuffer, BAR 1 contains registers */
	mdev->rmmio_base = pci_resource_start(mdev->dev->pdev, 1);
	mdev->rmmio_size = pci_resource_len(mdev->dev->pdev, 1);

	if (!request_mem_region(mdev->rmmio_base, mdev->rmmio_size,
				"mgadrmfb_mmio")) {
		DRM_ERROR("can't reserve mmio registers\n");
		return -ENOMEM;
	}

	mdev->rmmio = pci_iomap(dev->pdev, 1, 0);
	if (mdev->rmmio == NULL)
		return -ENOMEM;

	/* stash G200 SE model number for later use */
	if (IS_G200_SE(mdev))
		mdev->reg_1e24 = RREG32(0x1e24);

	ret = mga_vram_init(mdev);
	if (ret) {
		release_mem_region(mdev->rmmio_base, mdev->rmmio_size);
		return ret;
	}

	mdev->bpp_shifts[0] = 0;
	mdev->bpp_shifts[1] = 1;
	mdev->bpp_shifts[2] = 0;
	mdev->bpp_shifts[3] = 2;
	return 0;
}

void mgag200_device_fini(struct mga_device *mdev)
{
	release_mem_region(mdev->rmmio_base, mdev->rmmio_size);
	mga_vram_fini(mdev);
}

/*
 * Functions here will be called by the core once it's bound the driver to
 * a PCI device
 */


int mgag200_driver_load(struct drm_device *dev, unsigned long flags)
{
	struct mga_device *mdev;
	int r;

	mdev = kzalloc(sizeof(struct mga_device), GFP_KERNEL);
	if (mdev == NULL)
		return -ENOMEM;
	dev->dev_private = (void *)mdev;
	mdev->dev = dev;

	r = mgag200_device_init(dev, flags);
	if (r) {
		dev_err(&dev->pdev->dev, "Fatal error during GPU init: %d\n", r);
		goto out;
	}
	r = mgag200_mm_init(mdev);
	if (r)
		goto out;

	drm_mode_config_init(dev);
	dev->mode_config.funcs = (void *)&mga_mode_funcs;
	dev->mode_config.min_width = 0;
	dev->mode_config.min_height = 0;
	dev->mode_config.preferred_depth = 24;
	dev->mode_config.prefer_shadow = 1;

	r = mgag200_modeset_init(mdev);
	if (r)
		dev_err(&dev->pdev->dev, "Fatal error during modeset init: %d\n", r);
out:
	if (r)
		mgag200_driver_unload(dev);
	return r;
}

int mgag200_driver_unload(struct drm_device *dev)
{
	struct mga_device *mdev = dev->dev_private;

	if (mdev == NULL)
		return 0;
	mgag200_modeset_fini(mdev);
	mgag200_fbdev_fini(mdev);
	drm_mode_config_cleanup(dev);
	mgag200_mm_fini(mdev);
	mgag200_device_fini(mdev);
	kfree(mdev);
	dev->dev_private = NULL;
	return 0;
}

int mgag200_gem_create(struct drm_device *dev,
		   u32 size, bool iskernel,
		   struct drm_gem_object **obj)
{
	struct mgag200_bo *astbo;
	int ret;

	*obj = NULL;

	size = roundup(size, PAGE_SIZE);
	if (size == 0)
		return -EINVAL;

	ret = mgag200_bo_create(dev, size, 0, 0, &astbo);
	if (ret) {
		if (ret != -ERESTARTSYS)
			DRM_ERROR("failed to allocate GEM object\n");
		return ret;
	}
	*obj = &astbo->gem;
	return 0;
}

int mgag200_dumb_create(struct drm_file *file,
		    struct drm_device *dev,
		    struct drm_mode_create_dumb *args)
{
	int ret;
	struct drm_gem_object *gobj;
	u32 handle;

	args->pitch = args->width * ((args->bpp + 7) / 8);
	args->size = args->pitch * args->height;

	ret = mgag200_gem_create(dev, args->size, false,
			     &gobj);
	if (ret)
		return ret;

	ret = drm_gem_handle_create(file, gobj, &handle);
	drm_gem_object_unreference_unlocked(gobj);
	if (ret)
		return ret;

	args->handle = handle;
	return 0;
}

int mgag200_dumb_destroy(struct drm_file *file,
		     struct drm_device *dev,
		     uint32_t handle)
{
	return drm_gem_handle_delete(file, handle);
}

int mgag200_gem_init_object(struct drm_gem_object *obj)
{
	BUG();
	return 0;
}

void mgag200_bo_unref(struct mgag200_bo **bo)
{
	struct ttm_buffer_object *tbo;

	if ((*bo) == NULL)
		return;

	tbo = &((*bo)->bo);
	ttm_bo_unref(&tbo);
	if (tbo == NULL)
		*bo = NULL;

}

void mgag200_gem_free_object(struct drm_gem_object *obj)
{
	struct mgag200_bo *mgag200_bo = gem_to_mga_bo(obj);

	if (!mgag200_bo)
		return;
	mgag200_bo_unref(&mgag200_bo);
}


static inline u64 mgag200_bo_mmap_offset(struct mgag200_bo *bo)
{
	return bo->bo.addr_space_offset;
}

int
mgag200_dumb_mmap_offset(struct drm_file *file,
		     struct drm_device *dev,
		     uint32_t handle,
		     uint64_t *offset)
{
	struct drm_gem_object *obj;
	int ret;
	struct mgag200_bo *bo;

	mutex_lock(&dev->struct_mutex);
	obj = drm_gem_object_lookup(dev, file, handle);
	if (obj == NULL) {
		ret = -ENOENT;
		goto out_unlock;
	}

	bo = gem_to_mga_bo(obj);
	*offset = mgag200_bo_mmap_offset(bo);

	drm_gem_object_unreference(obj);
	ret = 0;
out_unlock:
	mutex_unlock(&dev->struct_mutex);
	return ret;

}
Commit	Line	Data
414c4531 DA	1	/*
	2	* Copyright 2010 Matt Turner.
	3	* Copyright 2012 Red Hat
	4	*
	5	* This file is subject to the terms and conditions of the GNU General
	6	* Public License version 2. See the file COPYING in the main
	7	* directory of this archive for more details.
	8	*
	9	* Authors: Matthew Garrett
	10	* Matt Turner
	11	* Dave Airlie
	12	*/
760285e7 DH	13	#include <drm/drmP.h>
760285e7 DH	14	#include <drm/drm_crtc_helper.h>
414c4531 DA	15	#include "mgag200_drv.h"
	16
	17	static void mga_user_framebuffer_destroy(struct drm_framebuffer *fb)
	18	{
	19	struct mga_framebuffer *mga_fb = to_mga_framebuffer(fb);
	20	if (mga_fb->obj)
	21	drm_gem_object_unreference_unlocked(mga_fb->obj);
	22	drm_framebuffer_cleanup(fb);
	23	kfree(fb);
	24	}
	25
414c4531 DA	26	static const struct drm_framebuffer_funcs mga_fb_funcs = {
414c4531 DA	27	.destroy = mga_user_framebuffer_destroy,
414c4531 DA	28	};
	29
	30	int mgag200_framebuffer_init(struct drm_device *dev,
	31	struct mga_framebuffer *gfb,
	32	struct drm_mode_fb_cmd2 *mode_cmd,
	33	struct drm_gem_object *obj)
	34	{
c7d73f6a DV	35	int ret;
	36
	37	drm_helper_mode_fill_fb_struct(&gfb->base, mode_cmd);
	38	gfb->obj = obj;
	39	ret = drm_framebuffer_init(dev, &gfb->base, &mga_fb_funcs);
414c4531 DA	40	if (ret) {
	41	DRM_ERROR("drm_framebuffer_init failed: %d\n", ret);
	42	return ret;
	43	}
414c4531 DA	44	return 0;
	45	}
	46
	47	static struct drm_framebuffer *
	48	mgag200_user_framebuffer_create(struct drm_device *dev,
	49	struct drm_file *filp,
	50	struct drm_mode_fb_cmd2 *mode_cmd)
	51	{
	52	struct drm_gem_object *obj;
	53	struct mga_framebuffer *mga_fb;
	54	int ret;
	55
	56	obj = drm_gem_object_lookup(dev, filp, mode_cmd->handles[0]);
	57	if (obj == NULL)
	58	return ERR_PTR(-ENOENT);
	59
	60	mga_fb = kzalloc(sizeof(*mga_fb), GFP_KERNEL);
	61	if (!mga_fb) {
	62	drm_gem_object_unreference_unlocked(obj);
	63	return ERR_PTR(-ENOMEM);
	64	}
	65
	66	ret = mgag200_framebuffer_init(dev, mga_fb, mode_cmd, obj);
	67	if (ret) {
	68	drm_gem_object_unreference_unlocked(obj);
	69	kfree(mga_fb);
	70	return ERR_PTR(ret);
	71	}
	72	return &mga_fb->base;
	73	}
	74
	75	static const struct drm_mode_config_funcs mga_mode_funcs = {
	76	.fb_create = mgag200_user_framebuffer_create,
	77	};
	78
	79	/* Unmap the framebuffer from the core and release the memory */
	80	static void mga_vram_fini(struct mga_device *mdev)
	81	{
	82	pci_iounmap(mdev->dev->pdev, mdev->rmmio);
	83	mdev->rmmio = NULL;
	84	if (mdev->mc.vram_base)
	85	release_mem_region(mdev->mc.vram_base, mdev->mc.vram_window);
	86	}
	87
	88	static int mga_probe_vram(struct mga_device mdev, void __iomem mem)
	89	{
	90	int offset;
	91	int orig;
	92	int test1, test2;
	93	int orig1, orig2;
	94
	95	/* Probe */
	96	orig = ioread16(mem);
	97	iowrite16(0, mem);
	98
	99	for (offset = 0x100000; offset < mdev->mc.vram_window; offset += 0x4000) {
	100	orig1 = ioread8(mem + offset);
	101	orig2 = ioread8(mem + offset + 0x100);
	102
	103	iowrite16(0xaa55, mem + offset);
	104	iowrite16(0xaa55, mem + offset + 0x100);
	105
	106	test1 = ioread16(mem + offset);
	107	test2 = ioread16(mem);
108
109	iowrite16(orig1, mem + offset);
110	iowrite16(orig2, mem + offset + 0x100);
111
112	if (test1 != 0xaa55) {
113	break;
114	}
115
116	if (test2) {
117	break;
118	}
119	}
120
121	iowrite16(orig, mem);
122	return offset - 65536;
123	}
124
125	/* Map the framebuffer from the card and configure the core */
126	static int mga_vram_init(struct mga_device *mdev)
127	{
128	void __iomem *mem;
129	struct apertures_struct *aper = alloc_apertures(1);
0a7fdc59 TR	130	if (!aper)
0a7fdc59 TR	131	return -ENOMEM;
414c4531 DA	132
	133	/* BAR 0 is VRAM */
	134	mdev->mc.vram_base = pci_resource_start(mdev->dev->pdev, 0);
	135	mdev->mc.vram_window = pci_resource_len(mdev->dev->pdev, 0);
	136
	137	aper->ranges[0].base = mdev->mc.vram_base;
	138	aper->ranges[0].size = mdev->mc.vram_window;
414c4531 DA	139
414c4531 DA	140	remove_conflicting_framebuffers(aper, "mgafb", true);
60228646	141	kfree(aper);
414c4531 DA	142
	143	if (!request_mem_region(mdev->mc.vram_base, mdev->mc.vram_window,
	144	"mgadrmfb_vram")) {
	145	DRM_ERROR("can't reserve VRAM\n");
	146	return -ENXIO;
	147	}
	148
	149	mem = pci_iomap(mdev->dev->pdev, 0, 0);
	150
	151	mdev->mc.vram_size = mga_probe_vram(mdev, mem);
	152
	153	pci_iounmap(mdev->dev->pdev, mem);
	154
	155	return 0;
	156	}
	157
	158	static int mgag200_device_init(struct drm_device *dev,
	159	uint32_t flags)
	160	{
	161	struct mga_device *mdev = dev->dev_private;
	162	int ret, option;
	163
	164	mdev->type = flags;
	165
	166	/* Hardcode the number of CRTCs to 1 */
	167	mdev->num_crtc = 1;
	168
	169	pci_read_config_dword(dev->pdev, PCI_MGA_OPTION, &option);
	170	mdev->has_sdram = !(option & (1 << 14));
	171
	172	/* BAR 0 is the framebuffer, BAR 1 contains registers */
	173	mdev->rmmio_base = pci_resource_start(mdev->dev->pdev, 1);
	174	mdev->rmmio_size = pci_resource_len(mdev->dev->pdev, 1);
	175
	176	if (!request_mem_region(mdev->rmmio_base, mdev->rmmio_size,
	177	"mgadrmfb_mmio")) {
	178	DRM_ERROR("can't reserve mmio registers\n");
	179	return -ENOMEM;
	180	}
	181
	182	mdev->rmmio = pci_iomap(dev->pdev, 1, 0);
	183	if (mdev->rmmio == NULL)
	184	return -ENOMEM;
	185
	186	/* stash G200 SE model number for later use */
	187	if (IS_G200_SE(mdev))
	188	mdev->reg_1e24 = RREG32(0x1e24);
	189
	190	ret = mga_vram_init(mdev);
	191	if (ret) {
	192	release_mem_region(mdev->rmmio_base, mdev->rmmio_size);
	193	return ret;
	194	}
	195
	196	mdev->bpp_shifts[0] = 0;
	197	mdev->bpp_shifts[1] = 1;
	198	mdev->bpp_shifts[2] = 0;
	199	mdev->bpp_shifts[3] = 2;
	200	return 0;
	201	}
	202
	203	void mgag200_device_fini(struct mga_device *mdev)
	204	{
	205	release_mem_region(mdev->rmmio_base, mdev->rmmio_size);
206	mga_vram_fini(mdev);
207	}
208
209	/*
210	* Functions here will be called by the core once it's bound the driver to
211	* a PCI device
212	*/
213
214
215	int mgag200_driver_load(struct drm_device *dev, unsigned long flags)
216	{
217	struct mga_device *mdev;
218	int r;
219
220	mdev = kzalloc(sizeof(struct mga_device), GFP_KERNEL);
221	if (mdev == NULL)
222	return -ENOMEM;
223	dev->dev_private = (void *)mdev;
224	mdev->dev = dev;
225
226	r = mgag200_device_init(dev, flags);
227	if (r) {
228	dev_err(&dev->pdev->dev, "Fatal error during GPU init: %d\n", r);
229	goto out;
230	}
231	r = mgag200_mm_init(mdev);
232	if (r)
233	goto out;
234
235	drm_mode_config_init(dev);
236	dev->mode_config.funcs = (void *)&mga_mode_funcs;
237	dev->mode_config.min_width = 0;
238	dev->mode_config.min_height = 0;
239	dev->mode_config.preferred_depth = 24;
240	dev->mode_config.prefer_shadow = 1;
241
242	r = mgag200_modeset_init(mdev);
243	if (r)
244	dev_err(&dev->pdev->dev, "Fatal error during modeset init: %d\n", r);
245	out:
246	if (r)
247	mgag200_driver_unload(dev);
248	return r;
249	}
250
251	int mgag200_driver_unload(struct drm_device *dev)
252	{
253	struct mga_device *mdev = dev->dev_private;
254
255	if (mdev == NULL)
256	return 0;
257	mgag200_modeset_fini(mdev);
258	mgag200_fbdev_fini(mdev);
259	drm_mode_config_cleanup(dev);
260	mgag200_mm_fini(mdev);
261	mgag200_device_fini(mdev);
262	kfree(mdev);
263	dev->dev_private = NULL;
264	return 0;
265	}
266
267	int mgag200_gem_create(struct drm_device *dev,
268	u32 size, bool iskernel,
269	struct drm_gem_object **obj)
270	{
271	struct mgag200_bo *astbo;
272	int ret;
273
274	*obj = NULL;
275
276	size = roundup(size, PAGE_SIZE);
277	if (size == 0)
278	return -EINVAL;
279
280	ret = mgag200_bo_create(dev, size, 0, 0, &astbo);
281	if (ret) {
282	if (ret != -ERESTARTSYS)
283	DRM_ERROR("failed to allocate GEM object\n");
284	return ret;
285	}
286	*obj = &astbo->gem;
287	return 0;
288	}
289
290	int mgag200_dumb_create(struct drm_file *file,
291	struct drm_device *dev,
292	struct drm_mode_create_dumb *args)
293	{
294	int ret;
295	struct drm_gem_object *gobj;
296	u32 handle;
297
298	args->pitch = args->width * ((args->bpp + 7) / 8);
299	args->size = args->pitch * args->height;
300
301	ret = mgag200_gem_create(dev, args->size, false,
302	&gobj);
303	if (ret)
304	return ret;
305
306	ret = drm_gem_handle_create(file, gobj, &handle);
307	drm_gem_object_unreference_unlocked(gobj);
308	if (ret)
309	return ret;
310
311	args->handle = handle;
312	return 0;
313	}
314
315	int mgag200_dumb_destroy(struct drm_file *file,
316	struct drm_device *dev,
317	uint32_t handle)
318	{
319	return drm_gem_handle_delete(file, handle);
320	}
321
322	int mgag200_gem_init_object(struct drm_gem_object *obj)
323	{
324	BUG();
325	return 0;
326	}
327
328	void mgag200_bo_unref(struct mgag200_bo **bo)
329	{
330	struct ttm_buffer_object *tbo;
331
332	if ((*bo) == NULL)
333	return;
334
335	tbo = &((*bo)->bo);
336	ttm_bo_unref(&tbo);
337	if (tbo == NULL)
338	*bo = NULL;
339
340	}
341
342	void mgag200_gem_free_object(struct drm_gem_object *obj)
343	{
344	struct mgag200_bo *mgag200_bo = gem_to_mga_bo(obj);
345
346	if (!mgag200_bo)
347	return;
348	mgag200_bo_unref(&mgag200_bo);
349	}
350
351
352	static inline u64 mgag200_bo_mmap_offset(struct mgag200_bo *bo)
353	{
354	return bo->bo.addr_space_offset;
355	}
356
357	int
358	mgag200_dumb_mmap_offset(struct drm_file *file,
359	struct drm_device *dev,
360	uint32_t handle,
361	uint64_t *offset)
362	{
363	struct drm_gem_object *obj;
364	int ret;
365	struct mgag200_bo *bo;
366
367	mutex_lock(&dev->struct_mutex);
368	obj = drm_gem_object_lookup(dev, file, handle);
369	if (obj == NULL) {
370	ret = -ENOENT;
371	goto out_unlock;
372	}
373
374	bo = gem_to_mga_bo(obj);
375	*offset = mgag200_bo_mmap_offset(bo);
376
377	drm_gem_object_unreference(obj);
378	ret = 0;
379	out_unlock:
380	mutex_unlock(&dev->struct_mutex);
381	return ret;
382
383	}