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

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.