lustre/osc/osc_request.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  * Copryright (C) 2001 Cluster File Systems, Inc.
   5  *
   6  *  This code is issued under the GNU General Public License.
   7  *  See the file COPYING in this distribution
   8  *
   9  *  Author Peter Braam <braam@clusterfs.com>
  10  *
  11  *  This server is single threaded at present (but can easily be multi
  12  *  threaded). For testing and management it is treated as an
  13  *  obd_device, although it does not export a full OBD method table
  14  *  (the requests are coming in over the wire, so object target
  15  *  modules do not have a full method table.)
  16  *
  17  */
  18
  19 #define EXPORT_SYMTAB
  20
  21 #include <linux/config.h>
  22 #include <linux/module.h>
  23 #include <linux/kernel.h>
  24 #include <linux/mm.h>
  25 #include <linux/string.h>
  26 #include <linux/stat.h>
  27 #include <linux/errno.h>
  28 #include <linux/locks.h>
  29 #include <linux/unistd.h>
  30
  31 #include <asm/system.h>
  32 #include <asm/uaccess.h>
  33
  34 #include <linux/fs.h>
  35 #include <linux/stat.h>
  36 #include <asm/uaccess.h>
  37 #include <asm/segment.h>
  38 #include <linux/miscdevice.h>
  39
  40 #define DEBUG_SUBSYSTEM S_OSC
  41
  42 #include <linux/obd_support.h>
  43 #include <linux/obd_class.h>
  44 #include <linux/lustre_lib.h>
  45 #include <linux/lustre_idl.h>
  46
  47 struct ptlrpc_client *osc_con2cl(struct obd_conn *conn)
  48 {
  49         struct osc_obd *osc = &conn->oc_dev->u.osc;
  50         return &osc->osc_peer;
  51
  52 }
  53
  54 static int osc_connect(struct obd_conn *conn)
  55 {
  56         struct ptlrpc_request *request;
  57         struct ptlrpc_client *peer = osc_con2cl(conn);
  58         int rc;
  59         ENTRY;
  60
  61         request = ptlrpc_prep_req(peer, OST_CONNECT, 0, NULL, 0, NULL);
  62         if (!request) {
  63                 CERROR("cannot pack req!\n");
  64                 return -ENOMEM;
  65         }
  66
  67         request->rq_replen =
  68                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
  69
  70         rc = ptlrpc_queue_wait(peer, request);
  71         if (rc) {
  72                 EXIT;
  73                 goto out;
  74         }
  75
  76         CDEBUG(D_INODE, "received connid %d\n", request->rq_rep.ost->connid);
  77
  78         conn->oc_id = request->rq_rep.ost->connid;
  79  out:
  80         ptlrpc_free_req(request);
  81         EXIT;
  82         return rc;
  83 }
  84
  85 static int osc_disconnect(struct obd_conn *conn)
  86 {
  87         struct ptlrpc_request *request;
  88         struct ptlrpc_client *peer = osc_con2cl(conn);
  89         int rc;
  90         ENTRY;
  91
  92         request = ptlrpc_prep_req(peer, OST_DISCONNECT, 0, NULL, 0, NULL);
  93         if (!request) {
  94                 CERROR("cannot pack req!\n");
  95                 return -ENOMEM;
  96         }
  97         request->rq_req.ost->connid = conn->oc_id;
  98         request->rq_replen =
  99                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 100
 101         rc = ptlrpc_queue_wait(peer, request);
 102         if (rc) {
 103                 EXIT;
 104                 goto out;
 105         }
 106  out:
 107         ptlrpc_free_req(request);
 108         EXIT;
 109         return rc;
 110 }
 111
 112
 113 static int osc_getattr(struct obd_conn *conn, struct obdo *oa)
 114 {
 115         struct ptlrpc_request *request;
 116         struct ptlrpc_client *peer = osc_con2cl(conn);
 117         int rc;
 118
 119         request = ptlrpc_prep_req(peer, OST_GETATTR, 0, NULL, 0, NULL);
 120         if (!request) {
 121                 CERROR("cannot pack req!\n");
 122                 return -ENOMEM;
 123         }
 124
 125         memcpy(&request->rq_req.ost->oa, oa, sizeof(*oa));
 126         request->rq_req.ost->oa.o_valid = ~0;
 127         request->rq_replen =
 128                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 129
 130         rc = ptlrpc_queue_wait(peer, request);
 131         if (rc) {
 132                 EXIT;
 133                 goto out;
 134         }
 135
 136         CDEBUG(D_INODE, "mode: %o\n", request->rq_rep.ost->oa.o_mode);
 137         if (oa) {
 138                 memcpy(oa, &request->rq_rep.ost->oa, sizeof(*oa));
 139         }
 140
 141  out:
 142         ptlrpc_free_req(request);
 143         return 0;
 144 }
 145
 146 static int osc_setattr(struct obd_conn *conn, struct obdo *oa)
 147 {
 148         struct ptlrpc_request *request;
 149         struct ptlrpc_client *peer = osc_con2cl(conn);
 150         int rc;
 151
 152         request = ptlrpc_prep_req(peer, OST_SETATTR, 0, NULL, 0, NULL);
 153         if (!request) {
 154                 CERROR("cannot pack req!\n");
 155                 return -ENOMEM;
 156         }
 157
 158         memcpy(&request->rq_req.ost->oa, oa, sizeof(*oa));
 159         request->rq_replen =
 160                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 161
 162         rc = ptlrpc_queue_wait(peer, request);
 163         if (rc) {
 164                 EXIT;
 165                 goto out;
 166         }
 167
 168  out:
 169         ptlrpc_free_req(request);
 170         return 0;
 171 }
 172
 173 static int osc_create(struct obd_conn *conn, struct obdo *oa)
 174 {
 175         struct ptlrpc_request *request;
 176         struct ptlrpc_client *peer = osc_con2cl(conn);
 177         int rc;
 178
 179         if (!oa) {
 180                 CERROR("oa NULL\n");
 181         }
 182         request = ptlrpc_prep_req(peer, OST_CREATE, 0, NULL, 0, NULL);
 183         if (!request) {
 184                 CERROR("cannot pack req!\n");
 185                 return -ENOMEM;
 186         }
 187
 188         memcpy(&request->rq_req.ost->oa, oa, sizeof(*oa));
 189         request->rq_req.ost->connid = conn->oc_id;
 190         request->rq_req.ost->oa.o_valid = ~0;
 191         request->rq_replen =
 192                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 193
 194         rc = ptlrpc_queue_wait(peer, request);
 195         if (rc) {
 196                 EXIT;
 197                 goto out;
 198         }
 199         memcpy(oa, &request->rq_rep.ost->oa, sizeof(*oa));
 200
 201  out:
 202         ptlrpc_free_req(request);
 203         return 0;
 204 }
 205
 206 static int osc_punch(struct obd_conn *conn, struct obdo *oa, obd_size count,
 207                      obd_off offset)
 208 {
 209         struct ptlrpc_request *request;
 210         struct ptlrpc_client *peer = osc_con2cl(conn);
 211         int rc;
 212
 213         if (!oa) {
 214                 CERROR("oa NULL\n");
 215         }
 216         request = ptlrpc_prep_req(peer, OST_PUNCH, 0, NULL, 0, NULL);
 217         if (!request) {
 218                 CERROR("cannot pack req!\n");
 219                 return -ENOMEM;
 220         }
 221
 222         memcpy(&request->rq_req.ost->oa, oa, sizeof(*oa));
 223         request->rq_req.ost->oa.o_valid = ~0;
 224         request->rq_req.ost->oa.o_size = offset;
 225         request->rq_req.ost->oa.o_blocks = count;
 226         request->rq_replen =
 227                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 228
 229         rc = ptlrpc_queue_wait(peer, request);
 230         if (rc) {
 231                 EXIT;
 232                 goto out;
 233         }
 234         memcpy(oa, &request->rq_rep.ost->oa, sizeof(*oa));
 235
 236  out:
 237         ptlrpc_free_req(request);
 238         return 0;
 239 }
 240
 241 static int osc_destroy(struct obd_conn *conn, struct obdo *oa)
 242 {
 243         struct ptlrpc_request *request;
 244         struct ptlrpc_client *peer = osc_con2cl(conn);
 245         int rc;
 246
 247         if (!oa) {
 248                 CERROR("oa NULL\n");
 249         }
 250         request = ptlrpc_prep_req(peer, OST_DESTROY, 0, NULL, 0, NULL);
 251         if (!request) {
 252                 CERROR("cannot pack req!\n");
 253                 return -ENOMEM;
 254         }
 255
 256         memcpy(&request->rq_req.ost->oa, oa, sizeof(*oa));
 257         request->rq_req.ost->oa.o_valid = ~0;
 258         request->rq_replen =
 259                 sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 260
 261         rc = ptlrpc_queue_wait(peer, request);
 262         if (rc) {
 263                 EXIT;
 264                 goto out;
 265         }
 266         memcpy(oa, &request->rq_rep.ost->oa, sizeof(*oa));
 267
 268  out:
 269         ptlrpc_free_req(request);
 270         return 0;
 271 }
 272
 273 int osc_sendpage(struct obd_conn *conn, struct ptlrpc_request *req,
 274                  struct niobuf *dst, struct niobuf *src)
 275 {
 276         struct ptlrpc_client *cl = osc_con2cl(conn);
 277
 278         if (cl->cli_obd) {
 279                 /* local sendpage */
 280                 memcpy((char *)(unsigned long)dst->addr,
 281                        (char *)(unsigned long)src->addr, src->len);
 282         } else {
 283                 struct ptlrpc_bulk_desc *bulk;
 284                 int rc;
 285
 286                 bulk = ptlrpc_prep_bulk(&cl->cli_server);
 287                 if (bulk == NULL)
 288                         return -ENOMEM;
 289
 290                 bulk->b_buf = (void *)(unsigned long)src->addr;
 291                 bulk->b_buflen = src->len;
 292                 bulk->b_xid = dst->xid;
 293                 rc = ptlrpc_send_bulk(bulk, OSC_BULK_PORTAL);
 294                 if (rc != 0) {
 295                         CERROR("send_bulk failed: %d\n", rc);
 296                         BUG();
 297                         return rc;
 298                 }
 299                 wait_event_interruptible(bulk->b_waitq,
 300                                          ptlrpc_check_bulk_sent(bulk));
 301
 302                 if (bulk->b_flags == PTL_RPC_INTR) {
 303                         EXIT;
 304                         /* FIXME: hey hey, we leak here. */
 305                         return -EINTR;
 306                 }
 307
 308                 OBD_FREE(bulk, sizeof(*bulk));
 309         }
 310
 311         return 0;
 312 }
 313
 314 int osc_brw_read(struct obd_conn *conn, obd_count num_oa, struct obdo **oa,
 315                  obd_count *oa_bufs, struct page **buf, obd_size *count,
 316                  obd_off *offset, obd_flag *flags)
 317 {
 318         struct ptlrpc_client *cl = osc_con2cl(conn);
 319         struct ptlrpc_request *request;
 320         int pages;
 321         int rc;
 322         struct obd_ioobj ioo;
 323         struct niobuf src;
 324         int size1, size2 = 0;
 325         void *ptr1, *ptr2;
 326         int i, j, n;
 327         struct ptlrpc_bulk_desc **bulk;
 328
 329         size1 = num_oa * sizeof(ioo);
 330         pages = 0;
 331         for (i = 0; i < num_oa; i++) {
 332                 size2 += oa_bufs[i] * sizeof(src);
 333                 pages += oa_bufs[i];
 334         }
 335
 336         request = ptlrpc_prep_req(cl, OST_BRW, size1, NULL, size2, NULL);
 337         if (!request) {
 338                 CERROR("cannot pack req!\n");
 339                 return -ENOMEM;
 340         }
 341         request->rq_req.ost->cmd = OBD_BRW_READ;
 342
 343         OBD_ALLOC(bulk, pages * sizeof(struct ptlrpc_bulk_desc *));
 344         if (bulk == NULL) {
 345                 CERROR("cannot alloc bulk desc vector\n");
 346                 return -ENOMEM;
 347         }
 348         memset(bulk, 0, pages * sizeof(struct ptlrpc_bulk_desc *));
 349
 350         n = 0;
 351         ptr1 = ost_req_buf1(request->rq_req.ost);
 352         ptr2 = ost_req_buf2(request->rq_req.ost);
 353         for (i = 0; i < num_oa; i++) {
 354                 ost_pack_ioo(&ptr1, oa[i], oa_bufs[i]);
 355                 for (j = 0; j < oa_bufs[i]; j++) {
 356                         bulk[n] = ptlrpc_prep_bulk(&cl->cli_server);
 357                         if (bulk[n] == NULL) {
 358                                 CERROR("cannot alloc bulk desc\n");
 359                                 rc = -ENOMEM;
 360                                 goto out;
 361                         }
 362
 363                         spin_lock(&cl->cli_lock);
 364                         bulk[n]->b_xid = cl->cli_xid++;
 365                         spin_unlock(&cl->cli_lock);
 366                         bulk[n]->b_buf = kmap(buf[n]);
 367                         bulk[n]->b_buflen = PAGE_SIZE;
 368                         bulk[n]->b_portal = OST_BULK_PORTAL;
 369                         ost_pack_niobuf(&ptr2, bulk[n]->b_buf, offset[n],
 370                                         count[n], flags[n], bulk[n]->b_xid);
 371
 372                         rc = ptlrpc_register_bulk(bulk[n]);
 373                         if (rc)
 374                                 goto out;
 375                         n++;
 376                 }
 377         }
 378
 379         request->rq_replen = sizeof(struct ptlrep_hdr) + sizeof(struct ost_rep);
 380         rc = ptlrpc_queue_wait(cl, request);
 381
 382  out:
 383         /* FIXME: if we've called ptlrpc_wait_bulk but rc != 0, we need to
 384          * abort those bulk listeners. */
 385
 386         if (request->rq_rephdr)
 387                 OBD_FREE(request->rq_rephdr, request->rq_replen);
 388         n = 0;
 389         for (i = 0; i < num_oa; i++) {
 390                 for (j = 0; j < oa_bufs[i]; j++) {
 391                         if (bulk[n] == NULL)
 392                                 continue;
 393                         kunmap(buf[n]);
 394                         OBD_FREE(bulk[n], sizeof(struct ptlrpc_bulk_desc));
 395                         n++;
 396                 }
 397         }
 398
 399         OBD_FREE(bulk, pages * sizeof(struct ptlrpc_bulk_desc *));
 400         ptlrpc_free_req(request);
 401         return rc;
 402 }
 403
 404 int osc_brw_write(struct obd_conn *conn, obd_count num_oa, struct obdo **oa,
 405                   obd_count *oa_bufs, struct page **buf, obd_size *count,
 406                   obd_off *offset, obd_flag *flags)
 407 {
 408         struct ptlrpc_client *cl = osc_con2cl(conn);
 409         struct ptlrpc_request *request;
 410         struct obd_ioobj ioo;
 411         struct niobuf *src;
 412         int pages, rc, i, j, n, size1, size2 = 0;
 413         void *ptr1, *ptr2;
 414
 415         size1 = num_oa * sizeof(ioo);
 416         pages = 0;
 417         for (i = 0; i < num_oa; i++)
 418                 pages += oa_bufs[i];
 419         size2 = pages * sizeof(*src);
 420
 421         OBD_ALLOC(src, size2);
 422         if (!src) {
 423                 CERROR("no src memory\n");
 424                 return -ENOMEM;
 425         }
 426         memset((char *)src, 0, size2);
 427
 428         request = ptlrpc_prep_req(cl, OST_BRW, size1, NULL, size2, NULL);
 429         if (!request) {
 430                 CERROR("cannot pack req!\n");
 431                 return -ENOMEM;
 432         }
 433         request->rq_req.ost->cmd = OBD_BRW_WRITE;
 434
 435         n = 0;
 436         ptr1 = ost_req_buf1(request->rq_req.ost);
 437         ptr2 = ost_req_buf2(request->rq_req.ost);
 438         for (i = 0; i < num_oa; i++) {
 439                 ost_pack_ioo(&ptr1, oa[i], oa_bufs[i]);
 440                 for (j = 0; j < oa_bufs[i]; j++) {
 441                         ost_pack_niobuf(&ptr2, kmap(buf[n]), offset[n],
 442                                         count[n], flags[n], 0);
 443                         n++;
 444                 }
 445         }
 446         memcpy((char *)src, (char *)ost_req_buf2(request->rq_req.ost), size2);
 447
 448         request->rq_replen = sizeof(struct ptlrep_hdr) +
 449                 sizeof(struct ost_rep) + pages * sizeof(struct niobuf);
 450         rc = ptlrpc_queue_wait(cl, request);
 451         if (rc) {
 452                 EXIT;
 453                 goto out;
 454         }
 455
 456         ptr2 = ost_rep_buf2(request->rq_rep.ost);
 457         if (request->rq_rep.ost->buflen2 != n * sizeof(struct niobuf)) {
 458                 CERROR("buffer length wrong (%d vs. %d)\n",
 459                        request->rq_rep.ost->buflen2, n * sizeof(struct niobuf));
 460                 EXIT;
 461                 goto out;
 462         }
 463
 464         n = 0;
 465         for (i = 0; i < num_oa; i++) {
 466                 for (j = 0; j < oa_bufs[i]; j++) {
 467                         struct niobuf *dst;
 468                         ost_unpack_niobuf(&ptr2, &dst);
 469                         osc_sendpage(conn, request, dst, &src[n]);
 470                         n++;
 471                 }
 472         }
 473         OBD_FREE(src, size2);
 474  out:
 475         if (request->rq_rephdr)
 476                 OBD_FREE(request->rq_rephdr, request->rq_replen);
 477         n = 0;
 478         for (i = 0; i < num_oa; i++) {
 479                 for (j = 0; j < oa_bufs[i]; j++) {
 480                         kunmap(buf[n]);
 481                         n++;
 482                 }
 483         }
 484
 485         ptlrpc_free_req(request);
 486         return 0;
 487 }
 488
 489 int osc_brw(int rw, struct obd_conn *conn, obd_count num_oa,
 490               struct obdo **oa, obd_count *oa_bufs, struct page **buf,
 491               obd_size *count, obd_off *offset, obd_flag *flags)
 492 {
 493         if (rw == OBD_BRW_READ) {
 494                 return osc_brw_read(conn, num_oa, oa, oa_bufs, buf, count,
 495                                     offset, flags);
 496         } else {
 497                 return osc_brw_write(conn, num_oa, oa, oa_bufs, buf, count,
 498                                      offset, flags);
 499         }
 500 }
 501
 502 /* mount the file system (secretly) */
 503 static int osc_setup(struct obd_device *obddev, obd_count len,
 504                         void *buf)
 505
 506 {
 507         struct osc_obd *osc = &obddev->u.osc;
 508         struct obd_ioctl_data *data = (struct obd_ioctl_data *)buf;
 509         int rc;
 510         int dev = data->ioc_dev;
 511         ENTRY;
 512
 513         rc = ptlrpc_connect_client(dev, "ost",
 514                                    OST_REQUEST_PORTAL,
 515                                    OSC_REPLY_PORTAL,
 516                                    ost_pack_req,
 517                                    ost_unpack_rep,
 518                                    &osc->osc_peer);
 519
 520         MOD_INC_USE_COUNT;
 521         EXIT;
 522         return rc;
 523 }
 524
 525 static int osc_cleanup(struct obd_device * obddev)
 526 {
 527         MOD_DEC_USE_COUNT;
 528         return 0;
 529 }
 530
 531 struct obd_ops osc_obd_ops = {
 532         o_setup:   osc_setup,
 533         o_cleanup: osc_cleanup,
 534         o_create: osc_create,
 535         o_destroy: osc_destroy,
 536         o_getattr: osc_getattr,
 537         o_setattr: osc_setattr,
 538         o_connect: osc_connect,
 539         o_disconnect: osc_disconnect,
 540         o_brw: osc_brw,
 541         o_punch: osc_punch
 542 };
 543
 544 static int __init osc_init(void)
 545 {
 546         obd_register_type(&osc_obd_ops, LUSTRE_OSC_NAME);
 547         return 0;
 548 }
 549
 550 static void __exit osc_exit(void)
 551 {
 552         obd_unregister_type(LUSTRE_OSC_NAME);
 553 }
 554
 555 MODULE_AUTHOR("Peter J. Braam <braam@clusterfs.com>");
 556 MODULE_DESCRIPTION("Lustre Object Storage Client (OSC) v1.0");
 557 MODULE_LICENSE("GPL");
 558
 559 module_init(osc_init);
 560 module_exit(osc_exit);