00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039 #include "arch.h"
00040 ARCH_COPYRIGHT_APACHE(class, c, "$URL: https://svn.apache.org/path/name/class.c $ $Id: class.c 0 09/28/2005 dlydick $");
00041
00042
00043 #include <string.h>
00044
00045 #include "jvmcfg.h"
00046 #include "cfmacros.h"
00047 #include "classfile.h"
00048 #include "classfile.h"
00049 #include "classpath.h"
00050 #include "exit.h"
00051 #include "field.h"
00052 #include "gc.h"
00053 #include "jvm.h"
00054 #include "jvmclass.h"
00055 #include "linkage.h"
00056 #include "method.h"
00057 #include "nts.h"
00058 #include "utf.h"
00059 #include "util.h"
00060
00061
00062
00063
00064
00065
00066
00067
00068
00069
00070
00071
00072
00073
00074
00075
00076
00077
00078
00079
00080 rvoid class_static_setup(jvm_class_index clsidx)
00081 {
00082
00083
00084
00085
00086
00087
00088
00089
00090 CLASS(clsidx).status = CLASS_STATUS_INUSE | CLASS_STATUS_NULL;
00091
00092
00093
00094
00095 CLASS(clsidx).arraydims = LOCAL_CONSTANT_NO_ARRAY_DIMS;
00096 CLASS(clsidx).arraylength = (jint *) rnull;
00097 CLASS(clsidx).lower_dim_array = jvm_class_index_null;
00098
00099
00100 CLASS(clsidx).class_objhash = jvm_object_hash_null;
00101
00102
00103 CLASS(clsidx).num_class_static_field_lookups = 0;
00104 CLASS(clsidx).class_static_field_lookup = (jvm_class_index *) rnull;
00105 CLASS(clsidx).class_static_field_data = (jvalue *) rnull;
00106
00107
00108 CLASS(clsidx).num_object_instance_field_lookups = 0;
00109 CLASS(clsidx).object_instance_field_lookup =
00110 (jvm_field_index *) rnull;
00111
00112
00113
00114
00115
00116
00117
00118 CLASS(clsidx).initiating_ClassLoader = jvm_class_index_null;
00119 CLASS(clsidx).defining_ClassLoader = jvm_class_index_null;
00120
00121
00122
00123
00124
00125
00126
00127
00128 CLASS(clsidx).pgarbage = (rvoid *) rnull;
00129
00130
00131
00132
00133
00134
00135 return;
00136
00137 }
00138
00139
00140
00141
00142
00143
00144
00145
00146
00147
00148
00149
00150 rvoid class_init()
00151 {
00152 class_static_setup(jvm_class_index_null);
00153
00154 pjvm->class_allocate_last = jvm_class_index_null;
00155
00156
00157 jvm_class_initialized = rtrue;
00158
00159 return;
00160
00161 }
00162
00163
00164
00165
00166
00167
00168
00169
00170
00171
00172
00173
00174
00175
00176
00177
00178
00179
00180
00181
00182
00183
00184
00185 static jvm_class_index class_allocate_slot(rboolean tryagain)
00186 {
00187
00188 jvm_class_index clsidx =
00189 (JVMCFG_MAX_CLASSES == (1 + pjvm->class_allocate_last))
00190 ? JVMCFG_FIRST_CLASS
00191 : 1 + pjvm->class_allocate_last;
00192
00193
00194 jvm_class_index count = 0;
00195
00196 while(rtrue)
00197 {
00198 if (CLASS(clsidx).status & CLASS_STATUS_INUSE)
00199 {
00200
00201 clsidx++;
00202
00203 if (clsidx == JVMCFG_MAX_CLASSES - 1)
00204 {
00205 clsidx = JVMCFG_FIRST_CLASS;
00206 }
00207
00208
00209 if (pjvm->class_allocate_last == JVMCFG_MAX_CLASSES - 1)
00210 {
00211 pjvm->class_allocate_last = JVMCFG_FIRST_CLASS - 1;
00212 }
00213
00214
00215 count++;
00216
00217 if (count == (JVMCFG_MAX_CLASSES - JVMCFG_FIRST_CLASS))
00218 {
00219
00220 if (rtrue == tryagain)
00221 {
00222 GC_RUN(rtrue);
00223
00224
00225
00226
00227 return(class_allocate_slot(rfalse));
00228 }
00229
00230
00231 exit_throw_exception(EXIT_JVM_CLASS,
00232 JVMCLASS_JAVA_LANG_OUTOFMEMORYERROR);
00233
00234 }
00235 }
00236
00237
00238 CLASS(clsidx).status = CLASS_STATUS_INUSE | CLASS_STATUS_NULL;
00239
00240
00241 pjvm->class_allocate_last = clsidx;
00242
00243 return(clsidx);
00244 }
00245
00246 return(jvm_class_index_null);
00247
00248 }
00249
00250
00251
00252
00253
00254
00255
00256
00257
00258
00259
00260
00261
00262
00263
00264
00265
00266
00267
00268
00269
00270
00271
00272
00273
00274
00275
00276
00277
00278
00279
00280
00281
00282
00283
00284
00285
00286
00287
00288
00289
00290
00291
00292
00293
00294
00295
00296
00297
00298
00299
00300
00301
00302
00303
00304
00305
00306
00307
00308
00309
00310
00311
00312
00313
00314
00315
00316
00317
00318
00319
00320
00321
00322
00323
00324
00325
00326
00327
00328
00329
00330
00331
00332
00333
00334
00335
00336
00337
00338
00339
00340 jvm_class_index class_static_new(rushort special_cls,
00341 ClassFile *pcfs,
00342 jvm_array_dim arraydims,
00343 jint *arraylength,
00344 jvm_class_index lower_dim_array)
00345 {
00346 jvm_class_index clsidx;
00347
00348
00349 clsidx = class_allocate_slot(rtrue);
00350
00351
00352 if(jvm_class_index_null == clsidx)
00353 {
00354 return(jvm_class_index_null);
00355 }
00356
00357
00358 class_static_setup(clsidx);
00359
00360
00361
00362
00363
00364
00365
00366
00367
00368
00369
00370 CLASS(clsidx).num_class_static_field_lookups = 0;
00371 CLASS(clsidx).num_object_instance_field_lookups = 0;
00372
00373
00374
00375
00376
00377
00378
00379
00380
00381
00382
00383
00384
00385
00386
00387
00388
00389 jvm_object_hash objhash;
00390 if (CLASS_STATUS_PRIMATIVE & special_cls)
00391 {
00392
00393 (rvoid) GC_CLASS_NEW(clsidx);
00394
00395
00396
00397
00398
00399 objhash = object_instance_new(OBJECT_STATUS_EMPTY,
00400 pcfs,
00401 clsidx,
00402 arraydims,
00403 arraylength,
00404 rfalse,
00405 jvm_thread_index_null);
00406
00407
00408
00409
00410
00411 CLASS(clsidx).status |= CLASS_STATUS_PRIMATIVE |
00412 CLASS_STATUS_CLINIT;
00413 }
00414 else
00415 if (special_cls & CLASS_STATUS_ARRAY)
00416 {
00417
00418 (rvoid) GC_CLASS_NEW(clsidx);
00419
00420
00421
00422
00423
00424
00425
00426 objhash = object_instance_new(OBJECT_STATUS_CLASS,
00427 pcfs,
00428 clsidx,
00429 arraydims,
00430 arraylength,
00431 rfalse,
00432 jvm_thread_index_null);
00433
00434 CLASS(clsidx).status |= CLASS_STATUS_ARRAY;
00435
00436 CLASS(clsidx).arraydims = arraydims;
00437 CLASS(clsidx).arraylength = arraylength;
00438 CLASS(clsidx).lower_dim_array = lower_dim_array;
00439
00440
00441 (rvoid) GC_CLASS_MKREF_FROM_CLASS(clsidx,
00442 CLASS(clsidx).lower_dim_array);
00443 }
00444 else
00445 {
00446
00447
00448
00449 CLASS(clsidx).num_class_static_field_lookups =
00450 class_get_num_static_fields(pcfs);
00451 CLASS(clsidx).class_static_field_lookup =
00452 class_get_static_field_lookups(pcfs);
00453
00454 CLASS(clsidx).num_object_instance_field_lookups =
00455 class_get_num_object_instance_fields(pcfs);
00456 CLASS(clsidx).object_instance_field_lookup =
00457 class_get_object_instance_field_lookups(pcfs);
00458
00459
00460
00461
00462
00463 (rvoid) GC_CLASS_NEW(clsidx);
00464
00465
00466 objhash = object_instance_new(OBJECT_STATUS_EMPTY,
00467 pcfs,
00468 clsidx,
00469 arraydims,
00470 arraylength,
00471 rfalse,
00472 jvm_thread_index_null);
00473
00474
00475 CLASS(clsidx).class_static_field_data =
00476 class_get_static_field_data(clsidx, pcfs);
00477 }
00478
00479
00480
00481
00482
00483 CLASS(clsidx).class_objhash = objhash;
00484 (rvoid) GC_OBJECT_MKREF_FROM_CLASS(clsidx, objhash);
00485
00486
00487 CLASS(clsidx).status &= ~CLASS_STATUS_NULL;
00488
00489
00490
00491
00492
00493
00494
00495 return(clsidx);
00496
00497 }
00498
00499
00500
00501
00502
00503
00504
00505
00506
00507
00508
00509
00510
00511
00512
00513
00514
00515
00516
00517
00518
00519
00520
00521
00522 jvm_class_index class_reload(jvm_class_index clsidxOLD)
00523 {
00524
00525 if (CLASS(clsidxOLD).status & CLASS_STATUS_INUSE)
00526 {
00527
00528 jvm_class_index clsidxNEW = class_allocate_slot(rtrue);
00529
00530
00531
00532
00533 rclass *dupslot = HEAP_GET_METHOD(sizeof(rclass), rfalse);
00534
00535 memcpy(dupslot, &CLASS(clsidxOLD), sizeof(rclass));
00536
00537
00538
00539 CLASS(clsidxOLD).status |= CLASS_STATUS_NULL;
00540
00541
00542 if (jvm_object_hash_null != CLASS(clsidxOLD).class_objhash)
00543 {
00544
00545 OBJECT(dupslot->class_objhash).table_linkage.clsidx =
00546 clsidxNEW;
00547
00548
00549 (rvoid) GC_OBJECT_MKREF_FROM_CLASS(
00550 clsidxOLD,
00551 dupslot->class_objhash);
00552 (rvoid) GC_CLASS_MKREF_FROM_CLASS(
00553 clsidxOLD,
00554 dupslot->lower_dim_array);
00555 (rvoid) GC_CLASS_MKREF_FROM_OBJECT(
00556 dupslot->class_objhash,
00557 OBJECT(dupslot->class_objhash)
00558 .table_linkage
00559 .clsidx);
00560
00561
00562 (rvoid) GC_OBJECT_RMREF_FROM_CLASS(
00563 clsidxOLD,
00564 CLASS(clsidxOLD).class_objhash);
00565 (rvoid) GC_CLASS_RMREF_FROM_CLASS(
00566 clsidxOLD,
00567 CLASS(clsidxOLD).lower_dim_array);
00568 (rvoid) GC_CLASS_RMREF_FROM_OBJECT(
00569 CLASS(clsidxOLD).class_objhash,
00570 OBJECT(CLASS(clsidxOLD).class_objhash)
00571 .table_linkage
00572 .clsidx);
00573
00574
00575
00576
00577
00578
00579 CLASS(clsidxOLD).class_objhash = jvm_object_hash_null;
00580 }
00581
00582
00583 (rvoid) GC_CLASS_RMREF_FROM_CLASS(
00584 clsidxOLD,
00585 CLASS(clsidxOLD).lower_dim_array);
00586 (rvoid) GC_CLASS_RMREF_FROM_CLASS(jvm_class_index_null,
00587 clsidxOLD);
00588 (rvoid) linkage_unresolve_class(clsidxOLD);
00589
00590
00591
00592
00593
00594 (rvoid) GC_CLASS_DELETE(clsidxOLD, rfalse);
00595
00596
00597
00598
00599 CLASS(clsidxOLD).class_static_field_lookup =
00600 (jvm_class_index *) rnull;
00601 CLASS(clsidxOLD).num_class_static_field_lookups = 0;
00602
00603 CLASS(clsidxOLD).object_instance_field_lookup =
00604 (jvm_class_index *) rnull;
00605 CLASS(clsidxOLD).num_object_instance_field_lookups = 0;
00606
00607
00608 CLASS(clsidxOLD).status = CLASS_STATUS_EMPTY;
00609
00610
00611
00612
00613 dupslot->status |= CLASS_STATUS_NULL;
00614
00615 memcpy(&CLASS(clsidxNEW), dupslot, sizeof(rclass));
00616
00617
00618 (rvoid) GC_OBJECT_MKREF_FROM_CLASS(
00619 clsidxNEW,
00620 CLASS(clsidxNEW).class_objhash);
00621 (rvoid) GC_CLASS_MKREF_FROM_CLASS(
00622 clsidxNEW,
00623 CLASS(clsidxNEW).lower_dim_array);
00624 (rvoid) GC_CLASS_MKREF_FROM_OBJECT(
00625 CLASS(clsidxNEW).class_objhash,
00626 OBJECT(CLASS(clsidxNEW).class_objhash)
00627 .table_linkage
00628 .clsidx);
00629
00630 (rvoid) GC_OBJECT_RMREF_FROM_CLASS(
00631 clsidxOLD,
00632 dupslot->class_objhash);
00633 (rvoid) GC_CLASS_RMREF_FROM_CLASS(
00634 clsidxOLD,
00635 dupslot->lower_dim_array);
00636 (rvoid) GC_CLASS_RMREF_FROM_OBJECT(
00637 dupslot->class_objhash,
00638 OBJECT(dupslot->class_objhash)
00639 .table_linkage
00640 .clsidx);
00641
00642
00643 HEAP_FREE_METHOD(&dupslot);
00644
00645 return(clsidxNEW);
00646 }
00647 else
00648 {
00649
00650 return(jvm_class_index_null);
00651 }
00652
00653 }
00654
00655
00656
00657
00658
00659
00660
00661
00662
00663
00664
00665
00666
00667
00668
00669
00670
00671
00672
00673
00674
00675
00676
00677
00678
00679
00680
00681
00682
00683
00684
00685
00686
00687
00688 jvm_class_index class_static_delete(jvm_class_index clsidx,
00689 rboolean rmref)
00690 {
00691 if (CLASS(clsidx).status & CLASS_STATUS_INUSE)
00692 {
00693
00694
00695
00696
00697
00698
00699 (rvoid) linkage_unresolve_class(clsidx);
00700
00701
00702
00703
00704
00705
00706
00707 if (jvm_object_hash_null != CLASS(clsidx).class_objhash)
00708 {
00709 (rvoid) GC_OBJECT_RMREF_FROM_CLASS(
00710 clsidx,
00711 CLASS(clsidx).class_objhash);
00712
00713 object_instance_finalize(CLASS(clsidx).class_objhash,
00714 JVMCFG_GC_THREAD);
00715
00716 (rvoid) object_instance_delete(
00717 CLASS(clsidx).class_objhash,
00718 rtrue);
00719
00720
00721 }
00722
00723
00724 if (rtrue == rmref)
00725 {
00726 (rvoid) GC_CLASS_RMREF_FROM_CLASS(clsidx,
00727 CLASS(clsidx).lower_dim_array);
00728 }
00729 (rvoid) GC_CLASS_DELETE(clsidx, rfalse);
00730
00731 if (rnull != CLASS(clsidx).class_static_field_data)
00732 {
00733
00734 u2 ncsfl = CLASS(clsidx).num_class_static_field_lookups;
00735 jvm_field_lookup_index csflidx;
00736 for (csflidx = 0; csflidx < ncsfl; csflidx++)
00737 {
00738 (rvoid) GC_CLASS_FIELD_RMREF(clsidx, csflidx);
00739 }
00740
00741 HEAP_FREE_DATA(CLASS(clsidx).class_static_field_data);
00742 }
00743
00744 if (rnull != CLASS(clsidx).class_static_field_lookup)
00745 {
00746 HEAP_FREE_DATA(CLASS(clsidx).class_static_field_lookup);
00747 }
00748
00749
00750
00751
00752 if (rnull != CLASS(clsidx).object_instance_field_lookup)
00753 {
00754 HEAP_FREE_DATA(CLASS(clsidx).object_instance_field_lookup);
00755 }
00756
00757
00758
00759
00760
00761
00762
00763 CLASS(clsidx).status &= ~CLASS_STATUS_INUSE;
00764
00765 return(clsidx);
00766 }
00767 else
00768 {
00769
00770 return(jvm_class_index_null);
00771 }
00772
00773 }
00774
00775
00776
00777
00778
00779
00780
00781
00782
00783
00784
00785
00786
00787
00788
00789
00790
00791
00792
00793
00794
00795 jvm_class_index class_find_by_cp_entry(cp_info_dup *clsname)
00796 {
00797 jvm_class_index clsidx;
00798
00799 jvm_array_dim arraydims =
00800 utf_get_utf_arraydims(PTR_THIS_CP_Utf8(clsname));
00801
00802 for (clsidx = JVMCFG_FIRST_CLASS;
00803 clsidx < JVMCFG_MAX_CLASSES;
00804 clsidx++)
00805 {
00806 if ( (CLASS_STATUS_INUSE & CLASS(clsidx).status) &&
00807 !(CLASS_STATUS_NULL & CLASS(clsidx).status))
00808 {
00809 ClassFile *pcfs = CLASS_OBJECT_LINKAGE(clsidx)->pcfs;
00810 u2 cpidx = pcfs->this_class;
00811
00812
00813
00814
00815
00816 if (arraydims != CLASS(clsidx).arraydims)
00817 {
00818 continue;
00819 }
00820
00821 if (0 == utf_classname_strcmp(
00822 PTR_THIS_CP_Utf8(clsname),
00823 pcfs,
00824 cpidx))
00825 {
00826 return(clsidx);
00827 }
00828 }
00829 }
00830
00831
00832 return(jvm_class_index_null);
00833
00834 }
00835
00836
00837
00838
00839
00840
00841
00842
00843
00844
00845
00846
00847
00848 jvm_class_index class_find_by_prchar(rchar *clsname)
00849 {
00850 cp_info_dup *pcip_clsname = nts_prchar2utf(clsname);
00851
00852 jvm_method_index rc =
00853 class_find_by_cp_entry(pcip_clsname);
00854
00855 HEAP_FREE_DATA(pcip_clsname);
00856
00857 return(rc);
00858
00859 }
00860
00861
00862
00863
00864
00865
00866
00867
00868
00869
00870
00871
00872
00873
00874
00875
00876
00877
00878
00879
00880
00881
00882
00883
00884
00885
00886
00887
00888
00889
00890 jvm_class_index class_load_primative(u1 basetype)
00891 {
00892 ClassFile *pcfs = classfile_allocate_primative(basetype);
00893
00894 return(class_static_new(CLASS_STATUS_PRIMATIVE,
00895 pcfs,
00896 LOCAL_CONSTANT_NO_ARRAY_DIMS,
00897 (jint *) rnull,
00898 jvm_class_index_null));
00899
00900 }
00901
00902
00903
00904
00905
00906
00907
00908
00909
00910
00911
00912
00913
00914
00915
00916
00917
00918
00919
00920
00921
00922
00923
00924
00925
00926
00927
00928
00929
00930
00931
00932
00933
00934
00935
00936
00937
00938
00939
00940
00941
00942
00943
00944
00945
00946
00947
00948
00949
00950
00951
00952
00953
00954
00955
00956
00957
00958
00959
00960
00961
00962
00963
00964
00965
00966
00967
00968
00969
00970
00971
00972
00973
00974
00975
00976
00977
00978
00979
00980
00981
00982
00983
00984
00985
00986
00987
00988
00989
00990
00991
00992
00993
00994
00995
00996
00997
00998
00999
01000
01001
01002
01003
01004
01005
01006
01007
01008
01009
01010
01011
01012
01013
01014
01015
01016
01017
01018 jvm_class_index
01019 class_load_from_cp_entry_utf(cp_info_dup *clsname,
01020 rboolean find_registerNatives,
01021 jint *arraylength)
01022 {
01023
01024 if (CONSTANT_Utf8 != PTR_THIS_CP_Utf8(clsname)->tag)
01025 {
01026
01027 exit_throw_exception(EXIT_JVM_INTERNAL,
01028 JVMCLASS_JAVA_LANG_INTERNALERROR);
01029
01030 }
01031
01032
01033
01034
01035
01036 jvm_class_index rc;
01037
01038
01039
01040
01041
01042 rc = class_find_by_cp_entry(clsname);
01043
01044
01045 if (jvm_class_index_null != rc)
01046 {
01047 return(rc);
01048 }
01049
01050
01051 jvm_array_dim arraydims =
01052 utf_get_utf_arraydims(PTR_THIS_CP_Utf8(clsname));
01053
01054
01055
01056
01057
01058 if (LOCAL_CONSTANT_NO_ARRAY_DIMS < arraydims)
01059 {
01060 rchar *pnextdim = utf_utf2prchar(PTR_THIS_CP_Utf8(clsname));
01061
01062
01063
01064
01065
01066 rc = class_load_from_prchar(&pnextdim[1 * sizeof(u1)],
01067 find_registerNatives,
01068 (rnull == arraylength)
01069 ? (jint *) rnull
01070 : &arraylength[1]);
01071
01072 HEAP_FREE_DATA(pnextdim);
01073 }
01074
01075
01076
01077
01078
01079
01080 {
01081
01082 jvm_class_index lower_dim_clsidx = rc;
01083
01084
01085
01086
01087
01088
01089
01090
01091
01092
01093 u1 *pcfd;
01094 ClassFile *pcfs;
01095 rchar *pcname;
01096 jvm_class_index clsidx;
01097
01098 if (LOCAL_CONSTANT_NO_ARRAY_DIMS < arraydims)
01099 {
01100
01101 jvm_class_index next_clsidx = lower_dim_clsidx;
01102
01103 while(jvm_class_index_null !=
01104 CLASS(next_clsidx).lower_dim_array)
01105 {
01106 next_clsidx =
01107 CLASS(CLASS_OBJECT_LINKAGE(next_clsidx)->clsidx)
01108 .lower_dim_array;
01109 }
01110
01111
01112 ClassFile *pcfs = CLASS_OBJECT_LINKAGE(next_clsidx)->pcfs;
01113
01114
01115 clsidx =
01116 class_static_new(((LOCAL_CONSTANT_NO_ARRAY_DIMS ==
01117 arraydims)
01118 ? CLASS_STATUS_EMPTY
01119 : CLASS_STATUS_ARRAY),
01120 pcfs,
01121 arraydims,
01122 arraylength,
01123 lower_dim_clsidx);
01124
01125 }
01126 else
01127 {
01128 cp_info_dup *pnofmt =
01129 utf_utf2utf_unformatted_classname(clsname);
01130
01131 pcname = classpath_get_from_cp_entry_utf(pnofmt);
01132
01133 HEAP_FREE_DATA(pnofmt);
01134
01135 GENERIC_FAILURE1_THROWERROR((rnull == pcname),
01136 DMLNORM,
01137 "class_load_from_prchar",
01138 "Cannot locate class %s",
01139 clsname,
01140 EXIT_JVM_CLASS,
01141 JVMCLASS_JAVA_LANG_NOCLASSDEFFOUNDERROR,
01142 pcname,
01143 rnull);
01144
01145
01146
01147
01148
01149 if (rtrue == classpath_isjar(pcname))
01150 {
01151 pcfd = classfile_readjarfile(pcname);
01152 }
01153 else
01154 {
01155 pcfd = classfile_readclassfile(pcname);
01156 }
01157
01158 GENERIC_FAILURE1_THROWERROR((rnull == pcfd),
01159 DMLNORM,
01160 "class_load_from_prchar",
01161 "Cannot read file %s",
01162 pcname,
01163 EXIT_JVM_CLASS,
01164 JVMCLASS_JAVA_LANG_CLASSFORMATERROR,
01165 pcfd,
01166 pcname);
01167
01168
01169
01170
01171 pcfs = classfile_loadclassdata(pcfd);
01172
01173
01174 clsidx = class_static_new(CLASS_STATUS_EMPTY,
01175 pcfs,
01176 LOCAL_CONSTANT_NO_ARRAY_DIMS,
01177 (jint *) rnull,
01178 jvm_class_index_null);
01179
01180
01181 HEAP_FREE_DATA(pcfd);
01182
01183 GENERIC_FAILURE1_THROWERROR((rnull == pcfs),
01184 DMLNORM,
01185 "class_load_from_prchar",
01186 "Invalid class file %s",
01187 pcname,
01188 EXIT_JVM_CLASS,
01189 JVMCLASS_JAVA_LANG_CLASSFORMATERROR,
01190 pcname,
01191 rnull);
01192
01193
01194 HEAP_FREE_DATA(pcname);
01195
01196
01197
01198
01199
01200
01201
01202
01203
01204 if (jvm_class_index_null != pcfs->super_class)
01205 {
01206 CONSTANT_Utf8_info *name = PTR_CP1_CLASS_NAME(pcfs,
01207 pcfs->super_class);
01208
01209 rchar *super_name = utf_utf2prchar_classname(name);
01210
01211
01212
01213
01214
01215
01216
01217
01218
01219
01220
01221
01222
01223
01224
01225
01226 (rvoid) class_load_from_prchar(super_name,
01227 find_registerNatives,
01228 (jint *) rnull);
01229
01230
01231
01232
01233
01234 }
01235
01236
01237 CLASS(clsidx).status |= CLASS_STATUS_DOCLINIT;
01238
01239 }
01240
01241
01242 (rvoid) linkage_resolve_class(clsidx, find_registerNatives);
01243
01244
01245
01246
01247 return(clsidx);
01248
01249 }
01250
01251 }
01252
01253
01254 jvm_class_index class_load_from_prchar(rchar *clsname,
01255 rboolean find_registerNatives,
01256 jint *arraylength)
01257 {
01258 cp_info_dup *cp_clsname = nts_prchar2utf(clsname);
01259
01260 jvm_class_index clsidx =
01261 class_load_from_cp_entry_utf(cp_clsname,
01262 find_registerNatives,
01263 arraylength);
01264
01265 HEAP_FREE_DATA(cp_clsname);
01266
01267 return(clsidx);
01268
01269 }
01270
01271
01272 #if 0
01273
01274 jvm_class_index
01275 class_load_from_cp_entry_class(cp_info_dup *clsname,
01276 rboolean find_registerNatives,
01277 jint *arraylength)
01278 {
01279
01280 if (CONSTANT_Class != PTR_THIS_CP_Class(clsname)->tag)
01281 {
01282
01283 exit_throw_exception(EXIT_JVM_INTERNAL,
01284 JVMCLASS_JAVA_LANG_INTERNALERROR);
01285
01286 }
01287
01288 rchar *prchar_clsname =
01289 utf_utf2prchar(
01290 PTR_THIS_CP_Utf8(
01291 &pcfs->constant_pool
01292 [PTR_THIS_CP_Class(clsname)->name_index]));
01293
01294 jvm_class_index clsidx = class_load_from_prchar(prchar_clsname,
01295 find_registerNatives,
01296 arraylength);
01297
01298 HEAP_FREE_DATA(prchar_clsname);
01299
01300 return(clsidx);
01301
01302 }
01303 #endif
01304
01305
01306
01307
01308
01309
01310
01311
01312
01313
01314
01315
01316
01317
01318
01319
01320
01321
01322
01323
01324
01325
01326
01327
01328
01329
01330
01331
01332
01333
01334
01335
01336
01337
01338
01339
01340
01341
01342
01343
01344
01345
01346
01347
01348
01349
01350
01351
01352
01353
01354
01355
01356
01357
01358
01359
01360
01361
01362
01363
01364
01365
01366
01367
01368
01369
01370
01371
01372
01373
01374
01375
01376
01377
01378
01379
01380
01381 jvm_class_index class_load_resolve_clinit(rchar *clsname,
01382 jvm_thread_index thridx,
01383 rboolean usesystemthread,
01384 rboolean find_registerNatives)
01385 {
01386 jvm_class_index clsidx = class_load_from_prchar(clsname,
01387 find_registerNatives,
01388 (jint *) rnull);
01389
01390
01391
01392
01393
01394 (rvoid) linkage_resolve_class(clsidx, find_registerNatives);
01395
01396
01397
01398
01399
01400 if (CLASS_STATUS_CLINIT & CLASS(clsidx).status)
01401 {
01402 return(clsidx);
01403 }
01404
01405
01406
01407
01408
01409 jvm_method_index mthidx =
01410 method_find_by_prchar(clsidx,
01411 LOCAL_CONSTANT_UTF8_CLASS_CONSTRUCTOR,
01412 LOCAL_CONSTANT_UTF8_CLASS_CONSTRUCTOR_PARMS);
01413 if (jvm_method_index_bad == mthidx)
01414 {
01415
01416
01417
01418
01419 return(clsidx);
01420 }
01421 else
01422 {
01423 jvm_thread_index thridxLOAD;
01424
01425 if (jvm_thread_index_null != thridx)
01426 {
01427 thridxLOAD = thridx;
01428
01429
01430
01431
01432
01433
01434
01435 ClassFile *pcfs = CLASS_OBJECT_LINKAGE(clsidx)->pcfs;
01436
01437 jvm_attribute_index codeatridx =
01438 pcfs
01439 ->methods[mthidx]
01440 ->LOCAL_method_binding
01441 .codeatridxJVM;
01442
01443 if (jvm_attribute_index_bad == codeatridx)
01444 {
01445
01446
01447
01448
01449
01450
01451
01452
01453 return(clsidx);
01454 }
01455
01456 jvm_attribute_index excpatridx =
01457 pcfs
01458 ->methods[mthidx]
01459 ->LOCAL_method_binding
01460 .excpatridxJVM;
01461
01462 Code_attribute *pca =
01463 (Code_attribute *)
01464 &pcfs->methods[mthidx]->attributes[codeatridx]->ai;
01465
01466
01467 if (JVMCFG_MAX_SP <= GET_SP(thridx) +
01468 JVMREG_STACK_MIN_FRAME_HEIGHT +
01469 JVMREG_STACK_PC_HEIGHT +
01470 pca->max_stack +
01471 pca->max_locals)
01472 {
01473 exit_throw_exception(EXIT_JVM_CLASS,
01474 JVMCLASS_JAVA_LANG_OUTOFMEMORYERROR);
01475
01476 }
01477
01478
01479
01480
01481 PUSH_FRAME(thridx, pca->max_locals);
01482
01483
01484 PUT_PC_IMMEDIATE(thridx,
01485 clsidx,
01486 mthidx,
01487 codeatridx,
01488 excpatridx,
01489 CODE_CONSTRAINT_START_PC);
01490 }
01491 else
01492 {
01493
01494
01495
01496
01497
01498
01499
01500
01501
01502 thridxLOAD =
01503 thread_class_load(clsname,
01504 LOCAL_CONSTANT_UTF8_CLASS_CONSTRUCTOR,
01505 LOCAL_CONSTANT_UTF8_CLASS_CONSTRUCTOR_PARMS,
01506 THREAD_PRIORITY_MAX,
01507 rfalse,
01508 usesystemthread,
01509 find_registerNatives);
01510 }
01511
01512 jvm_manual_thread_run(thridxLOAD,
01513 ((rtrue == usesystemthread) ||
01514 (jvm_thread_index_null == thridx))
01515 ? rtrue
01516 : rfalse,
01517 clsname,
01518 LOCAL_CONSTANT_UTF8_CLASS_CONSTRUCTOR,
01519 LOCAL_CONSTANT_UTF8_CLASS_CONSTRUCTOR_PARMS);
01520
01521
01522 CLASS(clsidx).status &= ~CLASS_STATUS_DOCLINIT;
01523 CLASS(clsidx).status |= CLASS_STATUS_CLINIT;
01524
01525
01526
01527 return(clsidx);
01528 }
01529
01530 }
01531
01532
01533
01534
01535
01536
01537
01538
01539
01540
01541
01542
01543
01544
01545
01546
01547
01548
01549
01550
01551
01552
01553
01554
01555
01556
01557
01558
01559
01560
01561
01562
01563
01564
01565
01566
01567
01568
01569
01570
01571 static
01572 rvoid class_get_constant_field_attribute(jvm_class_index clsidx,
01573 ClassFile *pcfs,
01574 jvm_field_index fldidx,
01575 jvalue *field_data,
01576 jvm_field_lookup_index fluidx,
01577 rboolean staticmark,
01578 jvm_object_hash objhash)
01579 {
01580
01581 jvm_attribute_index atridx;
01582 for (atridx = 0;
01583 atridx < pcfs->fields[fldidx]->attributes_count;
01584 atridx++)
01585 {
01586 rulong *prl8;
01587 rdouble *prd8;
01588
01589 u4 *pu4, *pu4h, *pu4l;
01590 jint vali;
01591 jlong vall;
01592 jfloat valf;
01593 jdouble vald;
01594
01595 jvalue val;
01596
01597 jvm_constant_pool_index constantvalue_index;
01598
01599 switch (cfattrib_atr2enum(pcfs,
01600 pcfs->fields[fldidx]
01601 ->attributes[atridx]
01602 ->ai.attribute_name_index))
01603 {
01604 case LOCAL_SIGNATURE_ATTRIBUTE:
01605
01606 break;
01607
01608 case LOCAL_CONSTANTVALUE_ATTRIBUTE:
01609 constantvalue_index =
01610 ((ConstantValue_attribute *)
01611 &pcfs->fields[fldidx]->attributes[atridx]->ai)
01612 ->constantvalue_index;
01613
01614
01615 switch(CP_TAG(pcfs, constantvalue_index))
01616 {
01617 case CONSTANT_Long:
01618 pu4h = &PTR_CP_ENTRY_TYPE(
01619 CONSTANT_Long_info,
01620 pcfs,
01621 constantvalue_index)->high_bytes;
01622
01623 pu4l = &PTR_CP_ENTRY_TYPE(
01624 CONSTANT_Long_info,
01625 pcfs,
01626 constantvalue_index)->low_bytes;
01627
01628
01629
01630
01631
01632
01633
01634
01635
01636
01637
01638
01639
01640
01641
01642 prl8 = (rulong *) pu4h;
01643 vall = (jlong) GETRL8(prl8);
01644
01645 val._jlong = vall;
01646 break;
01647
01648 case CONSTANT_Float:
01649 pu4 = &PTR_CP_ENTRY_TYPE(
01650 CONSTANT_Float_info,
01651 pcfs,
01652 constantvalue_index)
01653 ->bytes;
01654
01655 valf = (jfloat) (jint) *pu4;
01656
01657 val._jfloat = valf;
01658 break;
01659
01660 case CONSTANT_Double:
01661 pu4h = &PTR_CP_ENTRY_TYPE(
01662 CONSTANT_Long_info,
01663 pcfs,
01664 constantvalue_index)->high_bytes;
01665 pu4l = &PTR_CP_ENTRY_TYPE(
01666 CONSTANT_Long_info,
01667 pcfs,
01668 constantvalue_index)->low_bytes;
01669
01670
01671
01672
01673
01674
01675
01676
01677
01678
01679
01680
01681
01682
01683
01684 prd8 = (rdouble *) pu4h;
01685 vald = (jdouble) GETRL8((rulong *) prd8);
01686
01687
01688 val._jdouble = vald;
01689 break;
01690
01691 case CONSTANT_Integer:
01692 pu4 = &PTR_CP_ENTRY_TYPE(
01693 CONSTANT_Integer_info,
01694 pcfs,
01695 constantvalue_index)
01696 ->bytes;
01697
01698 vali = (jint) *pu4;
01699
01700
01701
01702
01703
01704
01705
01706 val._jint = vali;
01707
01708 break;
01709
01710
01711 case CONSTANT_String:
01712
01713
01714
01715
01716
01717
01718
01719
01720
01721
01722
01723
01724
01725
01726
01727
01728
01729
01730
01731
01732
01733
01734
01735
01736
01737
01738
01739
01740
01741
01742
01743
01744
01745
01746
01747
01748
01749
01750
01751
01752
01753
01754
01755
01756
01757
01758
01759 if (rtrue == staticmark)
01760 {
01761 GC_CLASS_FIELD_MKREF(clsidx, fluidx);
01762 }
01763 else
01764 {
01765
01766
01767
01768
01769
01770 GC_OBJECT_FIELD_MKREF(objhash, fluidx);
01771 }
01772 break;
01773
01774 }
01775
01776
01777
01778 memcpy(&field_data[fluidx++], &val, sizeof(jvalue));
01779 break;
01780
01781
01782 case LOCAL_UNKNOWN_ATTRIBUTE:
01783 case LOCAL_CODE_ATTRIBUTE:
01784 case LOCAL_EXCEPTIONS_ATTRIBUTE:
01785 case LOCAL_INNERCLASSES_ATTRIBUTE:
01786 case LOCAL_ENCLOSINGMETHOD_ATTRIBUTE:
01787 case LOCAL_SYNTHETIC_ATTRIBUTE:
01788 case LOCAL_SOURCEFILE_ATTRIBUTE:
01789 case LOCAL_LINENUMBERTABLE_ATTRIBUTE:
01790 case LOCAL_LOCALVARIABLETABLE_ATTRIBUTE:
01791 case LOCAL_LOCALVARIABLETYPETABLE_ATTRIBUTE:
01792 case LOCAL_DEPRECATED_ATTRIBUTE:
01793 case LOCAL_RUNTIMEVISIBLEANNOTATIONS_ATTRIBUTE:
01794 case LOCAL_RUNTIMEINVISIBLEANNOTATIONS_ATTRIBUTE:
01795 case LOCAL_RUNTIMEVISIBLEPARAMETERANNOTATIONS_ATTRIBUTE:
01796 case LOCAL_RUNTIMEINVISIBLEPARAMETERANNOTATIONS_ATTRIBUTE:
01797 case LOCAL_ANNOTATIONDEFAULT_ATTRIBUTE:
01798 break;
01799 }
01800
01801 }
01802
01803 return;
01804
01805 }
01806
01807
01808
01809
01810
01811
01812
01813
01814
01815
01816
01817
01818 u2 class_get_num_static_fields(ClassFile *pcfs)
01819 {
01820 jvm_field_index fldidx;
01821 u2 rc = 0;
01822
01823 for (fldidx = 0; fldidx < pcfs->fields_count; fldidx++)
01824 {
01825 if (ACC_STATIC & pcfs->fields[fldidx]->access_flags)
01826 {
01827 rc++;
01828 }
01829 }
01830
01831 return(rc);
01832
01833 }
01834
01835
01836
01837
01838
01839
01840
01841
01842
01843
01844
01845
01846
01847
01848
01849
01850
01851
01852 jvm_field_index *class_get_static_field_lookups(ClassFile *pcfs)
01853 {
01854 u2 num_static_fields = class_get_num_static_fields(pcfs);
01855
01856
01857 if (0 == num_static_fields)
01858 {
01859 return((u2 *) rnull);
01860 }
01861
01862 u2 fldidx;
01863 u2 fluidx = 0;
01864 jvm_field_index *rc =
01865 HEAP_GET_DATA(sizeof(jvm_field_index) * num_static_fields,
01866 rfalse);
01867
01868 for (fldidx = 0; fldidx < pcfs->fields_count; fldidx++)
01869 {
01870 if (ACC_STATIC & pcfs->fields[fldidx]->access_flags)
01871 {
01872 rc[fluidx++] = fldidx;
01873 }
01874 }
01875
01876 return(rc);
01877
01878 }
01879
01880
01881
01882
01883
01884
01885
01886
01887
01888
01889
01890
01891
01892
01893
01894
01895
01896
01897
01898
01899 jvalue *class_get_static_field_data(jvm_class_index clsidx,
01900 ClassFile *pcfs)
01901 {
01902 u2 num_static_fields = class_get_num_static_fields(pcfs);
01903
01904
01905 if (0 == num_static_fields)
01906 {
01907 return((jvalue *) rnull);
01908 }
01909
01910 u2 fldidx;
01911 u2 fluidx = 0;
01912
01913
01914
01915
01916
01917
01918 jvalue *rc =HEAP_GET_DATA(sizeof(jvalue) * num_static_fields,rtrue);
01919
01920 for (fldidx = 0; fldidx < pcfs->fields_count; fldidx++)
01921 {
01922 if (ACC_STATIC & pcfs->fields[fldidx]->access_flags)
01923 {
01924 class_get_constant_field_attribute(clsidx,
01925 pcfs,
01926 fldidx,
01927 rc,
01928 fluidx,
01929 rtrue,
01930 jvm_object_hash_null);
01931
01932 fluidx++;
01933 }
01934 }
01935
01936 return(rc);
01937
01938 }
01939
01940
01941
01942
01943
01944
01945
01946
01947
01948
01949
01950
01951 u2 class_get_num_object_instance_fields(ClassFile *pcfs)
01952 {
01953 jvm_field_index fldidx;
01954 u2 rc = 0;
01955
01956 for (fldidx = 0; fldidx < pcfs->fields_count; fldidx++)
01957 {
01958 if (!(ACC_STATIC & pcfs->fields[fldidx]->access_flags))
01959 {
01960 rc++;
01961 }
01962 }
01963
01964 return(rc);
01965
01966 }
01967
01968
01969
01970
01971
01972
01973
01974
01975
01976
01977
01978
01979
01980
01981
01982
01983
01984
01985 jvm_field_index
01986 *class_get_object_instance_field_lookups(ClassFile *pcfs)
01987 {
01988 u2 num_instance_fields = class_get_num_object_instance_fields(pcfs);
01989
01990
01991 if (0 == num_instance_fields)
01992 {
01993 return((u2 *) rnull);
01994 }
01995
01996 u2 fldidx;
01997 u2 fluidx = 0;
01998 jvm_field_index *rc =
01999 HEAP_GET_DATA(sizeof(jvm_field_index) * num_instance_fields,
02000 rfalse);
02001
02002 for (fldidx = 0; fldidx < pcfs->fields_count; fldidx++)
02003 {
02004 if (!(ACC_STATIC & pcfs->fields[fldidx]->access_flags))
02005 {
02006 rc[fluidx++] = fldidx;
02007 }
02008 }
02009
02010 return(rc);
02011
02012 }
02013
02014
02015
02016
02017
02018
02019
02020
02021
02022
02023
02024
02025
02026
02027
02028
02029
02030
02031
02032
02033
02034
02035
02036
02037
02038
02039
02040
02041
02042 jvalue *class_get_object_instance_field_data(jvm_class_index clsidx,
02043 jvm_object_hash objhash,
02044 ClassFile *pcfs)
02045 {
02046 u2 num_object_instance_fields =
02047 class_get_num_object_instance_fields(pcfs);
02048
02049
02050 if (0 == num_object_instance_fields)
02051 {
02052 return((jvalue *) rnull);
02053 }
02054
02055 u2 fldidx;
02056 u2 fluidx = 0;
02057
02058
02059
02060
02061
02062
02063 jvalue *rc =
02064 HEAP_GET_DATA(sizeof(jvalue) * num_object_instance_fields,rtrue);
02065
02066 for (fldidx = 0; fldidx < pcfs->fields_count; fldidx++)
02067 {
02068 if (!(ACC_STATIC & pcfs->fields[fldidx]->access_flags))
02069 {
02070 class_get_constant_field_attribute(clsidx,
02071 pcfs,
02072 fldidx,
02073 rc,
02074 fluidx,
02075 rfalse,
02076 objhash);
02077 fluidx++;
02078 }
02079 }
02080
02081 return(rc);
02082
02083 }
02084
02085
02086
02087
02088
02089
02090
02091
02092
02093
02094
02095
02096
02097
02098
02099
02100
02101
02102
02103
02104
02105
02106
02107
02108
02109 rvoid class_shutdown_1()
02110 {
02111 jvm_class_index clsidx;
02112
02113 for (clsidx = jvm_class_index_null;
02114 clsidx < JVMCFG_MAX_CLASSES;
02115 clsidx++)
02116 {
02117 if (CLASS(clsidx).status & CLASS_STATUS_INUSE)
02118 {
02119 if (!(CLASS(clsidx).status & CLASS_STATUS_NULL))
02120 {
02121 (rvoid) GC_CLASS_RMREF_FROM_CLASS(
02122 clsidx,
02123 CLASS(clsidx).lower_dim_array);
02124
02125 (rvoid) GC_OBJECT_RMREF_FROM_CLASS(
02126 clsidx,
02127 CLASS(clsidx).class_objhash);
02128
02129 (rvoid) GC_CLASS_RMREF_FROM_CLASS(
02130 clsidx,
02131 CLASS(clsidx).initiating_ClassLoader);
02132
02133 (rvoid) GC_CLASS_RMREF_FROM_CLASS(
02134 clsidx,
02135 CLASS(clsidx).defining_ClassLoader);
02136 }
02137
02138 (rvoid) GC_CLASS_RMREF_FROM_CLASS(jvm_class_index_null,
02139 clsidx);
02140 }
02141 }
02142
02143
02144 GC_RUN(rfalse);
02145
02146 return;
02147
02148 }
02149
02150
02151 rvoid class_shutdown_2()
02152 {
02153 jvm_class_index clsidx;
02154
02155 for (clsidx = jvm_class_index_null;
02156 clsidx < JVMCFG_MAX_CLASSES;
02157 clsidx++)
02158 {
02159 if (CLASS(clsidx).status & CLASS_STATUS_INUSE)
02160 {
02161 (rvoid) class_static_delete(clsidx, rfalse);
02162 }
02163 }
02164
02165
02166 jvm_class_initialized = rfalse;
02167
02168
02169 GC_RUN(rfalse);
02170
02171 return;
02172
02173 }
02174
02175
02176
02177