Mercurial > hg > xemacs-beta

comparison src/unexsol2.c @ 0:376386a54a3c r19-14

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-14
author cvs
date Mon, 13 Aug 2007 08:45:50 +0200
parents
children ac2d302a0011
comparison
equal deleted inserted replaced
-1:000000000000 0:376386a54a3c
1 /* Unexec function for Solaris 2.x
2 Copyright (C) 1994 Sun Microsystems, Inc.
3
4 This file is part of XEmacs.
5
6 XEmacs is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 2, or (at your option) any
9 later version.
10
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with XEmacs; see the file COPYING. If not, write to
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
20
21 /* Synched up with: Not in FSF. */
22
23 /* #pragma ident "@(#) $Id: unexsol2.c,v 1.1.1.1 1996/12/18 03:39:00 steve Exp $" */
24
25 #include <stdlib.h>
26 #include <stdio.h>
27 #include <dlfcn.h>
28
29 #define DYNODUMP_SO "../dynodump/dynodump.so"
30 #define DYNODUMP_SYM "dynodump"
31
32 int
33 unexec(char *new_name, char *old_name, unsigned int data_start,
34 unsigned int bss_start, unsigned int entry_address)
35 {
36 void *handle;
37 void (*func)(const char *file);
38
39 if ((handle = dlopen (DYNODUMP_SO, RTLD_LAZY)) == NULL)
40 {
41 fprintf (stderr, "unexec(): dlopen(%s): %s\n",
42 (char *) DYNODUMP_SO, dlerror());
43 exit (1);
44 }
45
46 if ((func = (void (*)(const char *)) dlsym (handle, DYNODUMP_SYM)) == NULL)
47 {
48 fprintf (stderr, "unexec(): dlsym(%s): %s \n",
49 (char *) DYNODUMP_SYM, dlerror());
50 exit (1);
51 }
52
53 (*func)(new_name);
54
55 dlclose (handle);
56
57 return 0;
58 }