text: /*-
   * Copyright 1999 Precision Insight, Inc., Cedar Park, Texas.
   * Copyright 2000 VA Linux Systems, Inc., Sunnyvale, California.
   * All Rights Reserved.
   *
   * Permission is hereby granted, free of charge, to any person obtaining a
   * copy of this software and associated documentation files (the "Software"),
   * to deal in the Software without restriction, including without limitation
   * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   * and/or sell copies of the Software, and to permit persons to whom the
   * Software is furnished to do so, subject to the following conditions:
   *
   * The above copyright notice and this permission notice (including the next
   * paragraph) shall be included in all copies or substantial portions of the
   * Software.
   *
   * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
   * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
   * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
   * VA LINUX SYSTEMS AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
   * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
   * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
   * OTHER DEALINGS IN THE SOFTWARE.
   *
   * Author:
   *    Rickard E. (Rik) Faith <faith@valinux.com>
   *    Gareth Hughes <gareth@valinux.com>
   *
   * $FreeBSD: src/sys/dev/drm2/drm_agpsupport.c,v 1.1 2012/05/22 11:07:44 kib Exp $
   */
  
  /** @file drm_agpsupport.c
   * Support code for tying the kernel AGP support to DRM drivers and
   * the DRM's AGP ioctls.
   */
  
  #include <drm/drmP.h>
  
  #include <dev/agp/agpreg.h>
  #include <bus/pci/pcireg.h>
  
  /* Returns 1 if AGP or 0 if not. */
  static int
  drm_device_find_capability(struct drm_device *dev, int cap)
  {
  	return (pci_find_extcap(dev->dev, cap, NULL) == 0);
  }
  
  int drm_device_is_agp(struct drm_device *dev)
  {
  	if (dev->driver->device_is_agp != NULL) {
  		int ret;
  
  		/* device_is_agp returns a tristate, 0 = not AGP, 1 = definitely
  		 * AGP, 2 = fall back to PCI capability
  		 */
  		ret = (*dev->driver->device_is_agp)(dev);
  		if (ret != DRM_MIGHT_BE_AGP)
  			return ret;
  	}
  
  	return (drm_device_find_capability(dev, PCIY_AGP));
  }
  
  int drm_device_is_pcie(struct drm_device *dev)
  {
  	return (drm_device_find_capability(dev, PCIY_EXPRESS));
  }
  
  int drm_agp_info(struct drm_device * dev, struct drm_agp_info *info)
  {
  	struct agp_info *kern;
  
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  
  	kern                   = &dev->agp->agp_info;
  	agp_get_info(dev->agp->agpdev, kern);
  	info->agp_version_major = 1;
  	info->agp_version_minor = 0;
  	info->mode              = kern->ai_mode;
  	info->aperture_base     = kern->ai_aperture_base;
  	info->aperture_size     = kern->ai_aperture_size;
  	info->memory_allowed    = kern->ai_memory_allowed;
  	info->memory_used       = kern->ai_memory_used;
  	info->id_vendor         = kern->ai_devid & 0xffff;
  	info->id_device         = kern->ai_devid >> 16;
  
  	return 0;
  }
  
  int drm_agp_info_ioctl(struct drm_device *dev, void *data,
  		       struct drm_file *file_priv)
  {
  	int err;
  	struct drm_agp_info info;
  
  	err = drm_agp_info(dev, &info);
  	if (err != 0)
  		return err;
  
  	*(struct drm_agp_info *) data = info;
  	return 0;
  }
  
  int drm_agp_acquire_ioctl(struct drm_device *dev, void *data,
  			  struct drm_file *file_priv)
  {
  
  	return drm_agp_acquire(dev);
  }
  
  int drm_agp_acquire(struct drm_device *dev)
  {
  	int retcode;
  
  	if (!dev->agp || dev->agp->acquired)
  		return EINVAL;
  
  	retcode = agp_acquire(dev->agp->agpdev);
  	if (retcode)
  		return retcode;
  
  	dev->agp->acquired = 1;
  	return 0;
  }
  
  int drm_agp_release_ioctl(struct drm_device *dev, void *data,
  			  struct drm_file *file_priv)
  {
  
  	return drm_agp_release(dev);
  }
  
  int drm_agp_release(struct drm_device * dev)
  {
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  	agp_release(dev->agp->agpdev);
  	dev->agp->acquired = 0;
  	return 0;
  }
  
  int drm_agp_enable(struct drm_device *dev, struct drm_agp_mode mode)
  {
  
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  	
  	dev->agp->mode    = mode.mode;
  	agp_enable(dev->agp->agpdev, mode.mode);
  	dev->agp->enabled = 1;
  	return 0;
  }
  
  int drm_agp_enable_ioctl(struct drm_device *dev, void *data,
  			 struct drm_file *file_priv)
  {
  	struct drm_agp_mode mode;
  
  	mode = *(struct drm_agp_mode *) data;
  
  	return drm_agp_enable(dev, mode);
  }
  
  int drm_agp_alloc(struct drm_device *dev, struct drm_agp_buffer *request)
  {
  	drm_agp_mem_t    *entry;
  	void	         *handle;
  	unsigned long    pages;
  	u_int32_t	 type;
  	struct agp_memory_info info;
  
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  
  	entry = kmalloc(sizeof(*entry), M_DRM, M_NOWAIT | M_ZERO);
  	if (entry == NULL)
  		return ENOMEM;
  
  	pages = (request->size + PAGE_SIZE - 1) / PAGE_SIZE;
  	type = (u_int32_t) request->type;
  
  	handle = drm_agp_allocate_memory(pages, type);
  	if (handle == NULL) {
  		drm_free(entry, M_DRM);
  		return ENOMEM;
  	}
  	
  	entry->handle    = handle;
  	entry->bound     = 0;
  	entry->pages     = pages;
  	entry->prev      = NULL;
  	entry->next      = dev->agp->memory;
  	if (dev->agp->memory)
  		dev->agp->memory->prev = entry;
  	dev->agp->memory = entry;
  
  	agp_memory_info(dev->agp->agpdev, entry->handle, &info);
  
  	request->handle   = (unsigned long) entry->handle;
          request->physical = info.ami_physical;
  
  	return 0;
  }
  
  int drm_agp_alloc_ioctl(struct drm_device *dev, void *data,
  			struct drm_file *file_priv)
  {
  	struct drm_agp_buffer request;
  	int retcode;
  
  	request = *(struct drm_agp_buffer *) data;
  
  	retcode = drm_agp_alloc(dev, &request);
  
  	*(struct drm_agp_buffer *) data = request;
  
  	return retcode;
  }
  
  static drm_agp_mem_t * drm_agp_lookup_entry(struct drm_device *dev,
  					    void *handle)
  {
  	drm_agp_mem_t *entry;
  
  	for (entry = dev->agp->memory; entry; entry = entry->next) {
  		if (entry->handle == handle) return entry;
  	}
  	return NULL;
  }
  
  int drm_agp_unbind(struct drm_device *dev, struct drm_agp_binding *request)
  {
  	drm_agp_mem_t     *entry;
  	int retcode;
  
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  
  	entry = drm_agp_lookup_entry(dev, (void *)request->handle);
  	if (entry == NULL || !entry->bound)
  		return EINVAL;
  
  	retcode = drm_agp_unbind_memory(entry->handle);
  
  	if (retcode == 0)
  		entry->bound = 0;
  
  	return retcode;
  }
  
  int drm_agp_unbind_ioctl(struct drm_device *dev, void *data,
  			 struct drm_file *file_priv)
  {
  	struct drm_agp_binding request;
  	int retcode;
  
  	request = *(struct drm_agp_binding *) data;
  
  	retcode = drm_agp_unbind(dev, &request);
  
  	return retcode;
  }
  
  int drm_agp_bind(struct drm_device *dev, struct drm_agp_binding *request)
  {
  	drm_agp_mem_t     *entry;
  	int               retcode;
  	int               page;
  	
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  
  	DRM_DEBUG("agp_bind, page_size=%x\n", (int)PAGE_SIZE);
  
  	entry = drm_agp_lookup_entry(dev, (void *)request->handle);
  	if (entry == NULL || entry->bound)
  		return EINVAL;
  
  	page = (request->offset + PAGE_SIZE - 1) / PAGE_SIZE;
  
  	retcode = drm_agp_bind_memory(entry->handle, page);
  	if (retcode == 0)
  		entry->bound = dev->agp->base + (page << PAGE_SHIFT);
  
  	return retcode;
  }
  
  int drm_agp_bind_ioctl(struct drm_device *dev, void *data,
  		       struct drm_file *file_priv)
  {
  	struct drm_agp_binding request;
  	int retcode;
  
  	request = *(struct drm_agp_binding *) data;
  
  	retcode = drm_agp_bind(dev, &request);
  
  	return retcode;
  }
  
  int drm_agp_free(struct drm_device *dev, struct drm_agp_buffer *request)
  {
  	drm_agp_mem_t    *entry;
  	
  	if (!dev->agp || !dev->agp->acquired)
  		return EINVAL;
  
  	entry = drm_agp_lookup_entry(dev, (void*)request->handle);
  	if (entry == NULL)
  		return EINVAL;
     
  	if (entry->prev)
  		entry->prev->next = entry->next;
  	else
  		dev->agp->memory  = entry->next;
  	if (entry->next)
  		entry->next->prev = entry->prev;
  
  	if (entry->bound)
  		drm_agp_unbind_memory(entry->handle);
  	drm_agp_free_memory(entry->handle);
  
  	drm_free(entry, M_DRM);
  
  	return 0;
  
  }
  
  int drm_agp_free_ioctl(struct drm_device *dev, void *data,
  		       struct drm_file *file_priv)
  {
  	struct drm_agp_buffer request;
  	int retcode;
  
  	request = *(struct drm_agp_buffer *) data;
  
  	retcode = drm_agp_free(dev, &request);
  
  	return retcode;
  }
  
  drm_agp_head_t *drm_agp_init(void)
  {
  	device_t agpdev;
  	drm_agp_head_t *head   = NULL;
  	int      agp_available = 1;
     
  	agpdev = DRM_AGP_FIND_DEVICE();
  	if (!agpdev)
  		agp_available = 0;
  
  	DRM_DEBUG("agp_available = %d\n", agp_available);
  
  	if (agp_available) {
  		head = kmalloc(sizeof(*head), M_DRM,
  		    M_NOWAIT | M_ZERO);
  		if (head == NULL)
  			return NULL;
  		head->agpdev = agpdev;
  		agp_get_info(agpdev, &head->agp_info);
  		head->base = head->agp_info.ai_aperture_base;
  		head->memory = NULL;
  		DRM_INFO("AGP at 0x%08lx %dMB\n",
  			 (long)head->agp_info.ai_aperture_base,
  			 (int)(head->agp_info.ai_aperture_size >> 20));
  	}
  	return head;
  }
  
  void *drm_agp_allocate_memory(size_t pages, u32 type)
  {
  	device_t agpdev;
  
  	agpdev = DRM_AGP_FIND_DEVICE();
  	if (!agpdev)
  		return NULL;
  
  	return agp_alloc_memory(agpdev, type, pages << AGP_PAGE_SHIFT);
  }
  
  int drm_agp_free_memory(void *handle)
  {
  	device_t agpdev;
  
  	agpdev = DRM_AGP_FIND_DEVICE();
  	if (!agpdev || !handle)
  		return 0;
  
  	agp_free_memory(agpdev, handle);
  	return 1;
  }
  
  int drm_agp_bind_memory(void *handle, off_t start)
  {
  	device_t agpdev;
  
  	agpdev = DRM_AGP_FIND_DEVICE();
  	if (!agpdev || !handle)
  		return EINVAL;
  
  	return agp_bind_memory(agpdev, handle, start * PAGE_SIZE);
  }
  
  int drm_agp_unbind_memory(void *handle)
  {
  	device_t agpdev;
  
  	agpdev = DRM_AGP_FIND_DEVICE();
  	if (!agpdev || !handle)
  		return EINVAL;
  
  	return agp_unbind_memory(agpdev, handle);
  }
  