← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/xulrunner-1.9/intrepid

« back to all changes in this revision

Viewing changes to mozilla/nsprpub/lib/tests/arena.c

  • Committer: Bazaar Package Importer
  • Author(s): Alexander Sack, Alexander Sack, Fabien Tassin
  • Date: 2008-02-13 11:47:21 UTC
  • mfrom: (1.1.4 upstream)
  • Revision ID: james.westby@ubuntu.com-20080213114721-7om0mgzngvuk9czv
Tags: 1.9~b3+nobinonly-0ubuntu1
https://launchpad.net/bugs/37507
* release FIREFOX_3_0b3_RELEASE

[ Alexander Sack ]
* submit patch that ships xpcshell to bugzilla
  - rename debian/patches/ship_xpcshell.patch =>
           debian/patches/bz410617_att295212_ship_xpcshell.patch
  - update debian/patches/series
* fix tooltip in epiphany: previously displayed out of screen bounds
  (LP: #37507)
  - add debian/patches/bz233371_att297343_fix_outofscreen_embed_tooltip.patch
  - update debian/patches/series
* use default upstream gcc tweaks for improved performance - especially of the
  javascript engine
  - update debian/rules
* update global extension/plugin patch to apply cleanly against latest code
  - update debian/patches/bzXXX_gre_extension_plugin_support.patch
* fix pyxpcom build failure introduced by recent commit
  - add debian/patches/bzXXX_fix_pyxpcom_build_failure.patch
  - update debian/patches/series
* add distro independent global install locations for extensions,
  /usr/lib/mozilla/extensions and /usr/share/mozilla/extensions
  - update debian/xulrunner-1.9.dirs
* support embedded tarball layout when either there is a *.tar.bz2 in orig tarball
  or if DEBIAN_MOZCLIENT_EMBEDDED is not unset (you will need this to produce embedded
  tarballs during |get-orig-source|
  - update debian/rules
* bump minimum libnss3-dev build requirements to >= 3.12.0~1.9b3
  - update debian/control
* bump minimum libnspr4-dev build requirements to >= 4.7.0~1.9b3
  - update debian/control

[ Fabien Tassin ]
* Drop patches applied upstream
  - drop debian/patches/bz410617_att295212_ship_xpcshell.patch
  - drop debian/patches/bz404634_att294921.patch
  - drop debian/patches/bz386610_python2.5_ftbfs_amd64.patch
  - drop debian/patches/bz373918_att295042.patch
  - drop debian/patches/bz408062_unstable_pc.patch
  - drop debian/patches/bz384304_fix_recursive_symlinks.patch
  - update debian/patches/series
* Refresh diverged patches:
  - update debian/patches/bzXXX_pc_honour_system_nspr_nss.patch
  - update debian/patches/rename_venkman_addon.patch
  - update debian/patches/bz344818_cairo_xrender.patch
* Install links for all .so libs in the -dev package
  - update debian/patches/dont_install_so_in_dev.patch
* Bump gtk requirement to 2.12 as per Mozilla bug 412432
  - update debian/control
* Add #DEBHELPER# token to postinst/prerm scripts
  - update debian/xulrunner-1.9.{postinst,prerm}
* Install previously missed libdbusservice.so
  - update debian/xulrunner-1.9.install
* Update venkman patch to also rename locales
  - update debian/patches/rename_venkman_addon.patch
* Bump requirement for system cairo to >= 1.5.8 as we now need
  the newly added cairo_path_extents()
  - update debian/rules
* Include mozilla-devscripts file using -include so ifneq could be omitted
  - update debian/rules
* Fix missing .so symlinks regression
  - update debian/patches/dont_install_so_in_dev.patch

Show diffs side-by-side

added added

removed removed

Lines of Context:
mozilla/nsprpub/lib/tests/arena.c
1
 
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
2
 
/* ***** BEGIN LICENSE BLOCK *****
3
 
 * Version: MPL 1.1/GPL 2.0/LGPL 2.1
4
 
 *
5
 
 * The contents of this file are subject to the Mozilla Public License Version
6
 
 * 1.1 (the "License"); you may not use this file except in compliance with
7
 
 * the License. You may obtain a copy of the License at
8
 
 * http://www.mozilla.org/MPL/
9
 
 *
10
 
 * Software distributed under the License is distributed on an "AS IS" basis,
11
 
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
12
 
 * for the specific language governing rights and limitations under the
13
 
 * License.
14
 
 *
15
 
 * The Original Code is the Netscape Portable Runtime (NSPR).
16
 
 *
17
 
 * The Initial Developer of the Original Code is
18
 
 * Netscape Communications Corporation.
19
 
 * Portions created by the Initial Developer are Copyright (C) 1998-2000
20
 
 * the Initial Developer. All Rights Reserved.
21
 
 *
22
 
 * Contributor(s):
23
 
 *
24
 
 * Alternatively, the contents of this file may be used under the terms of
25
 
 * either the GNU General Public License Version 2 or later (the "GPL"), or
26
 
 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
27
 
 * in which case the provisions of the GPL or the LGPL are applicable instead
28
 
 * of those above. If you wish to allow use of your version of this file only
29
 
 * under the terms of either the GPL or the LGPL, and not to allow others to
30
 
 * use your version of this file under the terms of the MPL, indicate your
31
 
 * decision by deleting the provisions above and replace them with the notice
32
 
 * and other provisions required by the GPL or the LGPL. If you do not delete
33
 
 * the provisions above, a recipient may use your version of this file under
34
 
 * the terms of any one of the MPL, the GPL or the LGPL.
35
 
 *
36
 
 * ***** END LICENSE BLOCK ***** */
37
 
 
38
 
/*
39
 
** File:        arena.c
40
 
** Description: Testing arenas
41
 
**
42
 
*/
43
 
 
44
 
#include <string.h>
45
 
#include <time.h>
46
 
#include <stdlib.h>
47
 
#include "nspr.h"
48
 
#include "plarena.h"
49
 
#include "plgetopt.h"
50
 
 
51
 
PRLogModuleInfo *tLM;
52
 
PRIntn  threadCount = 0;
53
 
PRMonitor   *tMon;
54
 
PRBool failed_already = PR_FALSE;
55
 
 
56
 
/* Arguments from the command line with default values */
57
 
PRIntn debug_mode = 0;
58
 
PRIntn  poolMin = 4096;
59
 
PRIntn  poolMax = (100 * 4096);
60
 
PRIntn  arenaMin = 40;
61
 
PRIntn  arenaMax = (100 * 40);
62
 
PRIntn  stressIterations = 15;
63
 
PRIntn  maxAlloc = (1024 * 1024);
64
 
PRIntn  stressThreads = 4;
65
 
 
66
 
void DumpAll( void )
67
 
{
68
 
        return;
69
 
}
70
 
 
71
 
/*
72
 
** Test Arena allocation.
73
 
*/
74
 
static void ArenaAllocate( void )
75
 
{
76
 
    PLArenaPool ap;
77
 
    void    *ptr;
78
 
        PRInt32 i;
79
 
 
80
 
    PL_InitArenaPool( &ap, "AllocArena", 2048, sizeof(double));
81
 
    PR_LOG( tLM, PR_LOG_DEBUG, ("AA, InitPool -- Pool: %p. first: %p, current: %p, size: %d", 
82
 
        &ap, ap.first, ap.current, ap.arenasize  ));
83
 
 
84
 
        for( i = 0; i < 150; i++ )
85
 
        {
86
 
                PL_ARENA_ALLOCATE( ptr, &ap, 512 );
87
 
        PR_LOG( tLM, PR_LOG_DEBUG,("AA, after alloc -- Pool: %p. first: %p, current: %p, size: %d", 
88
 
               &ap, ap.first, ap.current, ap.arenasize  ));
89
 
                PR_LOG( tLM, PR_LOG_DEBUG,(
90
 
                    "AA -- Pool: %p. alloc: %p ", &ap, ptr ));
91
 
        }
92
 
 
93
 
    PL_FreeArenaPool( &ap );
94
 
 
95
 
        for( i = 0; i < 221; i++ )
96
 
        {
97
 
                PL_ARENA_ALLOCATE( ptr, &ap, 512 );
98
 
        PR_LOG( tLM, PR_LOG_DEBUG,("AA, after alloc -- Pool: %p. first: %p, current: %p, size: %d", 
99
 
               &ap, ap.first, ap.current, ap.arenasize  ));
100
 
                PR_LOG( tLM, PR_LOG_DEBUG,(
101
 
                    "AA -- Pool: %p. alloc: %p ", &ap, ptr ));
102
 
        }
103
 
 
104
 
    PL_FreeArenaPool( &ap );
105
 
    
106
 
    return;
107
 
} /* end ArenaGrow() */
108
 
/*
109
 
** Test Arena grow.
110
 
*/
111
 
static void ArenaGrow( void )
112
 
{
113
 
    PLArenaPool ap;
114
 
    void    *ptr;
115
 
        PRInt32 i;
116
 
 
117
 
    PL_InitArenaPool( &ap, "TheArena", 4096, sizeof(double));
118
 
    PL_ARENA_ALLOCATE( ptr, &ap, 512 );
119
 
 
120
 
        PR_LOG( tLM, PR_LOG_DEBUG, ("Before growth -- Pool: %p. alloc: %p ", &ap, ptr ));
121
 
 
122
 
        for( i = 0; i < 10; i++ )
123
 
        {
124
 
                PL_ARENA_GROW( ptr, &ap, 512, 7000 );
125
 
                PR_LOG( tLM, PR_LOG_DEBUG, ("After growth -- Pool: %p. alloc: %p ", &ap, ptr ));
126
 
        }
127
 
 
128
 
 
129
 
    return;
130
 
} /* end ArenaGrow() */
131
 
 
132
 
 
133
 
/*
134
 
** Test arena Mark and Release.
135
 
*/
136
 
static void MarkAndRelease( void )
137
 
{
138
 
    PLArenaPool ap;
139
 
    void    *ptr = NULL;
140
 
    void    *mark0, *mark1;
141
 
    PRIntn  i;
142
 
 
143
 
    PL_InitArenaPool( &ap, "TheArena", 4096, sizeof(double));
144
 
    mark0 = PL_ARENA_MARK( &ap );
145
 
    PR_LOG( tLM, PR_LOG_DEBUG,
146
 
        ("mark0. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p, m0: %p", 
147
 
            &ap, ap.first.next, ap.current, ap.arenasize, ptr, mark0 ));
148
 
 
149
 
        for( i = 0; i < 201; i++ )
150
 
        {
151
 
                PL_ARENA_ALLOCATE( ptr, &ap, 512 );
152
 
        PR_LOG( tLM, PR_LOG_DEBUG,
153
 
            ("mr. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
154
 
                &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
155
 
        }
156
 
 
157
 
    mark1 = PL_ARENA_MARK( &ap );
158
 
    PR_LOG( tLM, PR_LOG_DEBUG,
159
 
        ("mark1. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p, m1: %p", 
160
 
            &ap, ap.first.next, ap.current, ap.arenasize, ptr, mark1 ));
161
 
 
162
 
 
163
 
        for( i = 0; i < 225; i++ )
164
 
        {
165
 
                PL_ARENA_ALLOCATE( ptr, &ap, 512 );
166
 
        PR_LOG( tLM, PR_LOG_DEBUG,
167
 
            ("mr. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
168
 
                &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
169
 
        }
170
 
 
171
 
    PL_ARENA_RELEASE( &ap, mark1 );
172
 
    PR_LOG( tLM, PR_LOG_DEBUG,
173
 
        ("Release-1: %p -- Pool: %p. first: %p, current: %p, size: %d", 
174
 
               mark1, &ap, ap.first, ap.current, ap.arenasize  ));
175
 
 
176
 
        for( i = 0; i < 20; i++ )
177
 
        {
178
 
                PL_ARENA_ALLOCATE( ptr, &ap, 512 );
179
 
        PR_LOG( tLM, PR_LOG_DEBUG,
180
 
            ("mr. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
181
 
                &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
182
 
        }
183
 
 
184
 
    PL_ARENA_RELEASE( &ap, mark1 );
185
 
    PR_LOG( tLM, PR_LOG_DEBUG,
186
 
        ("Release-1. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
187
 
            &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
188
 
 
189
 
    PL_ARENA_RELEASE( &ap, mark0 );
190
 
    PR_LOG( tLM, PR_LOG_DEBUG,
191
 
        ("Release-0. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
192
 
            &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
193
 
 
194
 
    PL_FreeArenaPool( &ap );
195
 
    PR_LOG( tLM, PR_LOG_DEBUG,
196
 
        ("Free. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
197
 
            &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
198
 
    
199
 
    PL_FinishArenaPool( &ap );
200
 
    PR_LOG( tLM, PR_LOG_DEBUG,
201
 
        ("Finish. ap: %p, ap.f: %p, ap.c: %p, ap.siz: %d, alloc: %p", 
202
 
            &ap, ap.first.next, ap.current, ap.arenasize, ptr ));
203
 
 
204
 
    return;
205
 
} /* end MarkAndRelease() */
206
 
 
207
 
/*
208
 
** RandSize() returns a random number in the range 
209
 
** min..max, rounded to the next doubleword
210
 
**
211
 
*/
212
 
static PRIntn RandSize( PRIntn min, PRIntn max )
213
 
{
214
 
    PRIntn  sz = (rand() % (max -min)) + min + sizeof(double);
215
 
 
216
 
    sz &= ~sizeof(double)-1;
217
 
 
218
 
    return(sz);
219
 
}
220
 
 
221
 
 
222
 
/*
223
 
** StressThread()
224
 
** A bunch of these beat on individual arenas
225
 
** This tests the free_list protection.
226
 
**
227
 
*/
228
 
static void PR_CALLBACK StressThread( void *arg )
229
 
{
230
 
    PLArenaPool ap;
231
 
    PRIntn i;
232
 
    PRIntn sz;
233
 
    void *ptr;
234
 
    PRThread *tp = PR_GetCurrentThread();
235
 
 
236
 
    PR_LOG( tLM, PR_LOG_DEBUG, ("Stress Thread %p started\n", PR_GetCurrentThread()));
237
 
    PL_InitArenaPool( &ap, "TheArena", RandSize( poolMin, poolMax), sizeof(double));
238
 
 
239
 
    for ( i = 0; i < stressIterations; i++ )
240
 
    {
241
 
        PRIntn allocated = 0;
242
 
 
243
 
        while ( allocated < maxAlloc )
244
 
        {
245
 
            sz = RandSize( arenaMin, arenaMax );
246
 
            PL_ARENA_ALLOCATE( ptr, &ap, sz );
247
 
            if ( ptr == NULL )
248
 
            {
249
 
                PR_LOG( tLM, PR_LOG_ERROR, ("ARENA_ALLOCATE() returned NULL\n\tAllocated: %d\n", allocated));
250
 
                break;
251
 
            }
252
 
            allocated += sz;
253
 
        }
254
 
        PR_LOG( tLM, PR_LOG_DEBUG, ("Stress thread %p finished one iteration\n", tp));
255
 
        PL_FreeArenaPool( &ap );
256
 
    }
257
 
    PR_LOG( tLM, PR_LOG_DEBUG, ("Stress thread %p finished all iteration\n", tp));
258
 
    PL_FinishArenaPool( &ap );
259
 
    PR_LOG( tLM, PR_LOG_DEBUG, ("Stress thread %p after FinishArenaPool()\n", tp));
260
 
 
261
 
    /* That's all folks! let's quit */
262
 
    PR_EnterMonitor(tMon);
263
 
    threadCount--;
264
 
    PR_Notify(tMon);
265
 
    PR_ExitMonitor(tMon);    
266
 
    return;
267
 
}    
268
 
 
269
 
/*
270
 
** Stress()
271
 
** Flog the hell out of arenas multi-threaded.
272
 
** Do NOT pass an individual arena to another thread.
273
 
** 
274
 
*/
275
 
static void Stress( void )
276
 
{
277
 
    PRThread    *tt;
278
 
    PRIntn      i;
279
 
 
280
 
    tMon = PR_NewMonitor();
281
 
 
282
 
    for ( i = 0 ; i < stressThreads ; i++ )
283
 
    {
284
 
        PR_EnterMonitor(tMon);
285
 
        tt = PR_CreateThread(PR_USER_THREAD,
286
 
               StressThread,
287
 
               NULL,
288
 
               PR_PRIORITY_NORMAL,
289
 
               PR_GLOBAL_THREAD,
290
 
               PR_UNJOINABLE_THREAD,
291
 
               0);
292
 
        threadCount++;
293
 
        PR_ExitMonitor(tMon);
294
 
    }
295
 
 
296
 
    /* Wait for all threads to exit */
297
 
    PR_EnterMonitor(tMon);
298
 
    while ( threadCount != 0 ) 
299
 
    {
300
 
        PR_Wait(tMon, PR_INTERVAL_NO_TIMEOUT);
301
 
    }
302
 
    PR_ExitMonitor(tMon);
303
 
        PR_DestroyMonitor(tMon);
304
 
 
305
 
    return;
306
 
} /* end Stress() */
307
 
 
308
 
/*
309
 
** EvaluateResults()
310
 
** uses failed_already to display results and set program
311
 
** exit code.
312
 
*/
313
 
static PRIntn  EvaluateResults(void)
314
 
{
315
 
    PRIntn rc = 0;
316
 
 
317
 
    if ( failed_already == PR_TRUE )
318
 
    {
319
 
        PR_LOG( tLM, PR_LOG_DEBUG, ("FAIL\n"));
320
 
        rc =1;
321
 
    } 
322
 
    else
323
 
    {
324
 
        PR_LOG( tLM, PR_LOG_DEBUG, ("PASS\n"));
325
 
    }
326
 
    return(rc);
327
 
} /* EvaluateResults() */
328
 
 
329
 
void Help( void )
330
 
{
331
 
    printf("arena [options]\n");
332
 
    printf("where options are:\n");
333
 
    printf("-p <n>   minimum size of an arena pool. Default(%d)\n", poolMin);
334
 
    printf("-P <n>   maximum size of an arena pool. Default(%d)\n", poolMax);
335
 
    printf("-a <n>   minimum size of an arena allocation. Default(%d)\n", arenaMin);
336
 
    printf("-A <n>   maximum size of an arena allocation. Default(%d)\n", arenaMax);
337
 
    printf("-i <n>   number of iterations in a stress thread. Default(%d)\n", stressIterations);
338
 
    printf("-s <n>   maximum allocation for a single stress thread. Default(%d)\n", maxAlloc);
339
 
    printf("-t <n>   number of stress threads. Default(%d)\n", stressThreads );
340
 
    printf("-d       enable debug mode\n");
341
 
    printf("\n");
342
 
    exit(1);
343
 
}    
344
 
 
345
 
PRIntn main(PRIntn argc, char *argv[])
346
 
{
347
 
    PLOptStatus os;
348
 
        PLOptState *opt = PL_CreateOptState(argc, argv, "dhp:P:a:A:i:s:t:");
349
 
        while (PL_OPT_EOL != (os = PL_GetNextOpt(opt)))
350
 
    {
351
 
                if (PL_OPT_BAD == os) continue;
352
 
        switch (opt->option)
353
 
        {
354
 
        case 'a':  /* arena Min size */
355
 
            arenaMin = atol( opt->value );
356
 
            break;
357
 
        case 'A':  /* arena Max size  */
358
 
            arenaMax = atol( opt->value );
359
 
            break;
360
 
        case 'p':  /* pool Min size */
361
 
            poolMin = atol( opt->value );
362
 
            break;
363
 
        case 'P':  /* pool Max size */
364
 
            poolMax = atol( opt->value );
365
 
            break;
366
 
        case 'i':  /* Iterations in stress tests */
367
 
            stressIterations = atol( opt->value );
368
 
            break;
369
 
        case 's':  /* storage to get per iteration */
370
 
            maxAlloc = atol( opt->value );
371
 
            break;
372
 
        case 't':  /* Number of stress threads to create */
373
 
            stressThreads = atol( opt->value );
374
 
            break;
375
 
        case 'd':  /* debug mode */
376
 
                        debug_mode = 1;
377
 
            break;
378
 
        case 'h':  /* help */
379
 
        default:
380
 
            Help();
381
 
        } /* end switch() */
382
 
    } /* end while() */
383
 
        PL_DestroyOptState(opt);
384
 
 
385
 
    srand( (unsigned)time( NULL ) ); /* seed random number generator */
386
 
    tLM = PR_NewLogModule("testcase");
387
 
 
388
 
 
389
 
#if 0
390
 
        ArenaAllocate();
391
 
        ArenaGrow();
392
 
#endif
393
 
 
394
 
    MarkAndRelease();
395
 
 
396
 
    Stress();
397
 
 
398
 
    return(EvaluateResults());
399
 
} /* end main() */
400
 
 
401
 
/* arena.c */