source: trunk/kernel/ksh/ppm_func.c @ 1

Last change on this file since 1 was 1, checked in by alain, 5 years ago

First import

File size: 1.7 KB
Line 
1/*
2   This file is part of MutekP.
3 
4   MutekP is free software; you can redistribute it and/or modify it
5   under the terms of the GNU General Public License as published by
6   the Free Software Foundation; either version 2 of the License, or
7   (at your option) any later version.
8 
9   MutekP is distributed in the hope that it will be useful, but
10   WITHOUT ANY WARRANTY; without even the implied warranty of
11   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12   General Public License for more details.
13 
14   You should have received a copy of the GNU General Public License
15   along with MutekP; if not, write to the Free Software Foundation,
16   Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
17 
18   UPMC / LIP6 / SOC (c) 2008
19   Copyright Ghassan Almaless <ghassan.almaless@gmail.com>
20*/
21
22#include <kminiShell.h>
23#include <system.h>
24#include <ppm.h>
25#include <kdmsg.h>
26#include <page.h>
27#include <thread.h>
28#include <cluster.h>
29
30error_t ppm_func(void *param)
31{
32#if 0
33        uint_t i,j;
34        register struct page_s *pages_tbl;
35        struct ppm_s *ppm;
36        uint_t cluster_nr;
37
38        cluster_nr = arch_onln_cluster_nr();
39#endif
40
41        //for(i=0; i < cluster_nr; i++)
42                ppm_print(&current_cluster->ppm);
43
44//FIXME
45#if 0
46        for(j=0; j < cluster_nr; j++)
47        {
48                ppm = &clusters_tbl[j].cluster->ppm;
49                pages_tbl = ppm->pages_tbl;
50       
51                for(i=0; i < ppm->pages_nr; i++)
52                {
53                        if(pages_tbl[i].flags != 0x5)
54        printk(WARNING,"WARNING: unexpected flags %x for page %x [i=%d]\n",
55               pages_tbl[i].flags,ppm_page2addr(&pages_tbl[i]),i);
56                }
57       
58                for(i=0; i < KMEM_TYPES_NR; i++)
59                {
60                        if(clusters_tbl[j].cluster->keys_tbl[i] != NULL)
61        kcm_print(clusters_tbl[j].cluster->keys_tbl[i]);
62                }
63        }
64#endif
65        return 0;
66}
Note: See TracBrowser for help on using the repository browser.