inode.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:65k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /*
  2.  * Copyright 2000 by Hans Reiser, licensing governed by reiserfs/README
  3.  */
  4. #include <linux/config.h>
  5. #include <linux/sched.h>
  6. #include <linux/reiserfs_fs.h>
  7. #include <linux/locks.h>
  8. #include <linux/smp_lock.h>
  9. #include <asm/uaccess.h>
  10. #include <asm/unaligned.h>
  11. /* args for the create parameter of reiserfs_get_block */
  12. #define GET_BLOCK_NO_CREATE 0 /* don't create new blocks or convert tails */
  13. #define GET_BLOCK_CREATE 1    /* add anything you need to find block */
  14. #define GET_BLOCK_NO_HOLE 2   /* return -ENOENT for file holes */
  15. #define GET_BLOCK_READ_DIRECT 4  /* read the tail if indirect item not found */
  16. #define GET_BLOCK_NO_ISEM     8 /* i_sem is not held, don't preallocate */
  17. static int reiserfs_get_block (struct inode * inode, long block,
  18.        struct buffer_head * bh_result, int create);
  19. //
  20. // initially this function was derived from minix or ext2's analog and
  21. // evolved as the prototype did
  22. //
  23. void reiserfs_delete_inode (struct inode * inode)
  24. {
  25.     int jbegin_count = JOURNAL_PER_BALANCE_CNT * 2; 
  26.     int windex ;
  27.     struct reiserfs_transaction_handle th ;
  28.   
  29.     lock_kernel() ; 
  30.     /* The = 0 happens when we abort creating a new inode for some reason like lack of space.. */
  31.     if (INODE_PKEY(inode)->k_objectid != 0) { /* also handles bad_inode case */
  32. down (&inode->i_sem); 
  33. journal_begin(&th, inode->i_sb, jbegin_count) ;
  34. reiserfs_update_inode_transaction(inode) ;
  35. windex = push_journal_writer("delete_inode") ;
  36. reiserfs_delete_object (&th, inode);
  37. pop_journal_writer(windex) ;
  38. journal_end(&th, inode->i_sb, jbegin_count) ;
  39.         up (&inode->i_sem);
  40.         /* all items of file are deleted, so we can remove "save" link */
  41. remove_save_link (inode, 0/* not truncate */);
  42.     } else {
  43. /* no object items are in the tree */
  44. ;
  45.     }
  46.     clear_inode (inode); /* note this must go after the journal_end to prevent deadlock */
  47.     inode->i_blocks = 0;
  48.     unlock_kernel() ;
  49. }
  50. static void _make_cpu_key (struct cpu_key * key, int version, __u32 dirid, __u32 objectid, 
  51.        loff_t offset, int type, int length )
  52. {
  53.     key->version = version;
  54.     key->on_disk_key.k_dir_id = dirid;
  55.     key->on_disk_key.k_objectid = objectid;
  56.     set_cpu_key_k_offset (key, offset);
  57.     set_cpu_key_k_type (key, type);  
  58.     key->key_length = length;
  59. }
  60. /* take base of inode_key (it comes from inode always) (dirid, objectid) and version from an inode, set
  61.    offset and type of key */
  62. void make_cpu_key (struct cpu_key * key, const struct inode * inode, loff_t offset,
  63.       int type, int length )
  64. {
  65.   _make_cpu_key (key, get_inode_item_key_version (inode), le32_to_cpu (INODE_PKEY (inode)->k_dir_id),
  66.  le32_to_cpu (INODE_PKEY (inode)->k_objectid), 
  67.  offset, type, length);
  68. }
  69. //
  70. // when key is 0, do not set version and short key
  71. //
  72. inline void make_le_item_head (struct item_head * ih, const struct cpu_key * key,
  73.        int version,
  74.        loff_t offset, int type, int length, 
  75.        int entry_count/*or ih_free_space*/)
  76. {
  77.     if (key) {
  78. ih->ih_key.k_dir_id = cpu_to_le32 (key->on_disk_key.k_dir_id);
  79. ih->ih_key.k_objectid = cpu_to_le32 (key->on_disk_key.k_objectid);
  80.     }
  81.     put_ih_version( ih, version );
  82.     set_le_ih_k_offset (ih, offset);
  83.     set_le_ih_k_type (ih, type);
  84.     put_ih_item_len( ih, length );
  85.     /*    set_ih_free_space (ih, 0);*/
  86.     // for directory items it is entry count, for directs and stat
  87.     // datas - 0xffff, for indirects - 0
  88.     put_ih_entry_count( ih, entry_count );
  89. }
  90. static void add_to_flushlist(struct inode *inode, struct buffer_head *bh) {
  91.     struct inode *jinode = &(SB_JOURNAL(inode->i_sb)->j_dummy_inode) ;
  92.     buffer_insert_inode_queue(bh, jinode) ;
  93. }
  94. //
  95. // FIXME: we might cache recently accessed indirect item (or at least
  96. // first 15 pointers just like ext2 does
  97. // Ugh.  Not too eager for that....
  98. //  I cut the code until such time as I see a convincing argument (benchmark).
  99. // I don't want a bloated inode struct..., and I don't like code complexity....
  100. /* cutting the code is fine, since it really isn't in use yet and is easy
  101. ** to add back in.  But, Vladimir has a really good idea here.  Think
  102. ** about what happens for reading a file.  For each page,
  103. ** The VFS layer calls reiserfs_readpage, who searches the tree to find
  104. ** an indirect item.  This indirect item has X number of pointers, where
  105. ** X is a big number if we've done the block allocation right.  But,
  106. ** we only use one or two of these pointers during each call to readpage,
  107. ** needlessly researching again later on.
  108. **
  109. ** The size of the cache could be dynamic based on the size of the file.
  110. **
  111. ** I'd also like to see us cache the location the stat data item, since
  112. ** we are needlessly researching for that frequently.
  113. **
  114. ** --chris
  115. */
  116. /* If this page has a file tail in it, and
  117. ** it was read in by get_block_create_0, the page data is valid,
  118. ** but tail is still sitting in a direct item, and we can't write to
  119. ** it.  So, look through this page, and check all the mapped buffers
  120. ** to make sure they have valid block numbers.  Any that don't need
  121. ** to be unmapped, so that block_prepare_write will correctly call
  122. ** reiserfs_get_block to convert the tail into an unformatted node
  123. */
  124. static inline void fix_tail_page_for_writing(struct page *page) {
  125.     struct buffer_head *head, *next, *bh ;
  126.     if (page && page->buffers) {
  127. head = page->buffers ;
  128. bh = head ;
  129. do {
  130.     next = bh->b_this_page ;
  131.     if (buffer_mapped(bh) && bh->b_blocknr == 0) {
  132.         reiserfs_unmap_buffer(bh) ;
  133.     }
  134.     bh = next ;
  135. } while (bh != head) ;
  136.     }
  137. }
  138. /* we need to allocate a block for new unformatted node.  Try to figure out
  139.    what point in bitmap reiserfs_new_blocknrs should start from. */
  140. static b_blocknr_t find_tag (struct buffer_head * bh, struct item_head * ih,
  141.      __u32 * item, int pos_in_item)
  142. {
  143.   __u32 block ;
  144.   if (!is_indirect_le_ih (ih))
  145.  /* something more complicated could be here */
  146.  return bh->b_blocknr;
  147.   /* for indirect item: go to left and look for the first non-hole entry in
  148.   the indirect item */
  149.   if (pos_in_item == I_UNFM_NUM (ih))
  150.  pos_in_item --;
  151.   while (pos_in_item >= 0) {
  152.  block = get_block_num(item, pos_in_item) ;
  153.  if (block)
  154. return block ;
  155.  pos_in_item --;
  156.   }
  157.   return bh->b_blocknr;
  158. }
  159. /* reiserfs_get_block does not need to allocate a block only if it has been
  160.    done already or non-hole position has been found in the indirect item */
  161. static inline int allocation_needed (int retval, b_blocknr_t allocated, 
  162.      struct item_head * ih,
  163.      __u32 * item, int pos_in_item)
  164. {
  165.   if (allocated)
  166.  return 0;
  167.   if (retval == POSITION_FOUND && is_indirect_le_ih (ih) && 
  168.       get_block_num(item, pos_in_item))
  169.  return 0;
  170.   return 1;
  171. }
  172. static inline int indirect_item_found (int retval, struct item_head * ih)
  173. {
  174.   return (retval == POSITION_FOUND) && is_indirect_le_ih (ih);
  175. }
  176. static inline void set_block_dev_mapped (struct buffer_head * bh, 
  177.  b_blocknr_t block, struct inode * inode)
  178. {
  179.   bh->b_dev = inode->i_dev;
  180.   bh->b_blocknr = block;
  181.   bh->b_state |= (1UL << BH_Mapped);
  182. }
  183. //
  184. // files which were created in the earlier version can not be longer,
  185. // than 2 gb
  186. //
  187. static int file_capable (struct inode * inode, long block)
  188. {
  189.     if (get_inode_item_key_version (inode) != KEY_FORMAT_3_5 || // it is new file.
  190. block < (1 << (31 - inode->i_sb->s_blocksize_bits))) // old file, but 'block' is inside of 2gb
  191. return 1;
  192.     return 0;
  193. }
  194. /*static*/ void restart_transaction(struct reiserfs_transaction_handle *th,
  195. struct inode *inode, struct path *path) {
  196.   struct super_block *s = th->t_super ;
  197.   int len = th->t_blocks_allocated ;
  198.   pathrelse(path) ;
  199.   reiserfs_update_sd(th, inode) ;
  200.   journal_end(th, s, len) ;
  201.   journal_begin(th, s, len) ;
  202.   reiserfs_update_inode_transaction(inode) ;
  203. }
  204. // it is called by get_block when create == 0. Returns block number
  205. // for 'block'-th logical block of file. When it hits direct item it
  206. // returns 0 (being called from bmap) or read direct item into piece
  207. // of page (bh_result)
  208. // Please improve the english/clarity in the comment above, as it is
  209. // hard to understand.
  210. static int _get_block_create_0 (struct inode * inode, long block,
  211.  struct buffer_head * bh_result,
  212.  int args)
  213. {
  214.     INITIALIZE_PATH (path);
  215.     struct cpu_key key;
  216.     struct buffer_head * bh;
  217.     struct item_head * ih, tmp_ih;
  218.     int fs_gen ;
  219.     int blocknr;
  220.     char * p = NULL;
  221.     int chars;
  222.     int ret ;
  223.     int done = 0 ;
  224.     unsigned long offset ;
  225.     // prepare the key to look for the 'block'-th block of file
  226.     make_cpu_key (&key, inode,
  227.   (loff_t)block * inode->i_sb->s_blocksize + 1, TYPE_ANY, 3);
  228. research:
  229.     if (search_for_position_by_key (inode->i_sb, &key, &path) != POSITION_FOUND) {
  230. pathrelse (&path);
  231.         if (p)
  232.             kunmap(bh_result->b_page) ;
  233. // We do not return -ENOENT if there is a hole but page is uptodate, because it means
  234. // That there is some MMAPED data associated with it that is yet to be written to disk.
  235. if ((args & GET_BLOCK_NO_HOLE) && !Page_Uptodate(bh_result->b_page) ) {
  236.     return -ENOENT ;
  237. }
  238.         return 0 ;
  239.     }
  240.     
  241.     //
  242.     bh = get_last_bh (&path);
  243.     ih = get_ih (&path);
  244.     if (is_indirect_le_ih (ih)) {
  245. __u32 * ind_item = (__u32 *)B_I_PITEM (bh, ih);
  246. /* FIXME: here we could cache indirect item or part of it in
  247.    the inode to avoid search_by_key in case of subsequent
  248.    access to file */
  249. blocknr = get_block_num(ind_item, path.pos_in_item) ;
  250. ret = 0 ;
  251. if (blocknr) {
  252.     bh_result->b_dev = inode->i_dev;
  253.     bh_result->b_blocknr = blocknr;
  254.     bh_result->b_state |= (1UL << BH_Mapped);
  255. } else
  256.     // We do not return -ENOENT if there is a hole but page is uptodate, because it means
  257.     // That there is some MMAPED data associated with it that is yet to be written to disk.
  258.     if ((args & GET_BLOCK_NO_HOLE) && !Page_Uptodate(bh_result->b_page) ) {
  259. ret = -ENOENT ;
  260.     }
  261. pathrelse (&path);
  262.         if (p)
  263.             kunmap(bh_result->b_page) ;
  264. return ret ;
  265.     }
  266.     // requested data are in direct item(s)
  267.     if (!(args & GET_BLOCK_READ_DIRECT)) {
  268. // we are called by bmap. FIXME: we can not map block of file
  269. // when it is stored in direct item(s)
  270. pathrelse (&path);
  271.         if (p)
  272.             kunmap(bh_result->b_page) ;
  273. return -ENOENT;
  274.     }
  275.     /* if we've got a direct item, and the buffer was uptodate,
  276.     ** we don't want to pull data off disk again.  skip to the
  277.     ** end, where we map the buffer and return
  278.     */
  279.     if (buffer_uptodate(bh_result)) {
  280.         goto finished ;
  281.     } else 
  282. /*
  283. ** grab_tail_page can trigger calls to reiserfs_get_block on up to date
  284. ** pages without any buffers.  If the page is up to date, we don't want
  285. ** read old data off disk.  Set the up to date bit on the buffer instead
  286. ** and jump to the end
  287. */
  288.     if (Page_Uptodate(bh_result->b_page)) {
  289. mark_buffer_uptodate(bh_result, 1);
  290. goto finished ;
  291.     }
  292.     // read file tail into part of page
  293.     offset = (cpu_key_k_offset(&key) - 1) & (PAGE_CACHE_SIZE - 1) ;
  294.     fs_gen = get_generation(inode->i_sb) ;
  295.     copy_item_head (&tmp_ih, ih);
  296.     /* we only want to kmap if we are reading the tail into the page.
  297.     ** this is not the common case, so we don't kmap until we are
  298.     ** sure we need to.  But, this means the item might move if
  299.     ** kmap schedules
  300.     */
  301.     if (!p) {
  302.     p = (char *)kmap(bh_result->b_page) ;
  303.     if (fs_changed (fs_gen, inode->i_sb) && item_moved (&tmp_ih, &path)) {
  304.         goto research;
  305.     }
  306.     }
  307.     p += offset ;
  308.     memset (p, 0, inode->i_sb->s_blocksize);
  309.     do {
  310. if (!is_direct_le_ih (ih)) {
  311.     BUG ();
  312.         }
  313. /* make sure we don't read more bytes than actually exist in
  314. ** the file.  This can happen in odd cases where i_size isn't
  315. ** correct, and when direct item padding results in a few 
  316. ** extra bytes at the end of the direct item
  317. */
  318.         if ((le_ih_k_offset(ih) + path.pos_in_item) > inode->i_size)
  319.     break ;
  320. if ((le_ih_k_offset(ih) - 1 + ih_item_len(ih)) > inode->i_size) {
  321.     chars = inode->i_size - (le_ih_k_offset(ih) - 1) - path.pos_in_item;
  322.     done = 1 ;
  323. } else {
  324.     chars = ih_item_len(ih) - path.pos_in_item;
  325. }
  326. memcpy (p, B_I_PITEM (bh, ih) + path.pos_in_item, chars);
  327. if (done) 
  328.     break ;
  329. p += chars;
  330. if (PATH_LAST_POSITION (&path) != (B_NR_ITEMS (bh) - 1))
  331.     // we done, if read direct item is not the last item of
  332.     // node FIXME: we could try to check right delimiting key
  333.     // to see whether direct item continues in the right
  334.     // neighbor or rely on i_size
  335.     break;
  336. // update key to look for the next piece
  337. set_cpu_key_k_offset (&key, cpu_key_k_offset (&key) + chars);
  338. if (search_for_position_by_key (inode->i_sb, &key, &path) != POSITION_FOUND)
  339.     // we read something from tail, even if now we got IO_ERROR
  340.     break;
  341. bh = get_last_bh (&path);
  342. ih = get_ih (&path);
  343.     } while (1);
  344.     flush_dcache_page(bh_result->b_page) ;
  345.     kunmap(bh_result->b_page) ;
  346. finished:
  347.     pathrelse (&path);
  348.     bh_result->b_blocknr = 0 ;
  349.     bh_result->b_dev = inode->i_dev;
  350.     mark_buffer_uptodate (bh_result, 1);
  351.     bh_result->b_state |= (1UL << BH_Mapped);
  352.     return 0;
  353. }
  354. // this is called to create file map. So, _get_block_create_0 will not
  355. // read direct item
  356. int reiserfs_bmap (struct inode * inode, long block,
  357.    struct buffer_head * bh_result, int create)
  358. {
  359.     if (!file_capable (inode, block))
  360. return -EFBIG;
  361.     lock_kernel() ;
  362.     /* do not read the direct item */
  363.     _get_block_create_0 (inode, block, bh_result, 0) ;
  364.     unlock_kernel() ;
  365.     return 0;
  366. }
  367. /* special version of get_block that is only used by grab_tail_page right
  368. ** now.  It is sent to block_prepare_write, and when you try to get a
  369. ** block past the end of the file (or a block from a hole) it returns
  370. ** -ENOENT instead of a valid buffer.  block_prepare_write expects to
  371. ** be able to do i/o on the buffers returned, unless an error value
  372. ** is also returned.
  373. ** 
  374. ** So, this allows block_prepare_write to be used for reading a single block
  375. ** in a page.  Where it does not produce a valid page for holes, or past the
  376. ** end of the file.  This turns out to be exactly what we need for reading
  377. ** tails for conversion.
  378. **
  379. ** The point of the wrapper is forcing a certain value for create, even
  380. ** though the VFS layer is calling this function with create==1.  If you 
  381. ** don't want to send create == GET_BLOCK_NO_HOLE to reiserfs_get_block, 
  382. ** don't use this function.
  383. */
  384. static int reiserfs_get_block_create_0 (struct inode * inode, long block,
  385. struct buffer_head * bh_result, int create) {
  386.     return reiserfs_get_block(inode, block, bh_result, GET_BLOCK_NO_HOLE) ;
  387. }
  388. /*
  389. ** helper function for when reiserfs_get_block is called for a hole
  390. ** but the file tail is still in a direct item
  391. ** bh_result is the buffer head for the hole
  392. ** tail_offset is the offset of the start of the tail in the file
  393. **
  394. ** This calls prepare_write, which will start a new transaction
  395. ** you should not be in a transaction, or have any paths held when you
  396. ** call this.
  397. */
  398. static int convert_tail_for_hole(struct inode *inode, 
  399.                                  struct buffer_head *bh_result,
  400.  loff_t tail_offset) {
  401.     unsigned long index ;
  402.     unsigned long tail_end ; 
  403.     unsigned long tail_start ;
  404.     struct page * tail_page ;
  405.     struct page * hole_page = bh_result->b_page ;
  406.     int retval = 0 ;
  407.     if ((tail_offset & (bh_result->b_size - 1)) != 1) 
  408.         return -EIO ;
  409.     /* always try to read until the end of the block */
  410.     tail_start = tail_offset & (PAGE_CACHE_SIZE - 1) ;
  411.     tail_end = (tail_start | (bh_result->b_size - 1)) + 1 ;
  412.     index = tail_offset >> PAGE_CACHE_SHIFT ;
  413.     if (index != hole_page->index) {
  414. tail_page = grab_cache_page(inode->i_mapping, index) ;
  415. retval = -ENOMEM;
  416. if (!tail_page) {
  417.     goto out ;
  418. }
  419.     } else {
  420.         tail_page = hole_page ;
  421.     }
  422.     /* we don't have to make sure the conversion did not happen while
  423.     ** we were locking the page because anyone that could convert
  424.     ** must first take i_sem.
  425.     **
  426.     ** We must fix the tail page for writing because it might have buffers
  427.     ** that are mapped, but have a block number of 0.  This indicates tail
  428.     ** data that has been read directly into the page, and block_prepare_write
  429.     ** won't trigger a get_block in this case.
  430.     */
  431.     fix_tail_page_for_writing(tail_page) ;
  432.     retval = block_prepare_write(tail_page, tail_start, tail_end, 
  433.                                  reiserfs_get_block) ; 
  434.     if (retval)
  435.         goto unlock ;
  436.     /* tail conversion might change the data in the page */
  437.     flush_dcache_page(tail_page) ;
  438.     retval = generic_commit_write(NULL, tail_page, tail_start, tail_end) ;
  439. unlock:
  440.     if (tail_page != hole_page) {
  441.         UnlockPage(tail_page) ;
  442. page_cache_release(tail_page) ;
  443.     }
  444. out:
  445.     return retval ;
  446. }
  447. static inline int _allocate_block(struct reiserfs_transaction_handle *th,
  448.                            struct inode *inode, 
  449.    b_blocknr_t *allocated_block_nr, 
  450.    unsigned long tag,
  451.    int flags) {
  452.   
  453. #ifdef REISERFS_PREALLOCATE
  454.     if (!(flags & GET_BLOCK_NO_ISEM)) {
  455.         return reiserfs_new_unf_blocknrs2(th, inode, allocated_block_nr, tag);
  456.     }
  457. #endif
  458.     return reiserfs_new_unf_blocknrs (th, allocated_block_nr, tag);
  459. }
  460. //
  461. // initially this function was derived from ext2's analog and evolved
  462. // as the prototype did.  You'll need to look at the ext2 version to
  463. // determine which parts are derivative, if any, understanding that
  464. // there are only so many ways to code to a given interface.
  465. //
  466. static int reiserfs_get_block (struct inode * inode, long block,
  467.        struct buffer_head * bh_result, int create)
  468. {
  469.     int repeat, retval;
  470.     unsigned long tag;
  471.     b_blocknr_t allocated_block_nr = 0;// b_blocknr_t is unsigned long
  472.     INITIALIZE_PATH(path);
  473.     int pos_in_item;
  474.     struct cpu_key key;
  475.     struct buffer_head * bh, * unbh = 0;
  476.     struct item_head * ih, tmp_ih;
  477.     __u32 * item;
  478.     int done;
  479.     int fs_gen;
  480.     int windex ;
  481.     struct reiserfs_transaction_handle th ;
  482.     /* space reserved in transaction batch: 
  483.         . 3 balancings in direct->indirect conversion
  484.         . 1 block involved into reiserfs_update_sd()
  485.        XXX in practically impossible worst case direct2indirect()
  486.        can incur (much) more that 3 balancings. */
  487.     int jbegin_count = JOURNAL_PER_BALANCE_CNT * 3 + 1;
  488.     int version;
  489.     int transaction_started = 0 ;
  490.     loff_t new_offset = (((loff_t)block) << inode->i_sb->s_blocksize_bits) + 1 ;
  491. /* bad.... */
  492.     lock_kernel() ;
  493.     th.t_trans_id = 0 ;
  494.     version = get_inode_item_key_version (inode);
  495.     if (block < 0) {
  496. unlock_kernel();
  497. return -EIO;
  498.     }
  499.     if (!file_capable (inode, block)) {
  500. unlock_kernel() ;
  501. return -EFBIG;
  502.     }
  503.     /* if !create, we aren't changing the FS, so we don't need to
  504.     ** log anything, so we don't need to start a transaction
  505.     */
  506.     if (!(create & GET_BLOCK_CREATE)) {
  507. int ret ;
  508. /* find number of block-th logical block of the file */
  509. ret = _get_block_create_0 (inode, block, bh_result, 
  510.                            create | GET_BLOCK_READ_DIRECT) ;
  511. unlock_kernel() ;
  512. return ret;
  513.     }
  514.     inode->u.reiserfs_i.i_flags |= i_pack_on_close_mask;
  515.     windex = push_journal_writer("reiserfs_get_block") ;
  516.   
  517.     /* set the key of the first byte in the 'block'-th block of file */
  518.     make_cpu_key (&key, inode, new_offset,
  519.   TYPE_ANY, 3/*key length*/);
  520.     if ((new_offset + inode->i_sb->s_blocksize - 1) > inode->i_size) {
  521. journal_begin(&th, inode->i_sb, jbegin_count) ;
  522. reiserfs_update_inode_transaction(inode) ;
  523. transaction_started = 1 ;
  524.     }
  525.  research:
  526.     retval = search_for_position_by_key (inode->i_sb, &key, &path);
  527.     if (retval == IO_ERROR) {
  528. retval = -EIO;
  529. goto failure;
  530.     }
  531.     bh = get_last_bh (&path);
  532.     ih = get_ih (&path);
  533.     item = get_item (&path);
  534.     pos_in_item = path.pos_in_item;
  535.     fs_gen = get_generation (inode->i_sb);
  536.     copy_item_head (&tmp_ih, ih);
  537.     if (allocation_needed (retval, allocated_block_nr, ih, item, pos_in_item)) {
  538. /* we have to allocate block for the unformatted node */
  539. tag = find_tag (bh, ih, item, pos_in_item);
  540. if (!transaction_started) {
  541.     pathrelse(&path) ;
  542.     journal_begin(&th, inode->i_sb, jbegin_count) ;
  543.     reiserfs_update_inode_transaction(inode) ;
  544.     transaction_started = 1 ;
  545.     goto research ;
  546. }
  547. repeat = _allocate_block(&th, inode, &allocated_block_nr, tag, create);
  548. if (repeat == NO_DISK_SPACE) {
  549.     /* restart the transaction to give the journal a chance to free
  550.     ** some blocks.  releases the path, so we have to go back to
  551.     ** research if we succeed on the second try
  552.     */
  553.     restart_transaction(&th, inode, &path) ; 
  554.     repeat = _allocate_block(&th, inode,&allocated_block_nr,tag,create);
  555.     if (repeat != NO_DISK_SPACE) {
  556. goto research ;
  557.     }
  558.     retval = -ENOSPC;
  559.     goto failure;
  560. }
  561. if (fs_changed (fs_gen, inode->i_sb) && item_moved (&tmp_ih, &path)) {
  562.     goto research;
  563. }
  564.     }
  565.     if (indirect_item_found (retval, ih)) {
  566.         b_blocknr_t unfm_ptr;
  567. /* 'block'-th block is in the file already (there is
  568.    corresponding cell in some indirect item). But it may be
  569.    zero unformatted node pointer (hole) */
  570.         unfm_ptr = get_block_num (item, pos_in_item);
  571. if (unfm_ptr == 0) {
  572.     /* use allocated block to plug the hole */
  573.     reiserfs_prepare_for_journal(inode->i_sb, bh, 1) ;
  574.     if (fs_changed (fs_gen, inode->i_sb) && item_moved (&tmp_ih, &path)) {
  575. reiserfs_restore_prepared_buffer(inode->i_sb, bh) ;
  576. goto research;
  577.     }
  578.     bh_result->b_state |= (1UL << BH_New);
  579.     put_block_num(item, pos_in_item, allocated_block_nr) ;
  580.             unfm_ptr = allocated_block_nr;
  581.     journal_mark_dirty (&th, inode->i_sb, bh);
  582.     inode->i_blocks += (inode->i_sb->s_blocksize / 512) ;
  583.     reiserfs_update_sd(&th, inode) ;
  584. }
  585. set_block_dev_mapped(bh_result, unfm_ptr, inode);
  586. pathrelse (&path);
  587. pop_journal_writer(windex) ;
  588. if (transaction_started)
  589.     journal_end(&th, inode->i_sb, jbegin_count) ;
  590. unlock_kernel() ;
  591.  
  592. /* the item was found, so new blocks were not added to the file
  593. ** there is no need to make sure the inode is updated with this 
  594. ** transaction
  595. */
  596. return 0;
  597.     }
  598.     if (!transaction_started) {
  599. /* if we don't pathrelse, we could vs-3050 on the buffer if
  600. ** someone is waiting for it (they can't finish until the buffer
  601. ** is released, we can start a new transaction until they finish)
  602. */
  603. pathrelse(&path) ;
  604. journal_begin(&th, inode->i_sb, jbegin_count) ;
  605. reiserfs_update_inode_transaction(inode) ;
  606. transaction_started = 1 ;
  607. goto research;
  608.     }
  609.     /* desired position is not found or is in the direct item. We have
  610.        to append file with holes up to 'block'-th block converting
  611.        direct items to indirect one if necessary */
  612.     done = 0;
  613.     do {
  614. if (is_statdata_le_ih (ih)) {
  615.     __u32 unp = 0;
  616.     struct cpu_key tmp_key;
  617.     /* indirect item has to be inserted */
  618.     make_le_item_head (&tmp_ih, &key, version, 1, TYPE_INDIRECT, 
  619.        UNFM_P_SIZE, 0/* free_space */);
  620.     if (cpu_key_k_offset (&key) == 1) {
  621. /* we are going to add 'block'-th block to the file. Use
  622.    allocated block for that */
  623. unp = cpu_to_le32 (allocated_block_nr);
  624. set_block_dev_mapped (bh_result, allocated_block_nr, inode);
  625. bh_result->b_state |= (1UL << BH_New);
  626. done = 1;
  627.     }
  628.     tmp_key = key; // ;)
  629.     set_cpu_key_k_offset (&tmp_key, 1);
  630.     PATH_LAST_POSITION(&path) ++;
  631.     retval = reiserfs_insert_item (&th, &path, &tmp_key, &tmp_ih, (char *)&unp);
  632.     if (retval) {
  633. reiserfs_free_block (&th, allocated_block_nr);
  634. goto failure; // retval == -ENOSPC or -EIO or -EEXIST
  635.     }
  636.     if (unp)
  637. inode->i_blocks += inode->i_sb->s_blocksize / 512;
  638.     //mark_tail_converted (inode);
  639. } else if (is_direct_le_ih (ih)) {
  640.     /* direct item has to be converted */
  641.     loff_t tail_offset;
  642.     tail_offset = ((le_ih_k_offset (ih) - 1) & ~(inode->i_sb->s_blocksize - 1)) + 1;
  643.     if (tail_offset == cpu_key_k_offset (&key)) {
  644. /* direct item we just found fits into block we have
  645.                    to map. Convert it into unformatted node: use
  646.                    bh_result for the conversion */
  647. set_block_dev_mapped (bh_result, allocated_block_nr, inode);
  648. unbh = bh_result;
  649. done = 1;
  650.     } else {
  651. /* we have to padd file tail stored in direct item(s)
  652.    up to block size and convert it to unformatted
  653.    node. FIXME: this should also get into page cache */
  654. pathrelse(&path) ;
  655. journal_end(&th, inode->i_sb, jbegin_count) ;
  656. transaction_started = 0 ;
  657. retval = convert_tail_for_hole(inode, bh_result, tail_offset) ;
  658. if (retval) {
  659.     printk("clm-6004: convert tail failed inode %lu, error %dn", inode->i_ino, retval) ;
  660.     if (allocated_block_nr)
  661. reiserfs_free_block (&th, allocated_block_nr);
  662.     goto failure ;
  663. }
  664. goto research ;
  665.     }
  666.     retval = direct2indirect (&th, inode, &path, unbh, tail_offset);
  667.     /* it is important the mark_buffer_uptodate is done after
  668.     ** the direct2indirect.  The buffer might contain valid
  669.     ** data newer than the data on disk (read by readpage, changed,
  670.     ** and then sent here by writepage).  direct2indirect needs
  671.     ** to know if unbh was already up to date, so it can decide
  672.     ** if the data in unbh needs to be replaced with data from
  673.     ** the disk
  674.     */
  675.     mark_buffer_uptodate (unbh, 1);
  676.     if (retval) {
  677. reiserfs_free_block (&th, allocated_block_nr);
  678. goto failure;
  679.     }
  680.     /* we've converted the tail, so we must 
  681.     ** flush unbh before the transaction commits
  682.     */
  683.     add_to_flushlist(inode, unbh) ;
  684.     /* mark it dirty now to prevent commit_write from adding
  685.     ** this buffer to the inode's dirty buffer list
  686.     */
  687.     __mark_buffer_dirty(unbh) ;
  688.   
  689.     //inode->i_blocks += inode->i_sb->s_blocksize / 512;
  690.     //mark_tail_converted (inode);
  691. } else {
  692.     /* append indirect item with holes if needed, when appending
  693.        pointer to 'block'-th block use block, which is already
  694.        allocated */
  695.     struct cpu_key tmp_key;
  696.     struct unfm_nodeinfo un = {0, 0};
  697.     RFALSE( pos_in_item != ih_item_len(ih) / UNFM_P_SIZE,
  698.     "vs-804: invalid position for append");
  699.     /* indirect item has to be appended, set up key of that position */
  700.     make_cpu_key (&tmp_key, inode,
  701.   le_key_k_offset (version, &(ih->ih_key)) + op_bytes_number (ih, inode->i_sb->s_blocksize),
  702.   //pos_in_item * inode->i_sb->s_blocksize,
  703.   TYPE_INDIRECT, 3);// key type is unimportant
  704.   
  705.     if (cpu_key_k_offset (&tmp_key) == cpu_key_k_offset (&key)) {
  706. /* we are going to add target block to the file. Use allocated
  707.    block for that */
  708. un.unfm_nodenum = cpu_to_le32 (allocated_block_nr);
  709. set_block_dev_mapped (bh_result, allocated_block_nr, inode);
  710. bh_result->b_state |= (1UL << BH_New);
  711. done = 1;
  712.     } else {
  713. /* paste hole to the indirect item */
  714.     }
  715.     retval = reiserfs_paste_into_item (&th, &path, &tmp_key, (char *)&un, UNFM_P_SIZE);
  716.     if (retval) {
  717. reiserfs_free_block (&th, allocated_block_nr);
  718. goto failure;
  719.     }
  720.     if (un.unfm_nodenum)
  721. inode->i_blocks += inode->i_sb->s_blocksize / 512;
  722.     //mark_tail_converted (inode);
  723. }
  724. if (done == 1)
  725.     break;
  726.  
  727. /* this loop could log more blocks than we had originally asked
  728. ** for.  So, we have to allow the transaction to end if it is
  729. ** too big or too full.  Update the inode so things are 
  730. ** consistent if we crash before the function returns
  731. **
  732. ** release the path so that anybody waiting on the path before
  733. ** ending their transaction will be able to continue.
  734. */
  735. if (journal_transaction_should_end(&th, th.t_blocks_allocated)) {
  736.   restart_transaction(&th, inode, &path) ; 
  737. }
  738. /* inserting indirect pointers for a hole can take a 
  739. ** long time.  reschedule if needed
  740. */
  741. if (current->need_resched)
  742.     schedule() ;
  743. retval = search_for_position_by_key (inode->i_sb, &key, &path);
  744. if (retval == IO_ERROR) {
  745.     retval = -EIO;
  746.     goto failure;
  747. }
  748. if (retval == POSITION_FOUND) {
  749.     reiserfs_warning ("vs-825: reiserfs_get_block: "
  750.       "%K should not be foundn", &key);
  751.     retval = -EEXIST;
  752.     if (allocated_block_nr)
  753.         reiserfs_free_block (&th, allocated_block_nr);
  754.     pathrelse(&path) ;
  755.     goto failure;
  756. }
  757. bh = get_last_bh (&path);
  758. ih = get_ih (&path);
  759. item = get_item (&path);
  760. pos_in_item = path.pos_in_item;
  761.     } while (1);
  762.     retval = 0;
  763.     reiserfs_check_path(&path) ;
  764.  failure:
  765.     if (transaction_started) {
  766.       reiserfs_update_sd(&th, inode) ;
  767.       journal_end(&th, inode->i_sb, jbegin_count) ;
  768.     }
  769.     pop_journal_writer(windex) ;
  770.     unlock_kernel() ;
  771.     reiserfs_check_path(&path) ;
  772.     return retval;
  773. }
  774. //
  775. // BAD: new directories have stat data of new type and all other items
  776. // of old type. Version stored in the inode says about body items, so
  777. // in update_stat_data we can not rely on inode, but have to check
  778. // item version directly
  779. //
  780. // called by read_inode
  781. static void init_inode (struct inode * inode, struct path * path)
  782. {
  783.     struct buffer_head * bh;
  784.     struct item_head * ih;
  785.     __u32 rdev;
  786.     //int version = ITEM_VERSION_1;
  787.     bh = PATH_PLAST_BUFFER (path);
  788.     ih = PATH_PITEM_HEAD (path);
  789.     copy_key (INODE_PKEY (inode), &(ih->ih_key));
  790.     inode->i_blksize = PAGE_SIZE;
  791.     INIT_LIST_HEAD(&inode->u.reiserfs_i.i_prealloc_list) ;
  792.     if (stat_data_v1 (ih)) {
  793. struct stat_data_v1 * sd = (struct stat_data_v1 *)B_I_PITEM (bh, ih);
  794. unsigned long blocks;
  795. set_inode_item_key_version (inode, KEY_FORMAT_3_5);
  796.         set_inode_sd_version (inode, STAT_DATA_V1);
  797. inode->i_mode  = sd_v1_mode(sd);
  798. inode->i_nlink = sd_v1_nlink(sd);
  799. inode->i_uid   = sd_v1_uid(sd);
  800. inode->i_gid   = sd_v1_gid(sd);
  801. inode->i_size  = sd_v1_size(sd);
  802. inode->i_atime = sd_v1_atime(sd);
  803. inode->i_mtime = sd_v1_mtime(sd);
  804. inode->i_ctime = sd_v1_ctime(sd);
  805. inode->i_blocks = sd_v1_blocks(sd);
  806. inode->i_generation = le32_to_cpu (INODE_PKEY (inode)->k_dir_id);
  807. blocks = (inode->i_size + 511) >> 9;
  808. blocks = _ROUND_UP (blocks, inode->i_blksize >> 9);
  809. if (inode->i_blocks > blocks) {
  810.     // there was a bug in <=3.5.23 when i_blocks could take negative
  811.     // values. Starting from 3.5.17 this value could even be stored in
  812.     // stat data. For such files we set i_blocks based on file
  813.     // size. Just 2 notes: this can be wrong for sparce files. On-disk value will be
  814.     // only updated if file's inode will ever change
  815.     inode->i_blocks = blocks;
  816. }
  817.         rdev = sd_v1_rdev(sd);
  818. inode->u.reiserfs_i.i_first_direct_byte = sd_v1_first_direct_byte(sd);
  819.     } else {
  820. // new stat data found, but object may have old items
  821. // (directories and symlinks)
  822. struct stat_data * sd = (struct stat_data *)B_I_PITEM (bh, ih);
  823. inode->i_mode   = sd_v2_mode(sd);
  824. inode->i_nlink  = sd_v2_nlink(sd);
  825. inode->i_uid    = sd_v2_uid(sd);
  826. inode->i_size   = sd_v2_size(sd);
  827. inode->i_gid    = sd_v2_gid(sd);
  828. inode->i_mtime  = sd_v2_mtime(sd);
  829. inode->i_atime  = sd_v2_atime(sd);
  830. inode->i_ctime  = sd_v2_ctime(sd);
  831. inode->i_blocks = sd_v2_blocks(sd);
  832.         rdev            = sd_v2_rdev(sd);
  833. if( S_ISCHR( inode -> i_mode ) || S_ISBLK( inode -> i_mode ) )
  834.     inode->i_generation = le32_to_cpu (INODE_PKEY (inode)->k_dir_id);
  835. else
  836.             inode->i_generation = sd_v2_generation(sd);
  837. if (S_ISDIR (inode->i_mode) || S_ISLNK (inode->i_mode))
  838.     set_inode_item_key_version (inode, KEY_FORMAT_3_5);
  839. else
  840.             set_inode_item_key_version (inode, KEY_FORMAT_3_6);
  841.         set_inode_sd_version (inode, STAT_DATA_V2);
  842.     }
  843.     /* nopack = 0, by default */
  844.     inode->u.reiserfs_i.i_flags &= ~i_nopack_mask;
  845.     pathrelse (path);
  846.     if (S_ISREG (inode->i_mode)) {
  847. inode->i_op = &reiserfs_file_inode_operations;
  848. inode->i_fop = &reiserfs_file_operations;
  849. inode->i_mapping->a_ops = &reiserfs_address_space_operations ;
  850.     } else if (S_ISDIR (inode->i_mode)) {
  851. inode->i_op = &reiserfs_dir_inode_operations;
  852. inode->i_fop = &reiserfs_dir_operations;
  853.     } else if (S_ISLNK (inode->i_mode)) {
  854. inode->i_op = &page_symlink_inode_operations;
  855. inode->i_mapping->a_ops = &reiserfs_address_space_operations;
  856.     } else {
  857. inode->i_blocks = 0;
  858. init_special_inode(inode, inode->i_mode, rdev) ;
  859.     }
  860. }
  861. // update new stat data with inode fields
  862. static void inode2sd (void * sd, struct inode * inode)
  863. {
  864.     struct stat_data * sd_v2 = (struct stat_data *)sd;
  865.     set_sd_v2_mode(sd_v2, inode->i_mode );
  866.     set_sd_v2_nlink(sd_v2, inode->i_nlink );
  867.     set_sd_v2_uid(sd_v2, inode->i_uid );
  868.     set_sd_v2_size(sd_v2, inode->i_size );
  869.     set_sd_v2_gid(sd_v2, inode->i_gid );
  870.     set_sd_v2_mtime(sd_v2, inode->i_mtime );
  871.     set_sd_v2_atime(sd_v2, inode->i_atime );
  872.     set_sd_v2_ctime(sd_v2, inode->i_ctime );
  873.     set_sd_v2_blocks(sd_v2, inode->i_blocks );
  874.     if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode)) {
  875.         set_sd_v2_rdev(sd_v2, inode->i_rdev );
  876. }
  877.     else
  878.     {
  879.         set_sd_v2_generation(sd_v2, inode->i_generation);
  880.     }
  881. }
  882. // used to copy inode's fields to old stat data
  883. static void inode2sd_v1 (void * sd, struct inode * inode)
  884. {
  885.     struct stat_data_v1 * sd_v1 = (struct stat_data_v1 *)sd;
  886.     set_sd_v1_mode(sd_v1, inode->i_mode );
  887.     set_sd_v1_uid(sd_v1, inode->i_uid );
  888.     set_sd_v1_gid(sd_v1, inode->i_gid );
  889.     set_sd_v1_nlink(sd_v1, inode->i_nlink );
  890.     set_sd_v1_size(sd_v1, inode->i_size );
  891.     set_sd_v1_atime(sd_v1, inode->i_atime );
  892.     set_sd_v1_ctime(sd_v1, inode->i_ctime );
  893.     set_sd_v1_mtime(sd_v1, inode->i_mtime );
  894.     if (S_ISCHR(inode->i_mode) || S_ISBLK(inode->i_mode))
  895.         set_sd_v1_rdev(sd_v1, inode->i_rdev );
  896.     else
  897.         set_sd_v1_blocks(sd_v1, inode->i_blocks );
  898.     // Sigh. i_first_direct_byte is back
  899.     set_sd_v1_first_direct_byte(sd_v1, inode->u.reiserfs_i.i_first_direct_byte);
  900. }
  901. /* NOTE, you must prepare the buffer head before sending it here,
  902. ** and then log it after the call
  903. */
  904. static void update_stat_data (struct path * path, struct inode * inode)
  905. {
  906.     struct buffer_head * bh;
  907.     struct item_head * ih;
  908.   
  909.     bh = PATH_PLAST_BUFFER (path);
  910.     ih = PATH_PITEM_HEAD (path);
  911.     if (!is_statdata_le_ih (ih))
  912. reiserfs_panic (inode->i_sb, "vs-13065: update_stat_data: key %k, found item %h",
  913. INODE_PKEY (inode), ih);
  914.   
  915.     if (stat_data_v1 (ih)) {
  916. // path points to old stat data
  917. inode2sd_v1 (B_I_PITEM (bh, ih), inode);
  918.     } else {
  919. inode2sd (B_I_PITEM (bh, ih), inode);
  920.     }
  921.     return;
  922. }
  923. void reiserfs_update_sd (struct reiserfs_transaction_handle *th, 
  924.  struct inode * inode)
  925. {
  926.     struct cpu_key key;
  927.     INITIALIZE_PATH(path);
  928.     struct buffer_head *bh ;
  929.     int fs_gen ;
  930.     struct item_head *ih, tmp_ih ;
  931.     int retval;
  932.     make_cpu_key (&key, inode, SD_OFFSET, TYPE_STAT_DATA, 3);//key type is unimportant
  933.     
  934.     for(;;) {
  935. int pos;
  936. /* look for the object's stat data */
  937. retval = search_item (inode->i_sb, &key, &path);
  938. if (retval == IO_ERROR) {
  939.     reiserfs_warning ("vs-13050: reiserfs_update_sd: "
  940.       "i/o failure occurred trying to update %K stat data",
  941.       &key);
  942.     return;
  943. }
  944. if (retval == ITEM_NOT_FOUND) {
  945.     pos = PATH_LAST_POSITION (&path);
  946.     pathrelse(&path) ;
  947.     if (inode->i_nlink == 0) {
  948. /*printk ("vs-13050: reiserfs_update_sd: i_nlink == 0, stat data not foundn");*/
  949. return;
  950.     }
  951.     reiserfs_warning ("vs-13060: reiserfs_update_sd: "
  952.       "stat data of object %k (nlink == %d) not found (pos %d)n", 
  953.       INODE_PKEY (inode), inode->i_nlink, pos);
  954.     reiserfs_check_path(&path) ;
  955.     return;
  956. }
  957. /* sigh, prepare_for_journal might schedule.  When it schedules the
  958. ** FS might change.  We have to detect that, and loop back to the
  959. ** search if the stat data item has moved
  960. */
  961. bh = get_last_bh(&path) ;
  962. ih = get_ih(&path) ;
  963. copy_item_head (&tmp_ih, ih);
  964. fs_gen = get_generation (inode->i_sb);
  965. reiserfs_prepare_for_journal(inode->i_sb, bh, 1) ;
  966. if (fs_changed (fs_gen, inode->i_sb) && item_moved(&tmp_ih, &path)) {
  967.     reiserfs_restore_prepared_buffer(inode->i_sb, bh) ;
  968.     continue ; /* Stat_data item has been moved after scheduling. */
  969. }
  970. break;
  971.     }
  972.     update_stat_data (&path, inode);
  973.     journal_mark_dirty(th, th->t_super, bh) ; 
  974.     pathrelse (&path);
  975.     return;
  976. }
  977. void reiserfs_read_inode(struct inode *inode) {
  978.     make_bad_inode(inode) ;
  979. }
  980. //
  981. // initially this function was derived from minix or ext2's analog and
  982. // evolved as the prototype did
  983. //
  984. /* looks for stat data in the tree, and fills up the fields of in-core
  985.    inode stat data fields */
  986. void reiserfs_read_inode2 (struct inode * inode, void *p)
  987. {
  988.     INITIALIZE_PATH (path_to_sd);
  989.     struct cpu_key key;
  990.     struct reiserfs_iget4_args *args = (struct reiserfs_iget4_args *)p ;
  991.     unsigned long dirino;
  992.     int retval;
  993.     if (!p) {
  994. make_bad_inode(inode) ;
  995. return;
  996.     }
  997.     dirino = args->objectid ;
  998.     /* set version 1, version 2 could be used too, because stat data
  999.        key is the same in both versions */
  1000.     key.version = KEY_FORMAT_3_5;
  1001.     key.on_disk_key.k_dir_id = dirino;
  1002.     key.on_disk_key.k_objectid = inode->i_ino;
  1003.     key.on_disk_key.u.k_offset_v1.k_offset = SD_OFFSET;
  1004.     key.on_disk_key.u.k_offset_v1.k_uniqueness = SD_UNIQUENESS;
  1005.     /* look for the object's stat data */
  1006.     retval = search_item (inode->i_sb, &key, &path_to_sd);
  1007.     if (retval == IO_ERROR) {
  1008. reiserfs_warning ("vs-13070: reiserfs_read_inode2: "
  1009.                     "i/o failure occurred trying to find stat data of %Kn",
  1010.                     &key);
  1011. make_bad_inode(inode) ;
  1012. return;
  1013.     }
  1014.     if (retval != ITEM_FOUND) {
  1015. /* a stale NFS handle can trigger this without it being an error */
  1016. pathrelse (&path_to_sd);
  1017. make_bad_inode(inode) ;
  1018. inode->i_nlink = 0;
  1019. return;
  1020.     }
  1021.     init_inode (inode, &path_to_sd);
  1022.    
  1023.     /* It is possible that knfsd is trying to access inode of a file
  1024.        that is being removed from the disk by some other thread. As we
  1025.        update sd on unlink all that is required is to check for nlink
  1026.        here. This bug was first found by Sizif when debugging
  1027.        SquidNG/Butterfly, forgotten, and found again after Philippe
  1028.        Gramoulle <philippe.gramoulle@mmania.com> reproduced it. 
  1029.        More logical fix would require changes in fs/inode.c:iput() to
  1030.        remove inode from hash-table _after_ fs cleaned disk stuff up and
  1031.        in iget() to return NULL if I_FREEING inode is found in
  1032.        hash-table. */
  1033.     /* Currently there is one place where it's ok to meet inode with
  1034.        nlink==0: processing of open-unlinked and half-truncated files
  1035.        during mount (fs/reiserfs/super.c:finish_unfinished()). */
  1036.     if( ( inode -> i_nlink == 0 ) && 
  1037. ! inode -> i_sb -> u.reiserfs_sb.s_is_unlinked_ok ) {
  1038.     reiserfs_warning( "vs-13075: reiserfs_read_inode2: "
  1039.       "dead inode read from disk %K. "
  1040.       "This is likely to be race with knfsd. Ignoren", 
  1041.       &key );
  1042.     make_bad_inode( inode );
  1043.     }
  1044.     reiserfs_check_path(&path_to_sd) ; /* init inode should be relsing */
  1045. }
  1046. /**
  1047.  * reiserfs_find_actor() - "find actor" reiserfs supplies to iget4().
  1048.  *
  1049.  * @inode:    inode from hash table to check
  1050.  * @inode_no: inode number we are looking for
  1051.  * @opaque:   "cookie" passed to iget4(). This is &reiserfs_iget4_args.
  1052.  *
  1053.  * This function is called by iget4() to distinguish reiserfs inodes
  1054.  * having the same inode numbers. Such inodes can only exist due to some
  1055.  * error condition. One of them should be bad. Inodes with identical
  1056.  * inode numbers (objectids) are distinguished by parent directory ids.
  1057.  *
  1058.  */
  1059. static int reiserfs_find_actor( struct inode *inode, 
  1060. unsigned long inode_no, void *opaque )
  1061. {
  1062.     struct reiserfs_iget4_args *args;
  1063.     args = opaque;
  1064.     /* args is already in CPU order */
  1065.     return le32_to_cpu(INODE_PKEY(inode)->k_dir_id) == args -> objectid;
  1066. }
  1067. struct inode * reiserfs_iget (struct super_block * s, const struct cpu_key * key)
  1068. {
  1069.     struct inode * inode;
  1070.     struct reiserfs_iget4_args args ;
  1071.     args.objectid = key->on_disk_key.k_dir_id ;
  1072.     inode = iget4 (s, key->on_disk_key.k_objectid, 
  1073.    reiserfs_find_actor, (void *)(&args));
  1074.     if (!inode) 
  1075. return ERR_PTR(-ENOMEM) ;
  1076.     if (comp_short_keys (INODE_PKEY (inode), key) || is_bad_inode (inode)) {
  1077. /* either due to i/o error or a stale NFS handle */
  1078. iput (inode);
  1079. inode = 0;
  1080.     }
  1081.     return inode;
  1082. }
  1083. struct dentry *reiserfs_fh_to_dentry(struct super_block *sb, __u32 *data,
  1084.      int len, int fhtype, int parent) {
  1085.     struct cpu_key key ;
  1086.     struct inode *inode = NULL ;
  1087.     struct list_head *lp;
  1088.     struct dentry *result;
  1089.     /* fhtype happens to reflect the number of u32s encoded.
  1090.      * due to a bug in earlier code, fhtype might indicate there
  1091.      * are more u32s then actually fitted.
  1092.      * so if fhtype seems to be more than len, reduce fhtype.
  1093.      * Valid types are:
  1094.      *   2 - objectid + dir_id - legacy support
  1095.      *   3 - objectid + dir_id + generation
  1096.      *   4 - objectid + dir_id + objectid and dirid of parent - legacy
  1097.      *   5 - objectid + dir_id + generation + objectid and dirid of parent
  1098.      *   6 - as above plus generation of directory
  1099.      * 6 does not fit in NFSv2 handles
  1100.      */
  1101.     if (fhtype > len) {
  1102.     if (fhtype != 6 || len != 5)
  1103.     printk(KERN_WARNING "nfsd/reiserfs, fhtype=%d, len=%d - oddn",
  1104.    fhtype, len);
  1105.     fhtype = 5;
  1106.     }
  1107.     if (fhtype < 2 || (parent && fhtype < 4)) 
  1108. goto out ;
  1109.     if (! parent) {
  1110.     /* this works for handles from old kernels because the default
  1111.     ** reiserfs generation number is the packing locality.
  1112.     */
  1113.     key.on_disk_key.k_objectid = data[0] ;
  1114.     key.on_disk_key.k_dir_id = data[1] ;
  1115.     inode = reiserfs_iget(sb, &key) ;
  1116.     if (inode && !IS_ERR(inode) && (fhtype == 3 || fhtype >= 5) &&
  1117. data[2] != inode->i_generation) {
  1118.     iput(inode) ;
  1119.     inode = NULL ;
  1120.     }
  1121.     } else {
  1122.     key.on_disk_key.k_objectid = data[fhtype>=5?3:2] ;
  1123.     key.on_disk_key.k_dir_id = data[fhtype>=5?4:3] ;
  1124.     inode = reiserfs_iget(sb, &key) ;
  1125.     if (inode && !IS_ERR(inode) && fhtype == 6 &&
  1126. data[5] != inode->i_generation) {
  1127.     iput(inode) ;
  1128.     inode = NULL ;
  1129.     }
  1130.     }
  1131. out:
  1132.     if (IS_ERR(inode))
  1133. return ERR_PTR(PTR_ERR(inode));
  1134.     if (!inode)
  1135.         return ERR_PTR(-ESTALE) ;
  1136.     /* now to find a dentry.
  1137.      * If possible, get a well-connected one
  1138.      */
  1139.     spin_lock(&dcache_lock);
  1140.     for (lp = inode->i_dentry.next; lp != &inode->i_dentry ; lp=lp->next) {
  1141.     result = list_entry(lp,struct dentry, d_alias);
  1142.     if (! (result->d_flags & DCACHE_NFSD_DISCONNECTED)) {
  1143.     dget_locked(result);
  1144.     result->d_vfs_flags |= DCACHE_REFERENCED;
  1145.     spin_unlock(&dcache_lock);
  1146.     iput(inode);
  1147.     return result;
  1148.     }
  1149.     }
  1150.     spin_unlock(&dcache_lock);
  1151.     result = d_alloc_root(inode);
  1152.     if (result == NULL) {
  1153.     iput(inode);
  1154.     return ERR_PTR(-ENOMEM);
  1155.     }
  1156.     result->d_flags |= DCACHE_NFSD_DISCONNECTED;
  1157.     return result;
  1158. }
  1159. int reiserfs_dentry_to_fh(struct dentry *dentry, __u32 *data, int *lenp, int need_parent) {
  1160.     struct inode *inode = dentry->d_inode ;
  1161.     int maxlen = *lenp;
  1162.     
  1163.     if (maxlen < 3)
  1164.         return 255 ;
  1165.     data[0] = inode->i_ino ;
  1166.     data[1] = le32_to_cpu(INODE_PKEY (inode)->k_dir_id) ;
  1167.     data[2] = inode->i_generation ;
  1168.     *lenp = 3 ;
  1169.     /* no room for directory info? return what we've stored so far */
  1170.     if (maxlen < 5 || ! need_parent)
  1171.         return 3 ;
  1172.     inode = dentry->d_parent->d_inode ;
  1173.     data[3] = inode->i_ino ;
  1174.     data[4] = le32_to_cpu(INODE_PKEY (inode)->k_dir_id) ;
  1175.     *lenp = 5 ;
  1176.     if (maxlen < 6)
  1177.     return 5 ;
  1178.     data[5] = inode->i_generation ;
  1179.     *lenp = 6 ;
  1180.     return 6 ;
  1181. }
  1182. //
  1183. // initially this function was derived from minix or ext2's analog and
  1184. // evolved as the prototype did
  1185. //
  1186. /* looks for stat data, then copies fields to it, marks the buffer
  1187.    containing stat data as dirty */
  1188. /* reiserfs inodes are never really dirty, since the dirty inode call
  1189. ** always logs them.  This call allows the VFS inode marking routines
  1190. ** to properly mark inodes for datasync and such, but only actually
  1191. ** does something when called for a synchronous update.
  1192. */
  1193. void reiserfs_write_inode (struct inode * inode, int do_sync) {
  1194.     struct reiserfs_transaction_handle th ;
  1195.     int jbegin_count = 1 ;
  1196.     if (inode->i_sb->s_flags & MS_RDONLY) {
  1197.         reiserfs_warning("clm-6005: writing inode %lu on readonly FSn", 
  1198.                   inode->i_ino) ;
  1199.         return ;
  1200.     }
  1201.     /* memory pressure can sometimes initiate write_inode calls with sync == 1,
  1202.     ** these cases are just when the system needs ram, not when the 
  1203.     ** inode needs to reach disk for safety, and they can safely be
  1204.     ** ignored because the altered inode has already been logged.
  1205.     */
  1206.     if (do_sync && !(current->flags & PF_MEMALLOC)) {
  1207. lock_kernel() ;
  1208. journal_begin(&th, inode->i_sb, jbegin_count) ;
  1209. reiserfs_update_sd (&th, inode);
  1210. journal_end_sync(&th, inode->i_sb, jbegin_count) ;
  1211. unlock_kernel() ;
  1212.     }
  1213. }
  1214. /* FIXME: no need any more. right? */
  1215. int reiserfs_sync_inode (struct reiserfs_transaction_handle *th, struct inode * inode)
  1216. {
  1217.   int err = 0;
  1218.   reiserfs_update_sd (th, inode);
  1219.   return err;
  1220. }
  1221. /* stat data of new object is inserted already, this inserts the item
  1222.    containing "." and ".." entries */
  1223. static int reiserfs_new_directory (struct reiserfs_transaction_handle *th, 
  1224.    struct item_head * ih, struct path * path,
  1225.    const struct inode * dir)
  1226. {
  1227.     struct super_block * sb = th->t_super;
  1228.     char empty_dir [EMPTY_DIR_SIZE];
  1229.     char * body = empty_dir;
  1230.     struct cpu_key key;
  1231.     int retval;
  1232.     
  1233.     _make_cpu_key (&key, KEY_FORMAT_3_5, le32_to_cpu (ih->ih_key.k_dir_id),
  1234.    le32_to_cpu (ih->ih_key.k_objectid), DOT_OFFSET, TYPE_DIRENTRY, 3/*key length*/);
  1235.     
  1236.     /* compose item head for new item. Directories consist of items of
  1237.        old type (ITEM_VERSION_1). Do not set key (second arg is 0), it
  1238.        is done by reiserfs_new_inode */
  1239.     if (old_format_only (sb)) {
  1240. make_le_item_head (ih, 0, KEY_FORMAT_3_5, DOT_OFFSET, TYPE_DIRENTRY, EMPTY_DIR_SIZE_V1, 2);
  1241. make_empty_dir_item_v1 (body, ih->ih_key.k_dir_id, ih->ih_key.k_objectid,
  1242. INODE_PKEY (dir)->k_dir_id, 
  1243. INODE_PKEY (dir)->k_objectid );
  1244.     } else {
  1245. make_le_item_head (ih, 0, KEY_FORMAT_3_5, DOT_OFFSET, TYPE_DIRENTRY, EMPTY_DIR_SIZE, 2);
  1246. make_empty_dir_item (body, ih->ih_key.k_dir_id, ih->ih_key.k_objectid,
  1247.     INODE_PKEY (dir)->k_dir_id, 
  1248.     INODE_PKEY (dir)->k_objectid );
  1249.     }
  1250.     
  1251.     /* look for place in the tree for new item */
  1252.     retval = search_item (sb, &key, path);
  1253.     if (retval == IO_ERROR) {
  1254. reiserfs_warning ("vs-13080: reiserfs_new_directory: "
  1255.   "i/o failure occurred creating new directoryn");
  1256. return -EIO;
  1257.     }
  1258.     if (retval == ITEM_FOUND) {
  1259. pathrelse (path);
  1260. reiserfs_warning ("vs-13070: reiserfs_new_directory: "
  1261.   "object with this key exists (%k)", &(ih->ih_key));
  1262. return -EEXIST;
  1263.     }
  1264.     /* insert item, that is empty directory item */
  1265.     return reiserfs_insert_item (th, path, &key, ih, body);
  1266. }
  1267. /* stat data of object has been inserted, this inserts the item
  1268.    containing the body of symlink */
  1269. static int reiserfs_new_symlink (struct reiserfs_transaction_handle *th, 
  1270.  struct item_head * ih,
  1271.  struct path * path, const char * symname, int item_len)
  1272. {
  1273.     struct super_block * sb = th->t_super;
  1274.     struct cpu_key key;
  1275.     int retval;
  1276.     _make_cpu_key (&key, KEY_FORMAT_3_5, 
  1277.    le32_to_cpu (ih->ih_key.k_dir_id), 
  1278.    le32_to_cpu (ih->ih_key.k_objectid),
  1279.    1, TYPE_DIRECT, 3/*key length*/);
  1280.     make_le_item_head (ih, 0, KEY_FORMAT_3_5, 1, TYPE_DIRECT, item_len, 0/*free_space*/);
  1281.     /* look for place in the tree for new item */
  1282.     retval = search_item (sb, &key, path);
  1283.     if (retval == IO_ERROR) {
  1284. reiserfs_warning ("vs-13080: reiserfs_new_symlinik: "
  1285.   "i/o failure occurred creating new symlinkn");
  1286. return -EIO;
  1287.     }
  1288.     if (retval == ITEM_FOUND) {
  1289. pathrelse (path);
  1290. reiserfs_warning ("vs-13080: reiserfs_new_symlink: "
  1291.   "object with this key exists (%k)", &(ih->ih_key));
  1292. return -EEXIST;
  1293.     }
  1294.     /* insert item, that is body of symlink */
  1295.     return reiserfs_insert_item (th, path, &key, ih, symname);
  1296. }
  1297. /* inserts the stat data into the tree, and then calls
  1298.    reiserfs_new_directory (to insert ".", ".." item if new object is
  1299.    directory) or reiserfs_new_symlink (to insert symlink body if new
  1300.    object is symlink) or nothing (if new object is regular file) */
  1301. struct inode * reiserfs_new_inode (struct reiserfs_transaction_handle *th,
  1302.    const struct inode * dir, int mode, 
  1303.    const char * symname, 
  1304.    int i_size, /* 0 for regular, EMTRY_DIR_SIZE for dirs,
  1305.   strlen (symname) for symlinks)*/
  1306.    struct dentry *dentry, struct inode *inode, int * err)
  1307. {
  1308.     struct super_block * sb;
  1309.     INITIALIZE_PATH (path_to_key);
  1310.     struct cpu_key key;
  1311.     struct item_head ih;
  1312.     struct stat_data sd;
  1313.     int retval;
  1314.   
  1315.     if (!dir || !dir->i_nlink) {
  1316. *err = -EPERM;
  1317. iput(inode) ;
  1318. return NULL;
  1319.     }
  1320.     sb = dir->i_sb;
  1321.     inode->i_flags = 0;//inode->i_sb->s_flags;
  1322.     /* item head of new item */
  1323.     ih.ih_key.k_dir_id = INODE_PKEY (dir)->k_objectid;
  1324.     ih.ih_key.k_objectid = cpu_to_le32 (reiserfs_get_unused_objectid (th));
  1325.     if (!ih.ih_key.k_objectid) {
  1326. iput(inode) ;
  1327. *err = -ENOMEM;
  1328. return NULL;
  1329.     }
  1330.     if (old_format_only (sb))
  1331.       /* not a perfect generation count, as object ids can be reused, but this
  1332.       ** is as good as reiserfs can do right now.
  1333.       ** note that the private part of inode isn't filled in yet, we have
  1334.       ** to use the directory.
  1335.       */
  1336.       inode->i_generation = le32_to_cpu (INODE_PKEY (dir)->k_objectid);
  1337.     else
  1338. #if defined( USE_INODE_GENERATION_COUNTER )
  1339.       inode->i_generation = 
  1340. le32_to_cpu( sb -> u.reiserfs_sb.s_rs -> s_inode_generation );
  1341. #else
  1342.       inode->i_generation = ++event;
  1343. #endif
  1344.     if (old_format_only (sb))
  1345. make_le_item_head (&ih, 0, KEY_FORMAT_3_5, SD_OFFSET, TYPE_STAT_DATA, SD_V1_SIZE, MAX_US_INT);
  1346.     else
  1347. make_le_item_head (&ih, 0, KEY_FORMAT_3_6, SD_OFFSET, TYPE_STAT_DATA, SD_SIZE, MAX_US_INT);
  1348.     /* key to search for correct place for new stat data */
  1349.     _make_cpu_key (&key, KEY_FORMAT_3_6, le32_to_cpu (ih.ih_key.k_dir_id),
  1350.    le32_to_cpu (ih.ih_key.k_objectid), SD_OFFSET, TYPE_STAT_DATA, 3/*key length*/);
  1351.     /* find proper place for inserting of stat data */
  1352.     retval = search_item (sb, &key, &path_to_key);
  1353.     if (retval == IO_ERROR) {
  1354. iput (inode);
  1355. *err = -EIO;
  1356. return NULL;
  1357.     }
  1358.     if (retval == ITEM_FOUND) {
  1359. pathrelse (&path_to_key);
  1360. iput (inode);
  1361. *err = -EEXIST;
  1362. return NULL;
  1363.     }
  1364.     /* fill stat data */
  1365.     inode->i_mode = mode;
  1366.     inode->i_nlink = (S_ISDIR (mode) ? 2 : 1);
  1367.     inode->i_uid = current->fsuid;
  1368.     if (dir->i_mode & S_ISGID) {
  1369. inode->i_gid = dir->i_gid;
  1370. if (S_ISDIR(mode))
  1371.     inode->i_mode |= S_ISGID;
  1372.     } else
  1373. inode->i_gid = current->fsgid;
  1374.     inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME;
  1375.     inode->i_size = i_size;
  1376.     inode->i_blocks = (inode->i_size + 511) >> 9;
  1377.     inode->u.reiserfs_i.i_first_direct_byte = S_ISLNK(mode) ? 1 : 
  1378.       U32_MAX/*NO_BYTES_IN_DIRECT_ITEM*/;
  1379.     INIT_LIST_HEAD(&inode->u.reiserfs_i.i_prealloc_list) ;
  1380.     if (old_format_only (sb)) {
  1381. if (inode->i_uid & ~0xffff || inode->i_gid & ~0xffff) {
  1382.     pathrelse (&path_to_key);
  1383.     /* i_uid or i_gid is too big to be stored in stat data v3.5 */
  1384.     iput (inode);
  1385.     *err = -EINVAL;
  1386.     return NULL;
  1387. }
  1388. inode2sd_v1 (&sd, inode);
  1389.     } else
  1390. inode2sd (&sd, inode);
  1391.     // these do not go to on-disk stat data
  1392.     inode->i_ino = le32_to_cpu (ih.ih_key.k_objectid);
  1393.     inode->i_blksize = PAGE_SIZE;
  1394.     inode->i_dev = sb->s_dev;
  1395.   
  1396.     // store in in-core inode the key of stat data and version all
  1397.     // object items will have (directory items will have old offset
  1398.     // format, other new objects will consist of new items)
  1399.     memcpy (INODE_PKEY (inode), &(ih.ih_key), KEY_SIZE);
  1400.     if (old_format_only (sb) || S_ISDIR(mode) || S_ISLNK(mode))
  1401.         set_inode_item_key_version (inode, KEY_FORMAT_3_5);
  1402.     else
  1403.         set_inode_item_key_version (inode, KEY_FORMAT_3_6);
  1404.     if (old_format_only (sb))
  1405. set_inode_sd_version (inode, STAT_DATA_V1);
  1406.     else
  1407. set_inode_sd_version (inode, STAT_DATA_V2);
  1408.     
  1409.     /* insert the stat data into the tree */
  1410.     retval = reiserfs_insert_item (th, &path_to_key, &key, &ih, (char *)(&sd));
  1411.     if (retval) {
  1412. iput (inode);
  1413. *err = retval;
  1414. reiserfs_check_path(&path_to_key) ;
  1415. return NULL;
  1416.     }
  1417.     if (S_ISDIR(mode)) {
  1418. /* insert item with "." and ".." */
  1419. retval = reiserfs_new_directory (th, &ih, &path_to_key, dir);
  1420.     }
  1421.     if (S_ISLNK(mode)) {
  1422. /* insert body of symlink */
  1423. if (!old_format_only (sb))
  1424.     i_size = ROUND_UP(i_size);
  1425. retval = reiserfs_new_symlink (th, &ih, &path_to_key, symname, i_size);
  1426.     }
  1427.     if (retval) {
  1428.       inode->i_nlink = 0;
  1429. iput (inode);
  1430. *err = retval;
  1431. reiserfs_check_path(&path_to_key) ;
  1432. return NULL;
  1433.     }
  1434.     insert_inode_hash (inode);
  1435.     // we do not mark inode dirty: on disk content matches to the
  1436.     // in-core one
  1437.     reiserfs_check_path(&path_to_key) ;
  1438.     return inode;
  1439. }
  1440. /*
  1441. ** finds the tail page in the page cache,
  1442. ** reads the last block in.
  1443. **
  1444. ** On success, page_result is set to a locked, pinned page, and bh_result
  1445. ** is set to an up to date buffer for the last block in the file.  returns 0.
  1446. **
  1447. ** tail conversion is not done, so bh_result might not be valid for writing
  1448. ** check buffer_mapped(bh_result) and bh_result->b_blocknr != 0 before
  1449. ** trying to write the block.
  1450. **
  1451. ** on failure, nonzero is returned, page_result and bh_result are untouched.
  1452. */
  1453. static int grab_tail_page(struct inode *p_s_inode, 
  1454.   struct page **page_result, 
  1455.   struct buffer_head **bh_result) {
  1456.     /* we want the page with the last byte in the file,
  1457.     ** not the page that will hold the next byte for appending
  1458.     */
  1459.     unsigned long index = (p_s_inode->i_size-1) >> PAGE_CACHE_SHIFT ;
  1460.     unsigned long pos = 0 ;
  1461.     unsigned long start = 0 ;
  1462.     unsigned long blocksize = p_s_inode->i_sb->s_blocksize ;
  1463.     unsigned long offset = (p_s_inode->i_size) & (PAGE_CACHE_SIZE - 1) ;
  1464.     struct buffer_head *bh ;
  1465.     struct buffer_head *head ;
  1466.     struct page * page ;
  1467.     int error ;
  1468.     
  1469.     /* we know that we are only called with inode->i_size > 0.
  1470.     ** we also know that a file tail can never be as big as a block
  1471.     ** If i_size % blocksize == 0, our file is currently block aligned
  1472.     ** and it won't need converting or zeroing after a truncate.
  1473.     */
  1474.     if ((offset & (blocksize - 1)) == 0) {
  1475.         return -ENOENT ;
  1476.     }
  1477.     page = grab_cache_page(p_s_inode->i_mapping, index) ;
  1478.     error = -ENOMEM ;
  1479.     if (!page) {
  1480.         goto out ;
  1481.     }
  1482.     /* start within the page of the last block in the file */
  1483.     start = (offset / blocksize) * blocksize ;
  1484.     error = block_prepare_write(page, start, offset, 
  1485. reiserfs_get_block_create_0) ;
  1486.     if (error)
  1487. goto unlock ;
  1488.     kunmap(page) ; /* mapped by block_prepare_write */
  1489.     head = page->buffers ;      
  1490.     bh = head;
  1491.     do {
  1492. if (pos >= start) {
  1493.     break ;
  1494. }
  1495. bh = bh->b_this_page ;
  1496. pos += blocksize ;
  1497.     } while(bh != head) ;
  1498.     if (!buffer_uptodate(bh)) {
  1499. /* note, this should never happen, prepare_write should
  1500. ** be taking care of this for us.  If the buffer isn't up to date,
  1501. ** I've screwed up the code to find the buffer, or the code to
  1502. ** call prepare_write
  1503. */
  1504. reiserfs_warning("clm-6000: error reading block %lu on dev %sn",
  1505.                   bh->b_blocknr, kdevname(bh->b_dev)) ;
  1506. error = -EIO ;
  1507. goto unlock ;
  1508.     }
  1509.     *bh_result = bh ;
  1510.     *page_result = page ;
  1511. out:
  1512.     return error ;
  1513. unlock:
  1514.     UnlockPage(page) ;
  1515.     page_cache_release(page) ;
  1516.     return error ;
  1517. }
  1518. /*
  1519. ** vfs version of truncate file.  Must NOT be called with
  1520. ** a transaction already started.
  1521. **
  1522. ** some code taken from block_truncate_page
  1523. */
  1524. void reiserfs_truncate_file(struct inode *p_s_inode, int update_timestamps) {
  1525.     struct reiserfs_transaction_handle th ;
  1526.     int windex ;
  1527.     /* we want the offset for the first byte after the end of the file */
  1528.     unsigned long offset = p_s_inode->i_size & (PAGE_CACHE_SIZE - 1) ;
  1529.     unsigned blocksize = p_s_inode->i_sb->s_blocksize ;
  1530.     unsigned length ;
  1531.     struct page *page = NULL ;
  1532.     int error ;
  1533.     struct buffer_head *bh = NULL ;
  1534.     if (p_s_inode->i_size > 0) {
  1535.         if ((error = grab_tail_page(p_s_inode, &page, &bh))) {
  1536.     // -ENOENT means we truncated past the end of the file, 
  1537.     // and get_block_create_0 could not find a block to read in,
  1538.     // which is ok.
  1539.     if (error != -ENOENT)
  1540.         reiserfs_warning("clm-6001: grab_tail_page failed %dn", error);
  1541.     page = NULL ;
  1542.     bh = NULL ;
  1543. }
  1544.     }
  1545.     /* so, if page != NULL, we have a buffer head for the offset at 
  1546.     ** the end of the file. if the bh is mapped, and bh->b_blocknr != 0, 
  1547.     ** then we have an unformatted node.  Otherwise, we have a direct item, 
  1548.     ** and no zeroing is required on disk.  We zero after the truncate, 
  1549.     ** because the truncate might pack the item anyway 
  1550.     ** (it will unmap bh if it packs).
  1551.     */
  1552.     /* it is enough to reserve space in transaction for 2 balancings:
  1553.        one for "save" link adding and another for the first
  1554.        cut_from_item. 1 is for update_sd */
  1555.     journal_begin(&th, p_s_inode->i_sb,  JOURNAL_PER_BALANCE_CNT * 2 + 1 ) ;
  1556.     reiserfs_update_inode_transaction(p_s_inode) ;
  1557.     windex = push_journal_writer("reiserfs_vfs_truncate_file") ;
  1558.     if (update_timestamps)
  1559.            /* we are doing real truncate: if the system crashes before the last
  1560.               transaction of truncating gets committed - on reboot the file
  1561.               either appears truncated properly or not truncated at all */
  1562.            add_save_link (&th, p_s_inode, 1);
  1563.     reiserfs_do_truncate (&th, p_s_inode, page, update_timestamps) ;
  1564.     pop_journal_writer(windex) ;
  1565.     journal_end(&th, p_s_inode->i_sb,  JOURNAL_PER_BALANCE_CNT * 2 + 1 ) ;
  1566.     if (update_timestamps)
  1567.        remove_save_link (p_s_inode, 1/* truncate */);
  1568.     if (page) {
  1569.         length = offset & (blocksize - 1) ;
  1570. /* if we are not on a block boundary */
  1571. if (length) {
  1572.     length = blocksize - length ;
  1573.     memset((char *)kmap(page) + offset, 0, length) ;   
  1574.     flush_dcache_page(page) ;
  1575.     kunmap(page) ;
  1576.     if (buffer_mapped(bh) && bh->b_blocknr != 0) {
  1577.         mark_buffer_dirty(bh) ;
  1578.     }
  1579. }
  1580. UnlockPage(page) ;
  1581. page_cache_release(page) ;
  1582.     }
  1583.     return ;
  1584. }
  1585. static int map_block_for_writepage(struct inode *inode, 
  1586.        struct buffer_head *bh_result, 
  1587.                                unsigned long block) {
  1588.     struct reiserfs_transaction_handle th ;
  1589.     int fs_gen ;
  1590.     struct item_head tmp_ih ;
  1591.     struct item_head *ih ;
  1592.     struct buffer_head *bh ;
  1593.     __u32 *item ;
  1594.     struct cpu_key key ;
  1595.     INITIALIZE_PATH(path) ;
  1596.     int pos_in_item ;
  1597.     int jbegin_count = JOURNAL_PER_BALANCE_CNT ;
  1598.     loff_t byte_offset = (block << inode->i_sb->s_blocksize_bits) + 1 ;
  1599.     int retval ;
  1600.     int use_get_block = 0 ;
  1601.     int bytes_copied = 0 ;
  1602.     int copy_size ;
  1603.     kmap(bh_result->b_page) ;
  1604. start_over:
  1605.     lock_kernel() ;
  1606.     journal_begin(&th, inode->i_sb, jbegin_count) ;
  1607.     reiserfs_update_inode_transaction(inode) ;
  1608.     make_cpu_key(&key, inode, byte_offset, TYPE_ANY, 3) ;
  1609. research:
  1610.     retval = search_for_position_by_key(inode->i_sb, &key, &path) ;
  1611.     if (retval != POSITION_FOUND) {
  1612.         use_get_block = 1;
  1613. goto out ;
  1614.     } 
  1615.     bh = get_last_bh(&path) ;
  1616.     ih = get_ih(&path) ;
  1617.     item = get_item(&path) ;
  1618.     pos_in_item = path.pos_in_item ;
  1619.     /* we've found an unformatted node */
  1620.     if (indirect_item_found(retval, ih)) {
  1621. if (bytes_copied > 0) {
  1622.     reiserfs_warning("clm-6002: bytes_copied %dn", bytes_copied) ;
  1623. }
  1624.         if (!get_block_num(item, pos_in_item)) {
  1625.     /* crap, we are writing to a hole */
  1626.     use_get_block = 1;
  1627.     goto out ;
  1628. }
  1629. set_block_dev_mapped(bh_result, get_block_num(item,pos_in_item),inode);
  1630.         mark_buffer_uptodate(bh_result, 1);
  1631.     } else if (is_direct_le_ih(ih)) {
  1632.         char *p ; 
  1633.         p = page_address(bh_result->b_page) ;
  1634.         p += (byte_offset -1) & (PAGE_CACHE_SIZE - 1) ;
  1635.         copy_size = ih_item_len(ih) - pos_in_item;
  1636. fs_gen = get_generation(inode->i_sb) ;
  1637. copy_item_head(&tmp_ih, ih) ;
  1638. reiserfs_prepare_for_journal(inode->i_sb, bh, 1) ;
  1639. if (fs_changed (fs_gen, inode->i_sb) && item_moved (&tmp_ih, &path)) {
  1640.     reiserfs_restore_prepared_buffer(inode->i_sb, bh) ;
  1641.     goto research;
  1642. }
  1643. memcpy( B_I_PITEM(bh, ih) + pos_in_item, p + bytes_copied, copy_size) ;
  1644. journal_mark_dirty(&th, inode->i_sb, bh) ;
  1645. bytes_copied += copy_size ;
  1646. set_block_dev_mapped(bh_result, 0, inode);
  1647.         mark_buffer_uptodate(bh_result, 1);
  1648. /* are there still bytes left? */
  1649.         if (bytes_copied < bh_result->b_size && 
  1650.     (byte_offset + bytes_copied) < inode->i_size) {
  1651.     set_cpu_key_k_offset(&key, cpu_key_k_offset(&key) + copy_size) ;
  1652.     goto research ;
  1653. }
  1654.     } else {
  1655.         reiserfs_warning("clm-6003: bad item inode %lu, device %sn", inode->i_ino, kdevname(inode->i_sb->s_dev)) ;
  1656.         retval = -EIO ;
  1657. goto out ;
  1658.     }
  1659.     retval = 0 ;
  1660.     
  1661. out:
  1662.     pathrelse(&path) ;
  1663.     journal_end(&th, inode->i_sb, jbegin_count) ;
  1664.     unlock_kernel() ;
  1665.     /* this is where we fill in holes in the file. */
  1666.     if (use_get_block) {
  1667. retval = reiserfs_get_block(inode, block, bh_result, 
  1668.                             GET_BLOCK_CREATE | GET_BLOCK_NO_ISEM) ;
  1669. if (!retval) {
  1670.     if (!buffer_mapped(bh_result) || bh_result->b_blocknr == 0) {
  1671.         /* get_block failed to find a mapped unformatted node. */
  1672. use_get_block = 0 ;
  1673. goto start_over ;
  1674.     }
  1675. }
  1676.     }
  1677.     kunmap(bh_result->b_page) ;
  1678.     return retval ;
  1679. }
  1680. /* helper func to get a buffer head ready for writepage to send to
  1681. ** ll_rw_block
  1682. */
  1683. static inline void submit_bh_for_writepage(struct buffer_head **bhp, int nr) {
  1684.     struct buffer_head *bh ;
  1685.     int i;
  1686.     for(i = 0 ; i < nr ; i++) {
  1687.         bh = bhp[i] ;
  1688. lock_buffer(bh) ;
  1689. set_buffer_async_io(bh) ;
  1690. /* submit_bh doesn't care if the buffer is dirty, but nobody
  1691. ** later on in the call chain will be cleaning it.  So, we
  1692. ** clean the buffer here, it still gets written either way.
  1693. */
  1694. clear_bit(BH_Dirty, &bh->b_state) ;
  1695. set_bit(BH_Uptodate, &bh->b_state) ;
  1696. submit_bh(WRITE, bh) ;
  1697.     }
  1698. }
  1699. static int reiserfs_write_full_page(struct page *page) {
  1700.     struct inode *inode = page->mapping->host ;
  1701.     unsigned long end_index = inode->i_size >> PAGE_CACHE_SHIFT ;
  1702.     unsigned last_offset = PAGE_CACHE_SIZE;
  1703.     int error = 0;
  1704.     unsigned long block ;
  1705.     unsigned cur_offset = 0 ;
  1706.     struct buffer_head *head, *bh ;
  1707.     int partial = 0 ;
  1708.     struct buffer_head *arr[PAGE_CACHE_SIZE/512] ;
  1709.     int nr = 0 ;
  1710.     if (!page->buffers) {
  1711.         block_prepare_write(page, 0, 0, NULL) ;
  1712. kunmap(page) ;
  1713.     }
  1714.     /* last page in the file, zero out any contents past the
  1715.     ** last byte in the file
  1716.     */
  1717.     if (page->index >= end_index) {
  1718.         last_offset = inode->i_size & (PAGE_CACHE_SIZE - 1) ;
  1719. /* no file contents in this page */
  1720. if (page->index >= end_index + 1 || !last_offset) {
  1721.     error =  -EIO ;
  1722.     goto fail ;
  1723. }
  1724. memset((char *)kmap(page)+last_offset, 0, PAGE_CACHE_SIZE-last_offset) ;
  1725. flush_dcache_page(page) ;
  1726. kunmap(page) ;
  1727.     }
  1728.     head = page->buffers ;
  1729.     bh = head ;
  1730.     block = page->index << (PAGE_CACHE_SHIFT - inode->i_sb->s_blocksize_bits) ;
  1731.     do {
  1732. /* if this offset in the page is outside the file */
  1733. if (cur_offset >= last_offset) {
  1734.     if (!buffer_uptodate(bh))
  1735.         partial = 1 ;
  1736. } else {
  1737.     /* fast path, buffer mapped to an unformatted node */
  1738.     if (buffer_mapped(bh) && bh->b_blocknr != 0) {
  1739. arr[nr++] = bh ;
  1740.     } else {
  1741. /* buffer not mapped yet, or points to a direct item.
  1742. ** search and dirty or log
  1743. */
  1744. if ((error = map_block_for_writepage(inode, bh, block))) {
  1745.     goto fail ;
  1746. }
  1747. /* map_block_for_writepage either found an unformatted node
  1748. ** and mapped it for us, or it found a direct item
  1749. ** and logged the changes.  
  1750. */
  1751. if (buffer_mapped(bh) && bh->b_blocknr != 0) {
  1752.     arr[nr++] = bh ;
  1753. }
  1754.     }
  1755. }
  1756.         bh = bh->b_this_page ;
  1757. cur_offset += bh->b_size ;
  1758. block++ ;
  1759.     } while(bh != head) ;
  1760.     /* if this page only had a direct item, it is very possible for
  1761.     ** nr == 0 without there being any kind of error.
  1762.     */
  1763.     if (nr) {
  1764.         submit_bh_for_writepage(arr, nr) ;
  1765.     } else {
  1766.         UnlockPage(page) ;
  1767.     }
  1768.     if (!partial)
  1769.         SetPageUptodate(page) ;
  1770.     return 0 ;
  1771. fail:
  1772.     if (nr) {
  1773.         submit_bh_for_writepage(arr, nr) ;
  1774.     } else {
  1775.         UnlockPage(page) ;
  1776.     }
  1777.     ClearPageUptodate(page) ;
  1778.     return error ;
  1779. }
  1780. //
  1781. // this is exactly what 2.3.99-pre9's ext2_readpage is
  1782. //
  1783. static int reiserfs_readpage (struct file *f, struct page * page)
  1784. {
  1785.     return block_read_full_page (page, reiserfs_get_block);
  1786. }
  1787. //
  1788. // modified from ext2_writepage is
  1789. //
  1790. static int reiserfs_writepage (struct page * page)
  1791. {
  1792.     struct inode *inode = page->mapping->host ;
  1793.     reiserfs_wait_on_write_block(inode->i_sb) ;
  1794.     return reiserfs_write_full_page(page) ;
  1795. }
  1796. //
  1797. // from ext2_prepare_write, but modified
  1798. //
  1799. int reiserfs_prepare_write(struct file *f, struct page *page, 
  1800.    unsigned from, unsigned to) {
  1801.     struct inode *inode = page->mapping->host ;
  1802.     reiserfs_wait_on_write_block(inode->i_sb) ;
  1803.     fix_tail_page_for_writing(page) ;
  1804.     return block_prepare_write(page, from, to, reiserfs_get_block) ;
  1805. }
  1806. //
  1807. // this is exactly what 2.3.99-pre9's ext2_bmap is
  1808. //
  1809. static int reiserfs_aop_bmap(struct address_space *as, long block) {
  1810.   return generic_block_bmap(as, block, reiserfs_bmap) ;
  1811. }
  1812. static int reiserfs_commit_write(struct file *f, struct page *page, 
  1813.                                  unsigned from, unsigned to) {
  1814.     struct inode *inode = page->mapping->host ;
  1815.     loff_t pos = ((loff_t)page->index << PAGE_CACHE_SHIFT) + to;
  1816.     int ret ; 
  1817.     
  1818.     reiserfs_wait_on_write_block(inode->i_sb) ;
  1819.  
  1820.     /* generic_commit_write does this for us, but does not update the
  1821.     ** transaction tracking stuff when the size changes.  So, we have
  1822.     ** to do the i_size updates here.
  1823.     */
  1824.     if (pos > inode->i_size) {
  1825. struct reiserfs_transaction_handle th ;
  1826. lock_kernel() ;
  1827. journal_begin(&th, inode->i_sb, 1) ;
  1828. reiserfs_update_inode_transaction(inode) ;
  1829. inode->i_size = pos ;
  1830. reiserfs_update_sd(&th, inode) ;
  1831. journal_end(&th, inode->i_sb, 1) ;
  1832. unlock_kernel() ;
  1833.     }
  1834.  
  1835.     ret = generic_commit_write(f, page, from, to) ;
  1836.     /* we test for O_SYNC here so we can commit the transaction
  1837.     ** for any packed tails the file might have had
  1838.     */
  1839.     if (f && (f->f_flags & O_SYNC)) {
  1840. lock_kernel() ;
  1841.   reiserfs_commit_for_inode(inode) ;
  1842. unlock_kernel();
  1843.     }
  1844.     return ret ;
  1845. }
  1846. struct address_space_operations reiserfs_address_space_operations = {
  1847.     writepage: reiserfs_writepage,
  1848.     readpage: reiserfs_readpage, 
  1849.     sync_page: block_sync_page,
  1850.     prepare_write: reiserfs_prepare_write,
  1851.     commit_write: reiserfs_commit_write,
  1852.     bmap: reiserfs_aop_bmap
  1853. } ;