sys/vfs/procfs/procfs_map.c

   1 /*
   2  * Copyright (c) 1993 Jan-Simon Pendry
   3  * Copyright (c) 1993
   4  *      The Regents of the University of California.  All rights reserved.
   5  *
   6  * This code is derived from software contributed to Berkeley by
   7  * Jan-Simon Pendry.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. All advertising materials mentioning features or use of this software
  18  *    must display the following acknowledgement:
  19  *      This product includes software developed by the University of
  20  *      California, Berkeley and its contributors.
  21  * 4. Neither the name of the University nor the names of its contributors
  22  *    may be used to endorse or promote products derived from this software
  23  *    without specific prior written permission.
  24  *
  25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  35  * SUCH DAMAGE.
  36  *
  37  *      @(#)procfs_status.c     8.3 (Berkeley) 2/17/94
  38  *
  39  * $FreeBSD: src/sys/miscfs/procfs/procfs_map.c,v 1.24.2.1 2001/08/04 13:12:24 rwatson Exp $
  40  * $DragonFly: src/sys/vfs/procfs/procfs_map.c,v 1.7 2007/02/19 01:14:24 corecode Exp $
  41  */
  42
  43 #include <sys/param.h>
  44 #include <sys/systm.h>
  45 #include <sys/proc.h>
  46 #include <sys/vnode.h>
  47 #include <vfs/procfs/procfs.h>
  48
  49 #include <vm/vm.h>
  50 #include <sys/lock.h>
  51 #include <vm/pmap.h>
  52 #include <vm/vm_map.h>
  53 #include <vm/vm_page.h>
  54 #include <vm/vm_object.h>
  55
  56
  57 #define MEBUFFERSIZE 256
  58
  59 /*
  60  * The map entries can *almost* be read with programs like cat.  However,
  61  * large maps need special programs to read.  It is not easy to implement
  62  * a program that can sense the required size of the buffer, and then
  63  * subsequently do a read with the appropriate size.  This operation cannot
  64  * be atomic.  The best that we can do is to allow the program to do a read
  65  * with an arbitrarily large buffer, and return as much as we can.  We can
  66  * return an error code if the buffer is too small (EFBIG), then the program
  67  * can try a bigger buffer.
  68  */
  69 int
  70 procfs_domap(struct proc *curp, struct lwp *lp, struct pfsnode *pfs,
  71              struct uio *uio)
  72 {
  73         struct proc *p = lp->lwp_proc;
  74         int len;
  75         int error;
  76         vm_map_t map = &p->p_vmspace->vm_map;
  77         pmap_t pmap = vmspace_pmap(p->p_vmspace);
  78         vm_map_entry_t entry;
  79         char mebuffer[MEBUFFERSIZE];
  80
  81         if (uio->uio_rw != UIO_READ)
  82                 return (EOPNOTSUPP);
  83
  84         if (uio->uio_offset != 0)
  85                 return (0);
  86
  87         error = 0;
  88         vm_map_lock_read(map);
  89         for (entry = map->header.next;
  90                 ((uio->uio_resid > 0) && (entry != &map->header));
  91                 entry = entry->next) {
  92                 vm_object_t obj, tobj, lobj;
  93                 int ref_count, shadow_count, flags;
  94                 vm_offset_t addr;
  95                 vm_offset_t ostart;
  96                 int resident, privateresident;
  97                 char *type;
  98
  99                 if (entry->maptype != VM_MAPTYPE_NORMAL &&
 100                     entry->maptype != VM_MAPTYPE_VPAGETABLE) {
 101                         continue;
 102                 }
 103
 104                 obj = entry->object.vm_object;
 105                 if (obj && (obj->shadow_count == 1))
 106                         privateresident = obj->resident_page_count;
 107                 else
 108                         privateresident = 0;
 109
 110                 /*
 111                  * Use map->hint as a poor man's ripout detector.
 112                  */
 113                 map->hint = entry;
 114                 ostart = entry->start;
 115
 116                 /*
 117                  * Count resident pages (XXX can be horrible on 64-bit)
 118                  */
 119                 resident = 0;
 120                 addr = entry->start;
 121                 while (addr < entry->end) {
 122                         if (pmap_extract( pmap, addr))
 123                                 resident++;
 124                         addr += PAGE_SIZE;
 125                 }
 126
 127                 for( lobj = tobj = obj; tobj; tobj = tobj->backing_object)
 128                         lobj = tobj;
 129
 130                 if (lobj) {
 131                         switch(lobj->type) {
 132
 133 default:
 134 case OBJT_DEFAULT:
 135                                 type = "default";
 136                                 break;
 137 case OBJT_VNODE:
 138                                 type = "vnode";
 139                                 break;
 140 case OBJT_SWAP:
 141                                 type = "swap";
 142                                 break;
 143 case OBJT_DEVICE:
 144                                 type = "device";
 145                                 break;
 146                         }
 147
 148                         flags = obj->flags;
 149                         ref_count = obj->ref_count;
 150                         shadow_count = obj->shadow_count;
 151                 } else {
 152                         type = "none";
 153                         flags = 0;
 154                         ref_count = 0;
 155                         shadow_count = 0;
 156                 }
 157
 158
 159                 /*
 160                  * format:
 161                  *  start, end, resident, private resident, cow, access, type.
 162                  */
 163                 ksnprintf(mebuffer, sizeof(mebuffer),
 164                     "0x%lx 0x%lx %d %d %p %s%s%s %d %d 0x%x %s %s %s\n",
 165                         (u_long)entry->start, (u_long)entry->end,
 166                         resident, privateresident, obj,
 167                         (entry->protection & VM_PROT_READ)?"r":"-",
 168                         (entry->protection & VM_PROT_WRITE)?"w":"-",
 169                         (entry->protection & VM_PROT_EXECUTE)?"x":"-",
 170                         ref_count, shadow_count, flags,
 171                         (entry->eflags & MAP_ENTRY_COW)?"COW":"NCOW",
 172                         (entry->eflags & MAP_ENTRY_NEEDS_COPY)?"NC":"NNC",
 173                         type);
 174
 175                 len = strlen(mebuffer);
 176                 if (len > uio->uio_resid) {
 177                         error = EFBIG;
 178                         break;
 179                 }
 180
 181                 /*
 182                  * We cannot safely hold the map locked while accessing
 183                  * userspace as a VM fault might recurse the locked map.
 184                  */
 185                 vm_map_unlock_read(map);
 186                 error = uiomove(mebuffer, len, uio);
 187                 vm_map_lock_read(map);
 188                 if (error)
 189                         break;
 190
 191                 /*
 192                  * We use map->hint as a poor man's ripout detector.  If
 193                  * it does not match the entry we set it to prior to
 194                  * unlocking the map the entry MIGHT now be stale.  In
 195                  * this case we do an expensive lookup to find our place
 196                  * in the iteration again.
 197                  */
 198                 if (map->hint != entry) {
 199                         vm_map_entry_t reentry;
 200
 201                         vm_map_lookup_entry(map, ostart, &reentry);
 202                         entry = reentry;
 203                 }
 204         }
 205         vm_map_unlock_read(map);
 206
 207         return error;
 208 }
 209
 210 int
 211 procfs_validmap(struct lwp *lp)
 212 {
 213         return ((lp->lwp_proc->p_flag & P_SYSTEM) == 0);
 214 }