1 /* ds.c: Domain Services driver for Logical Domains
3 * Copyright (C) 2007 David S. Miller <davem@davemloft.net>
6 #include <linux/kernel.h>
7 #include <linux/module.h>
8 #include <linux/types.h>
9 #include <linux/module.h>
10 #include <linux/string.h>
11 #include <linux/slab.h>
12 #include <linux/sched.h>
13 #include <linux/delay.h>
14 #include <linux/mutex.h>
18 #include <asm/power.h>
19 #include <asm/mdesc.h>
21 #define DRV_MODULE_NAME "ds"
22 #define PFX DRV_MODULE_NAME ": "
23 #define DRV_MODULE_VERSION "1.0"
24 #define DRV_MODULE_RELDATE "Jul 11, 2007"
26 static char version[] __devinitdata =
27 DRV_MODULE_NAME ".c:v" DRV_MODULE_VERSION " (" DRV_MODULE_RELDATE ")\n";
28 MODULE_AUTHOR("David S. Miller (davem@davemloft.net)");
29 MODULE_DESCRIPTION("Sun LDOM domain services driver");
30 MODULE_LICENSE("GPL");
31 MODULE_VERSION(DRV_MODULE_VERSION);
35 #define DS_INIT_REQ 0x00
36 #define DS_INIT_ACK 0x01
37 #define DS_INIT_NACK 0x02
38 #define DS_REG_REQ 0x03
39 #define DS_REG_ACK 0x04
40 #define DS_REG_NACK 0x05
41 #define DS_UNREG_REQ 0x06
42 #define DS_UNREG_ACK 0x07
43 #define DS_UNREG_NACK 0x08
52 #define DS_REG_VER_NACK 0x01
53 #define DS_REG_DUP 0x02
54 #define DS_INV_HDL 0x03
55 #define DS_TYPE_UNKNOWN 0x04
63 struct ds_msg_tag tag;
64 struct ds_version ver;
68 struct ds_msg_tag tag;
73 struct ds_msg_tag tag;
78 struct ds_msg_tag tag;
86 struct ds_msg_tag tag;
92 struct ds_msg_tag tag;
98 struct ds_msg_tag tag;
102 struct ds_unreg_ack {
103 struct ds_msg_tag tag;
107 struct ds_unreg_nack {
108 struct ds_msg_tag tag;
113 struct ds_msg_tag tag;
117 struct ds_data_nack {
118 struct ds_msg_tag tag;
123 struct ds_cap_state {
126 void (*data)(struct ldc_channel *lp,
127 struct ds_cap_state *dp,
130 const char *service_id;
133 #define CAP_STATE_UNKNOWN 0x00
134 #define CAP_STATE_REG_SENT 0x01
135 #define CAP_STATE_REGISTERED 0x02
138 static int ds_send(struct ldc_channel *lp, void *data, int len)
140 int err, limit = 1000;
143 while (limit-- > 0) {
144 err = ldc_write(lp, data, len);
145 if (!err || (err != -EAGAIN))
153 struct ds_md_update_req {
157 struct ds_md_update_res {
162 static void md_update_data(struct ldc_channel *lp,
163 struct ds_cap_state *dp,
166 struct ds_data *dpkt = buf;
167 struct ds_md_update_req *rp;
170 struct ds_md_update_res res;
173 rp = (struct ds_md_update_req *) (dpkt + 1);
175 printk(KERN_INFO PFX "Machine description update.\n");
177 memset(&pkt, 0, sizeof(pkt));
178 pkt.data.tag.type = DS_DATA;
179 pkt.data.tag.len = sizeof(pkt) - sizeof(struct ds_msg_tag);
180 pkt.data.handle = dp->handle;
181 pkt.res.req_num = rp->req_num;
182 pkt.res.result = DS_OK;
184 ds_send(lp, &pkt, sizeof(pkt));
189 struct ds_shutdown_req {
194 struct ds_shutdown_res {
200 static void domain_shutdown_data(struct ldc_channel *lp,
201 struct ds_cap_state *dp,
204 struct ds_data *dpkt = buf;
205 struct ds_shutdown_req *rp;
208 struct ds_shutdown_res res;
211 rp = (struct ds_shutdown_req *) (dpkt + 1);
213 printk(KERN_ALERT PFX "Shutdown request from "
214 "LDOM manager received.\n");
216 memset(&pkt, 0, sizeof(pkt));
217 pkt.data.tag.type = DS_DATA;
218 pkt.data.tag.len = sizeof(pkt) - sizeof(struct ds_msg_tag);
219 pkt.data.handle = dp->handle;
220 pkt.res.req_num = rp->req_num;
221 pkt.res.result = DS_OK;
222 pkt.res.reason[0] = 0;
224 ds_send(lp, &pkt, sizeof(pkt));
229 struct ds_panic_req {
233 struct ds_panic_res {
239 static void domain_panic_data(struct ldc_channel *lp,
240 struct ds_cap_state *dp,
243 struct ds_data *dpkt = buf;
244 struct ds_panic_req *rp;
247 struct ds_panic_res res;
250 rp = (struct ds_panic_req *) (dpkt + 1);
252 printk(KERN_ALERT PFX "Panic request from "
253 "LDOM manager received.\n");
255 memset(&pkt, 0, sizeof(pkt));
256 pkt.data.tag.type = DS_DATA;
257 pkt.data.tag.len = sizeof(pkt) - sizeof(struct ds_msg_tag);
258 pkt.data.handle = dp->handle;
259 pkt.res.req_num = rp->req_num;
260 pkt.res.result = DS_OK;
261 pkt.res.reason[0] = 0;
263 ds_send(lp, &pkt, sizeof(pkt));
265 panic("PANIC requested by LDOM manager.");
271 #define DS_CPU_CONFIGURE 0x43
272 #define DS_CPU_UNCONFIGURE 0x55
273 #define DS_CPU_FORCE_UNCONFIGURE 0x46
274 #define DS_CPU_STATUS 0x53
277 #define DS_CPU_OK 0x6f
278 #define DS_CPU_ERROR 0x65
283 struct ds_cpu_record {
287 static void dr_cpu_data(struct ldc_channel *lp,
288 struct ds_cap_state *dp,
291 struct ds_data *dpkt = buf;
292 struct ds_cpu_tag *rp;
294 rp = (struct ds_cpu_tag *) (dpkt + 1);
296 printk(KERN_ERR PFX "CPU REQ [%lx:%x], len=%d\n",
297 rp->req_num, rp->type, len);
303 #define DS_PRI_REQUEST 0x00
304 #define DS_PRI_DATA 0x01
305 #define DS_PRI_UPDATE 0x02
308 static void ds_pri_data(struct ldc_channel *lp,
309 struct ds_cap_state *dp,
312 struct ds_data *dpkt = buf;
313 struct ds_pri_msg *rp;
315 rp = (struct ds_pri_msg *) (dpkt + 1);
317 printk(KERN_INFO PFX "PRI REQ [%lx:%lx], len=%d\n",
318 rp->req_num, rp->type, len);
323 #define DS_VAR_SET_REQ 0x00
324 #define DS_VAR_DELETE_REQ 0x01
325 #define DS_VAR_SET_RESP 0x02
326 #define DS_VAR_DELETE_RESP 0x03
329 struct ds_var_set_msg {
330 struct ds_var_hdr hdr;
331 char name_and_value[0];
334 struct ds_var_delete_msg {
335 struct ds_var_hdr hdr;
340 struct ds_var_hdr hdr;
342 #define DS_VAR_SUCCESS 0x00
343 #define DS_VAR_NO_SPACE 0x01
344 #define DS_VAR_INVALID_VAR 0x02
345 #define DS_VAR_INVALID_VAL 0x03
346 #define DS_VAR_NOT_PRESENT 0x04
349 static DEFINE_MUTEX(ds_var_mutex);
350 static int ds_var_doorbell;
351 static int ds_var_response;
353 static void ds_var_data(struct ldc_channel *lp,
354 struct ds_cap_state *dp,
357 struct ds_data *dpkt = buf;
358 struct ds_var_resp *rp;
360 rp = (struct ds_var_resp *) (dpkt + 1);
362 if (rp->hdr.type != DS_VAR_SET_RESP &&
363 rp->hdr.type != DS_VAR_DELETE_RESP)
366 ds_var_response = rp->result;
371 struct ds_cap_state ds_states[] = {
373 .service_id = "md-update",
374 .data = md_update_data,
377 .service_id = "domain-shutdown",
378 .data = domain_shutdown_data,
381 .service_id = "domain-panic",
382 .data = domain_panic_data,
385 .service_id = "dr-cpu",
393 .service_id = "var-config",
397 .service_id = "var-config-backup",
402 static DEFINE_SPINLOCK(ds_lock);
405 struct ldc_channel *lp;
407 #define DS_HS_START 0x01
408 #define DS_HS_DONE 0x02
414 static struct ds_info *ds_info;
416 static struct ds_cap_state *find_cap(u64 handle)
418 unsigned int index = handle >> 32;
420 if (index >= ARRAY_SIZE(ds_states))
422 return &ds_states[index];
425 static struct ds_cap_state *find_cap_by_string(const char *name)
429 for (i = 0; i < ARRAY_SIZE(ds_states); i++) {
430 if (strcmp(ds_states[i].service_id, name))
433 return &ds_states[i];
438 void ldom_set_var(const char *var, const char *value)
440 struct ds_info *dp = ds_info;
441 struct ds_cap_state *cp;
443 cp = find_cap_by_string("var-config");
444 if (cp->state != CAP_STATE_REGISTERED)
445 cp = find_cap_by_string("var-config-backup");
447 if (cp->state == CAP_STATE_REGISTERED) {
451 struct ds_var_set_msg msg;
459 memset(&pkt, 0, sizeof(pkt));
460 pkt.header.data.tag.type = DS_DATA;
461 pkt.header.data.handle = cp->handle;
462 pkt.header.msg.hdr.type = DS_VAR_SET_REQ;
463 base = p = &pkt.header.msg.name_and_value[0];
465 p += strlen(var) + 1;
467 p += strlen(value) + 1;
469 msg_len = (sizeof(struct ds_data) +
470 sizeof(struct ds_var_set_msg) +
472 msg_len = (msg_len + 3) & ~3;
473 pkt.header.data.tag.len = msg_len - sizeof(struct ds_msg_tag);
475 mutex_lock(&ds_var_mutex);
477 spin_lock_irqsave(&ds_lock, flags);
479 ds_var_response = -1;
481 ds_send(dp->lp, &pkt, msg_len);
482 spin_unlock_irqrestore(&ds_lock, flags);
485 while (ds_var_doorbell == 0) {
492 mutex_unlock(&ds_var_mutex);
494 if (ds_var_doorbell == 0 ||
495 ds_var_response != DS_VAR_SUCCESS)
496 printk(KERN_ERR PFX "var-config [%s:%s] "
497 "failed, response(%d).\n",
501 printk(KERN_ERR PFX "var-config not registered so "
502 "could not set (%s) variable to (%s).\n",
507 void ldom_reboot(const char *boot_command)
509 /* Don't bother with any of this if the boot_command
512 if (boot_command && strlen(boot_command)) {
513 char full_boot_str[256];
515 strcpy(full_boot_str, "boot ");
516 strcpy(full_boot_str + strlen("boot "), boot_command);
518 ldom_set_var("reboot-command", full_boot_str);
523 static void ds_conn_reset(struct ds_info *dp)
525 printk(KERN_ERR PFX "ds_conn_reset() from %p\n",
526 __builtin_return_address(0));
529 static int register_services(struct ds_info *dp)
531 struct ldc_channel *lp = dp->lp;
534 for (i = 0; i < ARRAY_SIZE(ds_states); i++) {
536 struct ds_reg_req req;
539 struct ds_cap_state *cp = &ds_states[i];
543 if (cp->state == CAP_STATE_REGISTERED)
546 new_count = sched_clock() & 0xffffffff;
547 cp->handle = ((u64) i << 32) | new_count;
549 msg_len = (sizeof(struct ds_reg_req) +
550 strlen(cp->service_id));
552 memset(&pbuf, 0, sizeof(pbuf));
553 pbuf.req.tag.type = DS_REG_REQ;
554 pbuf.req.tag.len = (msg_len - sizeof(struct ds_msg_tag));
555 pbuf.req.handle = cp->handle;
558 strcpy(pbuf.req.svc_id, cp->service_id);
560 err = ds_send(lp, &pbuf, msg_len);
562 cp->state = CAP_STATE_REG_SENT;
567 static int ds_handshake(struct ds_info *dp, struct ds_msg_tag *pkt)
570 if (dp->hs_state == DS_HS_START) {
571 if (pkt->type != DS_INIT_ACK)
574 dp->hs_state = DS_HS_DONE;
576 return register_services(dp);
579 if (dp->hs_state != DS_HS_DONE)
582 if (pkt->type == DS_REG_ACK) {
583 struct ds_reg_ack *ap = (struct ds_reg_ack *) pkt;
584 struct ds_cap_state *cp = find_cap(ap->handle);
587 printk(KERN_ERR PFX "REG ACK for unknown handle %lx\n",
591 printk(KERN_INFO PFX "Registered %s service.\n",
593 cp->state = CAP_STATE_REGISTERED;
594 } else if (pkt->type == DS_REG_NACK) {
595 struct ds_reg_nack *np = (struct ds_reg_nack *) pkt;
596 struct ds_cap_state *cp = find_cap(np->handle);
599 printk(KERN_ERR PFX "REG NACK for "
600 "unknown handle %lx\n",
604 printk(KERN_ERR PFX "Could not register %s service\n",
606 cp->state = CAP_STATE_UNKNOWN;
616 static int ds_data(struct ds_info *dp, struct ds_msg_tag *pkt, int len)
618 struct ds_data *dpkt = (struct ds_data *) pkt;
619 struct ds_cap_state *cp = find_cap(dpkt->handle);
622 struct ds_data_nack nack = {
625 .len = (sizeof(struct ds_data_nack) -
626 sizeof(struct ds_msg_tag)),
628 .handle = dpkt->handle,
629 .result = DS_INV_HDL,
632 printk(KERN_ERR PFX "Data for unknown handle %lu\n",
634 ds_send(dp->lp, &nack, sizeof(nack));
636 cp->data(dp->lp, cp, dpkt, len);
641 static void ds_up(struct ds_info *dp)
643 struct ldc_channel *lp = dp->lp;
644 struct ds_ver_req req;
647 req.tag.type = DS_INIT_REQ;
648 req.tag.len = sizeof(req) - sizeof(struct ds_msg_tag);
652 err = ds_send(lp, &req, sizeof(req));
654 dp->hs_state = DS_HS_START;
657 static void ds_event(void *arg, int event)
659 struct ds_info *dp = arg;
660 struct ldc_channel *lp = dp->lp;
664 spin_lock_irqsave(&ds_lock, flags);
666 if (event == LDC_EVENT_UP) {
668 spin_unlock_irqrestore(&ds_lock, flags);
672 if (event != LDC_EVENT_DATA_READY) {
673 printk(KERN_WARNING PFX "Unexpected LDC event %d\n", event);
674 spin_unlock_irqrestore(&ds_lock, flags);
680 struct ds_msg_tag *tag;
682 err = ldc_read(lp, dp->rcv_buf, sizeof(*tag));
684 if (unlikely(err < 0)) {
685 if (err == -ECONNRESET)
693 err = ldc_read(lp, tag + 1, tag->len);
695 if (unlikely(err < 0)) {
696 if (err == -ECONNRESET)
703 if (tag->type < DS_DATA)
704 err = ds_handshake(dp, dp->rcv_buf);
706 err = ds_data(dp, dp->rcv_buf,
708 if (err == -ECONNRESET)
712 spin_unlock_irqrestore(&ds_lock, flags);
715 static int __devinit ds_probe(struct vio_dev *vdev,
716 const struct vio_device_id *id)
718 static int ds_version_printed;
719 struct ldc_channel_config ds_cfg = {
722 .mode = LDC_MODE_STREAM,
724 struct ldc_channel *lp;
728 if (ds_version_printed++ == 0)
729 printk(KERN_INFO "%s", version);
731 dp = kzalloc(sizeof(*dp), GFP_KERNEL);
736 dp->rcv_buf = kzalloc(4096, GFP_KERNEL);
740 dp->rcv_buf_len = 4096;
742 ds_cfg.tx_irq = vdev->tx_irq;
743 ds_cfg.rx_irq = vdev->rx_irq;
745 lp = ldc_alloc(vdev->channel_id, &ds_cfg, dp);
748 goto out_free_rcv_buf;
752 err = ldc_bind(lp, "DS");
775 static int ds_remove(struct vio_dev *vdev)
780 static struct vio_device_id ds_match[] = {
782 .type = "domain-services-port",
787 static struct vio_driver ds_driver = {
788 .id_table = ds_match,
793 .owner = THIS_MODULE,
797 static int __init ds_init(void)
801 for (i = 0; i < ARRAY_SIZE(ds_states); i++)
802 ds_states[i].handle = ((u64)i << 32);
804 return vio_register_driver(&ds_driver);
807 subsys_initcall(ds_init);