git.oblomov.eu Git - linux-2.6/blob - fs/jfs/jfs_extent.c

   1 /*
   2  *   Copyright (C) International Business Machines Corp., 2000-2004
   3  *
   4  *   This program is free software;  you can redistribute it and/or modify
   5  *   it under the terms of the GNU General Public License as published by
   6  *   the Free Software Foundation; either version 2 of the License, or
   7  *   (at your option) any later version.
   8  *
   9  *   This program is distributed in the hope that it will be useful,
  10  *   but WITHOUT ANY WARRANTY;  without even the implied warranty of
  11  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  12  *   the GNU General Public License for more details.
  13  *
  14  *   You should have received a copy of the GNU General Public License
  15  *   along with this program;  if not, write to the Free Software
  16  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  17  */
  18
  19 #include <linux/fs.h>
  20 #include <linux/quotaops.h>
  21 #include "jfs_incore.h"
  22 #include "jfs_inode.h"
  23 #include "jfs_superblock.h"
  24 #include "jfs_dmap.h"
  25 #include "jfs_extent.h"
  26 #include "jfs_debug.h"
  27
  28 /*
  29  * forward references
  30  */
  31 static int extBalloc(struct inode *, s64, s64 *, s64 *);
  32 #ifdef _NOTYET
  33 static int extBrealloc(struct inode *, s64, s64, s64 *, s64 *);
  34 #endif
  35 static s64 extRoundDown(s64 nb);
  36
  37 #define DPD(a)          (printk("(a): %d\n",(a)))
  38 #define DPC(a)          (printk("(a): %c\n",(a)))
  39 #define DPL1(a)                                 \
  40 {                                               \
  41         if ((a) >> 32)                          \
  42                 printk("(a): %x%08x  ",(a));    \
  43         else                                    \
  44                 printk("(a): %x  ",(a) << 32);  \
  45 }
  46 #define DPL(a)                                  \
  47 {                                               \
  48         if ((a) >> 32)                          \
  49                 printk("(a): %x%08x\n",(a));    \
  50         else                                    \
  51                 printk("(a): %x\n",(a) << 32);  \
  52 }
  53
  54 #define DPD1(a)         (printk("(a): %d  ",(a)))
  55 #define DPX(a)          (printk("(a): %08x\n",(a)))
  56 #define DPX1(a)         (printk("(a): %08x  ",(a)))
  57 #define DPS(a)          (printk("%s\n",(a)))
  58 #define DPE(a)          (printk("\nENTERING: %s\n",(a)))
  59 #define DPE1(a)          (printk("\nENTERING: %s",(a)))
  60 #define DPS1(a)         (printk("  %s  ",(a)))
  61
  62
  63 /*
  64  * NAME:        extAlloc()
  65  *
  66  * FUNCTION:    allocate an extent for a specified page range within a
  67  *              file.
  68  *
  69  * PARAMETERS:
  70  *      ip      - the inode of the file.
  71  *      xlen    - requested extent length.
  72  *      pno     - the starting page number with the file.
  73  *      xp      - pointer to an xad.  on entry, xad describes an
  74  *                extent that is used as an allocation hint if the
  75  *                xaddr of the xad is non-zero.  on successful exit,
  76  *                the xad describes the newly allocated extent.
  77  *      abnr    - boolean_t indicating whether the newly allocated extent
  78  *                should be marked as allocated but not recorded.
  79  *
  80  * RETURN VALUES:
  81  *      0       - success
  82  *      -EIO    - i/o error.
  83  *      -ENOSPC - insufficient disk resources.
  84  */
  85 int
  86 extAlloc(struct inode *ip, s64 xlen, s64 pno, xad_t * xp, boolean_t abnr)
  87 {
  88         struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
  89         s64 nxlen, nxaddr, xoff, hint, xaddr = 0;
  90         int rc;
  91         int xflag;
  92
  93         /* This blocks if we are low on resources */
  94         txBeginAnon(ip->i_sb);
  95
  96         /* Avoid race with jfs_commit_inode() */
  97         down(&JFS_IP(ip)->commit_sem);
  98
  99         /* validate extent length */
 100         if (xlen > MAXXLEN)
 101                 xlen = MAXXLEN;
 102
 103         /* get the page's starting extent offset */
 104         xoff = pno << sbi->l2nbperpage;
 105
 106         /* check if an allocation hint was provided */
 107         if ((hint = addressXAD(xp))) {
 108                 /* get the size of the extent described by the hint */
 109                 nxlen = lengthXAD(xp);
 110
 111                 /* check if the hint is for the portion of the file
 112                  * immediately previous to the current allocation
 113                  * request and if hint extent has the same abnr
 114                  * value as the current request.  if so, we can
 115                  * extend the hint extent to include the current
 116                  * extent if we can allocate the blocks immediately
 117                  * following the hint extent.
 118                  */
 119                 if (offsetXAD(xp) + nxlen == xoff &&
 120                     abnr == ((xp->flag & XAD_NOTRECORDED) ? TRUE : FALSE))
 121                         xaddr = hint + nxlen;
 122
 123                 /* adjust the hint to the last block of the extent */
 124                 hint += (nxlen - 1);
 125         }
 126
 127         /* allocate the disk blocks for the extent.  initially, extBalloc()
 128          * will try to allocate disk blocks for the requested size (xlen).
 129          * if this fails (xlen contigious free blocks not avaliable), it'll
 130          * try to allocate a smaller number of blocks (producing a smaller
 131          * extent), with this smaller number of blocks consisting of the
 132          * requested number of blocks rounded down to the next smaller
 133          * power of 2 number (i.e. 16 -> 8).  it'll continue to round down
 134          * and retry the allocation until the number of blocks to allocate
 135          * is smaller than the number of blocks per page.
 136          */
 137         nxlen = xlen;
 138         if ((rc = extBalloc(ip, hint ? hint : INOHINT(ip), &nxlen, &nxaddr))) {
 139                 up(&JFS_IP(ip)->commit_sem);
 140                 return (rc);
 141         }
 142
 143         /* Allocate blocks to quota. */
 144         if (DQUOT_ALLOC_BLOCK(ip, nxlen)) {
 145                 dbFree(ip, nxaddr, (s64) nxlen);
 146                 up(&JFS_IP(ip)->commit_sem);
 147                 return -EDQUOT;
 148         }
 149
 150         /* determine the value of the extent flag */
 151         xflag = (abnr == TRUE) ? XAD_NOTRECORDED : 0;
 152
 153         /* if we can extend the hint extent to cover the current request,
 154          * extend it.  otherwise, insert a new extent to
 155          * cover the current request.
 156          */
 157         if (xaddr && xaddr == nxaddr)
 158                 rc = xtExtend(0, ip, xoff, (int) nxlen, 0);
 159         else
 160                 rc = xtInsert(0, ip, xflag, xoff, (int) nxlen, &nxaddr, 0);
 161
 162         /* if the extend or insert failed,
 163          * free the newly allocated blocks and return the error.
 164          */
 165         if (rc) {
 166                 dbFree(ip, nxaddr, nxlen);
 167                 DQUOT_FREE_BLOCK(ip, nxlen);
 168                 up(&JFS_IP(ip)->commit_sem);
 169                 return (rc);
 170         }
 171
 172         /* set the results of the extent allocation */
 173         XADaddress(xp, nxaddr);
 174         XADlength(xp, nxlen);
 175         XADoffset(xp, xoff);
 176         xp->flag = xflag;
 177
 178         mark_inode_dirty(ip);
 179
 180         up(&JFS_IP(ip)->commit_sem);
 181         /*
 182          * COMMIT_SyncList flags an anonymous tlock on page that is on
 183          * sync list.
 184          * We need to commit the inode to get the page written disk.
 185          */
 186         if (test_and_clear_cflag(COMMIT_Synclist,ip))
 187                 jfs_commit_inode(ip, 0);
 188
 189         return (0);
 190 }
 191
 192
 193 #ifdef _NOTYET
 194 /*
 195  * NAME:        extRealloc()
 196  *
 197  * FUNCTION:    extend the allocation of a file extent containing a
 198  *              partial back last page.
 199  *
 200  * PARAMETERS:
 201  *      ip      - the inode of the file.
 202  *      cp      - cbuf for the partial backed last page.
 203  *      xlen    - request size of the resulting extent.
 204  *      xp      - pointer to an xad. on successful exit, the xad
 205  *                describes the newly allocated extent.
 206  *      abnr    - boolean_t indicating whether the newly allocated extent
 207  *                should be marked as allocated but not recorded.
 208  *
 209  * RETURN VALUES:
 210  *      0       - success
 211  *      -EIO    - i/o error.
 212  *      -ENOSPC - insufficient disk resources.
 213  */
 214 int extRealloc(struct inode *ip, s64 nxlen, xad_t * xp, boolean_t abnr)
 215 {
 216         struct super_block *sb = ip->i_sb;
 217         s64 xaddr, xlen, nxaddr, delta, xoff;
 218         s64 ntail, nextend, ninsert;
 219         int rc, nbperpage = JFS_SBI(sb)->nbperpage;
 220         int xflag;
 221
 222         /* This blocks if we are low on resources */
 223         txBeginAnon(ip->i_sb);
 224
 225         down(&JFS_IP(ip)->commit_sem);
 226         /* validate extent length */
 227         if (nxlen > MAXXLEN)
 228                 nxlen = MAXXLEN;
 229
 230         /* get the extend (partial) page's disk block address and
 231          * number of blocks.
 232          */
 233         xaddr = addressXAD(xp);
 234         xlen = lengthXAD(xp);
 235         xoff = offsetXAD(xp);
 236
 237         /* if the extend page is abnr and if the request is for
 238          * the extent to be allocated and recorded,
 239          * make the page allocated and recorded.
 240          */
 241         if ((xp->flag & XAD_NOTRECORDED) && !abnr) {
 242                 xp->flag = 0;
 243                 if ((rc = xtUpdate(0, ip, xp)))
 244                         goto exit;
 245         }
 246
 247         /* try to allocated the request number of blocks for the
 248          * extent.  dbRealloc() first tries to satisfy the request
 249          * by extending the allocation in place. otherwise, it will
 250          * try to allocate a new set of blocks large enough for the
 251          * request.  in satisfying a request, dbReAlloc() may allocate
 252          * less than what was request but will always allocate enough
 253          * space as to satisfy the extend page.
 254          */
 255         if ((rc = extBrealloc(ip, xaddr, xlen, &nxlen, &nxaddr)))
 256                 goto exit;
 257
 258         /* Allocat blocks to quota. */
 259         if (DQUOT_ALLOC_BLOCK(ip, nxlen)) {
 260                 dbFree(ip, nxaddr, (s64) nxlen);
 261                 up(&JFS_IP(ip)->commit_sem);
 262                 return -EDQUOT;
 263         }
 264
 265         delta = nxlen - xlen;
 266
 267         /* check if the extend page is not abnr but the request is abnr
 268          * and the allocated disk space is for more than one page.  if this
 269          * is the case, there is a miss match of abnr between the extend page
 270          * and the one or more pages following the extend page.  as a result,
 271          * two extents will have to be manipulated. the first will be that
 272          * of the extent of the extend page and will be manipulated thru
 273          * an xtExtend() or an xtTailgate(), depending upon whether the
 274          * disk allocation occurred as an inplace extension.  the second
 275          * extent will be manipulated (created) through an xtInsert() and
 276          * will be for the pages following the extend page.
 277          */
 278         if (abnr && (!(xp->flag & XAD_NOTRECORDED)) && (nxlen > nbperpage)) {
 279                 ntail = nbperpage;
 280                 nextend = ntail - xlen;
 281                 ninsert = nxlen - nbperpage;
 282
 283                 xflag = XAD_NOTRECORDED;
 284         } else {
 285                 ntail = nxlen;
 286                 nextend = delta;
 287                 ninsert = 0;
 288
 289                 xflag = xp->flag;
 290         }
 291
 292         /* if we were able to extend the disk allocation in place,
 293          * extend the extent.  otherwise, move the extent to a
 294          * new disk location.
 295          */
 296         if (xaddr == nxaddr) {
 297                 /* extend the extent */
 298                 if ((rc = xtExtend(0, ip, xoff + xlen, (int) nextend, 0))) {
 299                         dbFree(ip, xaddr + xlen, delta);
 300                         DQUOT_FREE_BLOCK(ip, nxlen);
 301                         goto exit;
 302                 }
 303         } else {
 304                 /*
 305                  * move the extent to a new location:
 306                  *
 307                  * xtTailgate() accounts for relocated tail extent;
 308                  */
 309                 if ((rc = xtTailgate(0, ip, xoff, (int) ntail, nxaddr, 0))) {
 310                         dbFree(ip, nxaddr, nxlen);
 311                         DQUOT_FREE_BLOCK(ip, nxlen);
 312                         goto exit;
 313                 }
 314         }
 315
 316
 317         /* check if we need to also insert a new extent */
 318         if (ninsert) {
 319                 /* perform the insert.  if it fails, free the blocks
 320                  * to be inserted and make it appear that we only did
 321                  * the xtExtend() or xtTailgate() above.
 322                  */
 323                 xaddr = nxaddr + ntail;
 324                 if (xtInsert (0, ip, xflag, xoff + ntail, (int) ninsert,
 325                               &xaddr, 0)) {
 326                         dbFree(ip, xaddr, (s64) ninsert);
 327                         delta = nextend;
 328                         nxlen = ntail;
 329                         xflag = 0;
 330                 }
 331         }
 332
 333         /* set the return results */
 334         XADaddress(xp, nxaddr);
 335         XADlength(xp, nxlen);
 336         XADoffset(xp, xoff);
 337         xp->flag = xflag;
 338
 339         mark_inode_dirty(ip);
 340 exit:
 341         up(&JFS_IP(ip)->commit_sem);
 342         return (rc);
 343 }
 344 #endif                  /* _NOTYET */
 345
 346
 347 /*
 348  * NAME:        extHint()
 349  *
 350  * FUNCTION:    produce an extent allocation hint for a file offset.
 351  *
 352  * PARAMETERS:
 353  *      ip      - the inode of the file.
 354  *      offset  - file offset for which the hint is needed.
 355  *      xp      - pointer to the xad that is to be filled in with
 356  *                the hint.
 357  *
 358  * RETURN VALUES:
 359  *      0       - success
 360  *      -EIO    - i/o error.
 361  */
 362 int extHint(struct inode *ip, s64 offset, xad_t * xp)
 363 {
 364         struct super_block *sb = ip->i_sb;
 365         struct xadlist xadl;
 366         struct lxdlist lxdl;
 367         lxd_t lxd;
 368         s64 prev;
 369         int rc, nbperpage = JFS_SBI(sb)->nbperpage;
 370
 371         /* init the hint as "no hint provided" */
 372         XADaddress(xp, 0);
 373
 374         /* determine the starting extent offset of the page previous
 375          * to the page containing the offset.
 376          */
 377         prev = ((offset & ~POFFSET) >> JFS_SBI(sb)->l2bsize) - nbperpage;
 378
 379         /* if the offsets in the first page of the file,
 380          * no hint provided.
 381          */
 382         if (prev < 0)
 383                 return (0);
 384
 385         /* prepare to lookup the previous page's extent info */
 386         lxdl.maxnlxd = 1;
 387         lxdl.nlxd = 1;
 388         lxdl.lxd = &lxd;
 389         LXDoffset(&lxd, prev)
 390             LXDlength(&lxd, nbperpage);
 391
 392         xadl.maxnxad = 1;
 393         xadl.nxad = 0;
 394         xadl.xad = xp;
 395
 396         /* perform the lookup */
 397         if ((rc = xtLookupList(ip, &lxdl, &xadl, 0)))
 398                 return (rc);
 399
 400         /* check if not extent exists for the previous page.
 401          * this is possible for sparse files.
 402          */
 403         if (xadl.nxad == 0) {
 404 //              assert(ISSPARSE(ip));
 405                 return (0);
 406         }
 407
 408         /* only preserve the abnr flag within the xad flags
 409          * of the returned hint.
 410          */
 411         xp->flag &= XAD_NOTRECORDED;
 412
 413         if(xadl.nxad != 1 || lengthXAD(xp) != nbperpage) {
 414                 jfs_error(ip->i_sb, "extHint: corrupt xtree");
 415                 return -EIO;
 416         }
 417
 418         return (0);
 419 }
 420
 421
 422 /*
 423  * NAME:        extRecord()
 424  *
 425  * FUNCTION:    change a page with a file from not recorded to recorded.
 426  *
 427  * PARAMETERS:
 428  *      ip      - inode of the file.
 429  *      cp      - cbuf of the file page.
 430  *
 431  * RETURN VALUES:
 432  *      0       - success
 433  *      -EIO    - i/o error.
 434  *      -ENOSPC - insufficient disk resources.
 435  */
 436 int extRecord(struct inode *ip, xad_t * xp)
 437 {
 438         int rc;
 439
 440         txBeginAnon(ip->i_sb);
 441
 442         down(&JFS_IP(ip)->commit_sem);
 443
 444         /* update the extent */
 445         rc = xtUpdate(0, ip, xp);
 446
 447         up(&JFS_IP(ip)->commit_sem);
 448         return rc;
 449 }
 450
 451
 452 #ifdef _NOTYET
 453 /*
 454  * NAME:        extFill()
 455  *
 456  * FUNCTION:    allocate disk space for a file page that represents
 457  *              a file hole.
 458  *
 459  * PARAMETERS:
 460  *      ip      - the inode of the file.
 461  *      cp      - cbuf of the file page represent the hole.
 462  *
 463  * RETURN VALUES:
 464  *      0       - success
 465  *      -EIO    - i/o error.
 466  *      -ENOSPC - insufficient disk resources.
 467  */
 468 int extFill(struct inode *ip, xad_t * xp)
 469 {
 470         int rc, nbperpage = JFS_SBI(ip->i_sb)->nbperpage;
 471         s64 blkno = offsetXAD(xp) >> ip->i_blksize;
 472
 473 //      assert(ISSPARSE(ip));
 474
 475         /* initialize the extent allocation hint */
 476         XADaddress(xp, 0);
 477
 478         /* allocate an extent to fill the hole */
 479         if ((rc = extAlloc(ip, nbperpage, blkno, xp, FALSE)))
 480                 return (rc);
 481
 482         assert(lengthPXD(xp) == nbperpage);
 483
 484         return (0);
 485 }
 486 #endif                  /* _NOTYET */
 487
 488
 489 /*
 490  * NAME:        extBalloc()
 491  *
 492  * FUNCTION:    allocate disk blocks to form an extent.
 493  *
 494  *              initially, we will try to allocate disk blocks for the
 495  *              requested size (nblocks).  if this fails (nblocks
 496  *              contigious free blocks not avaliable), we'll try to allocate
 497  *              a smaller number of blocks (producing a smaller extent), with
 498  *              this smaller number of blocks consisting of the requested
 499  *              number of blocks rounded down to the next smaller power of 2
 500  *              number (i.e. 16 -> 8).  we'll continue to round down and
 501  *              retry the allocation until the number of blocks to allocate
 502  *              is smaller than the number of blocks per page.
 503  *
 504  * PARAMETERS:
 505  *      ip       - the inode of the file.
 506  *      hint     - disk block number to be used as an allocation hint.
 507  *      *nblocks - pointer to an s64 value.  on entry, this value specifies
 508  *                 the desired number of block to be allocated. on successful
 509  *                 exit, this value is set to the number of blocks actually
 510  *                 allocated.
 511  *      blkno    - pointer to a block address that is filled in on successful
 512  *                 return with the starting block number of the newly
 513  *                 allocated block range.
 514  *
 515  * RETURN VALUES:
 516  *      0       - success
 517  *      -EIO    - i/o error.
 518  *      -ENOSPC - insufficient disk resources.
 519  */
 520 static int
 521 extBalloc(struct inode *ip, s64 hint, s64 * nblocks, s64 * blkno)
 522 {
 523         struct jfs_inode_info *ji = JFS_IP(ip);
 524         struct jfs_sb_info *sbi = JFS_SBI(ip->i_sb);
 525         s64 nb, nblks, daddr, max;
 526         int rc, nbperpage = sbi->nbperpage;
 527         struct bmap *bmp = sbi->bmap;
 528         int ag;
 529
 530         /* get the number of blocks to initially attempt to allocate.
 531          * we'll first try the number of blocks requested unless this
 532          * number is greater than the maximum number of contigious free
 533          * blocks in the map. in that case, we'll start off with the
 534          * maximum free.
 535          */
 536         max = (s64) 1 << bmp->db_maxfreebud;
 537         if (*nblocks >= max && *nblocks > nbperpage)
 538                 nb = nblks = (max > nbperpage) ? max : nbperpage;
 539         else
 540                 nb = nblks = *nblocks;
 541
 542         /* try to allocate blocks */
 543         while ((rc = dbAlloc(ip, hint, nb, &daddr)) != 0) {
 544                 /* if something other than an out of space error,
 545                  * stop and return this error.
 546                  */
 547                 if (rc != -ENOSPC)
 548                         return (rc);
 549
 550                 /* decrease the allocation request size */
 551                 nb = min(nblks, extRoundDown(nb));
 552
 553                 /* give up if we cannot cover a page */
 554                 if (nb < nbperpage)
 555                         return (rc);
 556         }
 557
 558         *nblocks = nb;
 559         *blkno = daddr;
 560
 561         if (S_ISREG(ip->i_mode) && (ji->fileset == FILESYSTEM_I)) {
 562                 ag = BLKTOAG(daddr, sbi);
 563                 spin_lock_irq(&ji->ag_lock);
 564                 if (ji->active_ag == -1) {
 565                         atomic_inc(&bmp->db_active[ag]);
 566                         ji->active_ag = ag;
 567                 } else if (ji->active_ag != ag) {
 568                         atomic_dec(&bmp->db_active[ji->active_ag]);
 569                         atomic_inc(&bmp->db_active[ag]);
 570                         ji->active_ag = ag;
 571                 }
 572                 spin_unlock_irq(&ji->ag_lock);
 573         }
 574
 575         return (0);
 576 }
 577
 578
 579 #ifdef _NOTYET
 580 /*
 581  * NAME:        extBrealloc()
 582  *
 583  * FUNCTION:    attempt to extend an extent's allocation.
 584  *
 585  *              initially, we will try to extend the extent's allocation
 586  *              in place.  if this fails, we'll try to move the extent
 587  *              to a new set of blocks. if moving the extent, we initially
 588  *              will try to allocate disk blocks for the requested size
 589  *              (nnew).  if this fails  (nnew contigious free blocks not
 590  *              avaliable), we'll try  to allocate a smaller number of
 591  *              blocks (producing a smaller extent), with this smaller
 592  *              number of blocks consisting of the requested number of
 593  *              blocks rounded down to the next smaller power of 2
 594  *              number (i.e. 16 -> 8).  we'll continue to round down and
 595  *              retry the allocation until the number of blocks to allocate
 596  *              is smaller than the number of blocks per page.
 597  *
 598  * PARAMETERS:
 599  *      ip       - the inode of the file.
 600  *      blkno    - starting block number of the extents current allocation.
 601  *      nblks    - number of blocks within the extents current allocation.
 602  *      newnblks - pointer to a s64 value.  on entry, this value is the
 603  *                 the new desired extent size (number of blocks).  on
 604  *                 successful exit, this value is set to the extent's actual
 605  *                 new size (new number of blocks).
 606  *      newblkno - the starting block number of the extents new allocation.
 607  *
 608  * RETURN VALUES:
 609  *      0       - success
 610  *      -EIO    - i/o error.
 611  *      -ENOSPC - insufficient disk resources.
 612  */
 613 static int
 614 extBrealloc(struct inode *ip,
 615             s64 blkno, s64 nblks, s64 * newnblks, s64 * newblkno)
 616 {
 617         int rc;
 618
 619         /* try to extend in place */
 620         if ((rc = dbExtend(ip, blkno, nblks, *newnblks - nblks)) == 0) {
 621                 *newblkno = blkno;
 622                 return (0);
 623         } else {
 624                 if (rc != -ENOSPC)
 625                         return (rc);
 626         }
 627
 628         /* in place extension not possible.
 629          * try to move the extent to a new set of blocks.
 630          */
 631         return (extBalloc(ip, blkno, newnblks, newblkno));
 632 }
 633 #endif                  /* _NOTYET */
 634
 635
 636 /*
 637  * NAME:        extRoundDown()
 638  *
 639  * FUNCTION:    round down a specified number of blocks to the next
 640  *              smallest power of 2 number.
 641  *
 642  * PARAMETERS:
 643  *      nb      - the inode of the file.
 644  *
 645  * RETURN VALUES:
 646  *      next smallest power of 2 number.
 647  */
 648 static s64 extRoundDown(s64 nb)
 649 {
 650         int i;
 651         u64 m, k;
 652
 653         for (i = 0, m = (u64) 1 << 63; i < 64; i++, m >>= 1) {
 654                 if (m & nb)
 655                         break;
 656         }
 657
 658         i = 63 - i;
 659         k = (u64) 1 << i;
 660         k = ((k - 1) & nb) ? k : k >> 1;
 661
 662         return (k);
 663 }