Loading...
1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * System Abstraction Layer (SAL) interface routines.
4 *
5 * Copyright (C) 1998, 1999, 2001, 2003 Hewlett-Packard Co
6 * David Mosberger-Tang <davidm@hpl.hp.com>
7 * Copyright (C) 1999 VA Linux Systems
8 * Copyright (C) 1999 Walt Drummond <drummond@valinux.com>
9 */
10
11#include <linux/kernel.h>
12#include <linux/init.h>
13#include <linux/module.h>
14#include <linux/spinlock.h>
15#include <linux/string.h>
16
17#include <asm/delay.h>
18#include <asm/page.h>
19#include <asm/sal.h>
20#include <asm/pal.h>
21#include <asm/xtp.h>
22
23 __cacheline_aligned DEFINE_SPINLOCK(sal_lock);
24unsigned long sal_platform_features;
25
26unsigned short sal_revision;
27unsigned short sal_version;
28
29#define SAL_MAJOR(x) ((x) >> 8)
30#define SAL_MINOR(x) ((x) & 0xff)
31
32static struct {
33 void *addr; /* function entry point */
34 void *gpval; /* gp value to use */
35} pdesc;
36
37static long
38default_handler (void)
39{
40 return -1;
41}
42
43ia64_sal_handler ia64_sal = (ia64_sal_handler) default_handler;
44ia64_sal_desc_ptc_t *ia64_ptc_domain_info;
45
46const char *
47ia64_sal_strerror (long status)
48{
49 const char *str;
50 switch (status) {
51 case 0: str = "Call completed without error"; break;
52 case 1: str = "Effect a warm boot of the system to complete "
53 "the update"; break;
54 case -1: str = "Not implemented"; break;
55 case -2: str = "Invalid argument"; break;
56 case -3: str = "Call completed with error"; break;
57 case -4: str = "Virtual address not registered"; break;
58 case -5: str = "No information available"; break;
59 case -6: str = "Insufficient space to add the entry"; break;
60 case -7: str = "Invalid entry_addr value"; break;
61 case -8: str = "Invalid interrupt vector"; break;
62 case -9: str = "Requested memory not available"; break;
63 case -10: str = "Unable to write to the NVM device"; break;
64 case -11: str = "Invalid partition type specified"; break;
65 case -12: str = "Invalid NVM_Object id specified"; break;
66 case -13: str = "NVM_Object already has the maximum number "
67 "of partitions"; break;
68 case -14: str = "Insufficient space in partition for the "
69 "requested write sub-function"; break;
70 case -15: str = "Insufficient data buffer space for the "
71 "requested read record sub-function"; break;
72 case -16: str = "Scratch buffer required for the write/delete "
73 "sub-function"; break;
74 case -17: str = "Insufficient space in the NVM_Object for the "
75 "requested create sub-function"; break;
76 case -18: str = "Invalid value specified in the partition_rec "
77 "argument"; break;
78 case -19: str = "Record oriented I/O not supported for this "
79 "partition"; break;
80 case -20: str = "Bad format of record to be written or "
81 "required keyword variable not "
82 "specified"; break;
83 default: str = "Unknown SAL status code"; break;
84 }
85 return str;
86}
87
88void __init
89ia64_sal_handler_init (void *entry_point, void *gpval)
90{
91 /* fill in the SAL procedure descriptor and point ia64_sal to it: */
92 pdesc.addr = entry_point;
93 pdesc.gpval = gpval;
94 ia64_sal = (ia64_sal_handler) &pdesc;
95}
96
97static void __init
98check_versions (struct ia64_sal_systab *systab)
99{
100 sal_revision = (systab->sal_rev_major << 8) | systab->sal_rev_minor;
101 sal_version = (systab->sal_b_rev_major << 8) | systab->sal_b_rev_minor;
102
103 /* Check for broken firmware */
104 if ((sal_revision == SAL_VERSION_CODE(49, 29))
105 && (sal_version == SAL_VERSION_CODE(49, 29)))
106 {
107 /*
108 * Old firmware for zx2000 prototypes have this weird version number,
109 * reset it to something sane.
110 */
111 sal_revision = SAL_VERSION_CODE(2, 8);
112 sal_version = SAL_VERSION_CODE(0, 0);
113 }
114}
115
116static void __init
117sal_desc_entry_point (void *p)
118{
119 struct ia64_sal_desc_entry_point *ep = p;
120 ia64_pal_handler_init(__va(ep->pal_proc));
121 ia64_sal_handler_init(__va(ep->sal_proc), __va(ep->gp));
122}
123
124#ifdef CONFIG_SMP
125static void __init
126set_smp_redirect (int flag)
127{
128#ifndef CONFIG_HOTPLUG_CPU
129 if (no_int_routing)
130 smp_int_redirect &= ~flag;
131 else
132 smp_int_redirect |= flag;
133#else
134 /*
135 * For CPU Hotplug we dont want to do any chipset supported
136 * interrupt redirection. The reason is this would require that
137 * All interrupts be stopped and hard bind the irq to a cpu.
138 * Later when the interrupt is fired we need to set the redir hint
139 * on again in the vector. This is cumbersome for something that the
140 * user mode irq balancer will solve anyways.
141 */
142 no_int_routing=1;
143 smp_int_redirect &= ~flag;
144#endif
145}
146#else
147#define set_smp_redirect(flag) do { } while (0)
148#endif
149
150static void __init
151sal_desc_platform_feature (void *p)
152{
153 struct ia64_sal_desc_platform_feature *pf = p;
154 sal_platform_features = pf->feature_mask;
155
156 printk(KERN_INFO "SAL Platform features:");
157 if (!sal_platform_features) {
158 printk(" None\n");
159 return;
160 }
161
162 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_BUS_LOCK)
163 printk(" BusLock");
164 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_IRQ_REDIR_HINT) {
165 printk(" IRQ_Redirection");
166 set_smp_redirect(SMP_IRQ_REDIRECTION);
167 }
168 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_IPI_REDIR_HINT) {
169 printk(" IPI_Redirection");
170 set_smp_redirect(SMP_IPI_REDIRECTION);
171 }
172 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_ITC_DRIFT)
173 printk(" ITC_Drift");
174 printk("\n");
175}
176
177#ifdef CONFIG_SMP
178static void __init
179sal_desc_ap_wakeup (void *p)
180{
181 struct ia64_sal_desc_ap_wakeup *ap = p;
182
183 switch (ap->mechanism) {
184 case IA64_SAL_AP_EXTERNAL_INT:
185 ap_wakeup_vector = ap->vector;
186 printk(KERN_INFO "SAL: AP wakeup using external interrupt "
187 "vector 0x%lx\n", ap_wakeup_vector);
188 break;
189 default:
190 printk(KERN_ERR "SAL: AP wakeup mechanism unsupported!\n");
191 break;
192 }
193}
194
195static void __init
196chk_nointroute_opt(void)
197{
198 char *cp;
199
200 for (cp = boot_command_line; *cp; ) {
201 if (memcmp(cp, "nointroute", 10) == 0) {
202 no_int_routing = 1;
203 printk ("no_int_routing on\n");
204 break;
205 } else {
206 while (*cp != ' ' && *cp)
207 ++cp;
208 while (*cp == ' ')
209 ++cp;
210 }
211 }
212}
213
214#else
215static void __init sal_desc_ap_wakeup(void *p) { }
216#endif
217
218/*
219 * HP rx5670 firmware polls for interrupts during SAL_CACHE_FLUSH by reading
220 * cr.ivr, but it never writes cr.eoi. This leaves any interrupt marked as
221 * "in-service" and masks other interrupts of equal or lower priority.
222 *
223 * HP internal defect reports: F1859, F2775, F3031.
224 */
225static int sal_cache_flush_drops_interrupts;
226
227static int __init
228force_pal_cache_flush(char *str)
229{
230 sal_cache_flush_drops_interrupts = 1;
231 return 0;
232}
233early_param("force_pal_cache_flush", force_pal_cache_flush);
234
235void __init
236check_sal_cache_flush (void)
237{
238 unsigned long flags;
239 int cpu;
240 u64 vector, cache_type = 3;
241 struct ia64_sal_retval isrv;
242
243 if (sal_cache_flush_drops_interrupts)
244 return;
245
246 cpu = get_cpu();
247 local_irq_save(flags);
248
249 /*
250 * Send ourselves a timer interrupt, wait until it's reported, and see
251 * if SAL_CACHE_FLUSH drops it.
252 */
253 ia64_send_ipi(cpu, IA64_TIMER_VECTOR, IA64_IPI_DM_INT, 0);
254
255 while (!ia64_get_irr(IA64_TIMER_VECTOR))
256 cpu_relax();
257
258 SAL_CALL(isrv, SAL_CACHE_FLUSH, cache_type, 0, 0, 0, 0, 0, 0);
259
260 if (isrv.status)
261 printk(KERN_ERR "SAL_CAL_FLUSH failed with %ld\n", isrv.status);
262
263 if (ia64_get_irr(IA64_TIMER_VECTOR)) {
264 vector = ia64_get_ivr();
265 ia64_eoi();
266 WARN_ON(vector != IA64_TIMER_VECTOR);
267 } else {
268 sal_cache_flush_drops_interrupts = 1;
269 printk(KERN_ERR "SAL: SAL_CACHE_FLUSH drops interrupts; "
270 "PAL_CACHE_FLUSH will be used instead\n");
271 ia64_eoi();
272 }
273
274 local_irq_restore(flags);
275 put_cpu();
276}
277
278s64
279ia64_sal_cache_flush (u64 cache_type)
280{
281 struct ia64_sal_retval isrv;
282
283 if (sal_cache_flush_drops_interrupts) {
284 unsigned long flags;
285 u64 progress;
286 s64 rc;
287
288 progress = 0;
289 local_irq_save(flags);
290 rc = ia64_pal_cache_flush(cache_type,
291 PAL_CACHE_FLUSH_INVALIDATE, &progress, NULL);
292 local_irq_restore(flags);
293 return rc;
294 }
295
296 SAL_CALL(isrv, SAL_CACHE_FLUSH, cache_type, 0, 0, 0, 0, 0, 0);
297 return isrv.status;
298}
299EXPORT_SYMBOL_GPL(ia64_sal_cache_flush);
300
301void __init
302ia64_sal_init (struct ia64_sal_systab *systab)
303{
304 char *p;
305 int i;
306
307 if (!systab) {
308 printk(KERN_WARNING "Hmm, no SAL System Table.\n");
309 return;
310 }
311
312 if (strncmp(systab->signature, "SST_", 4) != 0)
313 printk(KERN_ERR "bad signature in system table!");
314
315 check_versions(systab);
316#ifdef CONFIG_SMP
317 chk_nointroute_opt();
318#endif
319
320 /* revisions are coded in BCD, so %x does the job for us */
321 printk(KERN_INFO "SAL %x.%x: %.32s %.32s%sversion %x.%x\n",
322 SAL_MAJOR(sal_revision), SAL_MINOR(sal_revision),
323 systab->oem_id, systab->product_id,
324 systab->product_id[0] ? " " : "",
325 SAL_MAJOR(sal_version), SAL_MINOR(sal_version));
326
327 p = (char *) (systab + 1);
328 for (i = 0; i < systab->entry_count; i++) {
329 /*
330 * The first byte of each entry type contains the type
331 * descriptor.
332 */
333 switch (*p) {
334 case SAL_DESC_ENTRY_POINT:
335 sal_desc_entry_point(p);
336 break;
337 case SAL_DESC_PLATFORM_FEATURE:
338 sal_desc_platform_feature(p);
339 break;
340 case SAL_DESC_PTC:
341 ia64_ptc_domain_info = (ia64_sal_desc_ptc_t *)p;
342 break;
343 case SAL_DESC_AP_WAKEUP:
344 sal_desc_ap_wakeup(p);
345 break;
346 }
347 p += SAL_DESC_SIZE(*p);
348 }
349
350}
351
352int
353ia64_sal_oemcall(struct ia64_sal_retval *isrvp, u64 oemfunc, u64 arg1,
354 u64 arg2, u64 arg3, u64 arg4, u64 arg5, u64 arg6, u64 arg7)
355{
356 if (oemfunc < IA64_SAL_OEMFUNC_MIN || oemfunc > IA64_SAL_OEMFUNC_MAX)
357 return -1;
358 SAL_CALL(*isrvp, oemfunc, arg1, arg2, arg3, arg4, arg5, arg6, arg7);
359 return 0;
360}
361EXPORT_SYMBOL(ia64_sal_oemcall);
362
363int
364ia64_sal_oemcall_nolock(struct ia64_sal_retval *isrvp, u64 oemfunc, u64 arg1,
365 u64 arg2, u64 arg3, u64 arg4, u64 arg5, u64 arg6,
366 u64 arg7)
367{
368 if (oemfunc < IA64_SAL_OEMFUNC_MIN || oemfunc > IA64_SAL_OEMFUNC_MAX)
369 return -1;
370 SAL_CALL_NOLOCK(*isrvp, oemfunc, arg1, arg2, arg3, arg4, arg5, arg6,
371 arg7);
372 return 0;
373}
374EXPORT_SYMBOL(ia64_sal_oemcall_nolock);
375
376int
377ia64_sal_oemcall_reentrant(struct ia64_sal_retval *isrvp, u64 oemfunc,
378 u64 arg1, u64 arg2, u64 arg3, u64 arg4, u64 arg5,
379 u64 arg6, u64 arg7)
380{
381 if (oemfunc < IA64_SAL_OEMFUNC_MIN || oemfunc > IA64_SAL_OEMFUNC_MAX)
382 return -1;
383 SAL_CALL_REENTRANT(*isrvp, oemfunc, arg1, arg2, arg3, arg4, arg5, arg6,
384 arg7);
385 return 0;
386}
387EXPORT_SYMBOL(ia64_sal_oemcall_reentrant);
388
389long
390ia64_sal_freq_base (unsigned long which, unsigned long *ticks_per_second,
391 unsigned long *drift_info)
392{
393 struct ia64_sal_retval isrv;
394
395 SAL_CALL(isrv, SAL_FREQ_BASE, which, 0, 0, 0, 0, 0, 0);
396 *ticks_per_second = isrv.v0;
397 *drift_info = isrv.v1;
398 return isrv.status;
399}
400EXPORT_SYMBOL_GPL(ia64_sal_freq_base);
1/*
2 * System Abstraction Layer (SAL) interface routines.
3 *
4 * Copyright (C) 1998, 1999, 2001, 2003 Hewlett-Packard Co
5 * David Mosberger-Tang <davidm@hpl.hp.com>
6 * Copyright (C) 1999 VA Linux Systems
7 * Copyright (C) 1999 Walt Drummond <drummond@valinux.com>
8 */
9
10#include <linux/kernel.h>
11#include <linux/init.h>
12#include <linux/module.h>
13#include <linux/spinlock.h>
14#include <linux/string.h>
15
16#include <asm/delay.h>
17#include <asm/page.h>
18#include <asm/sal.h>
19#include <asm/pal.h>
20
21 __cacheline_aligned DEFINE_SPINLOCK(sal_lock);
22unsigned long sal_platform_features;
23
24unsigned short sal_revision;
25unsigned short sal_version;
26
27#define SAL_MAJOR(x) ((x) >> 8)
28#define SAL_MINOR(x) ((x) & 0xff)
29
30static struct {
31 void *addr; /* function entry point */
32 void *gpval; /* gp value to use */
33} pdesc;
34
35static long
36default_handler (void)
37{
38 return -1;
39}
40
41ia64_sal_handler ia64_sal = (ia64_sal_handler) default_handler;
42ia64_sal_desc_ptc_t *ia64_ptc_domain_info;
43
44const char *
45ia64_sal_strerror (long status)
46{
47 const char *str;
48 switch (status) {
49 case 0: str = "Call completed without error"; break;
50 case 1: str = "Effect a warm boot of the system to complete "
51 "the update"; break;
52 case -1: str = "Not implemented"; break;
53 case -2: str = "Invalid argument"; break;
54 case -3: str = "Call completed with error"; break;
55 case -4: str = "Virtual address not registered"; break;
56 case -5: str = "No information available"; break;
57 case -6: str = "Insufficient space to add the entry"; break;
58 case -7: str = "Invalid entry_addr value"; break;
59 case -8: str = "Invalid interrupt vector"; break;
60 case -9: str = "Requested memory not available"; break;
61 case -10: str = "Unable to write to the NVM device"; break;
62 case -11: str = "Invalid partition type specified"; break;
63 case -12: str = "Invalid NVM_Object id specified"; break;
64 case -13: str = "NVM_Object already has the maximum number "
65 "of partitions"; break;
66 case -14: str = "Insufficient space in partition for the "
67 "requested write sub-function"; break;
68 case -15: str = "Insufficient data buffer space for the "
69 "requested read record sub-function"; break;
70 case -16: str = "Scratch buffer required for the write/delete "
71 "sub-function"; break;
72 case -17: str = "Insufficient space in the NVM_Object for the "
73 "requested create sub-function"; break;
74 case -18: str = "Invalid value specified in the partition_rec "
75 "argument"; break;
76 case -19: str = "Record oriented I/O not supported for this "
77 "partition"; break;
78 case -20: str = "Bad format of record to be written or "
79 "required keyword variable not "
80 "specified"; break;
81 default: str = "Unknown SAL status code"; break;
82 }
83 return str;
84}
85
86void __init
87ia64_sal_handler_init (void *entry_point, void *gpval)
88{
89 /* fill in the SAL procedure descriptor and point ia64_sal to it: */
90 pdesc.addr = entry_point;
91 pdesc.gpval = gpval;
92 ia64_sal = (ia64_sal_handler) &pdesc;
93}
94
95static void __init
96check_versions (struct ia64_sal_systab *systab)
97{
98 sal_revision = (systab->sal_rev_major << 8) | systab->sal_rev_minor;
99 sal_version = (systab->sal_b_rev_major << 8) | systab->sal_b_rev_minor;
100
101 /* Check for broken firmware */
102 if ((sal_revision == SAL_VERSION_CODE(49, 29))
103 && (sal_version == SAL_VERSION_CODE(49, 29)))
104 {
105 /*
106 * Old firmware for zx2000 prototypes have this weird version number,
107 * reset it to something sane.
108 */
109 sal_revision = SAL_VERSION_CODE(2, 8);
110 sal_version = SAL_VERSION_CODE(0, 0);
111 }
112
113 if (ia64_platform_is("sn2") && (sal_revision == SAL_VERSION_CODE(2, 9)))
114 /*
115 * SGI Altix has hard-coded version 2.9 in their prom
116 * but they actually implement 3.2, so let's fix it here.
117 */
118 sal_revision = SAL_VERSION_CODE(3, 2);
119}
120
121static void __init
122sal_desc_entry_point (void *p)
123{
124 struct ia64_sal_desc_entry_point *ep = p;
125 ia64_pal_handler_init(__va(ep->pal_proc));
126 ia64_sal_handler_init(__va(ep->sal_proc), __va(ep->gp));
127}
128
129#ifdef CONFIG_SMP
130static void __init
131set_smp_redirect (int flag)
132{
133#ifndef CONFIG_HOTPLUG_CPU
134 if (no_int_routing)
135 smp_int_redirect &= ~flag;
136 else
137 smp_int_redirect |= flag;
138#else
139 /*
140 * For CPU Hotplug we dont want to do any chipset supported
141 * interrupt redirection. The reason is this would require that
142 * All interrupts be stopped and hard bind the irq to a cpu.
143 * Later when the interrupt is fired we need to set the redir hint
144 * on again in the vector. This is cumbersome for something that the
145 * user mode irq balancer will solve anyways.
146 */
147 no_int_routing=1;
148 smp_int_redirect &= ~flag;
149#endif
150}
151#else
152#define set_smp_redirect(flag) do { } while (0)
153#endif
154
155static void __init
156sal_desc_platform_feature (void *p)
157{
158 struct ia64_sal_desc_platform_feature *pf = p;
159 sal_platform_features = pf->feature_mask;
160
161 printk(KERN_INFO "SAL Platform features:");
162 if (!sal_platform_features) {
163 printk(" None\n");
164 return;
165 }
166
167 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_BUS_LOCK)
168 printk(" BusLock");
169 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_IRQ_REDIR_HINT) {
170 printk(" IRQ_Redirection");
171 set_smp_redirect(SMP_IRQ_REDIRECTION);
172 }
173 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_IPI_REDIR_HINT) {
174 printk(" IPI_Redirection");
175 set_smp_redirect(SMP_IPI_REDIRECTION);
176 }
177 if (sal_platform_features & IA64_SAL_PLATFORM_FEATURE_ITC_DRIFT)
178 printk(" ITC_Drift");
179 printk("\n");
180}
181
182#ifdef CONFIG_SMP
183static void __init
184sal_desc_ap_wakeup (void *p)
185{
186 struct ia64_sal_desc_ap_wakeup *ap = p;
187
188 switch (ap->mechanism) {
189 case IA64_SAL_AP_EXTERNAL_INT:
190 ap_wakeup_vector = ap->vector;
191 printk(KERN_INFO "SAL: AP wakeup using external interrupt "
192 "vector 0x%lx\n", ap_wakeup_vector);
193 break;
194 default:
195 printk(KERN_ERR "SAL: AP wakeup mechanism unsupported!\n");
196 break;
197 }
198}
199
200static void __init
201chk_nointroute_opt(void)
202{
203 char *cp;
204
205 for (cp = boot_command_line; *cp; ) {
206 if (memcmp(cp, "nointroute", 10) == 0) {
207 no_int_routing = 1;
208 printk ("no_int_routing on\n");
209 break;
210 } else {
211 while (*cp != ' ' && *cp)
212 ++cp;
213 while (*cp == ' ')
214 ++cp;
215 }
216 }
217}
218
219#else
220static void __init sal_desc_ap_wakeup(void *p) { }
221#endif
222
223/*
224 * HP rx5670 firmware polls for interrupts during SAL_CACHE_FLUSH by reading
225 * cr.ivr, but it never writes cr.eoi. This leaves any interrupt marked as
226 * "in-service" and masks other interrupts of equal or lower priority.
227 *
228 * HP internal defect reports: F1859, F2775, F3031.
229 */
230static int sal_cache_flush_drops_interrupts;
231
232static int __init
233force_pal_cache_flush(char *str)
234{
235 sal_cache_flush_drops_interrupts = 1;
236 return 0;
237}
238early_param("force_pal_cache_flush", force_pal_cache_flush);
239
240void __init
241check_sal_cache_flush (void)
242{
243 unsigned long flags;
244 int cpu;
245 u64 vector, cache_type = 3;
246 struct ia64_sal_retval isrv;
247
248 if (sal_cache_flush_drops_interrupts)
249 return;
250
251 cpu = get_cpu();
252 local_irq_save(flags);
253
254 /*
255 * Send ourselves a timer interrupt, wait until it's reported, and see
256 * if SAL_CACHE_FLUSH drops it.
257 */
258 platform_send_ipi(cpu, IA64_TIMER_VECTOR, IA64_IPI_DM_INT, 0);
259
260 while (!ia64_get_irr(IA64_TIMER_VECTOR))
261 cpu_relax();
262
263 SAL_CALL(isrv, SAL_CACHE_FLUSH, cache_type, 0, 0, 0, 0, 0, 0);
264
265 if (isrv.status)
266 printk(KERN_ERR "SAL_CAL_FLUSH failed with %ld\n", isrv.status);
267
268 if (ia64_get_irr(IA64_TIMER_VECTOR)) {
269 vector = ia64_get_ivr();
270 ia64_eoi();
271 WARN_ON(vector != IA64_TIMER_VECTOR);
272 } else {
273 sal_cache_flush_drops_interrupts = 1;
274 printk(KERN_ERR "SAL: SAL_CACHE_FLUSH drops interrupts; "
275 "PAL_CACHE_FLUSH will be used instead\n");
276 ia64_eoi();
277 }
278
279 local_irq_restore(flags);
280 put_cpu();
281}
282
283s64
284ia64_sal_cache_flush (u64 cache_type)
285{
286 struct ia64_sal_retval isrv;
287
288 if (sal_cache_flush_drops_interrupts) {
289 unsigned long flags;
290 u64 progress;
291 s64 rc;
292
293 progress = 0;
294 local_irq_save(flags);
295 rc = ia64_pal_cache_flush(cache_type,
296 PAL_CACHE_FLUSH_INVALIDATE, &progress, NULL);
297 local_irq_restore(flags);
298 return rc;
299 }
300
301 SAL_CALL(isrv, SAL_CACHE_FLUSH, cache_type, 0, 0, 0, 0, 0, 0);
302 return isrv.status;
303}
304EXPORT_SYMBOL_GPL(ia64_sal_cache_flush);
305
306void __init
307ia64_sal_init (struct ia64_sal_systab *systab)
308{
309 char *p;
310 int i;
311
312 if (!systab) {
313 printk(KERN_WARNING "Hmm, no SAL System Table.\n");
314 return;
315 }
316
317 if (strncmp(systab->signature, "SST_", 4) != 0)
318 printk(KERN_ERR "bad signature in system table!");
319
320 check_versions(systab);
321#ifdef CONFIG_SMP
322 chk_nointroute_opt();
323#endif
324
325 /* revisions are coded in BCD, so %x does the job for us */
326 printk(KERN_INFO "SAL %x.%x: %.32s %.32s%sversion %x.%x\n",
327 SAL_MAJOR(sal_revision), SAL_MINOR(sal_revision),
328 systab->oem_id, systab->product_id,
329 systab->product_id[0] ? " " : "",
330 SAL_MAJOR(sal_version), SAL_MINOR(sal_version));
331
332 p = (char *) (systab + 1);
333 for (i = 0; i < systab->entry_count; i++) {
334 /*
335 * The first byte of each entry type contains the type
336 * descriptor.
337 */
338 switch (*p) {
339 case SAL_DESC_ENTRY_POINT:
340 sal_desc_entry_point(p);
341 break;
342 case SAL_DESC_PLATFORM_FEATURE:
343 sal_desc_platform_feature(p);
344 break;
345 case SAL_DESC_PTC:
346 ia64_ptc_domain_info = (ia64_sal_desc_ptc_t *)p;
347 break;
348 case SAL_DESC_AP_WAKEUP:
349 sal_desc_ap_wakeup(p);
350 break;
351 }
352 p += SAL_DESC_SIZE(*p);
353 }
354
355}
356
357int
358ia64_sal_oemcall(struct ia64_sal_retval *isrvp, u64 oemfunc, u64 arg1,
359 u64 arg2, u64 arg3, u64 arg4, u64 arg5, u64 arg6, u64 arg7)
360{
361 if (oemfunc < IA64_SAL_OEMFUNC_MIN || oemfunc > IA64_SAL_OEMFUNC_MAX)
362 return -1;
363 SAL_CALL(*isrvp, oemfunc, arg1, arg2, arg3, arg4, arg5, arg6, arg7);
364 return 0;
365}
366EXPORT_SYMBOL(ia64_sal_oemcall);
367
368int
369ia64_sal_oemcall_nolock(struct ia64_sal_retval *isrvp, u64 oemfunc, u64 arg1,
370 u64 arg2, u64 arg3, u64 arg4, u64 arg5, u64 arg6,
371 u64 arg7)
372{
373 if (oemfunc < IA64_SAL_OEMFUNC_MIN || oemfunc > IA64_SAL_OEMFUNC_MAX)
374 return -1;
375 SAL_CALL_NOLOCK(*isrvp, oemfunc, arg1, arg2, arg3, arg4, arg5, arg6,
376 arg7);
377 return 0;
378}
379EXPORT_SYMBOL(ia64_sal_oemcall_nolock);
380
381int
382ia64_sal_oemcall_reentrant(struct ia64_sal_retval *isrvp, u64 oemfunc,
383 u64 arg1, u64 arg2, u64 arg3, u64 arg4, u64 arg5,
384 u64 arg6, u64 arg7)
385{
386 if (oemfunc < IA64_SAL_OEMFUNC_MIN || oemfunc > IA64_SAL_OEMFUNC_MAX)
387 return -1;
388 SAL_CALL_REENTRANT(*isrvp, oemfunc, arg1, arg2, arg3, arg4, arg5, arg6,
389 arg7);
390 return 0;
391}
392EXPORT_SYMBOL(ia64_sal_oemcall_reentrant);
393
394long
395ia64_sal_freq_base (unsigned long which, unsigned long *ticks_per_second,
396 unsigned long *drift_info)
397{
398 struct ia64_sal_retval isrv;
399
400 SAL_CALL(isrv, SAL_FREQ_BASE, which, 0, 0, 0, 0, 0, 0);
401 *ticks_per_second = isrv.v0;
402 *drift_info = isrv.v1;
403 return isrv.status;
404}
405EXPORT_SYMBOL_GPL(ia64_sal_freq_base);