Loading...
1/*
2 * Copyright (C) 2013 Imagination Technologies
3 * Author: Paul Burton <paul.burton@imgtec.com>
4 *
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the
7 * Free Software Foundation; either version 2 of the License, or (at your
8 * option) any later version.
9 */
10
11#include <linux/errno.h>
12#include <linux/percpu.h>
13#include <linux/spinlock.h>
14
15#include <asm/mips-cm.h>
16#include <asm/mips-cpc.h>
17
18void __iomem *mips_cpc_base;
19
20static DEFINE_PER_CPU_ALIGNED(spinlock_t, cpc_core_lock);
21
22static DEFINE_PER_CPU_ALIGNED(unsigned long, cpc_core_lock_flags);
23
24/**
25 * mips_cpc_phys_base - retrieve the physical base address of the CPC
26 *
27 * This function returns the physical base address of the Cluster Power
28 * Controller memory mapped registers, or 0 if no Cluster Power Controller
29 * is present.
30 */
31static phys_addr_t mips_cpc_phys_base(void)
32{
33 unsigned long cpc_base;
34
35 if (!mips_cm_present())
36 return 0;
37
38 if (!(read_gcr_cpc_status() & CM_GCR_CPC_STATUS_EX_MSK))
39 return 0;
40
41 /* If the CPC is already enabled, leave it so */
42 cpc_base = read_gcr_cpc_base();
43 if (cpc_base & CM_GCR_CPC_BASE_CPCEN_MSK)
44 return cpc_base & CM_GCR_CPC_BASE_CPCBASE_MSK;
45
46 /* Otherwise, give it the default address & enable it */
47 cpc_base = mips_cpc_default_phys_base();
48 write_gcr_cpc_base(cpc_base | CM_GCR_CPC_BASE_CPCEN_MSK);
49 return cpc_base;
50}
51
52int mips_cpc_probe(void)
53{
54 phys_addr_t addr;
55 unsigned cpu;
56
57 for_each_possible_cpu(cpu)
58 spin_lock_init(&per_cpu(cpc_core_lock, cpu));
59
60 addr = mips_cpc_phys_base();
61 if (!addr)
62 return -ENODEV;
63
64 mips_cpc_base = ioremap_nocache(addr, 0x8000);
65 if (!mips_cpc_base)
66 return -ENXIO;
67
68 return 0;
69}
70
71void mips_cpc_lock_other(unsigned int core)
72{
73 unsigned curr_core;
74 preempt_disable();
75 curr_core = current_cpu_data.core;
76 spin_lock_irqsave(&per_cpu(cpc_core_lock, curr_core),
77 per_cpu(cpc_core_lock_flags, curr_core));
78 write_cpc_cl_other(core << CPC_Cx_OTHER_CORENUM_SHF);
79
80 /*
81 * Ensure the core-other region reflects the appropriate core &
82 * VP before any accesses to it occur.
83 */
84 mb();
85}
86
87void mips_cpc_unlock_other(void)
88{
89 unsigned curr_core = current_cpu_data.core;
90 spin_unlock_irqrestore(&per_cpu(cpc_core_lock, curr_core),
91 per_cpu(cpc_core_lock_flags, curr_core));
92 preempt_enable();
93}
1/*
2 * Copyright (C) 2013 Imagination Technologies
3 * Author: Paul Burton <paul.burton@mips.com>
4 *
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the
7 * Free Software Foundation; either version 2 of the License, or (at your
8 * option) any later version.
9 */
10
11#include <linux/errno.h>
12#include <linux/percpu.h>
13#include <linux/of.h>
14#include <linux/of_address.h>
15#include <linux/spinlock.h>
16
17#include <asm/mips-cps.h>
18
19void __iomem *mips_cpc_base;
20
21static DEFINE_PER_CPU_ALIGNED(spinlock_t, cpc_core_lock);
22
23static DEFINE_PER_CPU_ALIGNED(unsigned long, cpc_core_lock_flags);
24
25phys_addr_t __weak mips_cpc_default_phys_base(void)
26{
27 struct device_node *cpc_node;
28 struct resource res;
29 int err;
30
31 cpc_node = of_find_compatible_node(of_root, NULL, "mti,mips-cpc");
32 if (cpc_node) {
33 err = of_address_to_resource(cpc_node, 0, &res);
34 if (!err)
35 return res.start;
36 }
37
38 return 0;
39}
40
41/**
42 * mips_cpc_phys_base - retrieve the physical base address of the CPC
43 *
44 * This function returns the physical base address of the Cluster Power
45 * Controller memory mapped registers, or 0 if no Cluster Power Controller
46 * is present.
47 */
48static phys_addr_t mips_cpc_phys_base(void)
49{
50 unsigned long cpc_base;
51
52 if (!mips_cm_present())
53 return 0;
54
55 if (!(read_gcr_cpc_status() & CM_GCR_CPC_STATUS_EX))
56 return 0;
57
58 /* If the CPC is already enabled, leave it so */
59 cpc_base = read_gcr_cpc_base();
60 if (cpc_base & CM_GCR_CPC_BASE_CPCEN)
61 return cpc_base & CM_GCR_CPC_BASE_CPCBASE;
62
63 /* Otherwise, use the default address */
64 cpc_base = mips_cpc_default_phys_base();
65 if (!cpc_base)
66 return cpc_base;
67
68 /* Enable the CPC, mapped at the default address */
69 write_gcr_cpc_base(cpc_base | CM_GCR_CPC_BASE_CPCEN);
70 return cpc_base;
71}
72
73int mips_cpc_probe(void)
74{
75 phys_addr_t addr;
76 unsigned int cpu;
77
78 for_each_possible_cpu(cpu)
79 spin_lock_init(&per_cpu(cpc_core_lock, cpu));
80
81 addr = mips_cpc_phys_base();
82 if (!addr)
83 return -ENODEV;
84
85 mips_cpc_base = ioremap_nocache(addr, 0x8000);
86 if (!mips_cpc_base)
87 return -ENXIO;
88
89 return 0;
90}
91
92void mips_cpc_lock_other(unsigned int core)
93{
94 unsigned int curr_core;
95
96 if (mips_cm_revision() >= CM_REV_CM3)
97 /* Systems with CM >= 3 lock the CPC via mips_cm_lock_other */
98 return;
99
100 preempt_disable();
101 curr_core = cpu_core(¤t_cpu_data);
102 spin_lock_irqsave(&per_cpu(cpc_core_lock, curr_core),
103 per_cpu(cpc_core_lock_flags, curr_core));
104 write_cpc_cl_other(core << __ffs(CPC_Cx_OTHER_CORENUM));
105
106 /*
107 * Ensure the core-other region reflects the appropriate core &
108 * VP before any accesses to it occur.
109 */
110 mb();
111}
112
113void mips_cpc_unlock_other(void)
114{
115 unsigned int curr_core;
116
117 if (mips_cm_revision() >= CM_REV_CM3)
118 /* Systems with CM >= 3 lock the CPC via mips_cm_lock_other */
119 return;
120
121 curr_core = cpu_core(¤t_cpu_data);
122 spin_unlock_irqrestore(&per_cpu(cpc_core_lock, curr_core),
123 per_cpu(cpc_core_lock_flags, curr_core));
124 preempt_enable();
125}