summaryrefslogtreecommitdiff
path: root/lib/main.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib/main.c')
-rw-r--r--lib/main.c336
1 files changed, 336 insertions, 0 deletions
diff --git a/lib/main.c b/lib/main.c
new file mode 100644
index 000000000..78d5b9906
--- /dev/null
+++ b/lib/main.c
@@ -0,0 +1,336 @@
+/*
+ * Copyright 2012 Red Hat Inc.
+ *
+ * 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 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
+ * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) 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.
+ *
+ * Authors: Ben Skeggs
+ */
+
+#include <core/os.h>
+#include <signal.h>
+
+#include <core/object.h>
+#include <core/client.h>
+#include <core/device.h>
+#include <core/intr.h>
+#include <core/class.h>
+
+#include <subdev/device.h>
+#include <subdev/mc.h>
+
+struct os_device {
+ struct nouveau_device base;
+ struct list_head head;
+ char *name;
+ char *cfg;
+ char *dbg;
+};
+
+struct os_client {
+ struct nouveau_client base;
+ struct list_head head;
+};
+
+static LIST_HEAD(os_device_list);
+static LIST_HEAD(os_client_list);
+static int os_client_id = 0;
+
+/******************************************************************************
+ * "interrupt" handling
+ *****************************************************************************/
+#define INTR_FREQ 10000
+
+static void
+os_intr(int signal)
+{
+ struct nouveau_subdev *pmc;
+ struct os_device *odev;
+
+ list_for_each_entry(odev, &os_device_list, head) {
+ pmc = nouveau_subdev(odev, NVDEV_SUBDEV_MC);
+ if (pmc && pmc->intr)
+ pmc->intr(pmc);
+ }
+
+
+ ualarm(INTR_FREQ, 0);
+}
+
+static struct sigaction intr = {
+ .sa_handler = os_intr,
+};
+
+/******************************************************************************
+ * horrific stuff to implement linux's ioremap interface on top of pciaccess
+ *****************************************************************************/
+static struct os_ioremap_info {
+ struct pci_device *pdev;
+ u64 size;
+ void *ptr;
+} os_ioremap[32];
+
+void __iomem *
+nvos_ioremap(u64 addr, u64 size)
+{
+ struct pci_device *pdev = NULL;
+ struct os_device *odev;
+ int i;
+
+ list_for_each_entry(odev, &os_device_list, head) {
+ for (i = 0; i < 6; i++) {
+ pdev = odev->base.pdev->pdev;
+ if (addr >= pdev->regions[i].base_addr &&
+ addr + size <= pdev->regions[i].base_addr +
+ pdev->regions[i].size)
+ break;
+ pdev = NULL;
+ }
+ }
+
+ for (i = 0; pdev && i < ARRAY_SIZE(os_ioremap); i++) {
+ if (os_ioremap[i].ptr)
+ continue;
+
+ if (pci_device_map_range(pdev, addr, size,
+ PCI_DEV_MAP_FLAG_WRITABLE,
+ &os_ioremap[i].ptr))
+ return NULL;
+
+ os_ioremap[i].pdev = pdev;
+ os_ioremap[i].size = size;
+ return os_ioremap[i].ptr;
+ }
+
+ return NULL;
+}
+
+void
+nvos_iounmap(void __iomem *ptr)
+{
+ int i;
+
+ for (i = 0; i < ARRAY_SIZE(os_ioremap); i++) {
+ if (ptr && os_ioremap[i].ptr == ptr) {
+ pci_device_unmap_range(os_ioremap[i].pdev, ptr,
+ os_ioremap[i].size);
+ os_ioremap[i].ptr = NULL;
+ break;
+ }
+ }
+}
+
+/******************************************************************************
+ * client interfaces
+ *****************************************************************************/
+static int
+os_init_device(struct pci_device *pdev, char *cfg, char *dbg)
+{
+ struct os_device *odev;
+ struct pci_dev *ldev;
+ char *name, _name[64];
+ u64 handle;
+ int ret;
+
+ ret = pci_device_probe(pdev);
+ if (ret) {
+ fprintf(stderr, "pci_device_probe failed, %d\n", ret);
+ return ret;
+ }
+
+ snprintf(_name, sizeof(_name), "%04x:%02x:%02x.%1x",
+ pdev->domain, pdev->bus, pdev->dev, pdev->func);
+ handle = ((u64)pdev->domain << 32) | (pdev->bus << 16) |
+ (pdev->dev << 8) | pdev->func;
+
+ list_for_each_entry(odev, &os_device_list, head) {
+ if (odev->base.handle == handle)
+ return -EEXIST;
+ }
+
+ ldev = malloc(sizeof(*ldev));
+ ldev->pdev = pdev;
+ ldev->device = pdev->dev;
+ ldev->subsystem_vendor = pdev->subvendor_id;
+ ldev->subsystem_device = pdev->subdevice_id;
+
+ name = strdup(_name);
+ cfg = cfg ? strdup(cfg) : NULL;
+ dbg = dbg ? strdup(dbg) : NULL;
+
+ ret = nouveau_device_create(ldev, handle, name, cfg, dbg, &odev);
+ if (ret) {
+ fprintf(stderr, "failed to create device, %d\n", ret);
+ return ret;
+ }
+
+ list_add(&odev->head, &os_device_list);
+ odev->name = name;
+ odev->cfg = cfg;
+ odev->dbg = dbg;
+ return 0;
+}
+
+static int
+os_init(char *cfg, char *dbg, bool init)
+{
+ struct pci_device_iterator *iter;
+ struct pci_device *pdev;
+ int ret, n = 0;
+
+ ret = pci_system_init();
+ if (ret) {
+ fprintf(stderr, "pci_system_init failed, %d\n", ret);
+ return ret;
+ }
+
+ iter = pci_slot_match_iterator_create(NULL);
+ while ((pdev = pci_device_next(iter))) {
+ if ((pdev->device_class & 0x00ff0000) != 0x00030000)
+ continue;
+ if (pdev->vendor_id != 0x10de)
+ continue;
+
+ if (!init) {
+ printf("%d: PCI:%04x:%02x:%02x:%02x (%04x:%04x)\n",
+ n++, pdev->domain, pdev->bus, pdev->dev,
+ pdev->func, pdev->vendor_id, pdev->device_id);
+ continue;
+ }
+
+ os_init_device(pdev, cfg, dbg);
+ }
+
+ sigaction(SIGALRM, &intr, 0);
+ ualarm(INTR_FREQ, 0);
+ return 0;
+}
+
+static void
+os_fini(void)
+{
+ struct os_device *odev, *temp;
+
+ list_for_each_entry_safe(odev, temp, &os_device_list, head) {
+ char *name = odev->name;
+ char *cfg = odev->cfg;
+ char *dbg = odev->dbg;
+ list_del(&odev->head);
+ nouveau_object_ref(NULL, (struct nouveau_object **)&odev);
+ free(dbg); free(cfg); free(name);
+ }
+}
+
+int
+os_client_new(char *cfg, char *dbg, int argc, char **argv,
+ struct nouveau_object **pclient)
+{
+ struct os_client *client;
+ u64 device = ~0ULL;
+ int ret, c;
+
+ while ((c = getopt(argc, argv, "la:c:d:")) != -1) {
+ switch (c) {
+ case 'l':
+ return os_init(NULL, NULL, false);
+ case 'a':
+ sscanf(optarg, "0x%llx", &device);
+ break;
+ case 'c':
+ cfg = optarg;
+ break;
+ case 'd':
+ dbg = optarg;
+ break;
+ case '?':
+ return -EINVAL;
+ default:
+ break;
+ }
+ }
+
+ if (list_empty(&os_client_list)) {
+ ret = os_init(cfg, dbg, true);
+ if (ret)
+ return ret;
+ }
+
+ if (!list_empty(&os_device_list)) {
+ struct os_device *odev =
+ list_first_entry(&os_device_list, typeof(*odev), head);
+ char name[16];
+
+ snprintf(name, sizeof(name), "CLIENT%2d", os_client_id++);
+
+ ret = nouveau_client_create(name, odev->base.handle,
+ cfg, dbg, &client);
+ *pclient = nv_object(client);
+ if (ret)
+ return ret;
+
+ list_add(&client->head, &os_client_list);
+ return 0;
+ }
+
+ return -ENODEV;
+}
+
+void
+os_client_del(struct nouveau_object **pclient)
+{
+ struct nouveau_object *client = *pclient;
+
+ if (client) {
+ struct os_client *ocli = (void *)client;
+
+ list_del(&ocli->head);
+
+ nouveau_client_fini(nv_client(client), false);
+ atomic_set(&client->refcount, 1);
+ nouveau_object_ref(NULL, &client);
+
+ if (list_empty(&os_client_list))
+ os_fini();
+ }
+
+ *pclient = NULL;
+}
+
+void
+os_suspend()
+{
+ struct os_client *client;
+ int ret;
+
+ list_for_each_entry(client, &os_client_list, head) {
+ ret = nouveau_client_fini(&client->base, true);
+ assert(ret == 0);
+ }
+}
+
+void
+os_resume()
+{
+ struct os_client *client;
+ int ret;
+
+ list_for_each_entry(client, &os_client_list, head) {
+ ret = nouveau_client_init(&client->base);
+ assert(ret == 0);
+ }
+}