net/ceph/osdmap.c

   1
   2 #include <linux/ceph/ceph_debug.h>
   3
   4 #include <linux/module.h>
   5 #include <linux/slab.h>
   6 #include <asm/div64.h>
   7
   8 #include <linux/ceph/libceph.h>
   9 #include <linux/ceph/osdmap.h>
  10 #include <linux/ceph/decode.h>
  11 #include <linux/crush/hash.h>
  12 #include <linux/crush/mapper.h>
  13
  14 char *ceph_osdmap_state_str(char *str, int len, int state)
  15 {
  16         if (!len)
  17                 return str;
  18
  19         if ((state & CEPH_OSD_EXISTS) && (state & CEPH_OSD_UP))
  20                 snprintf(str, len, "exists, up");
  21         else if (state & CEPH_OSD_EXISTS)
  22                 snprintf(str, len, "exists");
  23         else if (state & CEPH_OSD_UP)
  24                 snprintf(str, len, "up");
  25         else
  26                 snprintf(str, len, "doesn't exist");
  27
  28         return str;
  29 }
  30
  31 /* maps */
  32
  33 static int calc_bits_of(unsigned int t)
  34 {
  35         int b = 0;
  36         while (t) {
  37                 t = t >> 1;
  38                 b++;
  39         }
  40         return b;
  41 }
  42
  43 /*
  44  * the foo_mask is the smallest value 2^n-1 that is >= foo.
  45  */
  46 static void calc_pg_masks(struct ceph_pg_pool_info *pi)
  47 {
  48         pi->pg_num_mask = (1 << calc_bits_of(pi->pg_num-1)) - 1;
  49         pi->pgp_num_mask = (1 << calc_bits_of(pi->pgp_num-1)) - 1;
  50 }
  51
  52 /*
  53  * decode crush map
  54  */
  55 static int crush_decode_uniform_bucket(void **p, void *end,
  56                                        struct crush_bucket_uniform *b)
  57 {
  58         dout("crush_decode_uniform_bucket %p to %p\n", *p, end);
  59         ceph_decode_need(p, end, (1+b->h.size) * sizeof(u32), bad);
  60         b->item_weight = ceph_decode_32(p);
  61         return 0;
  62 bad:
  63         return -EINVAL;
  64 }
  65
  66 static int crush_decode_list_bucket(void **p, void *end,
  67                                     struct crush_bucket_list *b)
  68 {
  69         int j;
  70         dout("crush_decode_list_bucket %p to %p\n", *p, end);
  71         b->item_weights = kcalloc(b->h.size, sizeof(u32), GFP_NOFS);
  72         if (b->item_weights == NULL)
  73                 return -ENOMEM;
  74         b->sum_weights = kcalloc(b->h.size, sizeof(u32), GFP_NOFS);
  75         if (b->sum_weights == NULL)
  76                 return -ENOMEM;
  77         ceph_decode_need(p, end, 2 * b->h.size * sizeof(u32), bad);
  78         for (j = 0; j < b->h.size; j++) {
  79                 b->item_weights[j] = ceph_decode_32(p);
  80                 b->sum_weights[j] = ceph_decode_32(p);
  81         }
  82         return 0;
  83 bad:
  84         return -EINVAL;
  85 }
  86
  87 static int crush_decode_tree_bucket(void **p, void *end,
  88                                     struct crush_bucket_tree *b)
  89 {
  90         int j;
  91         dout("crush_decode_tree_bucket %p to %p\n", *p, end);
  92         ceph_decode_8_safe(p, end, b->num_nodes, bad);
  93         b->node_weights = kcalloc(b->num_nodes, sizeof(u32), GFP_NOFS);
  94         if (b->node_weights == NULL)
  95                 return -ENOMEM;
  96         ceph_decode_need(p, end, b->num_nodes * sizeof(u32), bad);
  97         for (j = 0; j < b->num_nodes; j++)
  98                 b->node_weights[j] = ceph_decode_32(p);
  99         return 0;
 100 bad:
 101         return -EINVAL;
 102 }
 103
 104 static int crush_decode_straw_bucket(void **p, void *end,
 105                                      struct crush_bucket_straw *b)
 106 {
 107         int j;
 108         dout("crush_decode_straw_bucket %p to %p\n", *p, end);
 109         b->item_weights = kcalloc(b->h.size, sizeof(u32), GFP_NOFS);
 110         if (b->item_weights == NULL)
 111                 return -ENOMEM;
 112         b->straws = kcalloc(b->h.size, sizeof(u32), GFP_NOFS);
 113         if (b->straws == NULL)
 114                 return -ENOMEM;
 115         ceph_decode_need(p, end, 2 * b->h.size * sizeof(u32), bad);
 116         for (j = 0; j < b->h.size; j++) {
 117                 b->item_weights[j] = ceph_decode_32(p);
 118                 b->straws[j] = ceph_decode_32(p);
 119         }
 120         return 0;
 121 bad:
 122         return -EINVAL;
 123 }
 124
 125 static int crush_decode_straw2_bucket(void **p, void *end,
 126                                       struct crush_bucket_straw2 *b)
 127 {
 128         int j;
 129         dout("crush_decode_straw2_bucket %p to %p\n", *p, end);
 130         b->item_weights = kcalloc(b->h.size, sizeof(u32), GFP_NOFS);
 131         if (b->item_weights == NULL)
 132                 return -ENOMEM;
 133         ceph_decode_need(p, end, b->h.size * sizeof(u32), bad);
 134         for (j = 0; j < b->h.size; j++)
 135                 b->item_weights[j] = ceph_decode_32(p);
 136         return 0;
 137 bad:
 138         return -EINVAL;
 139 }
 140
 141 static int skip_name_map(void **p, void *end)
 142 {
 143         int len;
 144         ceph_decode_32_safe(p, end, len ,bad);
 145         while (len--) {
 146                 int strlen;
 147                 *p += sizeof(u32);
 148                 ceph_decode_32_safe(p, end, strlen, bad);
 149                 *p += strlen;
 150 }
 151         return 0;
 152 bad:
 153         return -EINVAL;
 154 }
 155
 156 static struct crush_map *crush_decode(void *pbyval, void *end)
 157 {
 158         struct crush_map *c;
 159         int err = -EINVAL;
 160         int i, j;
 161         void **p = &pbyval;
 162         void *start = pbyval;
 163         u32 magic;
 164         u32 num_name_maps;
 165
 166         dout("crush_decode %p to %p len %d\n", *p, end, (int)(end - *p));
 167
 168         c = kzalloc(sizeof(*c), GFP_NOFS);
 169         if (c == NULL)
 170                 return ERR_PTR(-ENOMEM);
 171
 172         /* set tunables to default values */
 173         c->choose_local_tries = 2;
 174         c->choose_local_fallback_tries = 5;
 175         c->choose_total_tries = 19;
 176         c->chooseleaf_descend_once = 0;
 177
 178         ceph_decode_need(p, end, 4*sizeof(u32), bad);
 179         magic = ceph_decode_32(p);
 180         if (magic != CRUSH_MAGIC) {
 181                 pr_err("crush_decode magic %x != current %x\n",
 182                        (unsigned int)magic, (unsigned int)CRUSH_MAGIC);
 183                 goto bad;
 184         }
 185         c->max_buckets = ceph_decode_32(p);
 186         c->max_rules = ceph_decode_32(p);
 187         c->max_devices = ceph_decode_32(p);
 188
 189         c->buckets = kcalloc(c->max_buckets, sizeof(*c->buckets), GFP_NOFS);
 190         if (c->buckets == NULL)
 191                 goto badmem;
 192         c->rules = kcalloc(c->max_rules, sizeof(*c->rules), GFP_NOFS);
 193         if (c->rules == NULL)
 194                 goto badmem;
 195
 196         /* buckets */
 197         for (i = 0; i < c->max_buckets; i++) {
 198                 int size = 0;
 199                 u32 alg;
 200                 struct crush_bucket *b;
 201
 202                 ceph_decode_32_safe(p, end, alg, bad);
 203                 if (alg == 0) {
 204                         c->buckets[i] = NULL;
 205                         continue;
 206                 }
 207                 dout("crush_decode bucket %d off %x %p to %p\n",
 208                      i, (int)(*p-start), *p, end);
 209
 210                 switch (alg) {
 211                 case CRUSH_BUCKET_UNIFORM:
 212                         size = sizeof(struct crush_bucket_uniform);
 213                         break;
 214                 case CRUSH_BUCKET_LIST:
 215                         size = sizeof(struct crush_bucket_list);
 216                         break;
 217                 case CRUSH_BUCKET_TREE:
 218                         size = sizeof(struct crush_bucket_tree);
 219                         break;
 220                 case CRUSH_BUCKET_STRAW:
 221                         size = sizeof(struct crush_bucket_straw);
 222                         break;
 223                 case CRUSH_BUCKET_STRAW2:
 224                         size = sizeof(struct crush_bucket_straw2);
 225                         break;
 226                 default:
 227                         err = -EINVAL;
 228                         goto bad;
 229                 }
 230                 BUG_ON(size == 0);
 231                 b = c->buckets[i] = kzalloc(size, GFP_NOFS);
 232                 if (b == NULL)
 233                         goto badmem;
 234
 235                 ceph_decode_need(p, end, 4*sizeof(u32), bad);
 236                 b->id = ceph_decode_32(p);
 237                 b->type = ceph_decode_16(p);
 238                 b->alg = ceph_decode_8(p);
 239                 b->hash = ceph_decode_8(p);
 240                 b->weight = ceph_decode_32(p);
 241                 b->size = ceph_decode_32(p);
 242
 243                 dout("crush_decode bucket size %d off %x %p to %p\n",
 244                      b->size, (int)(*p-start), *p, end);
 245
 246                 b->items = kcalloc(b->size, sizeof(__s32), GFP_NOFS);
 247                 if (b->items == NULL)
 248                         goto badmem;
 249                 b->perm = kcalloc(b->size, sizeof(u32), GFP_NOFS);
 250                 if (b->perm == NULL)
 251                         goto badmem;
 252                 b->perm_n = 0;
 253
 254                 ceph_decode_need(p, end, b->size*sizeof(u32), bad);
 255                 for (j = 0; j < b->size; j++)
 256                         b->items[j] = ceph_decode_32(p);
 257
 258                 switch (b->alg) {
 259                 case CRUSH_BUCKET_UNIFORM:
 260                         err = crush_decode_uniform_bucket(p, end,
 261                                   (struct crush_bucket_uniform *)b);
 262                         if (err < 0)
 263                                 goto bad;
 264                         break;
 265                 case CRUSH_BUCKET_LIST:
 266                         err = crush_decode_list_bucket(p, end,
 267                                (struct crush_bucket_list *)b);
 268                         if (err < 0)
 269                                 goto bad;
 270                         break;
 271                 case CRUSH_BUCKET_TREE:
 272                         err = crush_decode_tree_bucket(p, end,
 273                                 (struct crush_bucket_tree *)b);
 274                         if (err < 0)
 275                                 goto bad;
 276                         break;
 277                 case CRUSH_BUCKET_STRAW:
 278                         err = crush_decode_straw_bucket(p, end,
 279                                 (struct crush_bucket_straw *)b);
 280                         if (err < 0)
 281                                 goto bad;
 282                         break;
 283                 case CRUSH_BUCKET_STRAW2:
 284                         err = crush_decode_straw2_bucket(p, end,
 285                                 (struct crush_bucket_straw2 *)b);
 286                         if (err < 0)
 287                                 goto bad;
 288                         break;
 289                 }
 290         }
 291
 292         /* rules */
 293         dout("rule vec is %p\n", c->rules);
 294         for (i = 0; i < c->max_rules; i++) {
 295                 u32 yes;
 296                 struct crush_rule *r;
 297
 298                 ceph_decode_32_safe(p, end, yes, bad);
 299                 if (!yes) {
 300                         dout("crush_decode NO rule %d off %x %p to %p\n",
 301                              i, (int)(*p-start), *p, end);
 302                         c->rules[i] = NULL;
 303                         continue;
 304                 }
 305
 306                 dout("crush_decode rule %d off %x %p to %p\n",
 307                      i, (int)(*p-start), *p, end);
 308
 309                 /* len */
 310                 ceph_decode_32_safe(p, end, yes, bad);
 311 #if BITS_PER_LONG == 32
 312                 err = -EINVAL;
 313                 if (yes > (ULONG_MAX - sizeof(*r))
 314                           / sizeof(struct crush_rule_step))
 315                         goto bad;
 316 #endif
 317                 r = c->rules[i] = kmalloc(sizeof(*r) +
 318                                           yes*sizeof(struct crush_rule_step),
 319                                           GFP_NOFS);
 320                 if (r == NULL)
 321                         goto badmem;
 322                 dout(" rule %d is at %p\n", i, r);
 323                 r->len = yes;
 324                 ceph_decode_copy_safe(p, end, &r->mask, 4, bad); /* 4 u8's */
 325                 ceph_decode_need(p, end, r->len*3*sizeof(u32), bad);
 326                 for (j = 0; j < r->len; j++) {
 327                         r->steps[j].op = ceph_decode_32(p);
 328                         r->steps[j].arg1 = ceph_decode_32(p);
 329                         r->steps[j].arg2 = ceph_decode_32(p);
 330                 }
 331         }
 332
 333         /* ignore trailing name maps. */
 334         for (num_name_maps = 0; num_name_maps < 3; num_name_maps++) {
 335                 err = skip_name_map(p, end);
 336                 if (err < 0)
 337                         goto done;
 338         }
 339
 340         /* tunables */
 341         ceph_decode_need(p, end, 3*sizeof(u32), done);
 342         c->choose_local_tries = ceph_decode_32(p);
 343         c->choose_local_fallback_tries =  ceph_decode_32(p);
 344         c->choose_total_tries = ceph_decode_32(p);
 345         dout("crush decode tunable choose_local_tries = %d\n",
 346              c->choose_local_tries);
 347         dout("crush decode tunable choose_local_fallback_tries = %d\n",
 348              c->choose_local_fallback_tries);
 349         dout("crush decode tunable choose_total_tries = %d\n",
 350              c->choose_total_tries);
 351
 352         ceph_decode_need(p, end, sizeof(u32), done);
 353         c->chooseleaf_descend_once = ceph_decode_32(p);
 354         dout("crush decode tunable chooseleaf_descend_once = %d\n",
 355              c->chooseleaf_descend_once);
 356
 357         ceph_decode_need(p, end, sizeof(u8), done);
 358         c->chooseleaf_vary_r = ceph_decode_8(p);
 359         dout("crush decode tunable chooseleaf_vary_r = %d\n",
 360              c->chooseleaf_vary_r);
 361
 362         /* skip straw_calc_version, allowed_bucket_algs */
 363         ceph_decode_need(p, end, sizeof(u8) + sizeof(u32), done);
 364         *p += sizeof(u8) + sizeof(u32);
 365
 366         ceph_decode_need(p, end, sizeof(u8), done);
 367         c->chooseleaf_stable = ceph_decode_8(p);
 368         dout("crush decode tunable chooseleaf_stable = %d\n",
 369              c->chooseleaf_stable);
 370
 371 done:
 372         dout("crush_decode success\n");
 373         return c;
 374
 375 badmem:
 376         err = -ENOMEM;
 377 bad:
 378         dout("crush_decode fail %d\n", err);
 379         crush_destroy(c);
 380         return ERR_PTR(err);
 381 }
 382
 383 /*
 384  * rbtree of pg_mapping for handling pg_temp (explicit mapping of pgid
 385  * to a set of osds) and primary_temp (explicit primary setting)
 386  */
 387 static int pgid_cmp(struct ceph_pg l, struct ceph_pg r)
 388 {
 389         if (l.pool < r.pool)
 390                 return -1;
 391         if (l.pool > r.pool)
 392                 return 1;
 393         if (l.seed < r.seed)
 394                 return -1;
 395         if (l.seed > r.seed)
 396                 return 1;
 397         return 0;
 398 }
 399
 400 static int __insert_pg_mapping(struct ceph_pg_mapping *new,
 401                                struct rb_root *root)
 402 {
 403         struct rb_node **p = &root->rb_node;
 404         struct rb_node *parent = NULL;
 405         struct ceph_pg_mapping *pg = NULL;
 406         int c;
 407
 408         dout("__insert_pg_mapping %llx %p\n", *(u64 *)&new->pgid, new);
 409         while (*p) {
 410                 parent = *p;
 411                 pg = rb_entry(parent, struct ceph_pg_mapping, node);
 412                 c = pgid_cmp(new->pgid, pg->pgid);
 413                 if (c < 0)
 414                         p = &(*p)->rb_left;
 415                 else if (c > 0)
 416                         p = &(*p)->rb_right;
 417                 else
 418                         return -EEXIST;
 419         }
 420
 421         rb_link_node(&new->node, parent, p);
 422         rb_insert_color(&new->node, root);
 423         return 0;
 424 }
 425
 426 static struct ceph_pg_mapping *__lookup_pg_mapping(struct rb_root *root,
 427                                                    struct ceph_pg pgid)
 428 {
 429         struct rb_node *n = root->rb_node;
 430         struct ceph_pg_mapping *pg;
 431         int c;
 432
 433         while (n) {
 434                 pg = rb_entry(n, struct ceph_pg_mapping, node);
 435                 c = pgid_cmp(pgid, pg->pgid);
 436                 if (c < 0) {
 437                         n = n->rb_left;
 438                 } else if (c > 0) {
 439                         n = n->rb_right;
 440                 } else {
 441                         dout("__lookup_pg_mapping %lld.%x got %p\n",
 442                              pgid.pool, pgid.seed, pg);
 443                         return pg;
 444                 }
 445         }
 446         return NULL;
 447 }
 448
 449 static int __remove_pg_mapping(struct rb_root *root, struct ceph_pg pgid)
 450 {
 451         struct ceph_pg_mapping *pg = __lookup_pg_mapping(root, pgid);
 452
 453         if (pg) {
 454                 dout("__remove_pg_mapping %lld.%x %p\n", pgid.pool, pgid.seed,
 455                      pg);
 456                 rb_erase(&pg->node, root);
 457                 kfree(pg);
 458                 return 0;
 459         }
 460         dout("__remove_pg_mapping %lld.%x dne\n", pgid.pool, pgid.seed);
 461         return -ENOENT;
 462 }
 463
 464 /*
 465  * rbtree of pg pool info
 466  */
 467 static int __insert_pg_pool(struct rb_root *root, struct ceph_pg_pool_info *new)
 468 {
 469         struct rb_node **p = &root->rb_node;
 470         struct rb_node *parent = NULL;
 471         struct ceph_pg_pool_info *pi = NULL;
 472
 473         while (*p) {
 474                 parent = *p;
 475                 pi = rb_entry(parent, struct ceph_pg_pool_info, node);
 476                 if (new->id < pi->id)
 477                         p = &(*p)->rb_left;
 478                 else if (new->id > pi->id)
 479                         p = &(*p)->rb_right;
 480                 else
 481                         return -EEXIST;
 482         }
 483
 484         rb_link_node(&new->node, parent, p);
 485         rb_insert_color(&new->node, root);
 486         return 0;
 487 }
 488
 489 static struct ceph_pg_pool_info *__lookup_pg_pool(struct rb_root *root, u64 id)
 490 {
 491         struct ceph_pg_pool_info *pi;
 492         struct rb_node *n = root->rb_node;
 493
 494         while (n) {
 495                 pi = rb_entry(n, struct ceph_pg_pool_info, node);
 496                 if (id < pi->id)
 497                         n = n->rb_left;
 498                 else if (id > pi->id)
 499                         n = n->rb_right;
 500                 else
 501                         return pi;
 502         }
 503         return NULL;
 504 }
 505
 506 struct ceph_pg_pool_info *ceph_pg_pool_by_id(struct ceph_osdmap *map, u64 id)
 507 {
 508         return __lookup_pg_pool(&map->pg_pools, id);
 509 }
 510
 511 const char *ceph_pg_pool_name_by_id(struct ceph_osdmap *map, u64 id)
 512 {
 513         struct ceph_pg_pool_info *pi;
 514
 515         if (id == CEPH_NOPOOL)
 516                 return NULL;
 517
 518         if (WARN_ON_ONCE(id > (u64) INT_MAX))
 519                 return NULL;
 520
 521         pi = __lookup_pg_pool(&map->pg_pools, (int) id);
 522
 523         return pi ? pi->name : NULL;
 524 }
 525 EXPORT_SYMBOL(ceph_pg_pool_name_by_id);
 526
 527 int ceph_pg_poolid_by_name(struct ceph_osdmap *map, const char *name)
 528 {
 529         struct rb_node *rbp;
 530
 531         for (rbp = rb_first(&map->pg_pools); rbp; rbp = rb_next(rbp)) {
 532                 struct ceph_pg_pool_info *pi =
 533                         rb_entry(rbp, struct ceph_pg_pool_info, node);
 534                 if (pi->name && strcmp(pi->name, name) == 0)
 535                         return pi->id;
 536         }
 537         return -ENOENT;
 538 }
 539 EXPORT_SYMBOL(ceph_pg_poolid_by_name);
 540
 541 static void __remove_pg_pool(struct rb_root *root, struct ceph_pg_pool_info *pi)
 542 {
 543         rb_erase(&pi->node, root);
 544         kfree(pi->name);
 545         kfree(pi);
 546 }
 547
 548 static int decode_pool(void **p, void *end, struct ceph_pg_pool_info *pi)
 549 {
 550         u8 ev, cv;
 551         unsigned len, num;
 552         void *pool_end;
 553
 554         ceph_decode_need(p, end, 2 + 4, bad);
 555         ev = ceph_decode_8(p);  /* encoding version */
 556         cv = ceph_decode_8(p); /* compat version */
 557         if (ev < 5) {
 558                 pr_warn("got v %d < 5 cv %d of ceph_pg_pool\n", ev, cv);
 559                 return -EINVAL;
 560         }
 561         if (cv > 9) {
 562                 pr_warn("got v %d cv %d > 9 of ceph_pg_pool\n", ev, cv);
 563                 return -EINVAL;
 564         }
 565         len = ceph_decode_32(p);
 566         ceph_decode_need(p, end, len, bad);
 567         pool_end = *p + len;
 568
 569         pi->type = ceph_decode_8(p);
 570         pi->size = ceph_decode_8(p);
 571         pi->crush_ruleset = ceph_decode_8(p);
 572         pi->object_hash = ceph_decode_8(p);
 573
 574         pi->pg_num = ceph_decode_32(p);
 575         pi->pgp_num = ceph_decode_32(p);
 576
 577         *p += 4 + 4;  /* skip lpg* */
 578         *p += 4;      /* skip last_change */
 579         *p += 8 + 4;  /* skip snap_seq, snap_epoch */
 580
 581         /* skip snaps */
 582         num = ceph_decode_32(p);
 583         while (num--) {
 584                 *p += 8;  /* snapid key */
 585                 *p += 1 + 1; /* versions */
 586                 len = ceph_decode_32(p);
 587                 *p += len;
 588         }
 589
 590         /* skip removed_snaps */
 591         num = ceph_decode_32(p);
 592         *p += num * (8 + 8);
 593
 594         *p += 8;  /* skip auid */
 595         pi->flags = ceph_decode_64(p);
 596         *p += 4;  /* skip crash_replay_interval */
 597
 598         if (ev >= 7)
 599                 *p += 1;  /* skip min_size */
 600
 601         if (ev >= 8)
 602                 *p += 8 + 8;  /* skip quota_max_* */
 603
 604         if (ev >= 9) {
 605                 /* skip tiers */
 606                 num = ceph_decode_32(p);
 607                 *p += num * 8;
 608
 609                 *p += 8;  /* skip tier_of */
 610                 *p += 1;  /* skip cache_mode */
 611
 612                 pi->read_tier = ceph_decode_64(p);
 613                 pi->write_tier = ceph_decode_64(p);
 614         } else {
 615                 pi->read_tier = -1;
 616                 pi->write_tier = -1;
 617         }
 618
 619         /* ignore the rest */
 620
 621         *p = pool_end;
 622         calc_pg_masks(pi);
 623         return 0;
 624
 625 bad:
 626         return -EINVAL;
 627 }
 628
 629 static int decode_pool_names(void **p, void *end, struct ceph_osdmap *map)
 630 {
 631         struct ceph_pg_pool_info *pi;
 632         u32 num, len;
 633         u64 pool;
 634
 635         ceph_decode_32_safe(p, end, num, bad);
 636         dout(" %d pool names\n", num);
 637         while (num--) {
 638                 ceph_decode_64_safe(p, end, pool, bad);
 639                 ceph_decode_32_safe(p, end, len, bad);
 640                 dout("  pool %llu len %d\n", pool, len);
 641                 ceph_decode_need(p, end, len, bad);
 642                 pi = __lookup_pg_pool(&map->pg_pools, pool);
 643                 if (pi) {
 644                         char *name = kstrndup(*p, len, GFP_NOFS);
 645
 646                         if (!name)
 647                                 return -ENOMEM;
 648                         kfree(pi->name);
 649                         pi->name = name;
 650                         dout("  name is %s\n", pi->name);
 651                 }
 652                 *p += len;
 653         }
 654         return 0;
 655
 656 bad:
 657         return -EINVAL;
 658 }
 659
 660 /*
 661  * osd map
 662  */
 663 void ceph_osdmap_destroy(struct ceph_osdmap *map)
 664 {
 665         dout("osdmap_destroy %p\n", map);
 666         if (map->crush)
 667                 crush_destroy(map->crush);
 668         while (!RB_EMPTY_ROOT(&map->pg_temp)) {
 669                 struct ceph_pg_mapping *pg =
 670                         rb_entry(rb_first(&map->pg_temp),
 671                                  struct ceph_pg_mapping, node);
 672                 rb_erase(&pg->node, &map->pg_temp);
 673                 kfree(pg);
 674         }
 675         while (!RB_EMPTY_ROOT(&map->primary_temp)) {
 676                 struct ceph_pg_mapping *pg =
 677                         rb_entry(rb_first(&map->primary_temp),
 678                                  struct ceph_pg_mapping, node);
 679                 rb_erase(&pg->node, &map->primary_temp);
 680                 kfree(pg);
 681         }
 682         while (!RB_EMPTY_ROOT(&map->pg_pools)) {
 683                 struct ceph_pg_pool_info *pi =
 684                         rb_entry(rb_first(&map->pg_pools),
 685                                  struct ceph_pg_pool_info, node);
 686                 __remove_pg_pool(&map->pg_pools, pi);
 687         }
 688         kfree(map->osd_state);
 689         kfree(map->osd_weight);
 690         kfree(map->osd_addr);
 691         kfree(map->osd_primary_affinity);
 692         kfree(map);
 693 }
 694
 695 /*
 696  * Adjust max_osd value, (re)allocate arrays.
 697  *
 698  * The new elements are properly initialized.
 699  */
 700 static int osdmap_set_max_osd(struct ceph_osdmap *map, int max)
 701 {
 702         u8 *state;
 703         u32 *weight;
 704         struct ceph_entity_addr *addr;
 705         int i;
 706
 707         state = krealloc(map->osd_state, max*sizeof(*state), GFP_NOFS);
 708         if (!state)
 709                 return -ENOMEM;
 710         map->osd_state = state;
 711
 712         weight = krealloc(map->osd_weight, max*sizeof(*weight), GFP_NOFS);
 713         if (!weight)
 714                 return -ENOMEM;
 715         map->osd_weight = weight;
 716
 717         addr = krealloc(map->osd_addr, max*sizeof(*addr), GFP_NOFS);
 718         if (!addr)
 719                 return -ENOMEM;
 720         map->osd_addr = addr;
 721
 722         for (i = map->max_osd; i < max; i++) {
 723                 map->osd_state[i] = 0;
 724                 map->osd_weight[i] = CEPH_OSD_OUT;
 725                 memset(map->osd_addr + i, 0, sizeof(*map->osd_addr));
 726         }
 727
 728         if (map->osd_primary_affinity) {
 729                 u32 *affinity;
 730
 731                 affinity = krealloc(map->osd_primary_affinity,
 732                                     max*sizeof(*affinity), GFP_NOFS);
 733                 if (!affinity)
 734                         return -ENOMEM;
 735                 map->osd_primary_affinity = affinity;
 736
 737                 for (i = map->max_osd; i < max; i++)
 738                         map->osd_primary_affinity[i] =
 739                             CEPH_OSD_DEFAULT_PRIMARY_AFFINITY;
 740         }
 741
 742         map->max_osd = max;
 743
 744         return 0;
 745 }
 746
 747 #define OSDMAP_WRAPPER_COMPAT_VER       7
 748 #define OSDMAP_CLIENT_DATA_COMPAT_VER   1
 749
 750 /*
 751  * Return 0 or error.  On success, *v is set to 0 for old (v6) osdmaps,
 752  * to struct_v of the client_data section for new (v7 and above)
 753  * osdmaps.
 754  */
 755 static int get_osdmap_client_data_v(void **p, void *end,
 756                                     const char *prefix, u8 *v)
 757 {
 758         u8 struct_v;
 759
 760         ceph_decode_8_safe(p, end, struct_v, e_inval);
 761         if (struct_v >= 7) {
 762                 u8 struct_compat;
 763
 764                 ceph_decode_8_safe(p, end, struct_compat, e_inval);
 765                 if (struct_compat > OSDMAP_WRAPPER_COMPAT_VER) {
 766                         pr_warn("got v %d cv %d > %d of %s ceph_osdmap\n",
 767                                 struct_v, struct_compat,
 768                                 OSDMAP_WRAPPER_COMPAT_VER, prefix);
 769                         return -EINVAL;
 770                 }
 771                 *p += 4; /* ignore wrapper struct_len */
 772
 773                 ceph_decode_8_safe(p, end, struct_v, e_inval);
 774                 ceph_decode_8_safe(p, end, struct_compat, e_inval);
 775                 if (struct_compat > OSDMAP_CLIENT_DATA_COMPAT_VER) {
 776                         pr_warn("got v %d cv %d > %d of %s ceph_osdmap client data\n",
 777                                 struct_v, struct_compat,
 778                                 OSDMAP_CLIENT_DATA_COMPAT_VER, prefix);
 779                         return -EINVAL;
 780                 }
 781                 *p += 4; /* ignore client data struct_len */
 782         } else {
 783                 u16 version;
 784
 785                 *p -= 1;
 786                 ceph_decode_16_safe(p, end, version, e_inval);
 787                 if (version < 6) {
 788                         pr_warn("got v %d < 6 of %s ceph_osdmap\n",
 789                                 version, prefix);
 790                         return -EINVAL;
 791                 }
 792
 793                 /* old osdmap enconding */
 794                 struct_v = 0;
 795         }
 796
 797         *v = struct_v;
 798         return 0;
 799
 800 e_inval:
 801         return -EINVAL;
 802 }
 803
 804 static int __decode_pools(void **p, void *end, struct ceph_osdmap *map,
 805                           bool incremental)
 806 {
 807         u32 n;
 808
 809         ceph_decode_32_safe(p, end, n, e_inval);
 810         while (n--) {
 811                 struct ceph_pg_pool_info *pi;
 812                 u64 pool;
 813                 int ret;
 814
 815                 ceph_decode_64_safe(p, end, pool, e_inval);
 816
 817                 pi = __lookup_pg_pool(&map->pg_pools, pool);
 818                 if (!incremental || !pi) {
 819                         pi = kzalloc(sizeof(*pi), GFP_NOFS);
 820                         if (!pi)
 821                                 return -ENOMEM;
 822
 823                         pi->id = pool;
 824
 825                         ret = __insert_pg_pool(&map->pg_pools, pi);
 826                         if (ret) {
 827                                 kfree(pi);
 828                                 return ret;
 829                         }
 830                 }
 831
 832                 ret = decode_pool(p, end, pi);
 833                 if (ret)
 834                         return ret;
 835         }
 836
 837         return 0;
 838
 839 e_inval:
 840         return -EINVAL;
 841 }
 842
 843 static int decode_pools(void **p, void *end, struct ceph_osdmap *map)
 844 {
 845         return __decode_pools(p, end, map, false);
 846 }
 847
 848 static int decode_new_pools(void **p, void *end, struct ceph_osdmap *map)
 849 {
 850         return __decode_pools(p, end, map, true);
 851 }
 852
 853 static int __decode_pg_temp(void **p, void *end, struct ceph_osdmap *map,
 854                             bool incremental)
 855 {
 856         u32 n;
 857
 858         ceph_decode_32_safe(p, end, n, e_inval);
 859         while (n--) {
 860                 struct ceph_pg pgid;
 861                 u32 len, i;
 862                 int ret;
 863
 864                 ret = ceph_decode_pgid(p, end, &pgid);
 865                 if (ret)
 866                         return ret;
 867
 868                 ceph_decode_32_safe(p, end, len, e_inval);
 869
 870                 ret = __remove_pg_mapping(&map->pg_temp, pgid);
 871                 BUG_ON(!incremental && ret != -ENOENT);
 872
 873                 if (!incremental || len > 0) {
 874                         struct ceph_pg_mapping *pg;
 875
 876                         ceph_decode_need(p, end, len*sizeof(u32), e_inval);
 877
 878                         if (len > (UINT_MAX - sizeof(*pg)) / sizeof(u32))
 879                                 return -EINVAL;
 880
 881                         pg = kzalloc(sizeof(*pg) + len*sizeof(u32), GFP_NOFS);
 882                         if (!pg)
 883                                 return -ENOMEM;
 884
 885                         pg->pgid = pgid;
 886                         pg->pg_temp.len = len;
 887                         for (i = 0; i < len; i++)
 888                                 pg->pg_temp.osds[i] = ceph_decode_32(p);
 889
 890                         ret = __insert_pg_mapping(pg, &map->pg_temp);
 891                         if (ret) {
 892                                 kfree(pg);
 893                                 return ret;
 894                         }
 895                 }
 896         }
 897
 898         return 0;
 899
 900 e_inval:
 901         return -EINVAL;
 902 }
 903
 904 static int decode_pg_temp(void **p, void *end, struct ceph_osdmap *map)
 905 {
 906         return __decode_pg_temp(p, end, map, false);
 907 }
 908
 909 static int decode_new_pg_temp(void **p, void *end, struct ceph_osdmap *map)
 910 {
 911         return __decode_pg_temp(p, end, map, true);
 912 }
 913
 914 static int __decode_primary_temp(void **p, void *end, struct ceph_osdmap *map,
 915                                  bool incremental)
 916 {
 917         u32 n;
 918
 919         ceph_decode_32_safe(p, end, n, e_inval);
 920         while (n--) {
 921                 struct ceph_pg pgid;
 922                 u32 osd;
 923                 int ret;
 924
 925                 ret = ceph_decode_pgid(p, end, &pgid);
 926                 if (ret)
 927                         return ret;
 928
 929                 ceph_decode_32_safe(p, end, osd, e_inval);
 930
 931                 ret = __remove_pg_mapping(&map->primary_temp, pgid);
 932                 BUG_ON(!incremental && ret != -ENOENT);
 933
 934                 if (!incremental || osd != (u32)-1) {
 935                         struct ceph_pg_mapping *pg;
 936
 937                         pg = kzalloc(sizeof(*pg), GFP_NOFS);
 938                         if (!pg)
 939                                 return -ENOMEM;
 940
 941                         pg->pgid = pgid;
 942                         pg->primary_temp.osd = osd;
 943
 944                         ret = __insert_pg_mapping(pg, &map->primary_temp);
 945                         if (ret) {
 946                                 kfree(pg);
 947                                 return ret;
 948                         }
 949                 }
 950         }
 951
 952         return 0;
 953
 954 e_inval:
 955         return -EINVAL;
 956 }
 957
 958 static int decode_primary_temp(void **p, void *end, struct ceph_osdmap *map)
 959 {
 960         return __decode_primary_temp(p, end, map, false);
 961 }
 962
 963 static int decode_new_primary_temp(void **p, void *end,
 964                                    struct ceph_osdmap *map)
 965 {
 966         return __decode_primary_temp(p, end, map, true);
 967 }
 968
 969 u32 ceph_get_primary_affinity(struct ceph_osdmap *map, int osd)
 970 {
 971         BUG_ON(osd >= map->max_osd);
 972
 973         if (!map->osd_primary_affinity)
 974                 return CEPH_OSD_DEFAULT_PRIMARY_AFFINITY;
 975
 976         return map->osd_primary_affinity[osd];
 977 }
 978
 979 static int set_primary_affinity(struct ceph_osdmap *map, int osd, u32 aff)
 980 {
 981         BUG_ON(osd >= map->max_osd);
 982
 983         if (!map->osd_primary_affinity) {
 984                 int i;
 985
 986                 map->osd_primary_affinity = kmalloc(map->max_osd*sizeof(u32),
 987                                                     GFP_NOFS);
 988                 if (!map->osd_primary_affinity)
 989                         return -ENOMEM;
 990
 991                 for (i = 0; i < map->max_osd; i++)
 992                         map->osd_primary_affinity[i] =
 993                             CEPH_OSD_DEFAULT_PRIMARY_AFFINITY;
 994         }
 995
 996         map->osd_primary_affinity[osd] = aff;
 997
 998         return 0;
 999 }
