aboutsummaryrefslogtreecommitdiff
path: root/gdb/solib-osf.c
diff options
context:
space:
mode:
authorPedro Alves <palves@redhat.com>2014-10-17 11:18:59 +0100
committerPedro Alves <palves@redhat.com>2014-10-17 11:18:59 +0100
commit32a8097ba5dd6ddb71c0fb2fccbac262c371846a (patch)
treee27e608bcc1e35761015414d8243a1afb559d8ff /gdb/solib-osf.c
parent80134cf5b3ca1f75a96af1856fdaad29ad1f57aa (diff)
downloadgdb-32a8097ba5dd6ddb71c0fb2fccbac262c371846a.zip
gdb-32a8097ba5dd6ddb71c0fb2fccbac262c371846a.tar.gz
gdb-32a8097ba5dd6ddb71c0fb2fccbac262c371846a.tar.bz2
Delete Tru64 support
This commit does most of the mechanical removal. IOW, the easy part. procfs.c isn't touched beyond removing a couple obvious bits that are guarded by a couple macros defined in config/alpha/nm-osf3.h. Going beyond that for procfs.c & co would be a harder excision that potentially affects Solaris. Some comments in the generic alpha code ABIs that may still be relevant and I wouldn't know what to do with them. That can always be done on a separate pass, preferably by someone who can test on alpha. A couple other spots have references to OSF/Tru64 and related files being removed, but it felt like removing them would make things worse, not better. We can revisit those when we next need to touch that code. I didn't remove a reference to osf in testsuite/lib/future.exp, as I believe that code is imported from DejaGNU. Built and tested on x86_64 Fedora 20, with --enable-targets=all. Tested that building for --target=alpha-osf3 on x86_64 Fedora 20 fails with: checking for default auto-load directory... $debugdir:$datadir/auto-load checking for default auto-load safe-path... $debugdir:$datadir/auto-load *** Configuration alpha-unknown-osf3 is obsolete. *** Support has been REMOVED. make[1]: *** [configure-gdb] Error 1 make[1]: Leaving directory `build-osf' make: *** [all] Error 2 gdb/ 2014-10-17 Pedro Alves <palves@redhat.com> * Makefile.in (ALL_64_TARGET_OBS): Remove alpha-osf1-tdep.o. (HFILES_NO_SRCDIR): Remove config/alpha/nm-osf3.h. (ALLDEPFILES): Remove alpha-nat.c, alpha-osf1-tdep.c and solib-osf.c. * NEWS: Mention that support for alpha*-*-osf* has been removed. * ada-lang.h [__alpha__ && __osf__] (ADA_KNOWN_RUNTIME_FILE_NAME_PATTERNS): Delete. * alpha-nat.c, alpha-osf1-tdep.c: Delete files. * alpha-tdep.c (alpha_gdbarch_init): Remove reference to GDB_OSABI_OSF1. * config/alpha/alpha-osf3.mh, config/alpha/nm-osf3.h: Delete files. * config/djgpp/fnchange.lst (config/alpha/alpha-osf1.mh) (config/alpha/alpha-osf2.mh, config/alpha/alpha-osf3.mh): Delete. * configure: Regenerate. * configure.ac: Remove references to osf. * configure.host: Handle alpha*-*-osf* in the obsolete hosts section. Remove all other references to osf. * configure.tgt: Add alpha*-*-osf* to the obsolete targets section. Remove all other references to osf. * dec-thread.c: Delete file. * defs.h (GDB_OSABI_OSF1): Delete. * inferior.h (START_INFERIOR_TRAPS_EXPECTED): New unconditionally defined. * osabi.c (gdb_osabi_names): Delete "OSF/1". * procfs.c (procfs_debug_inferior) [PROCFS_DONT_TRACE_FAULTS]: Delete code. (unconditionally_kill_inferior) [PROCFS_NEED_CLEAR_CURSIG_FOR_KILL]: Delete code. * solib-osf.c: Delete file. gdb/testsuite/ 2014-10-17 Pedro Alves <palves@redhat.com> * gdb.base/callfuncs.exp: emove references to osf. * gdb.base/sigall.exp: Likewise. * gdb.gdb/selftest.exp: Likewise. * gdb.hp/gdb.base-hp/callfwmall.exp: Likewise. * gdb.mi/non-stop.c: Likewise. * gdb.mi/pthreads.c: Likewise. * gdb.reverse/sigall-precsave.exp: Likewise. * gdb.reverse/sigall-reverse.exp: Likewise. * gdb.threads/pthreads.c: Likewise. * gdb.threads/pthreads.exp: Likewise. gdb/doc/ 2014-10-17 Pedro Alves <palves@redhat.com> * gdb.texinfo (Ada Tasks and Core Files): Delete mention of Tru64. (SVR4 Process Information): Delete mention of OSF/1.
Diffstat (limited to 'gdb/solib-osf.c')
-rw-r--r--gdb/solib-osf.c638
1 files changed, 0 insertions, 638 deletions
diff --git a/gdb/solib-osf.c b/gdb/solib-osf.c
deleted file mode 100644
index 24915cb..0000000
--- a/gdb/solib-osf.c
+++ /dev/null
@@ -1,638 +0,0 @@
-/* Handle OSF/1, Digital UNIX, and Tru64 shared libraries
- for GDB, the GNU Debugger.
- Copyright (C) 1993-2014 Free Software Foundation, Inc.
-
- This file is part of GDB.
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 3 of the License, or
- (at your option) any later version.
-
- This program 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 General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
-
-/* When handling shared libraries, GDB has to find out the pathnames
- of all shared libraries that are currently loaded (to read in their
- symbols) and where the shared libraries are loaded in memory
- (to relocate them properly from their prelinked addresses to the
- current load address).
-
- Under OSF/1 there are two possibilities to get at this information:
-
- 1) Peek around in the runtime loader structures.
- These are not documented, and they are not defined in the system
- header files. The definitions below were obtained by experimentation,
- but they seem stable enough.
-
- 2) Use the libxproc.a library, which contains the equivalent ldr_*
- routines. The library is documented in Tru64 5.x, but as of 5.1, it
- only allows a process to examine itself. On earlier versions, it
- may require that the GDB executable be dynamically linked and that
- NAT_CLIBS include -lxproc -Wl,-expect_unresolved,ldr_process_context
- for GDB and all applications that are using libgdb.
-
- We will use the peeking approach until libxproc.a works for other
- processes. */
-
-#include "defs.h"
-
-#include <sys/types.h>
-#include <signal.h>
-#include "bfd.h"
-#include "symtab.h"
-#include "symfile.h"
-#include "objfiles.h"
-#include "target.h"
-#include "inferior.h"
-#include "infrun.h"
-#include "gdbthread.h"
-#include "solist.h"
-#include "solib.h"
-
-#ifdef USE_LDR_ROUTINES
-# include <loader.h>
-#endif
-
-#ifndef USE_LDR_ROUTINES
-/* Definition of runtime loader structures, found by experimentation. */
-#define RLD_CONTEXT_ADDRESS 0x3ffc0000000
-
-/* Per-module information structure referenced by ldr_context_t.head. */
-
-typedef struct
- {
- CORE_ADDR next;
- CORE_ADDR previous;
- CORE_ADDR unknown1;
- CORE_ADDR module_name;
- CORE_ADDR modinfo_addr; /* Used by next_link_map_member() to detect
- the end of the shared module list. */
- long module_id;
- CORE_ADDR unknown2;
- CORE_ADDR unknown3;
- long region_count;
- CORE_ADDR regioninfo_addr;
- }
-ldr_module_info_t;
-
-/* Per-region structure referenced by ldr_module_info_t.regioninfo_addr. */
-
-typedef struct
- {
- long unknown1;
- CORE_ADDR regionname_addr;
- long protection;
- CORE_ADDR vaddr;
- CORE_ADDR mapaddr;
- long size;
- long unknown2[5];
- }
-ldr_region_info_t;
-
-/* Structure at RLD_CONTEXT_ADDRESS specifying the start and finish addresses
- of the shared module list. */
-
-typedef struct
- {
- CORE_ADDR unknown1;
- CORE_ADDR unknown2;
- CORE_ADDR head;
- CORE_ADDR tail;
- }
-ldr_context_t;
-#endif /* !USE_LDR_ROUTINES */
-
-/* Per-section information, stored in struct lm_info.secs. */
-
-struct lm_sec
- {
- CORE_ADDR offset; /* difference between default and actual
- virtual addresses of section .name */
- CORE_ADDR nameaddr; /* address in inferior of section name */
- const char *name; /* name of section, null if not fetched */
- };
-
-/* Per-module information, stored in struct so_list.lm_info. */
-
-struct lm_info
- {
- int isloader; /* whether the module is /sbin/loader */
- int nsecs; /* length of .secs */
- struct lm_sec secs[1]; /* variable-length array of sections, sorted
- by name */
- };
-
-/* Context for iterating through the inferior's shared module list. */
-
-struct read_map_ctxt
- {
-#ifdef USE_LDR_ROUTINES
- ldr_process_t proc;
- ldr_module_t next;
-#else
- CORE_ADDR next; /* next element in module list */
- CORE_ADDR tail; /* last element in module list */
-#endif
- };
-
-/* Forward declaration for this module's autoinit function. */
-
-extern void _initialize_osf_solib (void);
-
-#ifdef USE_LDR_ROUTINES
-# if 0
-/* This routine is intended to be called by ldr_* routines to read memory from
- the current target. Usage:
-
- ldr_process = ldr_core_process ();
- ldr_set_core_reader (ldr_read_memory);
- ldr_xdetach (ldr_process);
- ldr_xattach (ldr_process);
-
- ldr_core_process() and ldr_read_memory() are neither documented nor
- declared in system header files. They work with OSF/1 2.x, and they might
- work with later versions as well. */
-
-static int
-ldr_read_memory (CORE_ADDR memaddr, char *myaddr, int len, int readstring)
-{
- int result;
- char *buffer;
-
- if (readstring)
- {
- target_read_string (memaddr, &buffer, len, &result);
- if (result == 0)
- strcpy (myaddr, buffer);
- xfree (buffer);
- }
- else
- result = target_read_memory (memaddr, myaddr, len);
-
- if (result != 0)
- result = -result;
- return result;
-}
-# endif /* 0 */
-#endif /* USE_LDR_ROUTINES */
-
-/* Comparison for qsort() and bsearch(): return -1, 0, or 1 according to
- whether lm_sec *P1's name is lexically less than, equal to, or greater
- than that of *P2. */
-
-static int
-lm_sec_cmp (const void *p1, const void *p2)
-{
- const struct lm_sec *lms1 = p1, *lms2 = p2;
-
- return strcmp (lms1->name, lms2->name);
-}
-
-/* Sort LMI->secs so that osf_relocate_section_addresses() can binary-search
- it. */
-
-static void
-lm_secs_sort (struct lm_info *lmi)
-{
- qsort (lmi->secs, lmi->nsecs, sizeof *lmi->secs, lm_sec_cmp);
-}
-
-/* Populate name fields of LMI->secs. */
-
-static void
-fetch_sec_names (struct lm_info *lmi)
-{
-#ifndef USE_LDR_ROUTINES
- int i, errcode;
- struct lm_sec *lms;
- char *name;
-
- for (i = 0; i < lmi->nsecs; i++)
- {
- lms = lmi->secs + i;
- target_read_string (lms->nameaddr, &name, PATH_MAX, &errcode);
- if (errcode != 0)
- {
- warning (_("unable to read shared sec name at 0x%lx"),
- lms->nameaddr);
- name = xstrdup ("");
- }
- lms->name = name;
- }
- lm_secs_sort (lmi);
-#endif
-}
-
-/* target_so_ops callback. Adjust SEC's addresses after it's been mapped into
- the process. */
-
-static void
-osf_relocate_section_addresses (struct so_list *so,
- struct target_section *sec)
-{
- struct lm_info *lmi;
- struct lm_sec lms_key, *lms;
-
- /* Fetch SO's section names if we haven't done so already. */
- lmi = so->lm_info;
- if (lmi->nsecs && !lmi->secs[0].name)
- fetch_sec_names (lmi);
-
- /* Binary-search for offset information corresponding to SEC. */
- lms_key.name = sec->the_bfd_section->name;
- lms = bsearch (&lms_key, lmi->secs, lmi->nsecs, sizeof *lms, lm_sec_cmp);
- if (lms)
- {
- sec->addr += lms->offset;
- sec->endaddr += lms->offset;
- }
-}
-
-/* target_so_ops callback. Free parts of SO allocated by this file. */
-
-static void
-osf_free_so (struct so_list *so)
-{
- int i;
- const char *name;
-
- for (i = 0; i < so->lm_info->nsecs; i++)
- {
- name = so->lm_info->secs[i].name;
- if (name)
- xfree ((void *) name);
- }
- xfree (so->lm_info);
-}
-
-/* target_so_ops callback. Discard information accumulated by this file and
- not freed by osf_free_so(). */
-
-static void
-osf_clear_solib (void)
-{
- return;
-}
-
-/* target_so_ops callback. Prepare to handle shared libraries after the
- inferior process has been created but before it's executed any
- instructions.
-
- For a statically bound executable, the inferior's first instruction is the
- one at "_start", or a similar text label. No further processing is needed
- in that case.
-
- For a dynamically bound executable, this first instruction is somewhere
- in the rld, and the actual user executable is not yet mapped in.
- We continue the inferior again, rld then maps in the actual user
- executable and any needed shared libraries and then sends
- itself a SIGTRAP.
-
- At that point we discover the names of all shared libraries and
- read their symbols in.
-
- FIXME
-
- This code does not properly handle hitting breakpoints which the
- user might have set in the rld itself. Proper handling would have
- to check if the SIGTRAP happened due to a kill call.
-
- Also, what if child has exit()ed? Must exit loop somehow. */
-
-static void
-osf_solib_create_inferior_hook (int from_tty)
-{
- struct inferior *inf;
- struct thread_info *tp;
-
- inf = current_inferior ();
-
- /* If we are attaching to the inferior, the shared libraries
- have already been mapped, so nothing more to do. */
- if (inf->attach_flag)
- return;
-
- /* Nothing to do for statically bound executables. */
-
- if (symfile_objfile == NULL
- || symfile_objfile->obfd == NULL
- || ((bfd_get_file_flags (symfile_objfile->obfd) & DYNAMIC) == 0))
- return;
-
- /* Now run the target. It will eventually get a SIGTRAP, at
- which point all of the libraries will have been mapped in and we
- can go groveling around in the rld structures to find
- out what we need to know about them.
-
- If debugging from a core file, we cannot resume the execution
- of the inferior. But this is actually not an issue, because
- shared libraries have already been mapped anyways, which means
- we have nothing more to do. */
- if (!target_can_run (&current_target))
- return;
-
- tp = inferior_thread ();
- clear_proceed_status (0);
- inf->control.stop_soon = STOP_QUIETLY;
- tp->suspend.stop_signal = GDB_SIGNAL_0;
- do
- {
- target_resume (minus_one_ptid, 0, tp->suspend.stop_signal);
- wait_for_inferior ();
- }
- while (tp->suspend.stop_signal != GDB_SIGNAL_TRAP);
-
- /* solib_add will call reinit_frame_cache.
- But we are stopped in the runtime loader and we do not have symbols
- for the runtime loader. So heuristic_proc_start will be called
- and will put out an annoying warning.
- Delaying the resetting of stop_soon until after symbol loading
- suppresses the warning. */
- solib_add ((char *) 0, 0, (struct target_ops *) 0, auto_solib_add);
- inf->control.stop_soon = NO_STOP_QUIETLY;
-}
-
-/* target_so_ops callback. Do additional symbol handling, lookup, etc. after
- symbols for a shared object have been loaded. */
-
-static void
-osf_special_symbol_handling (void)
-{
- return;
-}
-
-/* Initialize CTXT in preparation for iterating through the inferior's module
- list using read_map(). Return success. */
-
-static int
-open_map (struct read_map_ctxt *ctxt)
-{
-#ifdef USE_LDR_ROUTINES
- /* Note: As originally written, ldr_my_process() was used to obtain
- the value for ctxt->proc. This is incorrect, however, since
- ldr_my_process() retrieves the "unique identifier" associated
- with the current process (i.e. GDB) and not the one being
- debugged. Presumably, the pid of the process being debugged is
- compatible with the "unique identifier" used by the ldr_
- routines, so we use that. */
- ctxt->proc = ptid_get_pid (inferior_ptid);
- if (ldr_xattach (ctxt->proc) != 0)
- return 0;
- ctxt->next = LDR_NULL_MODULE;
-#else
- CORE_ADDR ldr_context_addr, prev, next;
- ldr_context_t ldr_context;
-
- if (target_read_memory ((CORE_ADDR) RLD_CONTEXT_ADDRESS,
- (char *) &ldr_context_addr,
- sizeof (CORE_ADDR)) != 0)
- return 0;
- if (target_read_memory (ldr_context_addr,
- (char *) &ldr_context,
- sizeof (ldr_context_t)) != 0)
- return 0;
- ctxt->next = ldr_context.head;
- ctxt->tail = ldr_context.tail;
-#endif
- return 1;
-}
-
-/* Initialize SO to have module NAME, /sbin/loader indicator ISLOADR, and
- space for NSECS sections. */
-
-static void
-init_so (struct so_list *so, char *name, int isloader, int nsecs)
-{
- int namelen, i;
-
- /* solib.c requires various fields to be initialized to 0. */
- memset (so, 0, sizeof *so);
-
- /* Copy the name. */
- namelen = strlen (name);
- if (namelen >= SO_NAME_MAX_PATH_SIZE)
- namelen = SO_NAME_MAX_PATH_SIZE - 1;
-
- memcpy (so->so_original_name, name, namelen);
- so->so_original_name[namelen] = '\0';
- memcpy (so->so_name, so->so_original_name, namelen + 1);
-
- /* Allocate section space. */
- so->lm_info = xmalloc (sizeof (struct lm_info)
- + (nsecs - 1) * sizeof (struct lm_sec));
- so->lm_info->isloader = isloader;
- so->lm_info->nsecs = nsecs;
- for (i = 0; i < nsecs; i++)
- so->lm_info->secs[i].name = NULL;
-}
-
-/* Initialize SO's section SECIDX with name address NAMEADDR, name string
- NAME, default virtual address VADDR, and actual virtual address
- MAPADDR. */
-
-static void
-init_sec (struct so_list *so, int secidx, CORE_ADDR nameaddr,
- const char *name, CORE_ADDR vaddr, CORE_ADDR mapaddr)
-{
- struct lm_sec *lms;
-
- lms = so->lm_info->secs + secidx;
- lms->nameaddr = nameaddr;
- lms->name = name;
- lms->offset = mapaddr - vaddr;
-}
-
-/* If there are more elements starting at CTXT in inferior's module list,
- store the next element in SO, advance CTXT to the next element, and return
- 1, else return 0. */
-
-static int
-read_map (struct read_map_ctxt *ctxt, struct so_list *so)
-{
- ldr_module_info_t minf;
- ldr_region_info_t rinf;
-
-#ifdef USE_LDR_ROUTINES
- size_t size;
- ldr_region_t i;
-
- /* Retrieve the next element. */
- if (ldr_next_module (ctxt->proc, &ctxt->next) != 0)
- return 0;
- if (ctxt->next == LDR_NULL_MODULE)
- return 0;
- if (ldr_inq_module (ctxt->proc, ctxt->next, &minf, sizeof minf, &size) != 0)
- return 0;
-
- /* Initialize the module name and section count. */
- init_so (so, minf.lmi_name, 0, minf.lmi_nregion);
-
- /* Retrieve section names and offsets. */
- for (i = 0; i < minf.lmi_nregion; i++)
- {
- if (ldr_inq_region (ctxt->proc, ctxt->next, i, &rinf,
- sizeof rinf, &size) != 0)
- goto err;
- init_sec (so, (int) i, 0, xstrdup (rinf.lri_name),
- (CORE_ADDR) rinf.lri_vaddr, (CORE_ADDR) rinf.lri_mapaddr);
- }
- lm_secs_sort (so->lm_info);
-#else
- char *name;
- int errcode, i;
-
- /* Retrieve the next element. */
- if (!ctxt->next)
- return 0;
- if (target_read_memory (ctxt->next, (char *) &minf, sizeof minf) != 0)
- return 0;
- if (ctxt->next == ctxt->tail)
- ctxt->next = 0;
- else
- ctxt->next = minf.next;
-
- /* Initialize the module name and section count. */
- target_read_string (minf.module_name, &name, PATH_MAX, &errcode);
- if (errcode != 0)
- return 0;
- init_so (so, name, !minf.modinfo_addr, minf.region_count);
- xfree (name);
-
- /* Retrieve section names and offsets. */
- for (i = 0; i < minf.region_count; i++)
- {
- if (target_read_memory (minf.regioninfo_addr + i * sizeof rinf,
- (char *) &rinf, sizeof rinf) != 0)
- goto err;
- init_sec (so, i, rinf.regionname_addr, NULL, rinf.vaddr, rinf.mapaddr);
- }
-#endif /* !USE_LDR_ROUTINES */
- return 1;
-
- err:
- osf_free_so (so);
- return 0;
-}
-
-/* Free resources allocated by open_map (CTXT). */
-
-static void
-close_map (struct read_map_ctxt *ctxt)
-{
-#ifdef USE_LDR_ROUTINES
- ldr_xdetach (ctxt->proc);
-#endif
-}
-
-/* target_so_ops callback. Return a list of shared objects currently loaded
- in the inferior. */
-
-static struct so_list *
-osf_current_sos (void)
-{
- struct so_list *head = NULL, *tail = NULL, *newtail, so;
- struct read_map_ctxt ctxt;
- int skipped_main;
-
- if (!open_map (&ctxt))
- return NULL;
-
- /* Read subsequent elements. */
- for (skipped_main = 0;;)
- {
- if (!read_map (&ctxt, &so))
- break;
-
- /* Skip the main program module, which is first in the list after
- /sbin/loader. */
- if (!so.lm_info->isloader && !skipped_main)
- {
- osf_free_so (&so);
- skipped_main = 1;
- continue;
- }
-
- newtail = xmalloc (sizeof *newtail);
- if (!head)
- head = newtail;
- else
- tail->next = newtail;
- tail = newtail;
-
- memcpy (tail, &so, sizeof so);
- tail->next = NULL;
- }
-
- close_map (&ctxt);
- return head;
-}
-
-/* target_so_ops callback. Attempt to locate and open the main symbol
- file. */
-
-static int
-osf_open_symbol_file_object (void *from_ttyp)
-{
- struct read_map_ctxt ctxt;
- struct so_list so;
- int found;
-
- if (symfile_objfile)
- if (!query (_("Attempt to reload symbols from process? ")))
- return 0;
-
- /* The first module after /sbin/loader is the main program. */
- if (!open_map (&ctxt))
- return 0;
- for (found = 0; !found;)
- {
- if (!read_map (&ctxt, &so))
- break;
- found = !so.lm_info->isloader;
- osf_free_so (&so);
- }
- close_map (&ctxt);
-
- if (found)
- symbol_file_add_main (so.so_name, *(int *) from_ttyp);
- return found;
-}
-
-/* target_so_ops callback. Return whether PC is in the dynamic linker. */
-
-static int
-osf_in_dynsym_resolve_code (CORE_ADDR pc)
-{
- /* This function currently always return False. This is a temporary
- solution which only consequence is to introduce a minor incovenience
- for the user: When stepping inside a subprogram located in a shared
- library, gdb might stop inside the dynamic loader code instead of
- inside the subprogram itself. See the explanations in infrun.c about
- the in_solib_dynsym_resolve_code() function for more details. */
- return 0;
-}
-
-static struct target_so_ops osf_so_ops;
-
-void
-_initialize_osf_solib (void)
-{
- osf_so_ops.relocate_section_addresses = osf_relocate_section_addresses;
- osf_so_ops.free_so = osf_free_so;
- osf_so_ops.clear_solib = osf_clear_solib;
- osf_so_ops.solib_create_inferior_hook = osf_solib_create_inferior_hook;
- osf_so_ops.special_symbol_handling = osf_special_symbol_handling;
- osf_so_ops.current_sos = osf_current_sos;
- osf_so_ops.open_symbol_file_object = osf_open_symbol_file_object;
- osf_so_ops.in_dynsym_resolve_code = osf_in_dynsym_resolve_code;
- osf_so_ops.bfd_open = solib_bfd_open;
-
- /* FIXME: Don't do this here. *_gdbarch_init() should set so_ops. */
- current_target_so_ops = &osf_so_ops;
-}