Return to ostats.m CVS log

Up to [Apple Darwin 0.x] / objc / Test / ostats

Annotation of objc/Test/ostats/ostats.m, revision 1.1

1.1     ! root        1: /*
        !             2:  * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
        !             3:  *
        !             4:  * @APPLE_LICENSE_HEADER_START@
        !             5:  * 
        !             6:  * "Portions Copyright (c) 1999 Apple Computer, Inc.  All Rights
        !             7:  * Reserved.  This file contains Original Code and/or Modifications of
        !             8:  * Original Code as defined in and that are subject to the Apple Public
        !             9:  * Source License Version 1.0 (the 'License').  You may not use this file
        !            10:  * except in compliance with the License.  Please obtain a copy of the
        !            11:  * License at http://www.apple.com/publicsource and read it before using
        !            12:  * this file.
        !            13:  * 
        !            14:  * The Original Code and all software distributed under the License are
        !            15:  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
        !            16:  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
        !            17:  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
        !            18:  * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
        !            19:  * License for the specific language governing rights and limitations
        !            20:  * under the License."
        !            21:  * 
        !            22:  * @APPLE_LICENSE_HEADER_END@
        !            23:  */
        !            24: #include <stdio.h>
        !            25: #include <mach.h>
        !            26: #include <nlist.h>
        !            27: 
        !            28: #include "ObjcProcess.h"
        !            29: 
        !            30: void
        !            31: main(
        !            32:      int argc, 
        !            33:      char **argv
        !            34:      )
        !            35: {
        !            36:        kern_return_t ret;
        !            37:        task_t task;
        !            38:        struct mach_header **mhdrs;
        !            39: 
        !            40:        if (argc != 2) {
        !            41:                fprintf(stderr, "usage: %s pid\n", argv[0]);
        !            42:                exit(1);
        !            43:        }
        !            44:        ret = task_by_unix_pid(task_self(), atoi(argv[1]), &task);
        !            45:        if (ret != KERN_SUCCESS) {
        !            46:                fprintf(stderr, "task_by_unix_pid: %s\n", 
        !            47:                        mach_error_string(ret));
        !            48:                exit(1);
        !            49:        }
        !            50:        ret = task_suspend(task);
        !            51:        if (ret != KERN_SUCCESS) {
        !            52:                fprintf(stderr, "task_suspend: %s\n", 
        !            53:                        mach_error_string(ret));
        !            54:                exit(1);
        !            55:        }
        !            56: 
        !            57:        {
        !            58:        id anApp = [ObjcProcess newFromTask:task];
        !            59:        
        !            60:        }
        !            61: 
        !            62:        task_resume(task);
        !            63:        exit(0);
        !            64: } 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.