INTEGRATION: CWS tune02 (1.1.2); FILE ADDED

2003/05/31 17:47:00 mhu 1.1.2.1: #109657# Command line utility to 'page-in' shared libraries needed at startup.

1 files changed, 183 insertions, 0 deletions

diff --git a/desktop/source/pagein/pagein.c b/desktop/source/pagein/pagein.c
new file mode 100644
index 0000000000..45deda9a1b
--- /dev/null
+++ b/desktop/source/pagein/pagein.c
@@ -0,0 +1,183 @@
+/*************************************************************************
+ *
+ *  $RCSfile: pagein.c,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: vg $ $Date: 2003-06-04 10:43:30 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2002 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include "file_image.h"
+
+#include <unistd.h>
+#include <errno.h>
+#include <stdio.h>
+#include <string.h>
+
+/* do_pagein */
+static int do_pagein (const char * filename, size_t * size)
+{
+    int result;
+    file_image image = FILE_IMAGE_INITIALIZER;
+
+    if ((result = file_image_open (&image, filename)) != 0)
+        return (result);
+
+    if ((result = file_image_pagein (&image)) != 0)
+    {
+        fprintf (stderr, "file_image_pagein: %s\n", strerror(result));
+        goto cleanup_and_leave;
+    }
+
+    if (size)
+    {
+        *size = image.m_size;
+    }
+
+cleanup_and_leave:
+    file_image_close (&image);
+    return (result);
+}
+
+/* main */
+int  main (int argc, char **argv)
+{
+    int    i, v = 0;
+    size_t nfiles = 0, nbytes = 0;
+
+    if (argc < 2)
+    {
+        fprintf (
+            stderr,
+            "%s: Usage: pagein [-v[v]] [-L<path>] [@]<filename> ...\n",
+            argv[0]);
+        return (1);
+    }
+
+    for (i = 1; i < argc; i++)
+    {
+        FILE   * fp = 0;
+        size_t   k  = 0;
+
+        if (argv[i][0] == '-')
+        {
+            /* option */
+            int j = 1;
+            switch (argv[i][j])
+            {
+                case 'v':
+                    /* verbosity level */
+                    for (v += 1, j += 1; argv[i][j]; j++)
+                        v += (argv[i][j] == 'v');
+                    break;
+                case 'L':
+                    /* search path */
+                    if (chdir (&(argv[i][2])) == -1)
+                        fprintf (stderr, "chdir: %s\n", strerror(errno));
+                    break;
+                default:
+                    /* ignored */
+                    break;
+            }
+
+            /* next argv */
+            continue;
+        }
+        
+
+        if ((argv[i][0] == '@') && ((fp = fopen (argv[i], "r")) == 0))
+        {
+            char path[1024];
+            if ((fp = fopen (&(argv[i][1]), "r")) == 0)
+            {
+                fprintf (stderr, "fopen: %s\n", strerror(errno));
+                continue;
+            }
+            while (fgets (path, sizeof(path), fp) != 0)
+            {
+                path[strlen(path) - 1] = '\0', k = 0;
+                if (do_pagein (path, &k) == 0)
+                {
+                    /* accumulate total size */
+                    nbytes += k;
+                }
+
+                if (v >= 2)
+                    fprintf (stderr, "pagein(\"%s\") = %d bytes\n", path, k);
+                nfiles += 1;
+            }
+            fclose (fp);
+        }
+        else
+        {
+            if (fp != 0)
+                fclose (fp);
+
+            if (do_pagein (argv[i], &k) == 0)
+            {
+                /* accumulate total size */
+                nbytes += k;
+            }
+
+            if (v >= 2)
+                fprintf (stderr, "pagein(\"%s\") = %d bytes\n", argv[i], k);
+            nfiles += 1;
+        }
+    }
+
+    if (v >= 1)
+        fprintf (stderr, "Total: %d files (%d bytes)\n", nfiles, nbytes);
+    return (0);
+}