OLD | NEW |
1 // Copyright 2012 the V8 project authors. All rights reserved. | 1 // Copyright 2012 the V8 project authors. All rights reserved. |
2 // Use of this source code is governed by a BSD-style license that can be | 2 // Use of this source code is governed by a BSD-style license that can be |
3 // found in the LICENSE file. | 3 // found in the LICENSE file. |
4 | 4 |
5 #if V8_TARGET_ARCH_IA32 | 5 #if V8_TARGET_ARCH_IA32 |
6 | 6 |
7 #include "src/code-stubs.h" | 7 #include "src/code-stubs.h" |
8 #include "src/api-arguments.h" | 8 #include "src/api-arguments.h" |
9 #include "src/base/bits.h" | 9 #include "src/base/bits.h" |
10 #include "src/bootstrapper.h" | 10 #include "src/bootstrapper.h" |
(...skipping 758 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
769 STATIC_ASSERT(kSmiTagSize + kSmiShiftSize == 1); | 769 STATIC_ASSERT(kSmiTagSize + kSmiShiftSize == 1); |
770 STATIC_ASSERT(Isolate::kJSRegexpStaticOffsetsVectorSize >= 2); | 770 STATIC_ASSERT(Isolate::kJSRegexpStaticOffsetsVectorSize >= 2); |
771 __ cmp(edx, Isolate::kJSRegexpStaticOffsetsVectorSize - 2); | 771 __ cmp(edx, Isolate::kJSRegexpStaticOffsetsVectorSize - 2); |
772 __ j(above, &runtime); | 772 __ j(above, &runtime); |
773 | 773 |
774 // Reset offset for possibly sliced string. | 774 // Reset offset for possibly sliced string. |
775 __ Move(edi, Immediate(0)); | 775 __ Move(edi, Immediate(0)); |
776 __ mov(eax, Operand(esp, kSubjectOffset)); | 776 __ mov(eax, Operand(esp, kSubjectOffset)); |
777 __ JumpIfSmi(eax, &runtime); | 777 __ JumpIfSmi(eax, &runtime); |
778 __ mov(edx, eax); // Make a copy of the original subject string. | 778 __ mov(edx, eax); // Make a copy of the original subject string. |
779 __ mov(ebx, FieldOperand(eax, HeapObject::kMapOffset)); | |
780 __ movzx_b(ebx, FieldOperand(ebx, Map::kInstanceTypeOffset)); | |
781 | 779 |
782 // eax: subject string | 780 // eax: subject string |
783 // edx: subject string | 781 // edx: subject string |
784 // ebx: subject string instance type | |
785 // ecx: RegExp data (FixedArray) | 782 // ecx: RegExp data (FixedArray) |
786 // Handle subject string according to its encoding and representation: | 783 // Handle subject string according to its encoding and representation: |
787 // (1) Sequential two byte? If yes, go to (9). | 784 // (1) Sequential two byte? If yes, go to (9). |
788 // (2) Sequential one byte? If yes, go to (6). | 785 // (2) Sequential one byte? If yes, go to (5). |
789 // (3) Anything but sequential or cons? If yes, go to (7). | 786 // (3) Sequential or cons? If not, go to (6). |
790 // (4) Cons string. If the string is flat, replace subject with first string. | 787 // (4) Cons string. If the string is flat, replace subject with first string |
791 // Otherwise bailout. | 788 // and go to (1). Otherwise bail out to runtime. |
792 // (5a) Is subject sequential two byte? If yes, go to (9). | 789 // (5) One byte sequential. Load regexp code for one byte. |
793 // (5b) Is subject external? If yes, go to (8). | |
794 // (6) One byte sequential. Load regexp code for one byte. | |
795 // (E) Carry on. | 790 // (E) Carry on. |
796 /// [...] | 791 /// [...] |
797 | 792 |
798 // Deferred code at the end of the stub: | 793 // Deferred code at the end of the stub: |
799 // (7) Not a long external string? If yes, go to (10). | 794 // (6) Long external string? If not, go to (10). |
800 // (8) External string. Make it, offset-wise, look like a sequential string. | 795 // (7) External string. Make it, offset-wise, look like a sequential string. |
801 // (8a) Is the external string one byte? If yes, go to (6). | 796 // (8) Is the external string one byte? If yes, go to (5). |
802 // (9) Two byte sequential. Load regexp code for one byte. Go to (E). | 797 // (9) Two byte sequential. Load regexp code for two byte. Go to (E). |
803 // (10) Short external string or not a string? If yes, bail out to runtime. | 798 // (10) Short external string or not a string? If yes, bail out to runtime. |
804 // (11) Sliced string. Replace subject with parent. Go to (5a). | 799 // (11) Sliced string. Replace subject with parent. Go to (1). |
805 | 800 |
806 Label seq_one_byte_string /* 6 */, seq_two_byte_string /* 9 */, | 801 Label seq_one_byte_string /* 5 */, seq_two_byte_string /* 9 */, |
807 external_string /* 8 */, check_underlying /* 5a */, | 802 external_string /* 7 */, check_underlying /* 1 */, |
808 not_seq_nor_cons /* 7 */, check_code /* E */, | 803 not_seq_nor_cons /* 6 */, check_code /* E */, not_long_external /* 10 */; |
809 not_long_external /* 10 */; | |
810 | 804 |
| 805 __ bind(&check_underlying); |
811 // (1) Sequential two byte? If yes, go to (9). | 806 // (1) Sequential two byte? If yes, go to (9). |
| 807 __ mov(ebx, FieldOperand(eax, HeapObject::kMapOffset)); |
| 808 __ movzx_b(ebx, FieldOperand(ebx, Map::kInstanceTypeOffset)); |
| 809 |
812 __ and_(ebx, kIsNotStringMask | | 810 __ and_(ebx, kIsNotStringMask | |
813 kStringRepresentationMask | | 811 kStringRepresentationMask | |
814 kStringEncodingMask | | 812 kStringEncodingMask | |
815 kShortExternalStringMask); | 813 kShortExternalStringMask); |
816 STATIC_ASSERT((kStringTag | kSeqStringTag | kTwoByteStringTag) == 0); | 814 STATIC_ASSERT((kStringTag | kSeqStringTag | kTwoByteStringTag) == 0); |
817 __ j(zero, &seq_two_byte_string); // Go to (9). | 815 __ j(zero, &seq_two_byte_string); // Go to (9). |
818 | 816 |
819 // (2) Sequential one byte? If yes, go to (6). | 817 // (2) Sequential one byte? If yes, go to (5). |
820 // Any other sequential string must be one byte. | 818 // Any other sequential string must be one byte. |
821 __ and_(ebx, Immediate(kIsNotStringMask | | 819 __ and_(ebx, Immediate(kIsNotStringMask | |
822 kStringRepresentationMask | | 820 kStringRepresentationMask | |
823 kShortExternalStringMask)); | 821 kShortExternalStringMask)); |
824 __ j(zero, &seq_one_byte_string, Label::kNear); // Go to (6). | 822 __ j(zero, &seq_one_byte_string, Label::kNear); // Go to (5). |
825 | 823 |
826 // (3) Anything but sequential or cons? If yes, go to (7). | 824 // (3) Sequential or cons? If not, go to (6). |
827 // We check whether the subject string is a cons, since sequential strings | 825 // We check whether the subject string is a cons, since sequential strings |
828 // have already been covered. | 826 // have already been covered. |
829 STATIC_ASSERT(kConsStringTag < kExternalStringTag); | 827 STATIC_ASSERT(kConsStringTag < kExternalStringTag); |
830 STATIC_ASSERT(kSlicedStringTag > kExternalStringTag); | 828 STATIC_ASSERT(kSlicedStringTag > kExternalStringTag); |
831 STATIC_ASSERT(kIsNotStringMask > kExternalStringTag); | 829 STATIC_ASSERT(kIsNotStringMask > kExternalStringTag); |
832 STATIC_ASSERT(kShortExternalStringTag > kExternalStringTag); | 830 STATIC_ASSERT(kShortExternalStringTag > kExternalStringTag); |
833 __ cmp(ebx, Immediate(kExternalStringTag)); | 831 __ cmp(ebx, Immediate(kExternalStringTag)); |
834 __ j(greater_equal, ¬_seq_nor_cons); // Go to (7). | 832 __ j(greater_equal, ¬_seq_nor_cons); // Go to (6). |
835 | 833 |
836 // (4) Cons string. Check that it's flat. | 834 // (4) Cons string. Check that it's flat. |
837 // Replace subject with first string and reload instance type. | 835 // Replace subject with first string and reload instance type. |
838 __ cmp(FieldOperand(eax, ConsString::kSecondOffset), factory->empty_string()); | 836 __ cmp(FieldOperand(eax, ConsString::kSecondOffset), factory->empty_string()); |
839 __ j(not_equal, &runtime); | 837 __ j(not_equal, &runtime); |
840 __ mov(eax, FieldOperand(eax, ConsString::kFirstOffset)); | 838 __ mov(eax, FieldOperand(eax, ConsString::kFirstOffset)); |
841 __ bind(&check_underlying); | 839 __ jmp(&check_underlying); |
842 __ mov(ebx, FieldOperand(eax, HeapObject::kMapOffset)); | |
843 __ mov(ebx, FieldOperand(ebx, Map::kInstanceTypeOffset)); | |
844 | |
845 // (5a) Is subject sequential two byte? If yes, go to (9). | |
846 __ test_b(ebx, Immediate(kStringRepresentationMask | kStringEncodingMask)); | |
847 STATIC_ASSERT((kSeqStringTag | kTwoByteStringTag) == 0); | |
848 __ j(zero, &seq_two_byte_string); // Go to (9). | |
849 // (5b) Is subject external? If yes, go to (8). | |
850 __ test_b(ebx, Immediate(kStringRepresentationMask)); | |
851 // The underlying external string is never a short external string. | |
852 STATIC_ASSERT(ExternalString::kMaxShortLength < ConsString::kMinLength); | |
853 STATIC_ASSERT(ExternalString::kMaxShortLength < SlicedString::kMinLength); | |
854 __ j(not_zero, &external_string); // Go to (8). | |
855 | 840 |
856 // eax: sequential subject string (or look-alike, external string) | 841 // eax: sequential subject string (or look-alike, external string) |
857 // edx: original subject string | 842 // edx: original subject string |
858 // ecx: RegExp data (FixedArray) | 843 // ecx: RegExp data (FixedArray) |
859 // (6) One byte sequential. Load regexp code for one byte. | 844 // (5) One byte sequential. Load regexp code for one byte. |
860 __ bind(&seq_one_byte_string); | 845 __ bind(&seq_one_byte_string); |
861 // Load previous index and check range before edx is overwritten. We have | 846 // Load previous index and check range before edx is overwritten. We have |
862 // to use edx instead of eax here because it might have been only made to | 847 // to use edx instead of eax here because it might have been only made to |
863 // look like a sequential string when it actually is an external string. | 848 // look like a sequential string when it actually is an external string. |
864 __ mov(ebx, Operand(esp, kPreviousIndexOffset)); | 849 __ mov(ebx, Operand(esp, kPreviousIndexOffset)); |
865 __ JumpIfNotSmi(ebx, &runtime); | 850 __ JumpIfNotSmi(ebx, &runtime); |
866 __ cmp(ebx, FieldOperand(edx, String::kLengthOffset)); | 851 __ cmp(ebx, FieldOperand(edx, String::kLengthOffset)); |
867 __ j(above_equal, &runtime); | 852 __ j(above_equal, &runtime); |
868 __ mov(edx, FieldOperand(ecx, JSRegExp::kDataOneByteCodeOffset)); | 853 __ mov(edx, FieldOperand(ecx, JSRegExp::kDataOneByteCodeOffset)); |
869 __ Move(ecx, Immediate(1)); // Type is one byte. | 854 __ Move(ecx, Immediate(1)); // Type is one byte. |
(...skipping 206 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1076 | 1061 |
1077 // Return last match info. | 1062 // Return last match info. |
1078 __ mov(eax, Operand(esp, kLastMatchInfoOffset)); | 1063 __ mov(eax, Operand(esp, kLastMatchInfoOffset)); |
1079 __ ret(4 * kPointerSize); | 1064 __ ret(4 * kPointerSize); |
1080 | 1065 |
1081 // Do the runtime call to execute the regexp. | 1066 // Do the runtime call to execute the regexp. |
1082 __ bind(&runtime); | 1067 __ bind(&runtime); |
1083 __ TailCallRuntime(Runtime::kRegExpExec); | 1068 __ TailCallRuntime(Runtime::kRegExpExec); |
1084 | 1069 |
1085 // Deferred code for string handling. | 1070 // Deferred code for string handling. |
1086 // (7) Not a long external string? If yes, go to (10). | 1071 // (6) Long external string? If not, go to (10). |
1087 __ bind(¬_seq_nor_cons); | 1072 __ bind(¬_seq_nor_cons); |
1088 // Compare flags are still set from (3). | 1073 // Compare flags are still set from (3). |
1089 __ j(greater, ¬_long_external, Label::kNear); // Go to (10). | 1074 __ j(greater, ¬_long_external, Label::kNear); // Go to (10). |
1090 | 1075 |
1091 // (8) External string. Short external strings have been ruled out. | 1076 // (7) External string. Short external strings have been ruled out. |
1092 __ bind(&external_string); | 1077 __ bind(&external_string); |
1093 // Reload instance type. | 1078 // Reload instance type. |
1094 __ mov(ebx, FieldOperand(eax, HeapObject::kMapOffset)); | 1079 __ mov(ebx, FieldOperand(eax, HeapObject::kMapOffset)); |
1095 __ movzx_b(ebx, FieldOperand(ebx, Map::kInstanceTypeOffset)); | 1080 __ movzx_b(ebx, FieldOperand(ebx, Map::kInstanceTypeOffset)); |
1096 if (FLAG_debug_code) { | 1081 if (FLAG_debug_code) { |
1097 // Assert that we do not have a cons or slice (indirect strings) here. | 1082 // Assert that we do not have a cons or slice (indirect strings) here. |
1098 // Sequential strings have already been ruled out. | 1083 // Sequential strings have already been ruled out. |
1099 __ test_b(ebx, Immediate(kIsIndirectStringMask)); | 1084 __ test_b(ebx, Immediate(kIsIndirectStringMask)); |
1100 __ Assert(zero, kExternalStringExpectedButNotFound); | 1085 __ Assert(zero, kExternalStringExpectedButNotFound); |
1101 } | 1086 } |
1102 __ mov(eax, FieldOperand(eax, ExternalString::kResourceDataOffset)); | 1087 __ mov(eax, FieldOperand(eax, ExternalString::kResourceDataOffset)); |
1103 // Move the pointer so that offset-wise, it looks like a sequential string. | 1088 // Move the pointer so that offset-wise, it looks like a sequential string. |
1104 STATIC_ASSERT(SeqTwoByteString::kHeaderSize == SeqOneByteString::kHeaderSize); | 1089 STATIC_ASSERT(SeqTwoByteString::kHeaderSize == SeqOneByteString::kHeaderSize); |
1105 __ sub(eax, Immediate(SeqTwoByteString::kHeaderSize - kHeapObjectTag)); | 1090 __ sub(eax, Immediate(SeqTwoByteString::kHeaderSize - kHeapObjectTag)); |
1106 STATIC_ASSERT(kTwoByteStringTag == 0); | 1091 STATIC_ASSERT(kTwoByteStringTag == 0); |
1107 // (8a) Is the external string one byte? If yes, go to (6). | 1092 // (8) Is the external string one byte? If yes, go to (5). |
1108 __ test_b(ebx, Immediate(kStringEncodingMask)); | 1093 __ test_b(ebx, Immediate(kStringEncodingMask)); |
1109 __ j(not_zero, &seq_one_byte_string); // Goto (6). | 1094 __ j(not_zero, &seq_one_byte_string); // Go to (5). |
1110 | 1095 |
1111 // eax: sequential subject string (or look-alike, external string) | 1096 // eax: sequential subject string (or look-alike, external string) |
1112 // edx: original subject string | 1097 // edx: original subject string |
1113 // ecx: RegExp data (FixedArray) | 1098 // ecx: RegExp data (FixedArray) |
1114 // (9) Two byte sequential. Load regexp code for one byte. Go to (E). | 1099 // (9) Two byte sequential. Load regexp code for two byte. Go to (E). |
1115 __ bind(&seq_two_byte_string); | 1100 __ bind(&seq_two_byte_string); |
1116 // Load previous index and check range before edx is overwritten. We have | 1101 // Load previous index and check range before edx is overwritten. We have |
1117 // to use edx instead of eax here because it might have been only made to | 1102 // to use edx instead of eax here because it might have been only made to |
1118 // look like a sequential string when it actually is an external string. | 1103 // look like a sequential string when it actually is an external string. |
1119 __ mov(ebx, Operand(esp, kPreviousIndexOffset)); | 1104 __ mov(ebx, Operand(esp, kPreviousIndexOffset)); |
1120 __ JumpIfNotSmi(ebx, &runtime); | 1105 __ JumpIfNotSmi(ebx, &runtime); |
1121 __ cmp(ebx, FieldOperand(edx, String::kLengthOffset)); | 1106 __ cmp(ebx, FieldOperand(edx, String::kLengthOffset)); |
1122 __ j(above_equal, &runtime); | 1107 __ j(above_equal, &runtime); |
1123 __ mov(edx, FieldOperand(ecx, JSRegExp::kDataUC16CodeOffset)); | 1108 __ mov(edx, FieldOperand(ecx, JSRegExp::kDataUC16CodeOffset)); |
1124 __ Move(ecx, Immediate(0)); // Type is two byte. | 1109 __ Move(ecx, Immediate(0)); // Type is two byte. |
1125 __ jmp(&check_code); // Go to (E). | 1110 __ jmp(&check_code); // Go to (E). |
1126 | 1111 |
1127 // (10) Not a string or a short external string? If yes, bail out to runtime. | 1112 // (10) Not a string or a short external string? If yes, bail out to runtime. |
1128 __ bind(¬_long_external); | 1113 __ bind(¬_long_external); |
1129 // Catch non-string subject or short external string. | 1114 // Catch non-string subject or short external string. |
1130 STATIC_ASSERT(kNotStringTag != 0 && kShortExternalStringTag !=0); | 1115 STATIC_ASSERT(kNotStringTag != 0 && kShortExternalStringTag !=0); |
1131 __ test(ebx, Immediate(kIsNotStringMask | kShortExternalStringTag)); | 1116 __ test(ebx, Immediate(kIsNotStringMask | kShortExternalStringTag)); |
1132 __ j(not_zero, &runtime); | 1117 __ j(not_zero, &runtime); |
1133 | 1118 |
1134 // (11) Sliced string. Replace subject with parent. Go to (5a). | 1119 // (11) Sliced string. Replace subject with parent. Go to (1). |
1135 // Load offset into edi and replace subject string with parent. | 1120 // Load offset into edi and replace subject string with parent. |
1136 __ mov(edi, FieldOperand(eax, SlicedString::kOffsetOffset)); | 1121 __ mov(edi, FieldOperand(eax, SlicedString::kOffsetOffset)); |
1137 __ mov(eax, FieldOperand(eax, SlicedString::kParentOffset)); | 1122 __ mov(eax, FieldOperand(eax, SlicedString::kParentOffset)); |
1138 __ jmp(&check_underlying); // Go to (5a). | 1123 __ jmp(&check_underlying); // Go to (1). |
1139 #endif // V8_INTERPRETED_REGEXP | 1124 #endif // V8_INTERPRETED_REGEXP |
1140 } | 1125 } |
1141 | 1126 |
1142 | 1127 |
1143 static int NegativeComparisonResult(Condition cc) { | 1128 static int NegativeComparisonResult(Condition cc) { |
1144 DCHECK(cc != equal); | 1129 DCHECK(cc != equal); |
1145 DCHECK((cc == less) || (cc == less_equal) | 1130 DCHECK((cc == less) || (cc == less_equal) |
1146 || (cc == greater) || (cc == greater_equal)); | 1131 || (cc == greater) || (cc == greater_equal)); |
1147 return (cc == greater || cc == greater_equal) ? LESS : GREATER; | 1132 return (cc == greater || cc == greater_equal) ? LESS : GREATER; |
1148 } | 1133 } |
(...skipping 4712 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
5861 kStackUnwindSpace, nullptr, return_value_operand, | 5846 kStackUnwindSpace, nullptr, return_value_operand, |
5862 NULL); | 5847 NULL); |
5863 } | 5848 } |
5864 | 5849 |
5865 #undef __ | 5850 #undef __ |
5866 | 5851 |
5867 } // namespace internal | 5852 } // namespace internal |
5868 } // namespace v8 | 5853 } // namespace v8 |
5869 | 5854 |
5870 #endif // V8_TARGET_ARCH_IA32 | 5855 #endif // V8_TARGET_ARCH_IA32 |
OLD | NEW |