86 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			JavaScript
		
	
	
	
	
	
			
		
		
	
	
			86 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			JavaScript
		
	
	
	
	
	
| 'use strict';
 | |
| 
 | |
| var GetIntrinsic = require('../GetIntrinsic');
 | |
| 
 | |
| var $RangeError = GetIntrinsic('%RangeError%');
 | |
| var $TypeError = GetIntrinsic('%TypeError%');
 | |
| 
 | |
| var assign = require('object.assign');
 | |
| 
 | |
| var isPropertyDescriptor = require('../helpers/isPropertyDescriptor');
 | |
| 
 | |
| var IsArray = require('./IsArray');
 | |
| var IsAccessorDescriptor = require('./IsAccessorDescriptor');
 | |
| var IsDataDescriptor = require('./IsDataDescriptor');
 | |
| var OrdinaryDefineOwnProperty = require('./OrdinaryDefineOwnProperty');
 | |
| var OrdinaryGetOwnProperty = require('./OrdinaryGetOwnProperty');
 | |
| var ToNumber = require('./ToNumber');
 | |
| var ToString = require('./ToString');
 | |
| var ToUint32 = require('./ToUint32');
 | |
| var Type = require('./Type');
 | |
| 
 | |
| // https://www.ecma-international.org/ecma-262/6.0/#sec-arraysetlength
 | |
| 
 | |
| // eslint-disable-next-line max-statements, max-lines-per-function
 | |
| module.exports = function ArraySetLength(A, Desc) {
 | |
| 	if (!IsArray(A)) {
 | |
| 		throw new $TypeError('Assertion failed: A must be an Array');
 | |
| 	}
 | |
| 	if (!isPropertyDescriptor({
 | |
| 		Type: Type,
 | |
| 		IsDataDescriptor: IsDataDescriptor,
 | |
| 		IsAccessorDescriptor: IsAccessorDescriptor
 | |
| 	}, Desc)) {
 | |
| 		throw new $TypeError('Assertion failed: Desc must be a Property Descriptor');
 | |
| 	}
 | |
| 	if (!('[[Value]]' in Desc)) {
 | |
| 		return OrdinaryDefineOwnProperty(A, 'length', Desc);
 | |
| 	}
 | |
| 	var newLenDesc = assign({}, Desc);
 | |
| 	var newLen = ToUint32(Desc['[[Value]]']);
 | |
| 	var numberLen = ToNumber(Desc['[[Value]]']);
 | |
| 	if (newLen !== numberLen) {
 | |
| 		throw new $RangeError('Invalid array length');
 | |
| 	}
 | |
| 	newLenDesc['[[Value]]'] = newLen;
 | |
| 	var oldLenDesc = OrdinaryGetOwnProperty(A, 'length');
 | |
| 	if (!IsDataDescriptor(oldLenDesc)) {
 | |
| 		throw new $TypeError('Assertion failed: an array had a non-data descriptor on `length`');
 | |
| 	}
 | |
| 	var oldLen = oldLenDesc['[[Value]]'];
 | |
| 	if (newLen >= oldLen) {
 | |
| 		return OrdinaryDefineOwnProperty(A, 'length', newLenDesc);
 | |
| 	}
 | |
| 	if (!oldLenDesc['[[Writable]]']) {
 | |
| 		return false;
 | |
| 	}
 | |
| 	var newWritable;
 | |
| 	if (!('[[Writable]]' in newLenDesc) || newLenDesc['[[Writable]]']) {
 | |
| 		newWritable = true;
 | |
| 	} else {
 | |
| 		newWritable = false;
 | |
| 		newLenDesc['[[Writable]]'] = true;
 | |
| 	}
 | |
| 	var succeeded = OrdinaryDefineOwnProperty(A, 'length', newLenDesc);
 | |
| 	if (!succeeded) {
 | |
| 		return false;
 | |
| 	}
 | |
| 	while (newLen < oldLen) {
 | |
| 		oldLen -= 1;
 | |
| 		// eslint-disable-next-line no-param-reassign
 | |
| 		var deleteSucceeded = delete A[ToString(oldLen)];
 | |
| 		if (!deleteSucceeded) {
 | |
| 			newLenDesc['[[Value]]'] = oldLen + 1;
 | |
| 			if (!newWritable) {
 | |
| 				newLenDesc['[[Writable]]'] = false;
 | |
| 				OrdinaryDefineOwnProperty(A, 'length', newLenDesc);
 | |
| 				return false;
 | |
| 			}
 | |
| 		}
 | |
| 	}
 | |
| 	if (!newWritable) {
 | |
| 		return OrdinaryDefineOwnProperty(A, 'length', { '[[Writable]]': false });
 | |
| 	}
 | |
| 	return true;
 | |
| };
 |