1000
1001 static int decode_primary_affinity(void **p, void *end,
1002                                    struct ceph_osdmap *map)
1003 {
1004         u32 len, i;
1005
1006         ceph_decode_32_safe(p, end, len, e_inval);
1007         if (len == 0) {
1008                 kfree(map->osd_primary_affinity);
1009                 map->osd_primary_affinity = NULL;
1010                 return 0;
1011         }
1012         if (len != map->max_osd)
1013                 goto e_inval;
1014
1015         ceph_decode_need(p, end, map->max_osd*sizeof(u32), e_inval);
1016
1017         for (i = 0; i < map->max_osd; i++) {
1018                 int ret;
1019
1020                 ret = set_primary_affinity(map, i, ceph_decode_32(p));
1021                 if (ret)
1022                         return ret;
1023         }
1024
1025         return 0;
1026
1027 e_inval:
1028         return -EINVAL;
1029 }
1030
1031 static int decode_new_primary_affinity(void **p, void *end,
1032                                        struct ceph_osdmap *map)
1033 {
1034         u32 n;
1035
1036         ceph_decode_32_safe(p, end, n, e_inval);
1037         while (n--) {
1038                 u32 osd, aff;
1039                 int ret;
1040
1041                 ceph_decode_32_safe(p, end, osd, e_inval);
1042                 ceph_decode_32_safe(p, end, aff, e_inval);
1043
1044                 ret = set_primary_affinity(map, osd, aff);
1045                 if (ret)
1046                         return ret;
1047
1048                 pr_info("osd%d primary-affinity 0x%x\n", osd, aff);
1049         }
1050
1051         return 0;
1052
1053 e_inval:
1054         return -EINVAL;
1055 }
1056
1057 /*
1058  * decode a full map.
1059  */
1060 static int osdmap_decode(void **p, void *end, struct ceph_osdmap *map)
1061 {
1062         u8 struct_v;
1063         u32 epoch = 0;
1064         void *start = *p;
1065         u32 max;
1066         u32 len, i;
1067         int err;
1068
1069         dout("%s %p to %p len %d\n", __func__, *p, end, (int)(end - *p));
1070
1071         err = get_osdmap_client_data_v(p, end, "full", &struct_v);
1072         if (err)
1073                 goto bad;
1074
1075         /* fsid, epoch, created, modified */
1076         ceph_decode_need(p, end, sizeof(map->fsid) + sizeof(u32) +
1077                          sizeof(map->created) + sizeof(map->modified), e_inval);
1078         ceph_decode_copy(p, &map->fsid, sizeof(map->fsid));
1079         epoch = map->epoch = ceph_decode_32(p);
1080         ceph_decode_copy(p, &map->created, sizeof(map->created));
1081         ceph_decode_copy(p, &map->modified, sizeof(map->modified));
1082
1083         /* pools */
1084         err = decode_pools(p, end, map);
1085         if (err)
1086                 goto bad;
1087
1088         /* pool_name */
1089         err = decode_pool_names(p, end, map);
1090         if (err)
1091                 goto bad;
1092
1093         ceph_decode_32_safe(p, end, map->pool_max, e_inval);
1094
1095         ceph_decode_32_safe(p, end, map->flags, e_inval);
1096
1097         /* max_osd */
1098         ceph_decode_32_safe(p, end, max, e_inval);
1099
1100         /* (re)alloc osd arrays */
1101         err = osdmap_set_max_osd(map, max);
1102         if (err)
1103                 goto bad;
1104
1105         /* osd_state, osd_weight, osd_addrs->client_addr */
1106         ceph_decode_need(p, end, 3*sizeof(u32) +
1107                          map->max_osd*(1 + sizeof(*map->osd_weight) +
1108                                        sizeof(*map->osd_addr)), e_inval);
1109
1110         if (ceph_decode_32(p) != map->max_osd)
1111                 goto e_inval;
1112
1113         ceph_decode_copy(p, map->osd_state, map->max_osd);
1114
1115         if (ceph_decode_32(p) != map->max_osd)
1116                 goto e_inval;
1117
1118         for (i = 0; i < map->max_osd; i++)
1119                 map->osd_weight[i] = ceph_decode_32(p);
1120
1121         if (ceph_decode_32(p) != map->max_osd)
1122                 goto e_inval;
1123
1124         ceph_decode_copy(p, map->osd_addr, map->max_osd*sizeof(*map->osd_addr));
1125         for (i = 0; i < map->max_osd; i++)
1126                 ceph_decode_addr(&map->osd_addr[i]);
1127
1128         /* pg_temp */
1129         err = decode_pg_temp(p, end, map);
1130         if (err)
1131                 goto bad;
1132
1133         /* primary_temp */
1134         if (struct_v >= 1) {
1135                 err = decode_primary_temp(p, end, map);
1136                 if (err)
1137                         goto bad;
1138         }
1139
1140         /* primary_affinity */
1141         if (struct_v >= 2) {
1142                 err = decode_primary_affinity(p, end, map);
1143                 if (err)
1144                         goto bad;
1145         } else {
1146                 /* XXX can this happen? */
1147                 kfree(map->osd_primary_affinity);
1148                 map->osd_primary_affinity = NULL;
1149         }
1150
1151         /* crush */
1152         ceph_decode_32_safe(p, end, len, e_inval);
1153         map->crush = crush_decode(*p, min(*p + len, end));
1154         if (IS_ERR(map->crush)) {
1155                 err = PTR_ERR(map->crush);
1156                 map->crush = NULL;
1157                 goto bad;
1158         }
1159         *p += len;
1160
1161         /* ignore the rest */
1162         *p = end;
1163
1164         dout("full osdmap epoch %d max_osd %d\n", map->epoch, map->max_osd);
1165         return 0;
1166
1167 e_inval:
1168         err = -EINVAL;
1169 bad:
1170         pr_err("corrupt full osdmap (%d) epoch %d off %d (%p of %p-%p)\n",
1171                err, epoch, (int)(*p - start), *p, start, end);
1172         print_hex_dump(KERN_DEBUG, "osdmap: ",
1173                        DUMP_PREFIX_OFFSET, 16, 1,
1174                        start, end - start, true);
1175         return err;
1176 }
1177
1178 /*
1179  * Allocate and decode a full map.
1180  */
1181 struct ceph_osdmap *ceph_osdmap_decode(void **p, void *end)
1182 {
1183         struct ceph_osdmap *map;
1184         int ret;
1185
1186         map = kzalloc(sizeof(*map), GFP_NOFS);
1187         if (!map)
1188                 return ERR_PTR(-ENOMEM);
1189
1190         map->pg_temp = RB_ROOT;
1191         map->primary_temp = RB_ROOT;
1192         mutex_init(&map->crush_scratch_mutex);
1193
1194         ret = osdmap_decode(p, end, map);
1195         if (ret) {
1196                 ceph_osdmap_destroy(map);
1197                 return ERR_PTR(ret);
1198         }
1199
1200         return map;
1201 }
1202
1203 /*
1204  * decode and apply an incremental map update.
1205  */
1206 struct ceph_osdmap *osdmap_apply_incremental(void **p, void *end,
1207                                              struct ceph_osdmap *map)
1208 {
1209         struct crush_map *newcrush = NULL;
1210         struct ceph_fsid fsid;
1211         u32 epoch = 0;
1212         struct ceph_timespec modified;
1213         s32 len;
1214         u64 pool;
1215         __s64 new_pool_max;
1216         __s32 new_flags, max;
1217         void *start = *p;
1218         int err;
1219         u8 struct_v;
1220
1221         dout("%s %p to %p len %d\n", __func__, *p, end, (int)(end - *p));
1222
1223         err = get_osdmap_client_data_v(p, end, "inc", &struct_v);
1224         if (err)
1225                 goto bad;
1226
1227         /* fsid, epoch, modified, new_pool_max, new_flags */
1228         ceph_decode_need(p, end, sizeof(fsid) + sizeof(u32) + sizeof(modified) +
1229                          sizeof(u64) + sizeof(u32), e_inval);
1230         ceph_decode_copy(p, &fsid, sizeof(fsid));
1231         epoch = ceph_decode_32(p);
1232         BUG_ON(epoch != map->epoch+1);
1233         ceph_decode_copy(p, &modified, sizeof(modified));
1234         new_pool_max = ceph_decode_64(p);
1235         new_flags = ceph_decode_32(p);
1236
1237         /* full map? */
1238         ceph_decode_32_safe(p, end, len, e_inval);
1239         if (len > 0) {
1240                 dout("apply_incremental full map len %d, %p to %p\n",
1241                      len, *p, end);
1242                 return ceph_osdmap_decode(p, min(*p+len, end));
1243         }
1244
1245         /* new crush? */
1246         ceph_decode_32_safe(p, end, len, e_inval);
1247         if (len > 0) {
1248                 newcrush = crush_decode(*p, min(*p+len, end));
1249                 if (IS_ERR(newcrush)) {
1250                         err = PTR_ERR(newcrush);
1251                         newcrush = NULL;
1252                         goto bad;
1253                 }
1254                 *p += len;
1255         }
1256
1257         /* new flags? */
1258         if (new_flags >= 0)
1259                 map->flags = new_flags;
1260         if (new_pool_max >= 0)
1261                 map->pool_max = new_pool_max;
1262
1263         /* new max? */
1264         ceph_decode_32_safe(p, end, max, e_inval);
1265         if (max >= 0) {
1266                 err = osdmap_set_max_osd(map, max);
1267                 if (err)
1268                         goto bad;
1269         }
1270
1271         map->epoch++;
1272         map->modified = modified;
1273         if (newcrush) {
1274                 if (map->crush)
1275                         crush_destroy(map->crush);
1276                 map->crush = newcrush;
1277                 newcrush = NULL;
1278         }
1279
1280         /* new_pools */
1281         err = decode_new_pools(p, end, map);
1282         if (err)
1283                 goto bad;
1284
1285         /* new_pool_names */
1286         err = decode_pool_names(p, end, map);
1287         if (err)
1288                 goto bad;
1289
1290         /* old_pool */
1291         ceph_decode_32_safe(p, end, len, e_inval);
1292         while (len--) {
1293                 struct ceph_pg_pool_info *pi;
1294
1295                 ceph_decode_64_safe(p, end, pool, e_inval);
1296                 pi = __lookup_pg_pool(&map->pg_pools, pool);
1297                 if (pi)
1298                         __remove_pg_pool(&map->pg_pools, pi);
1299         }
1300
1301         /* new_up */
1302         ceph_decode_32_safe(p, end, len, e_inval);
1303         while (len--) {
1304                 u32 osd;
1305                 struct ceph_entity_addr addr;
1306                 ceph_decode_32_safe(p, end, osd, e_inval);
1307                 ceph_decode_copy_safe(p, end, &addr, sizeof(addr), e_inval);
1308                 ceph_decode_addr(&addr);
1309                 pr_info("osd%d up\n", osd);
1310                 BUG_ON(osd >= map->max_osd);
1311                 map->osd_state[osd] |= CEPH_OSD_UP | CEPH_OSD_EXISTS;
1312                 map->osd_addr[osd] = addr;
1313         }
1314
1315         /* new_state */
1316         ceph_decode_32_safe(p, end, len, e_inval);
1317         while (len--) {
1318                 u32 osd;
1319                 u8 xorstate;
1320                 ceph_decode_32_safe(p, end, osd, e_inval);
1321                 xorstate = **(u8 **)p;
1322                 (*p)++;  /* clean flag */
1323                 if (xorstate == 0)
1324                         xorstate = CEPH_OSD_UP;
1325                 if (xorstate & CEPH_OSD_UP)
1326                         pr_info("osd%d down\n", osd);
1327                 if (osd < map->max_osd)
1328                         map->osd_state[osd] ^= xorstate;
1329         }
1330
1331         /* new_weight */
1332         ceph_decode_32_safe(p, end, len, e_inval);
1333         while (len--) {
1334                 u32 osd, off;
1335                 ceph_decode_need(p, end, sizeof(u32)*2, e_inval);
1336                 osd = ceph_decode_32(p);
1337                 off = ceph_decode_32(p);
1338                 pr_info("osd%d weight 0x%x %s\n", osd, off,
1339                      off == CEPH_OSD_IN ? "(in)" :
1340                      (off == CEPH_OSD_OUT ? "(out)" : ""));
1341                 if (osd < map->max_osd)
1342                         map->osd_weight[osd] = off;
1343         }
1344
1345         /* new_pg_temp */
1346         err = decode_new_pg_temp(p, end, map);
1347         if (err)
1348                 goto bad;
1349
1350         /* new_primary_temp */
1351         if (struct_v >= 1) {
1352                 err = decode_new_primary_temp(p, end, map);
1353                 if (err)
1354                         goto bad;
1355         }
1356
1357         /* new_primary_affinity */
1358         if (struct_v >= 2) {
1359                 err = decode_new_primary_affinity(p, end, map);
1360                 if (err)
1361                         goto bad;
1362         }
1363
1364         /* ignore the rest */
1365         *p = end;
1366
1367         dout("inc osdmap epoch %d max_osd %d\n", map->epoch, map->max_osd);
1368         return map;
1369
1370 e_inval:
1371         err = -EINVAL;
1372 bad:
1373         pr_err("corrupt inc osdmap (%d) epoch %d off %d (%p of %p-%p)\n",
1374                err, epoch, (int)(*p - start), *p, start, end);
1375         print_hex_dump(KERN_DEBUG, "osdmap: ",
1376                        DUMP_PREFIX_OFFSET, 16, 1,
1377                        start, end - start, true);
1378         if (newcrush)
1379                 crush_destroy(newcrush);
1380         return ERR_PTR(err);
1381 }
1382
1383 void ceph_oid_copy(struct ceph_object_id *dest,
1384                    const struct ceph_object_id *src)
1385 {
1386         WARN_ON(!ceph_oid_empty(dest));
1387
1388         if (src->name != src->inline_name) {
1389                 /* very rare, see ceph_object_id definition */
1390                 dest->name = kmalloc(src->name_len + 1,
1391                                      GFP_NOIO | __GFP_NOFAIL);
1392         }
1393
1394         memcpy(dest->name, src->name, src->name_len + 1);
1395         dest->name_len = src->name_len;
1396 }
1397 EXPORT_SYMBOL(ceph_oid_copy);
1398
1399 static __printf(2, 0)
1400 int oid_printf_vargs(struct ceph_object_id *oid, const char *fmt, va_list ap)
1401 {
1402         int len;
1403
1404         WARN_ON(!ceph_oid_empty(oid));
1405
1406         len = vsnprintf(oid->inline_name, sizeof(oid->inline_name), fmt, ap);
1407         if (len >= sizeof(oid->inline_name))
1408                 return len;
1409
1410         oid->name_len = len;
1411         return 0;
1412 }
1413
1414 /*
1415  * If oid doesn't fit into inline buffer, BUG.
1416  */
1417 void ceph_oid_printf(struct ceph_object_id *oid, const char *fmt, ...)
1418 {
1419         va_list ap;
1420
1421         va_start(ap, fmt);
1422         BUG_ON(oid_printf_vargs(oid, fmt, ap));
1423         va_end(ap);
1424 }
1425 EXPORT_SYMBOL(ceph_oid_printf);
1426
1427 static __printf(3, 0)
1428 int oid_aprintf_vargs(struct ceph_object_id *oid, gfp_t gfp,
1429                       const char *fmt, va_list ap)
1430 {
1431         va_list aq;
1432         int len;
1433
1434         va_copy(aq, ap);
1435         len = oid_printf_vargs(oid, fmt, aq);
1436         va_end(aq);
1437
1438         if (len) {
1439                 char *external_name;
1440
1441                 external_name = kmalloc(len + 1, gfp);
1442                 if (!external_name)
1443                         return -ENOMEM;
1444
1445                 oid->name = external_name;
1446                 WARN_ON(vsnprintf(oid->name, len + 1, fmt, ap) != len);
1447                 oid->name_len = len;
1448         }
1449
1450         return 0;
1451 }
1452
1453 /*
1454  * If oid doesn't fit into inline buffer, allocate.
1455  */
1456 int ceph_oid_aprintf(struct ceph_object_id *oid, gfp_t gfp,
1457                      const char *fmt, ...)
1458 {
1459         va_list ap;
1460         int ret;
1461
1462         va_start(ap, fmt);
1463         ret = oid_aprintf_vargs(oid, gfp, fmt, ap);
1464         va_end(ap);
1465
1466         return ret;
1467 }
1468 EXPORT_SYMBOL(ceph_oid_aprintf);
1469
1470 void ceph_oid_destroy(struct ceph_object_id *oid)
1471 {
1472         if (oid->name != oid->inline_name)
1473                 kfree(oid->name);
1474 }
1475 EXPORT_SYMBOL(ceph_oid_destroy);
1476
1477 static bool osds_valid(const struct ceph_osds *set)
1478 {
1479         /* non-empty set */
1480         if (set->size > 0 && set->primary >= 0)
1481                 return true;
1482
1483         /* empty can_shift_osds set */
1484         if (!set->size && set->primary == -1)
1485                 return true;
1486
1487         /* empty !can_shift_osds set - all NONE */
1488         if (set->size > 0 && set->primary == -1) {
1489                 int i;
1490
1491                 for (i = 0; i < set->size; i++) {
1492                         if (set->osds[i] != CRUSH_ITEM_NONE)
1493                                 break;
1494                 }
1495                 if (i == set->size)
1496                         return true;
1497         }
1498
1499         return false;
1500 }
1501
1502 void ceph_osds_copy(struct ceph_osds *dest, const struct ceph_osds *src)
1503 {
1504         memcpy(dest->osds, src->osds, src->size * sizeof(src->osds[0]));
1505         dest->size = src->size;
1506         dest->primary = src->primary;
1507 }
1508
1509 /*
1510  * calculate file layout from given offset, length.
1511  * fill in correct oid, logical length, and object extent
1512  * offset, length.
1513  *
1514  * for now, we write only a single su, until we can
1515  * pass a stride back to the caller.
1516  */
1517 int ceph_calc_file_object_mapping(struct ceph_file_layout *layout,
1518                                    u64 off, u64 len,
1519                                    u64 *ono,
1520                                    u64 *oxoff, u64 *oxlen)
1521 {
1522         u32 osize = le32_to_cpu(layout->fl_object_size);
1523         u32 su = le32_to_cpu(layout->fl_stripe_unit);
1524         u32 sc = le32_to_cpu(layout->fl_stripe_count);
1525         u32 bl, stripeno, stripepos, objsetno;
1526         u32 su_per_object;
1527         u64 t, su_offset;
1528
1529         dout("mapping %llu~%llu  osize %u fl_su %u\n", off, len,
1530              osize, su);
1531         if (su == 0 || sc == 0)
1532                 goto invalid;
1533         su_per_object = osize / su;
1534         if (su_per_object == 0)
1535                 goto invalid;
1536         dout("osize %u / su %u = su_per_object %u\n", osize, su,
1537              su_per_object);
1538
1539         if ((su & ~PAGE_MASK) != 0)
1540                 goto invalid;
1541
1542         /* bl = *off / su; */
1543         t = off;
1544         do_div(t, su);
1545         bl = t;
1546         dout("off %llu / su %u = bl %u\n", off, su, bl);
1547
1548         stripeno = bl / sc;
1549         stripepos = bl % sc;
1550         objsetno = stripeno / su_per_object;
1551
1552         *ono = objsetno * sc + stripepos;
1553         dout("objset %u * sc %u = ono %u\n", objsetno, sc, (unsigned int)*ono);
1554
1555         /* *oxoff = *off % layout->fl_stripe_unit;  # offset in su */
1556         t = off;
1557         su_offset = do_div(t, su);
1558         *oxoff = su_offset + (stripeno % su_per_object) * su;
1559
1560         /*
1561          * Calculate the length of the extent being written to the selected
1562          * object. This is the minimum of the full length requested (len) or
1563          * the remainder of the current stripe being written to.
1564          */
1565         *oxlen = min_t(u64, len, su - su_offset);
1566
1567         dout(" obj extent %llu~%llu\n", *oxoff, *oxlen);
1568         return 0;
1569
1570 invalid:
1571         dout(" invalid layout\n");
1572         *ono = 0;
1573         *oxoff = 0;
1574         *oxlen = 0;
1575         return -EINVAL;
1576 }
1577 EXPORT_SYMBOL(ceph_calc_file_object_mapping);
1578
1579 /*
1580  * Map an object into a PG.
1581  *
1582  * Should only be called with target_oid and target_oloc (as opposed to
1583  * base_oid and base_oloc), since tiering isn't taken into account.
1584  */
1585 int ceph_object_locator_to_pg(struct ceph_osdmap *osdmap,
1586                               struct ceph_object_id *oid,
1587                               struct ceph_object_locator *oloc,
1588                               struct ceph_pg *raw_pgid)
1589 {
1590         struct ceph_pg_pool_info *pi;
1591
1592         pi = ceph_pg_pool_by_id(osdmap, oloc->pool);
1593         if (!pi)
1594                 return -ENOENT;
1595
1596         raw_pgid->pool = oloc->pool;
1597         raw_pgid->seed = ceph_str_hash(pi->object_hash, oid->name,
1598                                        oid->name_len);
1599
1600         dout("%s %*pE -> raw_pgid %llu.%x\n", __func__, oid->name_len,
1601              oid->name, raw_pgid->pool, raw_pgid->seed);
1602         return 0;
1603 }
1604 EXPORT_SYMBOL(ceph_object_locator_to_pg);
1605
1606 /*
1607  * Map a raw PG (full precision ps) into an actual PG.
1608  */
1609 static void raw_pg_to_pg(struct ceph_pg_pool_info *pi,
1610                          const struct ceph_pg *raw_pgid,
1611                          struct ceph_pg *pgid)
1612 {
1613         pgid->pool = raw_pgid->pool;
1614         pgid->seed = ceph_stable_mod(raw_pgid->seed, pi->pg_num,
1615                                      pi->pg_num_mask);
1616 }
1617
1618 /*
1619  * Map a raw PG (full precision ps) into a placement ps (placement
1620  * seed).  Include pool id in that value so that different pools don't
1621  * use the same seeds.
1622  */
1623 static u32 raw_pg_to_pps(struct ceph_pg_pool_info *pi,
1624                          const struct ceph_pg *raw_pgid)
1625 {
1626         if (pi->flags & CEPH_POOL_FLAG_HASHPSPOOL) {
1627                 /* hash pool id and seed so that pool PGs do not overlap */
1628                 return crush_hash32_2(CRUSH_HASH_RJENKINS1,
1629                                       ceph_stable_mod(raw_pgid->seed,
1630                                                       pi->pgp_num,
1631                                                       pi->pgp_num_mask),
1632                                       raw_pgid->pool);
1633         } else {
1634                 /*
1635                  * legacy behavior: add ps and pool together.  this is
1636                  * not a great approach because the PGs from each pool
1637                  * will overlap on top of each other: 0.5 == 1.4 ==
1638                  * 2.3 == ...
1639                  */
1640                 return ceph_stable_mod(raw_pgid->seed, pi->pgp_num,
1641                                        pi->pgp_num_mask) +
1642                        (unsigned)raw_pgid->pool;
1643         }
1644 }
1645
1646 static int do_crush(struct ceph_osdmap *map, int ruleno, int x,
1647                     int *result, int result_max,
1648                     const __u32 *weight, int weight_max)
1649 {
1650         int r;
1651
1652         BUG_ON(result_max > CEPH_PG_MAX_SIZE);
1653
1654         mutex_lock(&map->crush_scratch_mutex);
1655         r = crush_do_rule(map->crush, ruleno, x, result, result_max,
1656                           weight, weight_max, map->crush_scratch_ary);
1657         mutex_unlock(&map->crush_scratch_mutex);
1658
1659         return r;
1660 }
1661
1662 /*
1663  * Calculate raw set (CRUSH output) for given PG.  The result may
1664  * contain nonexistent OSDs.  ->primary is undefined for a raw set.
1665  *
1666  * Placement seed (CRUSH input) is returned through @ppps.
1667  */
1668 static void pg_to_raw_osds(struct ceph_osdmap *osdmap,
1669                            struct ceph_pg_pool_info *pi,
1670                            const struct ceph_pg *raw_pgid,
1671                            struct ceph_osds *raw,
1672                            u32 *ppps)
1673 {
1674         u32 pps = raw_pg_to_pps(pi, raw_pgid);
1675         int ruleno;
1676         int len;
1677
1678         ceph_osds_init(raw);
1679         if (ppps)
1680                 *ppps = pps;
1681
1682         ruleno = crush_find_rule(osdmap->crush, pi->crush_ruleset, pi->type,
1683                                  pi->size);
1684         if (ruleno < 0) {
1685                 pr_err("no crush rule: pool %lld ruleset %d type %d size %d\n",
1686                        pi->id, pi->crush_ruleset, pi->type, pi->size);
1687                 return;
1688         }
1689
1690         len = do_crush(osdmap, ruleno, pps, raw->osds,
1691                        min_t(int, pi->size, ARRAY_SIZE(raw->osds)),
1692                        osdmap->osd_weight, osdmap->max_osd);
1693         if (len < 0) {
1694                 pr_err("error %d from crush rule %d: pool %lld ruleset %d type %d size %d\n",
1695                        len, ruleno, pi->id, pi->crush_ruleset, pi->type,
1696                        pi->size);
1697                 return;
1698         }
1699
1700         raw->size = len;
1701 }
1702
1703 /*
1704  * Given raw set, calculate up set and up primary.  By definition of an
1705  * up set, the result won't contain nonexistent or down OSDs.
1706  *
1707  * This is done in-place - on return @set is the up set.  If it's
1708  * empty, ->primary will remain undefined.
1709  */
1710 static void raw_to_up_osds(struct ceph_osdmap *osdmap,
1711                            struct ceph_pg_pool_info *pi,
1712                            struct ceph_osds *set)
1713 {
1714         int i;
1715
1716         /* ->primary is undefined for a raw set */
1717         BUG_ON(set->primary != -1);
1718
1719         if (ceph_can_shift_osds(pi)) {
1720                 int removed = 0;
1721
1722                 /* shift left */
1723                 for (i = 0; i < set->size; i++) {
1724                         if (ceph_osd_is_down(osdmap, set->osds[i])) {
1725                                 removed++;
1726                                 continue;
1727                         }
1728                         if (removed)
1729                                 set->osds[i - removed] = set->osds[i];
1730                 }
1731                 set->size -= removed;
1732                 if (set->size > 0)
1733                         set->primary = set->osds[0];
1734         } else {
1735                 /* set down/dne devices to NONE */
1736                 for (i = set->size - 1; i >= 0; i--) {
1737                         if (ceph_osd_is_down(osdmap, set->osds[i]))
1738                                 set->osds[i] = CRUSH_ITEM_NONE;
1739                         else
1740                                 set->primary = set->osds[i];
1741                 }
1742         }
1743 }
1744
1745 static void apply_primary_affinity(struct ceph_osdmap *osdmap,
1746                                    struct ceph_pg_pool_info *pi,
1747                                    u32 pps,
1748                                    struct ceph_osds *up)
1749 {
1750         int i;
1751         int pos = -1;
1752
1753         /*
1754          * Do we have any non-default primary_affinity values for these
1755          * osds?
1756          */
1757         if (!osdmap->osd_primary_affinity)
1758                 return;
1759
1760         for (i = 0; i < up->size; i++) {
1761                 int osd = up->osds[i];
1762
1763                 if (osd != CRUSH_ITEM_NONE &&
1764                     osdmap->osd_primary_affinity[osd] !=
1765                                         CEPH_OSD_DEFAULT_PRIMARY_AFFINITY) {
1766                         break;
1767                 }
1768         }
1769         if (i == up->size)
1770                 return;
1771
1772         /*
1773          * Pick the primary.  Feed both the seed (for the pg) and the
1774          * osd into the hash/rng so that a proportional fraction of an
1775          * osd's pgs get rejected as primary.
1776          */
1777         for (i = 0; i < up->size; i++) {
1778                 int osd = up->osds[i];
1779                 u32 aff;
1780
1781                 if (osd == CRUSH_ITEM_NONE)
1782                         continue;
1783
1784                 aff = osdmap->osd_primary_affinity[osd];
1785                 if (aff < CEPH_OSD_MAX_PRIMARY_AFFINITY &&
1786                     (crush_hash32_2(CRUSH_HASH_RJENKINS1,
1787                                     pps, osd) >> 16) >= aff) {
1788                         /*
1789                          * We chose not to use this primary.  Note it
1790                          * anyway as a fallback in case we don't pick
1791                          * anyone else, but keep looking.
1792                          */
1793                         if (pos < 0)
1794                                 pos = i;
1795                 } else {
1796                         pos = i;
1797                         break;
1798                 }
1799         }
1800         if (pos < 0)
1801                 return;
1802
1803         up->primary = up->osds[pos];
1804
1805         if (ceph_can_shift_osds(pi) && pos > 0) {
1806                 /* move the new primary to the front */
1807                 for (i = pos; i > 0; i--)
1808                         up->osds[i] = up->osds[i - 1];
1809                 up->osds[0] = up->primary;
1810         }
1811 }
1812
1813 /*
1814  * Get pg_temp and primary_temp mappings for given PG.
1815  *
1816  * Note that a PG may have none, only pg_temp, only primary_temp or
1817  * both pg_temp and primary_temp mappings.  This means @temp isn't
1818  * always a valid OSD set on return: in the "only primary_temp" case,
1819  * @temp will have its ->primary >= 0 but ->size == 0.
1820  */
1821 static void get_temp_osds(struct ceph_osdmap *osdmap,
1822                           struct ceph_pg_pool_info *pi,
1823                           const struct ceph_pg *raw_pgid,
1824                           struct ceph_osds *temp)
1825 {
1826         struct ceph_pg pgid;
1827         struct ceph_pg_mapping *pg;
1828         int i;
1829
1830         raw_pg_to_pg(pi, raw_pgid, &pgid);
1831         ceph_osds_init(temp);
1832
1833         /* pg_temp? */
1834         pg = __lookup_pg_mapping(&osdmap->pg_temp, pgid);
1835         if (pg) {
1836                 for (i = 0; i < pg->pg_temp.len; i++) {
1837                         if (ceph_osd_is_down(osdmap, pg->pg_temp.osds[i])) {
1838                                 if (ceph_can_shift_osds(pi))
1839                                         continue;
1840
1841                                 temp->osds[temp->size++] = CRUSH_ITEM_NONE;
1842                         } else {
1843                                 temp->osds[temp->size++] = pg->pg_temp.osds[i];
1844                         }
1845                 }
1846
1847                 /* apply pg_temp's primary */
1848                 for (i = 0; i < temp->size; i++) {
1849                         if (temp->osds[i] != CRUSH_ITEM_NONE) {
1850                                 temp->primary = temp->osds[i];
1851                                 break;
1852                         }
1853                 }
1854         }
1855
1856         /* primary_temp? */
1857         pg = __lookup_pg_mapping(&osdmap->primary_temp, pgid);
1858         if (pg)
1859                 temp->primary = pg->primary_temp.osd;
1860 }
1861
1862 /*
1863  * Map a PG to its acting set as well as its up set.
1864  *
1865  * Acting set is used for data mapping purposes, while up set can be
1866  * recorded for detecting interval changes and deciding whether to
1867  * resend a request.
1868  */
1869 void ceph_pg_to_up_acting_osds(struct ceph_osdmap *osdmap,
1870                                const struct ceph_pg *raw_pgid,
1871                                struct ceph_osds *up,
1872                                struct ceph_osds *acting)
1873 {
1874         struct ceph_pg_pool_info *pi;
1875         u32 pps;
1876
1877         pi = ceph_pg_pool_by_id(osdmap, raw_pgid->pool);
1878         if (!pi) {
1879                 ceph_osds_init(up);
1880                 ceph_osds_init(acting);
1881                 goto out;
1882         }
1883
1884         pg_to_raw_osds(osdmap, pi, raw_pgid, up, &pps);
1885         raw_to_up_osds(osdmap, pi, up);
1886         apply_primary_affinity(osdmap, pi, pps, up);
1887         get_temp_osds(osdmap, pi, raw_pgid, acting);
1888         if (!acting->size) {
1889                 memcpy(acting->osds, up->osds, up->size * sizeof(up->osds[0]));
1890                 acting->size = up->size;
1891                 if (acting->primary == -1)
1892                         acting->primary = up->primary;
1893         }
1894 out:
1895         WARN_ON(!osds_valid(up) || !osds_valid(acting));
1896 }
1897
1898 /*
1899  * Return primary osd for given pgid, or -1 if none.
1900  */
1901 int ceph_calc_pg_primary(struct ceph_osdmap *osdmap, struct ceph_pg pgid)
1902 {
1903         struct ceph_osds up, acting;
1904
1905         ceph_pg_to_up_acting_osds(osdmap, &pgid, &up, &acting);
1906         return acting.primary;
1907 }
1908 EXPORT_SYMBOL(ceph_calc_pg_primary);