xref: /netbsd/sys/arch/arm/at91/at91pmc.c (revision 6550d01e)
1 /*	$Id: at91pmc.c,v 1.3 2009/10/23 06:53:13 snj Exp $	*/
2 /*	$NetBSD: at91pmc.c,v 1.3 2009/10/23 06:53:13 snj Exp $	*/
3 
4 /*
5  * Copyright (c) 2007 Embedtronics Oy
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
18  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
20  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
21  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
22  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
23  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
25  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
26  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
27  * POSSIBILITY OF SUCH DAMAGE.
28  */
29 
30 #include <sys/cdefs.h>
31 __KERNEL_RCSID(0, "$NetBSD");
32 
33 #include <sys/types.h>
34 #include <sys/param.h>
35 #include <sys/systm.h>
36 #include <sys/kernel.h>
37 #include <sys/time.h>
38 #include <sys/device.h>
39 
40 #include <machine/bus.h>
41 #include <machine/intr.h>
42 
43 #include <arm/cpufunc.h>
44 
45 #include <arm/at91/at91reg.h>
46 #include <arm/at91/at91var.h>
47 #include <arm/at91/at91pmcreg.h>
48 #include <arm/at91/at91pmcvar.h>
49 
50 #define	SLOW_CLOCK	32768LU
51 
52 void
53 at91pmc_get_clocks(struct at91bus_clocks *clocks)
54 {
55 	u_int64_t		mclk, pllaclk, pllbclk, pclk, mstclk;
56 	u_int32_t		reg;
57 
58 	if (!((reg = PMCREG(PMC_MOR)) & PMC_MOR_MOSCEN))
59 		panic("%s: main oscillator not enabled (MOR=0x%#X)", __FUNCTION__, reg);
60 
61 	if (!((reg = PMCREG(PMC_MCFR)) & PMC_MCFR_MAINRDY))
62 		panic("%s: main oscillator not ready (MCFR=0x%#X)", __FUNCTION__, reg);
63 
64 	mclk  = ((reg & PMC_MCFR_MAINF) * SLOW_CLOCK) / 16U;
65 
66 	// try to guess some nice MHz value
67 	if (((mclk / 1000) % 1000) >= 990) {
68 	  mclk += 1000000U - (mclk % 1000000U);
69 	} else if (((mclk / 1000) % 1000) <= 10) {
70 	  mclk -= (mclk % 1000000U);
71 	}
72 
73 	reg = PMCREG(PMC_PLLAR); pllaclk = 0;
74 	if (reg & PMC_PLL_DIV) {
75 		pllaclk = mclk * (((reg & PMC_PLL_MUL) >> PMC_PLL_MUL_SHIFT) + 1);
76 		pllaclk /= (reg & PMC_PLL_DIV) >> PMC_PLL_DIV_SHIFT;
77 	}
78 
79 	reg = PMCREG(PMC_PLLBR); pllbclk = 0;
80 	if (reg & PMC_PLL_DIV) {
81 		pllbclk = mclk * (((reg & PMC_PLL_MUL) >> PMC_PLL_MUL_SHIFT) + 1);
82 		pllbclk /= (reg & PMC_PLL_DIV) >> PMC_PLL_DIV_SHIFT;
83 		if (reg & PMC_PLLBR_USB_96M) {
84 			pllbclk /= 2;
85 		}
86 	}
87 
88 	reg = PMCREG(PMC_MCKR);
89 	switch ((reg & PMC_MCKR_CSS)) {
90 	case PMC_MCKR_CSS_SLOW_CLK:
91 	  pclk = SLOW_CLOCK;
92 	  break;
93 	default:
94 	case PMC_MCKR_CSS_MAIN_CLK:
95 	  pclk = mclk;
96 	  break;
97 	case PMC_MCKR_CSS_PLLA:
98 	  pclk = pllaclk;
99 	  break;
100 	case PMC_MCKR_CSS_PLLB:
101 	  pclk = pllbclk;
102 	  break;
103 	}
104 	pclk >>= (reg & PMC_MCKR_PRES) >> PMC_MCKR_PRES_SHIFT;
105 	mstclk = pclk / (((reg & PMC_MCKR_MDIV) >> PMC_MCKR_MDIV_SHIFT) + 1);
106 
107 	clocks->slow = SLOW_CLOCK;
108 	clocks->main = mclk;
109 	clocks->cpu = pclk;
110 	clocks->master = mstclk;
111 	clocks->plla = pllaclk;
112 	clocks->pllb = pllbclk;
113 }
114 
115 
116 #define	PID_COUNT	32
117 static int pid_enable_count[PID_COUNT] = {0};
118 
119 void
120 at91pmc_peripheral_clock(int pid, int enable)
121 {
122 	int s;
123 
124 	if (pid < 0 || pid >= PID_COUNT)
125 		panic("%s: pid %d out of range", __FUNCTION__, pid);
126 
127 	s = splhigh();
128 
129 	if (enable) {
130 		pid_enable_count[pid]++;
131 		PMCREG(PMC_PCER) = (1U << pid);
132 	} else {
133 		if (--pid_enable_count[pid] < 0)
134 			panic("%s: pid %d enable count got negative (%d)",
135 			      __FUNCTION__, pid, pid_enable_count[pid]);
136 		if (pid_enable_count[pid] == 0)
137 			PMCREG(PMC_PCDR) = (1U << pid);
138 	}
139 
140 	splx(s);
141 
142 	if (enable) {
143 		int c;
144 		for (c = 0; c < 10000; c++) {
145 		  __insn_barrier();
146 		}
147 	}
148 }
149