wine/tools/ipcl
Alexandre Julliard 0623a6f3cf Release 980118
Sun Jan 18 17:05:58 1998  Alexandre Julliard  <julliard@lrc.epfl.ch>

	* [include/stackframe.h] [tools/build.c]
	Some cleanups in stack frame building.

	* [misc/port.c]
	Implemented clone() wrapper for libc5 users.

	* [scheduler/mutex.c] [scheduler/synchro.c]
	Implemented abandoned mutexes.

	* [scheduler/process.c] [scheduler/thread.c]
	We now create a process and a thread structure as soon as possible
	during initialization.

	* [scheduler/thread.c] [scheduler/sysdeps.c]
	Moved system-specific thread handling to sysdeps.c.

Fri Jan 16 10:45:15 1998  Marcus Meissner <msmeissn@cip.informatik.uni-erlangen.de>

	* [graphics/ddraw.c][include/ddraw.h]
	Surface handling enhanced. Some stuff already works ;)

	* [multimedia/dsound.c][include/dsound.h]
	Implemented using the Open Sound System.
	Slowly starts to work (sounds terrible for some programs).

	* [configure.in][multimedia/audio.c][include/config.h.in]
	Added check for OpenSoundSystem, fixed -lXxf86dga check.
	Replaced OS #ifdefs by #ifdef HAVE_OSS in mm/audio.c.

	* [if1632/relay.c][relay32/relay386.c]
	Do not print control characters for 'str' or 'wstr' args.

	* [misc/registry.c]
	"" seems to equals NULL in keynames. Replace where needed. Seems
	to help the win95 regedit.exe...

	* [win32/newfns.c]
	Implemented QueryPerformance* using gettimeofday(2)
	(should be done using the pentium timers probably).

	* [tools/ipcl]
	Removed useless open_pipe construct.

Sun Jan 11 17:10:02 1998  Huw D M Davies <h.davies1@physics.oxford.ac.uk>

	* [objects/region.c] [include/region.h] [graphics/x11drv/clipping.c]
	Regions are now internal to Wine. The basis of this code is taken
	from the X11 distribution. GetRegionData() is implemented as is 
	ExtCreateRegion() (without Xforms). CreatePolyPolygonRgn() should
	behave correctly now. 

	* [objects/metafile.c] [graphics/metafiledrv/graphics.c]
	  [graphics/metafiledrv/init.c] [include/metafile.h]
	  [include/metafiledrv.h]
	Playback of META_CREATEREGION should now work. Implemented recording
	of META_CREATEREGION and META_PAINTREGION.

	* [graphics/x11drv/graphics.c]
	FillRgn() (and therefore its friends) respect logical co-ords.

Wed Jan  7 01:21:45 1998  Steinar Hamre  <steinarh@stud.fim.ntnu.no>

	* [configure.in] [include/acconfig.h] [tools/build.c]
	Now checking whether to use .string or .ascii.

	* [configure.in] [include/acconfig.h] [scheduler/critsection.c]
	Defining union semun if this is not available from header files.

	* [misc/lstr.c]
	Moved wine's own header files below <wctype.h> to avoid
	parse error on Solaris.

Sun Jan  4 15:38:07 1998  Andrew Taylor <ataylor@cadvision.com>

	* [multimedia/mmsystem.c] [multimedia/mmio.c]
	Implemented mmioSendMessage and rearranged the mmio
	subsystem in terms of this function.

Wed Dec 24 00:51:29 1997  Charles Duffy <cduffy@bigfoot.com>

	* [windows/clipboard.c] [relay32/user32.spec]
	GetPriorityClipboardFormat32 now has something other than just
	a stub. I have no idea if it works (can't test until
	SetClipboardData is finished) but HEdit likes things a lot more
	this way.
1998-01-18 18:01:49 +00:00

63 lines
1.2 KiB
Perl

#!/usr/bin/perl
#
# Copyright 1995. Michael Veksler.
#
$IPC_RMID=0;
$USER=$ENV{USER};
open(IPCS,"ipcs|");
#
# The following part is OS dependant, it works under linux only.
# To make it work under other OS
# You should fill in @shm, @sem, @msq lists, with the relevent IPC
# keys.
#
# This code was written to be as much as possible generic, but...
# It works for Linux and ALPHA. I had no BSD machine to test it.
# (As I remember, AIX will work also).
while(<IPCS>) {
split;
# try to find out the IPC-ID, assume it is the first number.
foreach (@_) {
$_ ne int($_) && next; # not a decimal number
$num=$_;
last;
}
if (/mem/i .. /^\s*$/ ) {
index($_,$USER)>=0 || next;
push(@shm,$num);
}
if (/sem/i .. /^\s*$/ ) {
index($_,$USER)>=0 || next;
push(@sem,$num);
}
if (/mes/i .. /^\s*$/ ) {
index($_,$USER)>=0 || next;
push(@msq,$num);
}
}
#
# This is the end of OS dependant code.
#
@shm && print "shmid ", join(":",@shm),"\n";
@sem && print "semid ", join(":",@sem),"\n";
@msq && print "msqid ", join(":",@msq),"\n";
foreach (@shm) {
shmctl($_, $IPC_RMID,0);
}
foreach (@sem) {
semctl($_, 0, $IPC_RMID,0);
}
foreach (@msq) {
msgctl($_, $IPC_RMID,0);
}