*               first one is writable.
  * @any_young: Optional pointer to indicate whether any entry except the
  *               first one is young.
+ * @any_dirty: Optional pointer to indicate whether any entry except the
+ *               first one is dirty.
  *
  * Detect a PTE batch: consecutive (present) PTEs that map consecutive
  * pages of the same large folio.
  */
 static inline int folio_pte_batch(struct folio *folio, unsigned long addr,
                pte_t *start_ptep, pte_t pte, int max_nr, fpb_t flags,
-               bool *any_writable, bool *any_young)
+               bool *any_writable, bool *any_young, bool *any_dirty)
 {
        unsigned long folio_end_pfn = folio_pfn(folio) + folio_nr_pages(folio);
        const pte_t *end_ptep = start_ptep + max_nr;
        pte_t expected_pte, *ptep;
-       bool writable, young;
+       bool writable, young, dirty;
        int nr;
 
        if (any_writable)
                *any_writable = false;
        if (any_young)
                *any_young = false;
+       if (any_dirty)
+               *any_dirty = false;
 
        VM_WARN_ON_FOLIO(!pte_present(pte), folio);
        VM_WARN_ON_FOLIO(!folio_test_large(folio) || max_nr < 1, folio);
                        writable = !!pte_write(pte);
                if (any_young)
                        young = !!pte_young(pte);
+               if (any_dirty)
+                       dirty = !!pte_dirty(pte);
                pte = __pte_batch_clear_ignored(pte, flags);
 
                if (!pte_same(pte, expected_pte))
                        *any_writable |= writable;
                if (any_young)
                        *any_young |= young;
+               if (any_dirty)
+                       *any_dirty |= dirty;
 
                nr = pte_batch_hint(ptep, pte);
                expected_pte = pte_advance_pfn(expected_pte, nr);
 
               file_permission(vma->vm_file, MAY_WRITE) == 0;
 }
 
+static inline int madvise_folio_pte_batch(unsigned long addr, unsigned long end,
+                                         struct folio *folio, pte_t *ptep,
+                                         pte_t pte, bool *any_young,
+                                         bool *any_dirty)
+{
+       const fpb_t fpb_flags = FPB_IGNORE_DIRTY | FPB_IGNORE_SOFT_DIRTY;
+       int max_nr = (end - addr) / PAGE_SIZE;
+
+       return folio_pte_batch(folio, addr, ptep, pte, max_nr, fpb_flags, NULL,
+                              any_young, any_dirty);
+}
+
 static int madvise_cold_or_pageout_pte_range(pmd_t *pmd,
                                unsigned long addr, unsigned long end,
                                struct mm_walk *walk)
                 * next pte in the range.
                 */
                if (folio_test_large(folio)) {
-                       const fpb_t fpb_flags = FPB_IGNORE_DIRTY |
-                                               FPB_IGNORE_SOFT_DIRTY;
-                       int max_nr = (end - addr) / PAGE_SIZE;
                        bool any_young;
 
-                       nr = folio_pte_batch(folio, addr, pte, ptent, max_nr,
-                                            fpb_flags, NULL, &any_young);
+                       nr = madvise_folio_pte_batch(addr, end, folio, pte,
+                                                    ptent, &any_young, NULL);
                        if (any_young)
                                ptent = pte_mkyoung(ptent);
 
 
                        flags |= FPB_IGNORE_SOFT_DIRTY;
 
                nr = folio_pte_batch(folio, addr, src_pte, pte, max_nr, flags,
-                                    &any_writable, NULL);
+                                    &any_writable, NULL, NULL);
                folio_ref_add(folio, nr);
                if (folio_test_anon(folio)) {
                        if (unlikely(folio_try_dup_anon_rmap_ptes(folio, page,
         */
        if (unlikely(folio_test_large(folio) && max_nr != 1)) {
                nr = folio_pte_batch(folio, addr, pte, ptent, max_nr, fpb_flags,
-                                    NULL, NULL);
+                                    NULL, NULL, NULL);
 
                zap_present_folio_ptes(tlb, vma, folio, page, pte, ptent, nr,
                                       addr, details, rss, force_flush,