Merge branch 'clockevents/fixes' of git://git.linaro.org/people/daniel.lezcano/linux...
[linux-drm-fsl-dcu.git] / drivers / s390 / char / sclp_cmd.c
1 /*
2  * Copyright IBM Corp. 2007,2012
3  *
4  * Author(s): Heiko Carstens <heiko.carstens@de.ibm.com>,
5  *            Peter Oberparleiter <peter.oberparleiter@de.ibm.com>
6  */
7
8 #define KMSG_COMPONENT "sclp_cmd"
9 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
10
11 #include <linux/completion.h>
12 #include <linux/init.h>
13 #include <linux/errno.h>
14 #include <linux/err.h>
15 #include <linux/export.h>
16 #include <linux/slab.h>
17 #include <linux/string.h>
18 #include <linux/mm.h>
19 #include <linux/mmzone.h>
20 #include <linux/memory.h>
21 #include <linux/module.h>
22 #include <linux/platform_device.h>
23 #include <asm/ctl_reg.h>
24 #include <asm/chpid.h>
25 #include <asm/setup.h>
26 #include <asm/page.h>
27 #include <asm/sclp.h>
28
29 #include "sclp.h"
30
31 static void sclp_sync_callback(struct sclp_req *req, void *data)
32 {
33         struct completion *completion = data;
34
35         complete(completion);
36 }
37
38 int sclp_sync_request(sclp_cmdw_t cmd, void *sccb)
39 {
40         struct completion completion;
41         struct sclp_req *request;
42         int rc;
43
44         request = kzalloc(sizeof(*request), GFP_KERNEL);
45         if (!request)
46                 return -ENOMEM;
47         request->command = cmd;
48         request->sccb = sccb;
49         request->status = SCLP_REQ_FILLED;
50         request->callback = sclp_sync_callback;
51         request->callback_data = &completion;
52         init_completion(&completion);
53
54         /* Perform sclp request. */
55         rc = sclp_add_request(request);
56         if (rc)
57                 goto out;
58         wait_for_completion(&completion);
59
60         /* Check response. */
61         if (request->status != SCLP_REQ_DONE) {
62                 pr_warning("sync request failed (cmd=0x%08x, "
63                            "status=0x%02x)\n", cmd, request->status);
64                 rc = -EIO;
65         }
66 out:
67         kfree(request);
68         return rc;
69 }
70
71 /*
72  * CPU configuration related functions.
73  */
74
75 #define SCLP_CMDW_READ_CPU_INFO         0x00010001
76 #define SCLP_CMDW_CONFIGURE_CPU         0x00110001
77 #define SCLP_CMDW_DECONFIGURE_CPU       0x00100001
78
79 struct read_cpu_info_sccb {
80         struct  sccb_header header;
81         u16     nr_configured;
82         u16     offset_configured;
83         u16     nr_standby;
84         u16     offset_standby;
85         u8      reserved[4096 - 16];
86 } __attribute__((packed, aligned(PAGE_SIZE)));
87
88 static void sclp_fill_cpu_info(struct sclp_cpu_info *info,
89                                struct read_cpu_info_sccb *sccb)
90 {
91         char *page = (char *) sccb;
92
93         memset(info, 0, sizeof(*info));
94         info->configured = sccb->nr_configured;
95         info->standby = sccb->nr_standby;
96         info->combined = sccb->nr_configured + sccb->nr_standby;
97         info->has_cpu_type = sclp_fac84 & 0x1;
98         memcpy(&info->cpu, page + sccb->offset_configured,
99                info->combined * sizeof(struct sclp_cpu_entry));
100 }
101
102 int sclp_get_cpu_info(struct sclp_cpu_info *info)
103 {
104         int rc;
105         struct read_cpu_info_sccb *sccb;
106
107         if (!SCLP_HAS_CPU_INFO)
108                 return -EOPNOTSUPP;
109         sccb = (void *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
110         if (!sccb)
111                 return -ENOMEM;
112         sccb->header.length = sizeof(*sccb);
113         rc = sclp_sync_request(SCLP_CMDW_READ_CPU_INFO, sccb);
114         if (rc)
115                 goto out;
116         if (sccb->header.response_code != 0x0010) {
117                 pr_warning("readcpuinfo failed (response=0x%04x)\n",
118                            sccb->header.response_code);
119                 rc = -EIO;
120                 goto out;
121         }
122         sclp_fill_cpu_info(info, sccb);
123 out:
124         free_page((unsigned long) sccb);
125         return rc;
126 }
127
128 struct cpu_configure_sccb {
129         struct sccb_header header;
130 } __attribute__((packed, aligned(8)));
131
132 static int do_cpu_configure(sclp_cmdw_t cmd)
133 {
134         struct cpu_configure_sccb *sccb;
135         int rc;
136
137         if (!SCLP_HAS_CPU_RECONFIG)
138                 return -EOPNOTSUPP;
139         /*
140          * This is not going to cross a page boundary since we force
141          * kmalloc to have a minimum alignment of 8 bytes on s390.
142          */
143         sccb = kzalloc(sizeof(*sccb), GFP_KERNEL | GFP_DMA);
144         if (!sccb)
145                 return -ENOMEM;
146         sccb->header.length = sizeof(*sccb);
147         rc = sclp_sync_request(cmd, sccb);
148         if (rc)
149                 goto out;
150         switch (sccb->header.response_code) {
151         case 0x0020:
152         case 0x0120:
153                 break;
154         default:
155                 pr_warning("configure cpu failed (cmd=0x%08x, "
156                            "response=0x%04x)\n", cmd,
157                            sccb->header.response_code);
158                 rc = -EIO;
159                 break;
160         }
161 out:
162         kfree(sccb);
163         return rc;
164 }
165
166 int sclp_cpu_configure(u8 cpu)
167 {
168         return do_cpu_configure(SCLP_CMDW_CONFIGURE_CPU | cpu << 8);
169 }
170
171 int sclp_cpu_deconfigure(u8 cpu)
172 {
173         return do_cpu_configure(SCLP_CMDW_DECONFIGURE_CPU | cpu << 8);
174 }
175
176 #ifdef CONFIG_MEMORY_HOTPLUG
177
178 static DEFINE_MUTEX(sclp_mem_mutex);
179 static LIST_HEAD(sclp_mem_list);
180 static u8 sclp_max_storage_id;
181 static unsigned long sclp_storage_ids[256 / BITS_PER_LONG];
182 static int sclp_mem_state_changed;
183
184 struct memory_increment {
185         struct list_head list;
186         u16 rn;
187         int standby;
188 };
189
190 struct assign_storage_sccb {
191         struct sccb_header header;
192         u16 rn;
193 } __packed;
194
195 int arch_get_memory_phys_device(unsigned long start_pfn)
196 {
197         if (!sclp_rzm)
198                 return 0;
199         return PFN_PHYS(start_pfn) >> ilog2(sclp_rzm);
200 }
201
202 static unsigned long long rn2addr(u16 rn)
203 {
204         return (unsigned long long) (rn - 1) * sclp_rzm;
205 }
206
207 static int do_assign_storage(sclp_cmdw_t cmd, u16 rn)
208 {
209         struct assign_storage_sccb *sccb;
210         int rc;
211
212         sccb = (void *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
213         if (!sccb)
214                 return -ENOMEM;
215         sccb->header.length = PAGE_SIZE;
216         sccb->rn = rn;
217         rc = sclp_sync_request(cmd, sccb);
218         if (rc)
219                 goto out;
220         switch (sccb->header.response_code) {
221         case 0x0020:
222         case 0x0120:
223                 break;
224         default:
225                 pr_warning("assign storage failed (cmd=0x%08x, "
226                            "response=0x%04x, rn=0x%04x)\n", cmd,
227                            sccb->header.response_code, rn);
228                 rc = -EIO;
229                 break;
230         }
231 out:
232         free_page((unsigned long) sccb);
233         return rc;
234 }
235
236 static int sclp_assign_storage(u16 rn)
237 {
238         unsigned long long start;
239         int rc;
240
241         rc = do_assign_storage(0x000d0001, rn);
242         if (rc)
243                 return rc;
244         start = rn2addr(rn);
245         storage_key_init_range(start, start + sclp_rzm);
246         return 0;
247 }
248
249 static int sclp_unassign_storage(u16 rn)
250 {
251         return do_assign_storage(0x000c0001, rn);
252 }
253
254 struct attach_storage_sccb {
255         struct sccb_header header;
256         u16 :16;
257         u16 assigned;
258         u32 :32;
259         u32 entries[0];
260 } __packed;
261
262 static int sclp_attach_storage(u8 id)
263 {
264         struct attach_storage_sccb *sccb;
265         int rc;
266         int i;
267
268         sccb = (void *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
269         if (!sccb)
270                 return -ENOMEM;
271         sccb->header.length = PAGE_SIZE;
272         rc = sclp_sync_request(0x00080001 | id << 8, sccb);
273         if (rc)
274                 goto out;
275         switch (sccb->header.response_code) {
276         case 0x0020:
277                 set_bit(id, sclp_storage_ids);
278                 for (i = 0; i < sccb->assigned; i++) {
279                         if (sccb->entries[i])
280                                 sclp_unassign_storage(sccb->entries[i] >> 16);
281                 }
282                 break;
283         default:
284                 rc = -EIO;
285                 break;
286         }
287 out:
288         free_page((unsigned long) sccb);
289         return rc;
290 }
291
292 static int sclp_mem_change_state(unsigned long start, unsigned long size,
293                                  int online)
294 {
295         struct memory_increment *incr;
296         unsigned long long istart;
297         int rc = 0;
298
299         list_for_each_entry(incr, &sclp_mem_list, list) {
300                 istart = rn2addr(incr->rn);
301                 if (start + size - 1 < istart)
302                         break;
303                 if (start > istart + sclp_rzm - 1)
304                         continue;
305                 if (online)
306                         rc |= sclp_assign_storage(incr->rn);
307                 else
308                         sclp_unassign_storage(incr->rn);
309         }
310         return rc ? -EIO : 0;
311 }
312
313 static int sclp_mem_notifier(struct notifier_block *nb,
314                              unsigned long action, void *data)
315 {
316         unsigned long start, size;
317         struct memory_notify *arg;
318         unsigned char id;
319         int rc = 0;
320
321         arg = data;
322         start = arg->start_pfn << PAGE_SHIFT;
323         size = arg->nr_pages << PAGE_SHIFT;
324         mutex_lock(&sclp_mem_mutex);
325         for_each_clear_bit(id, sclp_storage_ids, sclp_max_storage_id + 1)
326                 sclp_attach_storage(id);
327         switch (action) {
328         case MEM_ONLINE:
329         case MEM_GOING_OFFLINE:
330         case MEM_CANCEL_OFFLINE:
331                 break;
332         case MEM_GOING_ONLINE:
333                 rc = sclp_mem_change_state(start, size, 1);
334                 break;
335         case MEM_CANCEL_ONLINE:
336                 sclp_mem_change_state(start, size, 0);
337                 break;
338         case MEM_OFFLINE:
339                 sclp_mem_change_state(start, size, 0);
340                 break;
341         default:
342                 rc = -EINVAL;
343                 break;
344         }
345         if (!rc)
346                 sclp_mem_state_changed = 1;
347         mutex_unlock(&sclp_mem_mutex);
348         return rc ? NOTIFY_BAD : NOTIFY_OK;
349 }
350
351 static struct notifier_block sclp_mem_nb = {
352         .notifier_call = sclp_mem_notifier,
353 };
354
355 static void __init add_memory_merged(u16 rn)
356 {
357         static u16 first_rn, num;
358         unsigned long long start, size;
359
360         if (rn && first_rn && (first_rn + num == rn)) {
361                 num++;
362                 return;
363         }
364         if (!first_rn)
365                 goto skip_add;
366         start = rn2addr(first_rn);
367         size = (unsigned long long) num * sclp_rzm;
368         if (start >= VMEM_MAX_PHYS)
369                 goto skip_add;
370         if (start + size > VMEM_MAX_PHYS)
371                 size = VMEM_MAX_PHYS - start;
372         if (memory_end_set && (start >= memory_end))
373                 goto skip_add;
374         if (memory_end_set && (start + size > memory_end))
375                 size = memory_end - start;
376         add_memory(0, start, size);
377 skip_add:
378         first_rn = rn;
379         num = 1;
380 }
381
382 static void __init sclp_add_standby_memory(void)
383 {
384         struct memory_increment *incr;
385
386         list_for_each_entry(incr, &sclp_mem_list, list)
387                 if (incr->standby)
388                         add_memory_merged(incr->rn);
389         add_memory_merged(0);
390 }
391
392 static void __init insert_increment(u16 rn, int standby, int assigned)
393 {
394         struct memory_increment *incr, *new_incr;
395         struct list_head *prev;
396         u16 last_rn;
397
398         new_incr = kzalloc(sizeof(*new_incr), GFP_KERNEL);
399         if (!new_incr)
400                 return;
401         new_incr->rn = rn;
402         new_incr->standby = standby;
403         last_rn = 0;
404         prev = &sclp_mem_list;
405         list_for_each_entry(incr, &sclp_mem_list, list) {
406                 if (assigned && incr->rn > rn)
407                         break;
408                 if (!assigned && incr->rn - last_rn > 1)
409                         break;
410                 last_rn = incr->rn;
411                 prev = &incr->list;
412         }
413         if (!assigned)
414                 new_incr->rn = last_rn + 1;
415         if (new_incr->rn > sclp_rnmax) {
416                 kfree(new_incr);
417                 return;
418         }
419         list_add(&new_incr->list, prev);
420 }
421
422 static int sclp_mem_freeze(struct device *dev)
423 {
424         if (!sclp_mem_state_changed)
425                 return 0;
426         pr_err("Memory hotplug state changed, suspend refused.\n");
427         return -EPERM;
428 }
429
430 struct read_storage_sccb {
431         struct sccb_header header;
432         u16 max_id;
433         u16 assigned;
434         u16 standby;
435         u16 :16;
436         u32 entries[0];
437 } __packed;
438
439 static const struct dev_pm_ops sclp_mem_pm_ops = {
440         .freeze         = sclp_mem_freeze,
441 };
442
443 static struct platform_driver sclp_mem_pdrv = {
444         .driver = {
445                 .name   = "sclp_mem",
446                 .pm     = &sclp_mem_pm_ops,
447         },
448 };
449
450 static int __init sclp_detect_standby_memory(void)
451 {
452         struct platform_device *sclp_pdev;
453         struct read_storage_sccb *sccb;
454         int i, id, assigned, rc;
455
456         if (OLDMEM_BASE) /* No standby memory in kdump mode */
457                 return 0;
458         if (!sclp_early_read_info_sccb_valid)
459                 return 0;
460         if ((sclp_facilities & 0xe00000000000ULL) != 0xe00000000000ULL)
461                 return 0;
462         rc = -ENOMEM;
463         sccb = (void *) __get_free_page(GFP_KERNEL | GFP_DMA);
464         if (!sccb)
465                 goto out;
466         assigned = 0;
467         for (id = 0; id <= sclp_max_storage_id; id++) {
468                 memset(sccb, 0, PAGE_SIZE);
469                 sccb->header.length = PAGE_SIZE;
470                 rc = sclp_sync_request(0x00040001 | id << 8, sccb);
471                 if (rc)
472                         goto out;
473                 switch (sccb->header.response_code) {
474                 case 0x0010:
475                         set_bit(id, sclp_storage_ids);
476                         for (i = 0; i < sccb->assigned; i++) {
477                                 if (!sccb->entries[i])
478                                         continue;
479                                 assigned++;
480                                 insert_increment(sccb->entries[i] >> 16, 0, 1);
481                         }
482                         break;
483                 case 0x0310:
484                         break;
485                 case 0x0410:
486                         for (i = 0; i < sccb->assigned; i++) {
487                                 if (!sccb->entries[i])
488                                         continue;
489                                 assigned++;
490                                 insert_increment(sccb->entries[i] >> 16, 1, 1);
491                         }
492                         break;
493                 default:
494                         rc = -EIO;
495                         break;
496                 }
497                 if (!rc)
498                         sclp_max_storage_id = sccb->max_id;
499         }
500         if (rc || list_empty(&sclp_mem_list))
501                 goto out;
502         for (i = 1; i <= sclp_rnmax - assigned; i++)
503                 insert_increment(0, 1, 0);
504         rc = register_memory_notifier(&sclp_mem_nb);
505         if (rc)
506                 goto out;
507         rc = platform_driver_register(&sclp_mem_pdrv);
508         if (rc)
509                 goto out;
510         sclp_pdev = platform_device_register_simple("sclp_mem", -1, NULL, 0);
511         rc = PTR_RET(sclp_pdev);
512         if (rc)
513                 goto out_driver;
514         sclp_add_standby_memory();
515         goto out;
516 out_driver:
517         platform_driver_unregister(&sclp_mem_pdrv);
518 out:
519         free_page((unsigned long) sccb);
520         return rc;
521 }
522 __initcall(sclp_detect_standby_memory);
523
524 #endif /* CONFIG_MEMORY_HOTPLUG */
525
526 /*
527  * PCI I/O adapter configuration related functions.
528  */
529 #define SCLP_CMDW_CONFIGURE_PCI                 0x001a0001
530 #define SCLP_CMDW_DECONFIGURE_PCI               0x001b0001
531
532 #define SCLP_RECONFIG_PCI_ATPYE                 2
533
534 struct pci_cfg_sccb {
535         struct sccb_header header;
536         u8 atype;               /* adapter type */
537         u8 reserved1;
538         u16 reserved2;
539         u32 aid;                /* adapter identifier */
540 } __packed;
541
542 static int do_pci_configure(sclp_cmdw_t cmd, u32 fid)
543 {
544         struct pci_cfg_sccb *sccb;
545         int rc;
546
547         if (!SCLP_HAS_PCI_RECONFIG)
548                 return -EOPNOTSUPP;
549
550         sccb = (struct pci_cfg_sccb *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
551         if (!sccb)
552                 return -ENOMEM;
553
554         sccb->header.length = PAGE_SIZE;
555         sccb->atype = SCLP_RECONFIG_PCI_ATPYE;
556         sccb->aid = fid;
557         rc = sclp_sync_request(cmd, sccb);
558         if (rc)
559                 goto out;
560         switch (sccb->header.response_code) {
561         case 0x0020:
562         case 0x0120:
563                 break;
564         default:
565                 pr_warn("configure PCI I/O adapter failed: cmd=0x%08x  response=0x%04x\n",
566                         cmd, sccb->header.response_code);
567                 rc = -EIO;
568                 break;
569         }
570 out:
571         free_page((unsigned long) sccb);
572         return rc;
573 }
574
575 int sclp_pci_configure(u32 fid)
576 {
577         return do_pci_configure(SCLP_CMDW_CONFIGURE_PCI, fid);
578 }
579 EXPORT_SYMBOL(sclp_pci_configure);
580
581 int sclp_pci_deconfigure(u32 fid)
582 {
583         return do_pci_configure(SCLP_CMDW_DECONFIGURE_PCI, fid);
584 }
585 EXPORT_SYMBOL(sclp_pci_deconfigure);
586
587 /*
588  * Channel path configuration related functions.
589  */
590
591 #define SCLP_CMDW_CONFIGURE_CHPATH              0x000f0001
592 #define SCLP_CMDW_DECONFIGURE_CHPATH            0x000e0001
593 #define SCLP_CMDW_READ_CHPATH_INFORMATION       0x00030001
594
595 struct chp_cfg_sccb {
596         struct sccb_header header;
597         u8 ccm;
598         u8 reserved[6];
599         u8 cssid;
600 } __attribute__((packed));
601
602 static int do_chp_configure(sclp_cmdw_t cmd)
603 {
604         struct chp_cfg_sccb *sccb;
605         int rc;
606
607         if (!SCLP_HAS_CHP_RECONFIG)
608                 return -EOPNOTSUPP;
609         /* Prepare sccb. */
610         sccb = (struct chp_cfg_sccb *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
611         if (!sccb)
612                 return -ENOMEM;
613         sccb->header.length = sizeof(*sccb);
614         rc = sclp_sync_request(cmd, sccb);
615         if (rc)
616                 goto out;
617         switch (sccb->header.response_code) {
618         case 0x0020:
619         case 0x0120:
620         case 0x0440:
621         case 0x0450:
622                 break;
623         default:
624                 pr_warning("configure channel-path failed "
625                            "(cmd=0x%08x, response=0x%04x)\n", cmd,
626                            sccb->header.response_code);
627                 rc = -EIO;
628                 break;
629         }
630 out:
631         free_page((unsigned long) sccb);
632         return rc;
633 }
634
635 /**
636  * sclp_chp_configure - perform configure channel-path sclp command
637  * @chpid: channel-path ID
638  *
639  * Perform configure channel-path command sclp command for specified chpid.
640  * Return 0 after command successfully finished, non-zero otherwise.
641  */
642 int sclp_chp_configure(struct chp_id chpid)
643 {
644         return do_chp_configure(SCLP_CMDW_CONFIGURE_CHPATH | chpid.id << 8);
645 }
646
647 /**
648  * sclp_chp_deconfigure - perform deconfigure channel-path sclp command
649  * @chpid: channel-path ID
650  *
651  * Perform deconfigure channel-path command sclp command for specified chpid
652  * and wait for completion. On success return 0. Return non-zero otherwise.
653  */
654 int sclp_chp_deconfigure(struct chp_id chpid)
655 {
656         return do_chp_configure(SCLP_CMDW_DECONFIGURE_CHPATH | chpid.id << 8);
657 }
658
659 struct chp_info_sccb {
660         struct sccb_header header;
661         u8 recognized[SCLP_CHP_INFO_MASK_SIZE];
662         u8 standby[SCLP_CHP_INFO_MASK_SIZE];
663         u8 configured[SCLP_CHP_INFO_MASK_SIZE];
664         u8 ccm;
665         u8 reserved[6];
666         u8 cssid;
667 } __attribute__((packed));
668
669 /**
670  * sclp_chp_read_info - perform read channel-path information sclp command
671  * @info: resulting channel-path information data
672  *
673  * Perform read channel-path information sclp command and wait for completion.
674  * On success, store channel-path information in @info and return 0. Return
675  * non-zero otherwise.
676  */
677 int sclp_chp_read_info(struct sclp_chp_info *info)
678 {
679         struct chp_info_sccb *sccb;
680         int rc;
681
682         if (!SCLP_HAS_CHP_INFO)
683                 return -EOPNOTSUPP;
684         /* Prepare sccb. */
685         sccb = (struct chp_info_sccb *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
686         if (!sccb)
687                 return -ENOMEM;
688         sccb->header.length = sizeof(*sccb);
689         rc = sclp_sync_request(SCLP_CMDW_READ_CHPATH_INFORMATION, sccb);
690         if (rc)
691                 goto out;
692         if (sccb->header.response_code != 0x0010) {
693                 pr_warning("read channel-path info failed "
694                            "(response=0x%04x)\n", sccb->header.response_code);
695                 rc = -EIO;
696                 goto out;
697         }
698         memcpy(info->recognized, sccb->recognized, SCLP_CHP_INFO_MASK_SIZE);
699         memcpy(info->standby, sccb->standby, SCLP_CHP_INFO_MASK_SIZE);
700         memcpy(info->configured, sccb->configured, SCLP_CHP_INFO_MASK_SIZE);
701 out:
702         free_page((unsigned long) sccb);
703         return rc;
704 }