#!/usr/bin/perl -w use strict; use IO::Handle; die "Usage: $0 identifier\n" . "(identifier is for example org.libreoffice)" unless $#ARGV == 0; my $id = $ARGV[0]; open (LOGCAT, "adb logcat |") || die "Could not open pipe from adb logcat"; my $pid = ''; while () { if (m!^I/ActivityManager$ *\d+$: Start proc $id for activity .*: pid=(\d+)!) { $pid = $1; } elsif (m!^[EIWD]/[^(]+$ *$pid$!) { print $_; STDOUT->flush(); } } ogo'/> index : lo/core

LibreOffice 核心代码仓库文档基金会

path: root/sfx2/inc/fwkhelper.hxx

Age	Commit message (Expand)	Author