F$ғr8E$2^tg+U4C#Y^` G# &:)!w%႔omL JFAvI(8Itx|$arn.4bZZ33]T.0 a#D<>R$hW6l)؞a7\mnmlxa.޹Mlë QXsPXFEq)":\db'mRo6Pma%Faq)iJegc=}Zj+׼@9.pOĒ6Ϣk&zO7RO!i/X}+\~/jQiiS-=IU,cwMɕ|̚d 't65.іr*ur`rrʆj* :~S.btabjv/fYo0{E @iot9^ҁ|CM(# 'H(@ӣBW p0Vv͟Ԣ%W $I)0AzT*ä"K|JHLm-QDgT~#=K$W#:h%c#Η/e&+(ɋljpuK&\U"#U ^۰s3t,{Z۸> (j|܊pOst  d` 䭁ŕ*dpA7IT*Tԝq>lUy|NJ0/Xz*K\HTQn"䕌I: l8 ݕ8֣9PD3geRO5blQi鸒)Zl >/͆incJ)CMxL2뷊4 WӪq}0+OǞ;#P Jқ3%+k=,hwzZ$qC $RʛrF9 $bR^ "SƠL"Fx z-i q 7:>B'p{~,F"0tq% 2  R"_aoDD2fSl7Rm`>̀(ZQwqĘ4>.'Ew,{$ 8Y@a5_k&uEuA I !G]|M&k$v@UJMz Ӟ qٓ55c0) ( <;l溯#vmY\^2 u8M>^SYqS+_:OSR9 'f*_.[1HI#LH38ku%8ڄm !0T +G+6\#1颬@E(0  ,z/%yj%z8TG%?(9, ?3Ns!D (/J A s1GЀCJPyb 7MW4eGEld~/ 1rAG-;2dP !H$!_6Hǐ RdYI0e,[2HVE3V&we1GKpDBS(G cO(;ܗ˿je~{j8\:]as H4vƻndr"1al43aB#(#x/d8*' eżH-Ѹ X5p eH Rx \QgALi=D,U2#8PKR@DŽtY@Ƥ!= 2;3Q!5S IWĒ7Cn0SS;LIkmfz@LᧂHFjYV9ZWAf9M.GR~]7_+Y?,JE; P]:o ٦9(` `(W갈mE# `n hVLJjej־g jȁYĄ̹BULK5maDkpYKʌG 2wEq[@P,'f֥Kd5Rhpr%YTC\+a:ΧwN4܉T!i݌)kAyDaUk!1`\yT ֶiCyQ7#aD̥ѪZtbU%<3s?GJ||uI]w*\kc5Zץ'ALLh, L $f$L]+Pr ; 'YpRM1ـ& pEn"24ET5LAfK6NV X6F֖;ԋ5 L ;/2҈4׎Cqz(4/|3MvrfVB\#؜rJSvUSln%zJ~RjWo+q7zc\z|Nk-Rۻ5CyKRRWqF$jTHUઌv/j v/ 7z;*zXF#pR-9C\[zjz$5/!jU"%R{WiF8U+Zww}+򎽏7&չjW=__w6u4tK@ (ʒ@H% &8}A Wx|DChHJV|B_DuZk;LB>bHTJRFм-ltBR)߭L,jZC#y `dIes4fq/brcg+irS/`.tG$>}Sn0{v"-ghig,w>cޒi=콾֏gi_v]5&x%v1gkbDӠ CA`;)zk/׆B6@.ItWi(:^T>T .ONP28E]m&7UdZbgȻ-SB~!&Q`Po#X.H̐8HO+ArEC aPG\LO OX<.|ݭay M8T) Lnڌ)^h(ٕ׺}QՉi~v1Y:鶇^ NMt*sC`5S<280БATCP0A8t $(!( !qv\[KF,ݩsDUVT@XRE'EC ʡy@̚%h*-ʙ})l =`b6C]vp{yck7_ƣL+ RE"Z&D.(P K TkLds/mQW_iu!NXH-"%kkxV-^Mֺfi0Y=")UVe@9V@ ȥmEi$YdlH`)0ahkgUdS3~NYOj]A'D>(aܺB5P:eBF)$RS}>ԛK0+DQ)xYN0:ó2\JZ?-(JZO\,.9ob*LǺ#LF${5d,fػ,1,<}1{$r'0-(Ęf a7EH `Lp#Q8ffz^!5?=m7 zJO]RN"XNebsÁǑRw=e|,Ƣx# FZ!N==H`G/[(2ۃi;4NiJDY-$0$YQ]&8*qHj9q|'´pUɒ BB IJ BR "w?| 1$2x9tR!f<:gECivknB]Nf!J'vL:[ڪJ#kӅИzU DjEh&<58מfCI|DcC q)4u2>t(IcE?T2w>8R*8~+T#C ӁAe0]2ؓCby܌ D% [CNSDQ,͘hd 0fя0nۍ=&ӝeL0I/mtch)ǹakLZ*yQ{(D$5mh6t1#mtXhܘrWI̦u;0qv-a - ){z@,!=/ MQOZ^}`9C^wϕ+}]$krD" aD*qEQYl8CagQ&umӝYA p2&&F6v:W, Oꮥϱ]H/LBL2Sq5j%"l !P0(ddfOw *ЭR LZ05t0lA*eDe(A FY:i#0(e(9B'$g`d AQ`B' &xA@_@8Q p`-` ##P"u%RK IN3nS tɥq/e~U1ko[\ ~?ַ+瞱֫Sȹ]ujK!\` x@ c!& j& j44zHA $k <ոԡ7&@DnЌ%9T<  $a΂8 &y„%6$C,  sLp8}Le"0$ftԲg>zI5&U[ǹ~RL լ5r˖2mw.] j ;Hing set to the file to check. * @param $directory A string where the file should be located. * @return 0 for invalid path or the real path of the source. */ function file_check_location($source, $directory = '') { $check = realpath($source); if ($check) { $source = $check; } else { // This file does not yet exist $source = realpath(dirname($source)) .'/'. basename($source); } $directory = realpath($directory); if ($directory && strpos($source, $directory) !== 0) { return 0; } return $source; } /** * Copies a file to a new location. * * This is a powerful function that in many ways performs like an advanced * version of copy(). * - Checks if $source and $dest are valid and readable/writable. * - Performs a file copy if $source is not equal to $dest. * - If file already exists in $dest either the call will error out, replace the * file or rename the file based on the $replace parameter. * * @param $source * Either a string specifying the file location of the original file or an * object containing a 'filepath' property. This parameter is passed by * reference and will contain the resulting destination filename in case of * success. * @param $dest * A string containing the directory $source should be copied to. If this * value is omitted, Drupal's 'files' directory will be used. * @param $replace * Replace behavior when the destination file already exists. * - FILE_EXISTS_REPLACE: Replace the existing file. * - FILE_EXISTS_RENAME: Append _{incrementing number} until the filename is * unique. * - FILE_EXISTS_ERROR: Do nothing and return FALSE. * @return * TRUE for success, FALSE for failure. */ function file_copy(&$source, $dest = 0, $replace = FILE_EXISTS_RENAME) { $dest = file_create_path($dest); $directory = $dest; $basename = file_check_path($directory); // Make sure we at least have a valid directory. if ($basename === FALSE) { $source = is_object($source) ? $source->filepath : $source; drupal_set_message(t('The selected file %file could not be uploaded, because the destination %directory is not properly configured.', array('%file' => $source, '%directory' => $dest)), 'error'); watchdog('file system', 'The selected file %file could not be uploaded, because the destination %directory could not be found, or because its permissions do not allow the file to be written.', array('%file' => $source, '%directory' => $dest), WATCHDOG_ERROR); return 0; } // Process a file upload object. if (is_object($source)) { $file = $source; $source = $file->filepath; if (!$basename) { $basename = $file->filename; } } $source = realpath($source); if (!file_exists($source)) { drupal_set_message(t('The selected file %file could not be copied, because no file by that name exists. Please check that you supplied the correct filename.', array('%file' => $source)), 'error'); return 0; } // If the destination file is not specified then use the filename of the source file. $basename = $basename ? $basename : basename($source); $dest = $directory .'/'. $basename; // Make sure source and destination filenames are not the same, makes no sense // to copy it if they are. In fact copying the file will most likely result in // a 0 byte file. Which is bad. Real bad. if ($source != realpath($dest)) { if (!$dest = file_destination($dest, $replace)) { drupal_set_message(t('The selected file %file could not be copied, because a file by that name already exists in the destination.', array('%file' => $source)), 'error'); return FALSE; } if (!@copy($source, $dest)) { drupal_set_message(t('The selected file %file could not be copied.', array('%file' => $source)), 'error'); return 0; } // Give everyone read access so that FTP'd users or // non-webserver users can see/read these files, // and give group write permissions so group members // can alter files uploaded by the webserver. @chmod($dest, 0664); } if (isset($file) && is_object($file)) { $file->filename = $basename; $file->filepath = $dest; $source = $file; } else { $source = $dest; } return 1; // Everything went ok. } /** * Determines the destination path for a file depending on how replacement of * existing files should be handled. * * @param $destination A string specifying the desired path. * @param $replace Replace behavior when the destination file already exists. * - FILE_EXISTS_REPLACE - Replace the existing file * - FILE_EXISTS_RENAME - Append _{incrementing number} until the filename is * unique * - FILE_EXISTS_ERROR - Do nothing and return FALSE. * @return The destination file path or FALSE if the file already exists and * FILE_EXISTS_ERROR was specified. */ function file_destination($destination, $replace) { if (file_exists($destination)) { switch ($replace) { case FILE_EXISTS_RENAME: $basename = basename($destination); $directory = dirname($destination); $destination = file_create_filename($basename, $directory); break; case FILE_EXISTS_ERROR: drupal_set_message(t('The selected file %file could not be copied, because a file by that name already exists in the destination.', array('%file' => $destination)), 'error'); return FALSE; } } return $destination; } /** * Moves a file to a new location. * * - Checks if $source and $dest are valid and readable/writable. * - Performs a file move if $source is not equal to $dest. * - If file already exists in $dest either the call will error out, replace the * file or rename the file based on the $replace parameter. * * @param $source * Either a string specifying the file location of the original file or an * object containing a 'filepath' property. This parameter is passed by * reference and will contain the resulting destination filename in case of * success. * @param $dest * A string containing the directory $source should be copied to. If this * value is omitted, Drupal's 'files' directory will be used. * @param $replace * Replace behavior when the destination file already exists. * - FILE_EXISTS_REPLACE: Replace the existing file. * - FILE_EXISTS_RENAME: Append _{incrementing number} until the filename is * unique. * - FILE_EXISTS_ERROR: Do nothing and return FALSE. * @return * TRUE for success, FALSE for failure. */ function file_move(&$source, $dest = 0, $replace = FILE_EXISTS_RENAME) { $path_original = is_object($source) ? $source->filepath : $source; if (file_copy($source, $dest, $replace)) { $path_current = is_object($source) ? $source->filepath : $source; if ($path_original == $path_current || file_delete($path_original)) { return 1; } drupal_set_message(t('The removal of the original file %file has failed.', array('%file' => $path_original)), 'error'); } return 0; } /** * Modify a filename as needed for security purposes. * * Munging a file name prevents unknown file extensions from masking exploit * files. When web servers such as Apache decide how to process a URL request, * they use the file extension. If the extension is not recognized, Apache * skips that extension and uses the previous file extension. For example, if * the file being requested is exploit.php.pps, and Apache does not recognize * the '.pps' extension, it treats the file as PHP and executes it. To make * this file name safe for Apache and prevent it from executing as PHP, the * .php extension is "munged" into .php_, making the safe file name * exploit.php_.pps. * * Specifically, this function adds an underscore to all extensions that are * between 2 and 5 characters in length, internal to the file name, and not * included in $extensions. * * Function behavior is also controlled by the Drupal variable * 'allow_insecure_uploads'. If 'allow_insecure_uploads' evaluates to TRUE, no * alterations will be made, if it evaluates to FALSE, the filename is 'munged'. * * @param $filename * File name to modify. * @param $extensions * A space-separated list of extensions that should not be altered. * @param $alerts * If TRUE, drupal_set_message() will be called to display a message if the * file name was changed. * * @return * The potentially modified $filename. */ function file_munge_filename($filename, $extensions, $alerts = TRUE) { $original = $filename; // Allow potentially insecure uploads for very savvy users and admin if (!variable_get('allow_insecure_uploads', 0)) { $whitelist = array_unique(explode(' ', trim($extensions))); // Split the filename up by periods. The first part becomes the basename // the last part the final extension. $filename_parts = explode('.', $filename); $new_filename = array_shift($filename_parts); // Remove file basename. $final_extension = array_pop($filename_parts); // Remove final extension. // Loop through the middle parts of the name and add an underscore to the // end of each section that could be a file extension but isn't in the list // of allowed extensions. foreach ($filename_parts as $filename_part) { $new_filename .= '.'. $filename_part; if (!in_array($filename_part, $whitelist) && preg_match("/^[a-zA-Z]{2,5}\d?$/", $filename_part)) { $new_filename .= '_'; } } $filename = $new_filename .'.'. $final_extension; if ($alerts && $original != $filename) { drupal_set_message(t('For security reasons, your upload has been renamed to %filename.', array('%filename' => $filename))); } } return $filename; } /** * Undo the effect of upload_munge_filename(). * * @param $filename string filename * @return string */ function file_unmunge_filename($filename) { return str_replace('_.', '.', $filename); } /** * Create a full file path from a directory and filename. If a file with the * specified name already exists, an alternative will be used. * * @param $basename string filename * @param $directory string directory * @return */ function file_create_filename($basename, $directory) { $dest = $directory .'/'. $basename; if (file_exists($dest)) { // Destination file already exists, generate an alternative. if ($pos = strrpos($basename, '.')) { $name = substr($basename, 0, $pos); $ext = substr($basename, $pos); } else { $name = $basename; $ext = ''; } $counter = 0; do { $dest = $directory .'/'. $name .'_'. $counter++ . $ext; } while (file_exists($dest)); } return $dest; } /** * Delete a file. * * @param $path A string containing a file path. * @return TRUE for success, FALSE for failure. */ function file_delete($path) { if (is_file($path)) { return unlink($path); } } /** * Determine total disk space used by a single user or the whole filesystem. * * @param $uid * An optional user id. A NULL value returns the total space used * by all files. */ function file_space_used($uid = NULL) { if (isset($uid)) { return (int) db_result(db_query('SELECT SUM(filesize) FROM {files} WHERE uid = %d', $uid)); } return (int) db_result(db_query('SELECT SUM(filesize) FROM {files}')); } /** * Saves a file upload to a new location. * * The source file is validated as a proper upload and handled as such. * The file will be added to the files table as a temporary file. Temporary * files are periodically cleaned. To make the file permanent file call * file_set_status() to change its status. * * @param $source * A string specifying the name of the upload field to save. * @param $validators * (optional) An associative array of callback functions used to validate the * file. The keys are function names and the values arrays of callback * parameters which will be passed in after the file object. The * functions should return an array of error messages; an empty array * indicates that the file passed validation. The functions will be called in * the order specified. * @param $dest * A string containing the directory $source should be copied to. If this is * not provided or is not writable, the temporary directory will be used. * @param $replace * Replace behavior when the destination file already exists: * - FILE_EXISTS_REPLACE: Replace the existing file. * - FILE_EXISTS_RENAME: Append _{incrementing number} until the filename * is unique. * - FILE_EXISTS_ERROR: Do nothing and return FALSE. * * @return * An object containing the file information, or 0 in the event of an error. */ function file_save_upload($source, $validators = array(), $dest = FALSE, $replace = FILE_EXISTS_RENAME) { global $user; static $upload_cache; // Add in our check of the the file name length. $validators['file_validate_name_length'] = array(); // Return cached objects without processing since the file will have // already been processed and the paths in _FILES will be invalid. if (isset($upload_cache[$source])) { return $upload_cache[$source]; } // If a file was uploaded, process it. if (isset($_FILES['files']) && $_FILES['files']['name'][$source] && is_uploaded_file($_FILES['files']['tmp_name'][$source])) { // Check for file upload errors and return FALSE if a // lower level system error occurred. switch ($_FILES['files']['error'][$source]) { // @see http://php.net/manual/en/features.file-upload.errors.php case UPLOAD_ERR_OK: break; case UPLOAD_ERR_INI_SIZE: case UPLOAD_ERR_FORM_SIZE: drupal_set_message(t('The file %file could not be saved, because it exceeds %maxsize, the maximum allowed size for uploads.', array('%file' => $source, '%maxsize' => format_size(file_upload_max_size()))), 'error'); return 0; case UPLOAD_ERR_PARTIAL: case UPLOAD_ERR_NO_FILE: drupal_set_message(t('The file %file could not be saved, because the upload did not complete.', array('%file' => $source)), 'error'); return 0; // Unknown error default: drupal_set_message(t('The file %file could not be saved. An unknown error has occurred.', array('%file' => $source)), 'error'); return 0; } // Build the list of non-munged extensions. // @todo: this should not be here. we need to figure out the right place. $extensions = ''; foreach ($user->roles as $rid => $name) { $extensions .= ' '. variable_get("upload_extensions_$rid", variable_get('upload_extensions_default', 'jpg jpeg gif png txt html doc xls pdf ppt pps odt ods odp')); } // Begin building file object. $file = new stdClass(); $file->filename = file_munge_filename(trim(basename($_FILES['files']['name'][$source]), '.'), $extensions); $file->filepath = $_FILES['files']['tmp_name'][$source]; $file->filemime = file_get_mimetype($file->filename); // If the destination is not provided, or is not writable, then use the // temporary directory. if (empty($dest) || file_check_path($dest) === FALSE) { $dest = file_directory_temp(); } $file->source = $source; $file->destination = file_destination(file_create_path($dest .'/'. $file->filename), $replace); $file->filesize = $_FILES['files']['size'][$source]; // Call the validation functions. $errors = array(); foreach ($validators as $function => $args) { array_unshift($args, $file); // Make sure $file is passed around by reference. $args[0] = &$file; $errors = array_merge($errors, call_user_func_array($function, $args)); } // Rename potentially executable files, to help prevent exploits. if (preg_match('/\.(php|pl|py|cgi|asp|js)$/i', $file->filename) && (substr($file->filename, -4) != '.txt')) { $file->filemime = 'text/plain'; $file->filepath .= '.txt'; $file->filename .= '.txt'; // As the file may be named example.php.txt, we need to munge again to // convert to example.php_.txt, then create the correct destination. $file->filename = file_munge_filename($file->filename, $extensions); $file->destination = file_destination(file_create_path($dest .'/'. $file->filename), $replace); } // Check for validation errors. if (!empty($errors)) { $message = t('The selected file %name could not be uploaded.', array('%name' => $file->filename)); if (count($errors) > 1) { $message .= '
  • '. implode('
  • ', $errors) .'
'; } else { $message .= ' '. array_pop($errors); } form_set_error($source, $message); return 0; } // Move uploaded files from PHP's upload_tmp_dir to Drupal's temporary directory. // This overcomes open_basedir restrictions for future file operations. $file->filepath = $file->destination; if (!move_uploaded_file($_FILES['files']['tmp_name'][$source], $file->filepath)) { form_set_error($source, t('File upload error. Could not move uploaded file.')); watchdog('file', 'Upload error. Could not move uploaded file %file to destination %destination.', array('%file' => $file->filename, '%destination' => $file->filepath)); return 0; } // If we made it this far it's safe to record this file in the database. $file->uid = $user->uid; $file->status = FILE_STATUS_TEMPORARY; $file->timestamp = time(); drupal_write_record('files', $file); // Add file to the cache. $upload_cache[$source] = $file; return $file; } return 0; } /** * Check for files with names longer than we can store in the database. * * @param $file * A Drupal file object. * @return * An array. If the file name is too long, it will contain an error message. */ function file_validate_name_length($file) { $errors = array(); if (strlen($file->filename) > 255) { $errors[] = t('Its name exceeds the 255 characters limit. Please rename the file and try again.'); } return $errors; } /** * Check that the filename ends with an allowed extension. This check is not * enforced for the user #1. * * @param $file * A Drupal file object. * @param $extensions * A string with a space separated list of allowed file extensions, not * including the period. For example, 'bmp jpg gif png'. * * @return * An array. If the file extension is not allowed, it will contain an error * message. */ function file_validate_extensions($file, $extensions) { global $user; $errors = array(); // Bypass validation for uid = 1. if ($user->uid != 1) { $regex = '/\.('. @ereg_replace(' +', '|', preg_quote($extensions)) .')$/i'; if (!preg_match($regex, $file->filename)) { $errors[] = t('Only files with the following extensions are allowed: %files-allowed.', array('%files-allowed' => $extensions)); } } return $errors; } /** * Check that the file's size is below certain limits. This check is not * enforced for the user #1. * * @param $file * A Drupal file object. * @param $file_limit * An integer specifying the maximum file size in bytes. Zero indicates that * no limit should be enforced. * @param $user_limit * An integer specifying the maximum number of bytes the user is allowed. Zero * indicates that no limit should be enforced. * @return * An array. If the file size exceeds limits, it will contain an error message. */ function file_validate_size($file, $file_limit = 0, $user_limit = 0) { global $user; $errors = array(); // Bypass validation for uid = 1. if ($user->uid != 1) { if ($file_limit && $file->filesize > $file_limit) { $errors[] = t('The file is %filesize exceeding the maximum file size of %maxsize.', array('%filesize' => format_size($file->filesize), '%maxsize' => format_size($file_limit))); } // Save a query by only calling file_space_used() when a limit is provided. if ($user_limit && (file_space_used($user->uid) + $file->filesize) > $user_limit) { $errors[] = t('The file is %filesize which would exceed your disk quota of %quota.', array('%filesize' => format_size($file->filesize), '%quota' => format_size($user_limit))); } } return $errors; } /** * Check that the file is recognized by image_get_info() as an image. * * @param $file * A Drupal file object. * @return * An array. If the file is not an image, it will contain an error message. */ function file_validate_is_image(&$file) { $errors = array(); $info = image_get_info($file->filepath); if (!$info || empty($info['extension'])) { $errors[] = t('Only JPEG, PNG and GIF images are allowed.'); } return $errors; } /** * If the file is an image verify that its dimensions are within the specified * maximum and minimum dimensions. Non-image files will be ignored. * * @param $file * A Drupal file object. This function may resize the file affecting its size. * @param $maximum_dimensions * An optional string in the form WIDTHxHEIGHT e.g. '640x480' or '85x85'. If * an image toolkit is installed the image will be resized down to these * dimensions. A value of 0 indicates no restriction on size, so resizing * will be attempted. * @param $minimum_dimensions * An optional string in the form WIDTHxHEIGHT. This will check that the image * meets a minimum size. A value of 0 indicates no restriction. * @return * An array. If the file is an image and did not meet the requirements, it * will contain an error message. */ function file_validate_image_resolution(&$file, $maximum_dimensions = 0, $minimum_dimensions = 0) { $errors = array(); // Check first that the file is an image. if ($info = image_get_info($file->filepath)) { if ($maximum_dimensions) { // Check that it is smaller than the given dimensions. list($width, $height) = explode('x', $maximum_dimensions); if ($info['width'] > $width || $info['height'] > $height) { // Try to resize the image to fit the dimensions. if (image_get_toolkit() && image_scale($file->filepath, $file->filepath, $width, $height)) { drupal_set_message(t('The image was resized to fit within the maximum allowed dimensions of %dimensions pixels.', array('%dimensions' => $maximum_dimensions))); // Clear the cached filesize and refresh the image information. clearstatcache(); $info = image_get_info($file->filepath); $file->filesize = $info['file_size']; } else { $errors[] = t('The image is too large; the maximum dimensions are %dimensions pixels.', array('%dimensions' => $maximum_dimensions)); } } } if ($minimum_dimensions) { // Check that it is larger than the given dimensions. list($width, $height) = explode('x', $minimum_dimensions); if ($info['width'] < $width || $info['height'] < $height) { $errors[] = t('The image is too small; the minimum dimensions are %dimensions pixels.', array('%dimensions' => $minimum_dimensions)); } } } return $errors; } /** * Save a string to the specified destination. * * @param $data A string containing the contents of the file. * @param $dest A string containing the destination location. * @param $replace Replace behavior when the destination file already exists. * - FILE_EXISTS_REPLACE - Replace the existing file * - FILE_EXISTS_RENAME - Append _{incrementing number} until the filename is unique * - FILE_EXISTS_ERROR - Do nothing and return FALSE. * * @return A string containing the resulting filename or 0 on error */ function file_save_data($data, $dest, $replace = FILE_EXISTS_RENAME) { $temp = file_directory_temp(); // On Windows, tempnam() requires an absolute path, so we use realpath(). $file = tempnam(realpath($temp), 'file'); if (!$fp = fopen($file, 'wb')) { drupal_set_message(t('The file could not be created.'), 'error'); return 0; } fwrite($fp, $data); fclose($fp); if (!file_move($file, $dest, $replace)) { return 0; } return $file; } /** * Set the status of a file. * * @param $file * A Drupal file object. * @param $status * A status value to set the file to. One of: * - FILE_STATUS_PERMANENT * - FILE_STATUS_TEMPORARY * * @return FALSE on failure, TRUE on success and $file->status will contain the * status. */ function file_set_status(&$file, $status) { if (db_query('UPDATE {files} SET status = %d WHERE fid = %d', $status, $file->fid)) { $file->status = $status; return TRUE; } return FALSE; } /** * Transfer file using http to client. Pipes a file through Drupal to the * client. * * @param $source File to transfer. * @param $headers An array of http headers to send along with file. */ function file_transfer($source, $headers) { if (ob_get_level()) { ob_end_clean(); } // IE cannot download private files because it cannot store files downloaded // over https in the browser cache. The problem can be solved by sending // custom headers to IE. See http://support.microsoft.com/kb/323308/en-us if (isset($_SERVER['HTTPS']) && ($_SERVER['HTTPS'] == 'on')) { drupal_set_header('Cache-Control: private'); drupal_set_header('Pragma: private'); } foreach ($headers as $header) { // To prevent HTTP header injection, we delete new lines that are // not followed by a space or a tab. // See http://www.w3.org/Protocols/rfc2616/rfc2616-sec4.html#sec4.2 $header = preg_replace('/\r?\n(?!\t| )/', '', $header); drupal_set_header($header); } $source = file_create_path($source); // Transfer file in 1024 byte chunks to save memory usage. if ($fd = fopen($source, 'rb')) { while (!feof($fd)) { print fread($fd, 1024); } fclose($fd); } else { drupal_not_found(); } exit(); } /** * Call modules that implement hook_file_download() to find out if a file is * accessible and what headers it should be transferred with. If a module * returns -1 drupal_access_denied() will be returned. If one or more modules * returned headers the download will start with the returned headers. If no * modules respond drupal_not_found() will be returned. */ function file_download() { // Merge remainder of arguments from GET['q'], into relative file path. $args = func_get_args(); $filepath = implode('/', $args); // Maintain compatibility with old ?file=paths saved in node bodies. if (isset($_GET['file'])) { $filepath = $_GET['file']; } if (file_exists(file_create_path($filepath))) { $headers = module_invoke_all('file_download', $filepath); if (in_array(-1, $headers)) { return drupal_access_denied(); } if (count($headers)) { file_transfer($filepath, $headers); } } return drupal_not_found(); } /** * Finds all files that match a given mask in a given directory. * * Directories and files beginning with a period are excluded; this * prevents hidden files and directories (such as SVN working directories) * from being scanned. * * @param $dir * The base directory for the scan, without trailing slash. * @param $mask * The regular expression of the files to find. * @param $nomask * An array of files/directories to ignore. * @param $callback * The callback function to call for each match. * @param $recurse * When TRUE, the directory scan will recurse the entire tree * starting at the provided directory. * @param $key * The key to be used for the returned associative array of files. Possible * values are "filename", for the path starting with $dir; "basename", for * the basename of the file; and "name" for the name of the file without the * extension. * @param $min_depth * Minimum depth of directories to return files from. * @param $depth * Current depth of recursion. This parameter is only used internally and * should not be passed in. * * @return * An associative array (keyed on the provided key) of objects with * "filename", "basename", and "name" members corresponding to the * matching files. */ function file_scan_directory($dir, $mask, $nomask = array('.', '..', 'CVS'), $callback = 0, $recurse = TRUE, $key = 'filename', $min_depth = 0, $depth = 0) { $key = (in_array($key, array('filename', 'basename', 'name')) ? $key : 'filename'); $files = array(); if (is_dir($dir) && $handle = opendir($dir)) { while (FALSE !== ($file = readdir($handle))) { if (!in_array($file, $nomask) && $file[0] != '.') { if (is_dir("$dir/$file") && $recurse) { // Give priority to files in this folder by merging them in after any subdirectory files. $files = array_merge(file_scan_directory("$dir/$file", $mask, $nomask, $callback, $recurse, $key, $min_depth, $depth + 1), $files); } elseif ($depth >= $min_depth && @ereg($mask, $file)) { // Always use this match over anything already set in $files with the same $$key. $filename = "$dir/$file"; $basename = basename($file); $name = substr($basename, 0, strrpos($basename, '.')); $files[$$key] = new stdClass(); $files[$$key]->filename = $filename; $files[$$key]->basename = $basename; $files[$$key]->name = $name; if ($callback) { $callback($filename); } } } } closedir($handle); } return $files; } /** * Determine the default temporary directory. * * @return A string containing a temp directory. */ function file_directory_temp() { $temporary_directory = variable_get('file_directory_temp', NULL); if (is_null($temporary_directory)) { $directories = array(); // Has PHP been set with an upload_tmp_dir? if (ini_get('upload_tmp_dir')) { $directories[] = ini_get('upload_tmp_dir'); } // Operating system specific dirs. if (substr(PHP_OS, 0, 3) == 'WIN') { $directories[] = 'c:\\windows\\temp'; $directories[] = 'c:\\winnt\\temp'; $path_delimiter = '\\'; } else { $directories[] = '/tmp'; $path_delimiter = '/'; } foreach ($directories as $directory) { if (!$temporary_directory && is_dir($directory)) { $temporary_directory = $directory; } } // if a directory has been found, use it, otherwise default to 'files/tmp' or 'files\\tmp'; $temporary_directory = $temporary_directory ? $temporary_directory : file_directory_path() . $path_delimiter .'tmp'; variable_set('file_directory_temp', $temporary_directory); } return $temporary_directory; } /** * Determine the default 'files' directory. * * @return A string containing the path to Drupal's 'files' directory. */ function file_directory_path() { return variable_get('file_directory_path', conf_path() .'/files'); } /** * Determine the maximum file upload size by querying the PHP settings. * * @return * A file size limit in bytes based on the PHP upload_max_filesize and post_max_size */ function file_upload_max_size() { static $max_size = -1; if ($max_size < 0) { $upload_max = parse_size(ini_get('upload_max_filesize')); $post_max = parse_size(ini_get('post_max_size')); $max_size = ($upload_max < $post_max) ? $upload_max : $post_max; } return $max_size; } /** * Determine an Internet Media Type, or MIME type from a filename. * * @param $filename * Name of the file, including extension. * @param $mapping * An optional array of extension to media type mappings in the form * 'extension1|extension2|...' => 'type'. * * @return * The internet media type registered for the extension or application/octet-stream for unknown extensions. */ function file_get_mimetype($filename, $mapping = NULL) { if (!is_array($mapping)) { $mapping = variable_get('mime_extension_mapping', array( 'ez' => 'application/andrew-inset', 'atom' => 'application/atom', 'atomcat' => 'application/atomcat+xml', 'atomsrv' => 'application/atomserv+xml', 'cap|pcap' => 'application/cap', 'cu' => 'application/cu-seeme', 'tsp' => 'application/dsptype', 'spl' => 'application/x-futuresplash', 'hta' => 'application/hta', 'jar' => 'application/java-archive', 'ser' => 'application/java-serialized-object', 'class' => 'application/java-vm', 'hqx' => 'application/mac-binhex40', 'cpt' => 'image/x-corelphotopaint', 'nb' => 'application/mathematica', 'mdb' => 'application/msaccess', 'doc|dot' => 'application/msword', 'bin' => 'application/octet-stream', 'oda' => 'application/oda', 'ogg|ogx' => 'application/ogg', 'pdf' => 'application/pdf', 'key' => 'application/pgp-keys', 'pgp' => 'application/pgp-signature', 'prf' => 'application/pics-rules', 'ps|ai|eps' => 'application/postscript', 'rar' => 'application/rar', 'rdf' => 'application/rdf+xml', 'rss' => 'application/rss+xml', 'rtf' => 'application/rtf', 'smi|smil' => 'application/smil', 'wpd' => 'application/wordperfect', 'wp5' => 'application/wordperfect5.1', 'xhtml|xht' => 'application/xhtml+xml', 'xml|xsl' => 'application/xml', 'zip' => 'application/zip', 'cdy' => 'application/vnd.cinderella', 'kml' => 'application/vnd.google-earth.kml+xml', 'kmz' => 'application/vnd.google-earth.kmz', 'xul' => 'application/vnd.mozilla.xul+xml', 'xls|xlb|xlt' => 'application/vnd.ms-excel', 'cat' => 'application/vnd.ms-pki.seccat', 'stl' => 'application/vnd.ms-pki.stl', 'ppt|pps' => 'application/vnd.ms-powerpoint', 'odc' => 'application/vnd.oasis.opendocument.chart', 'odb' => 'application/vnd.oasis.opendocument.database', 'odf' => 'application/vnd.oasis.opendocument.formula', 'odg' => 'application/vnd.oasis.opendocument.graphics', 'otg' => 'application/vnd.oasis.opendocument.graphics-template', 'odi' => 'application/vnd.oasis.opendocument.image', 'odp' => 'application/vnd.oasis.opendocument.presentation', 'otp' => 'application/vnd.oasis.opendocument.presentation-template', 'ods' => 'application/vnd.oasis.opendocument.spreadsheet', 'ots' => 'application/vnd.oasis.opendocument.spreadsheet-template', 'odt' => 'application/vnd.oasis.opendocument.text', 'odm' => 'application/vnd.oasis.opendocument.text-master', 'ott' => 'application/vnd.oasis.opendocument.text-template', 'oth' => 'application/vnd.oasis.opendocument.text-web', 'docm' => 'application/vnd.ms-word.document.macroEnabled.12', 'docx' => 'application/vnd.openxmlformats-officedocument.wordprocessingml.document', 'dotm' => 'application/vnd.ms-word.template.macroEnabled.12', 'dotx' => 'application/vnd.openxmlformats-officedocument.wordprocessingml.template', 'potm' => 'application/vnd.ms-powerpoint.template.macroEnabled.12', 'potx' => 'application/vnd.openxmlformats-officedocument.presentationml.template', 'ppam' => 'application/vnd.ms-powerpoint.addin.macroEnabled.12', 'ppsm' => 'application/vnd.ms-powerpoint.slideshow.macroEnabled.12', 'ppsx' => 'application/vnd.openxmlformats-officedocument.presentationml.slideshow', 'pptm' => 'application/vnd.ms-powerpoint.presentation.macroEnabled.12', 'pptx' => 'application/vnd.openxmlformats-officedocument.presentationml.presentation', 'xlam' => 'application/vnd.ms-excel.addin.macroEnabled.12', 'xlsb' => 'application/vnd.ms-excel.sheet.binary.macroEnabled.12', 'xlsm' => 'application/vnd.ms-excel.sheet.macroEnabled.12', 'xlsx' => 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet', 'xltm' => 'application/vnd.ms-excel.template.macroEnabled.12', 'xltx' => 'application/vnd.openxmlformats-officedocument.spreadsheetml.template', 'cod' => 'application/vnd.rim.cod', 'mmf' => 'application/vnd.smaf', 'sdc' => 'application/vnd.stardivision.calc', 'sds' => 'application/vnd.stardivision.chart', 'sda' => 'application/vnd.stardivision.draw', 'sdd' => 'application/vnd.stardivision.impress', 'sdf' => 'application/vnd.stardivision.math', 'sdw' => 'application/vnd.stardivision.writer', 'sgl' => 'application/vnd.stardivision.writer-global', 'sxc' => 'application/vnd.sun.xml.calc', 'stc' => 'application/vnd.sun.xml.calc.template', 'sxd' => 'application/vnd.sun.xml.draw', 'std' => 'application/vnd.sun.xml.draw.template', 'sxi' => 'application/vnd.sun.xml.impress', 'sti' => 'application/vnd.sun.xml.impress.template', 'sxm' => 'application/vnd.sun.xml.math', 'sxw' => 'application/vnd.sun.xml.writer', 'sxg' => 'application/vnd.sun.xml.writer.global', 'stw' => 'application/vnd.sun.xml.writer.template', 'sis' => 'application/vnd.symbian.install', 'vsd' => 'application/vnd.visio', 'wbxml' => 'application/vnd.wap.wbxml', 'wmlc' => 'application/vnd.wap.wmlc', 'wmlsc' => 'application/vnd.wap.wmlscriptc', 'wk' => 'application/x-123', '7z' => 'application/x-7z-compressed', 'abw' => 'application/x-abiword', 'dmg' => 'application/x-apple-diskimage', 'bcpio' => 'application/x-bcpio', 'torrent' => 'application/x-bittorrent', 'cab' => 'application/x-cab', 'cbr' => 'application/x-cbr', 'cbz' => 'application/x-cbz', 'cdf' => 'application/x-cdf', 'vcd' => 'application/x-cdlink', 'pgn' => 'application/x-chess-pgn', 'cpio' => 'application/x-cpio', 'csh' => 'text/x-csh', 'deb|udeb' => 'application/x-debian-package', 'dcr|dir|dxr' => 'application/x-director', 'dms' => 'application/x-dms', 'wad' => 'application/x-doom', 'dvi' => 'application/x-dvi', 'rhtml' => 'application/x-httpd-eruby', 'flac' => 'application/x-flac', 'pfa|pfb|gsf|pcf|pcf.Z' => 'application/x-font', 'mm' => 'application/x-freemind', 'gnumeric' => 'application/x-gnumeric', 'sgf' => 'application/x-go-sgf', 'gcf' => 'application/x-graphing-calculator', 'gtar|tgz|taz' => 'application/x-gtar', 'hdf' => 'application/x-hdf', 'phtml|pht|php' => 'application/x-httpd-php', 'phps' => 'application/x-httpd-php-source', 'php3' => 'application/x-httpd-php3', 'php3p' => 'application/x-httpd-php3-preprocessed', 'php4' => 'application/x-httpd-php4', 'ica' => 'application/x-ica', 'ins|isp' => 'application/x-internet-signup', 'iii' => 'application/x-iphone', 'iso' => 'application/x-iso9660-image', 'jnlp' => 'application/x-java-jnlp-file', 'js' => 'application/x-javascript', 'jmz' => 'application/x-jmol', 'chrt' => 'application/x-kchart', 'kil' => 'application/x-killustrator', 'skp|skd|skt|skm' => 'application/x-koan', 'kpr|kpt' => 'application/x-kpresenter', 'ksp' => 'application/x-kspread', 'kwd|kwt' => 'application/x-kword', 'latex' => 'application/x-latex', 'lha' => 'application/x-lha', 'lyx' => 'application/x-lyx', 'lzh' => 'application/x-lzh', 'lzx' => 'application/x-lzx', 'frm|maker|frame|fm|fb|book|fbdoc' => 'application/x-maker', 'mif' => 'application/x-mif', 'wmd' => 'application/x-ms-wmd', 'wmz' => 'application/x-ms-wmz', 'com|exe|bat|dll' => 'application/x-msdos-program', 'msi' => 'application/x-msi', 'nc' => 'application/x-netcdf', 'pac' => 'application/x-ns-proxy-autoconfig', 'nwc' => 'application/x-nwc', 'o' => 'application/x-object', 'oza' => 'application/x-oz-application', 'p7r' => 'application/x-pkcs7-certreqresp', 'crl' => 'application/x-pkcs7-crl', 'pyc|pyo' => 'application/x-python-code', 'qtl' => 'application/x-quicktimeplayer', 'rpm' => 'application/x-redhat-package-manager', 'sh' => 'text/x-sh', 'shar' => 'application/x-shar', 'swf|swfl' => 'application/x-shockwave-flash', 'sit|sitx' => 'application/x-stuffit', 'sv4cpio' => 'application/x-sv4cpio', 'sv4crc' => 'application/x-sv4crc', 'tar' => 'application/x-tar', 'tcl' => 'application/x-tcl', 'gf' => 'application/x-tex-gf', 'pk' => 'application/x-tex-pk', 'texinfo|texi' => 'application/x-texinfo', '~|%|bak|old|sik' => 'application/x-trash', 't|tr|roff' => 'application/x-troff', 'man' => 'application/x-troff-man', 'me' => 'application/x-troff-me', 'ms' => 'application/x-troff-ms', 'ustar' => 'application/x-ustar', 'src' => 'application/x-wais-source', 'wz' => 'application/x-wingz', 'crt' => 'application/x-x509-ca-cert', 'xcf' => 'application/x-xcf', 'fig' => 'application/x-xfig', 'xpi' => 'application/x-xpinstall', 'au|snd' => 'audio/basic', 'mid|midi|kar' => 'audio/midi', 'mpga|mpega|mp2|mp3|m4a' => 'audio/mpeg', 'f4a|f4b' => 'audio/mp4', 'm3u' => 'audio/x-mpegurl', 'oga|spx' => 'audio/ogg', 'sid' => 'audio/prs.sid', 'aif|aiff|aifc' => 'audio/x-aiff', 'gsm' => 'audio/x-gsm', 'wma' => 'audio/x-ms-wma', 'wax' => 'audio/x-ms-wax', 'ra|rm|ram' => 'audio/x-pn-realaudio', 'ra' => 'audio/x-realaudio', 'pls' => 'audio/x-scpls', 'sd2' => 'audio/x-sd2', 'wav' => 'audio/x-wav', 'alc' => 'chemical/x-alchemy', 'cac|cache' => 'chemical/x-cache', 'csf' => 'chemical/x-cache-csf', 'cbin|cascii|ctab' => 'chemical/x-cactvs-binary', 'cdx' => 'chemical/x-cdx', 'cer' => 'chemical/x-cerius', 'c3d' => 'chemical/x-chem3d', 'chm' => 'chemical/x-chemdraw', 'cif' => 'chemical/x-cif', 'cmdf' => 'chemical/x-cmdf', 'cml' => 'chemical/x-cml', 'cpa' => 'chemical/x-compass', 'bsd' => 'chemical/x-crossfire', 'csml|csm' => 'chemical/x-csml', 'ctx' => 'chemical/x-ctx', 'cxf|cef' => 'chemical/x-cxf', 'emb|embl' => 'chemical/x-embl-dl-nucleotide', 'spc' => 'chemical/x-galactic-spc', 'inp|gam|gamin' => 'chemical/x-gamess-input', 'fch|fchk' => 'chemical/x-gaussian-checkpoint', 'cub' => 'chemical/x-gaussian-cube', 'gau|gjc|gjf' => 'chemical/x-gaussian-input', 'gal' => 'chemical/x-gaussian-log', 'gcg' => 'chemical/x-gcg8-sequence', 'gen' => 'chemical/x-genbank', 'hin' => 'chemical/x-hin', 'istr|ist' => 'chemical/x-isostar', 'jdx|dx' => 'chemical/x-jcamp-dx', 'kin' => 'chemical/x-kinemage', 'mcm' => 'chemical/x-macmolecule', 'mmd|mmod' => 'chemical/x-macromodel-input', 'mol' => 'chemical/x-mdl-molfile', 'rd' => 'chemical/x-mdl-rdfile', 'rxn' => 'chemical/x-mdl-rxnfile', 'sd|sdf' => 'chemical/x-mdl-sdfile', 'tgf' => 'chemical/x-mdl-tgf', 'mcif' => 'chemical/x-mmcif', 'mol2' => 'chemical/x-mol2', 'b' => 'chemical/x-molconn-Z', 'gpt' => 'chemical/x-mopac-graph', 'mop|mopcrt|mpc|dat|zmt' => 'chemical/x-mopac-input', 'moo' => 'chemical/x-mopac-out', 'mvb' => 'chemical/x-mopac-vib', 'asn' => 'chemical/x-ncbi-asn1-spec', 'prt|ent' => 'chemical/x-ncbi-asn1-ascii', 'val|aso' => 'chemical/x-ncbi-asn1-binary', 'pdb|ent' => 'chemical/x-pdb', 'ros' => 'chemical/x-rosdal', 'sw' => 'chemical/x-swissprot', 'vms' => 'chemical/x-vamas-iso14976', 'vmd' => 'chemical/x-vmd', 'xtel' => 'chemical/x-xtel', 'xyz' => 'chemical/x-xyz', 'gif' => 'image/gif', 'ief' => 'image/ief', 'jpeg|jpg|jpe' => 'image/jpeg', 'pcx' => 'image/pcx', 'png' => 'image/png', 'svg|svgz' => 'image/svg+xml', 'tiff|tif' => 'image/tiff', 'djvu|djv' => 'image/vnd.djvu', 'wbmp' => 'image/vnd.wap.wbmp', 'ras' => 'image/x-cmu-raster', 'cdr' => 'image/x-coreldraw', 'pat' => 'image/x-coreldrawpattern', 'cdt' => 'image/x-coreldrawtemplate', 'ico' => 'image/x-icon', 'art' => 'image/x-jg', 'jng' => 'image/x-jng', 'bmp' => 'image/x-ms-bmp', 'psd' => 'image/x-photoshop', 'pnm' => 'image/x-portable-anymap', 'pbm' => 'image/x-portable-bitmap', 'pgm' => 'image/x-portable-graymap', 'ppm' => 'image/x-portable-pixmap', 'rgb' => 'image/x-rgb', 'xbm' => 'image/x-xbitmap', 'xpm' => 'image/x-xpixmap', 'xwd' => 'image/x-xwindowdump', 'eml' => 'message/rfc822', 'igs|iges' => 'model/iges', 'msh|mesh|silo' => 'model/mesh', 'wrl|vrml' => 'model/vrml', 'ics|icz' => 'text/calendar', 'css' => 'text/css', 'csv' => 'text/csv', '323' => 'text/h323', 'html|htm|shtml' => 'text/html', 'uls' => 'text/iuls', 'mml' => 'text/mathml', 'asc|txt|text|pot' => 'text/plain', 'rtx' => 'text/richtext', 'sct|wsc' => 'text/scriptlet', 'tm|ts' => 'text/texmacs', 'tsv' => 'text/tab-separated-values', 'jad' => 'text/vnd.sun.j2me.app-descriptor', 'wml' => 'text/vnd.wap.wml', 'wmls' => 'text/vnd.wap.wmlscript', 'bib' => 'text/x-bibtex', 'boo' => 'text/x-boo', 'h++|hpp|hxx|hh' => 'text/x-c++hdr', 'c++|cpp|cxx|cc' => 'text/x-c++src', 'h' => 'text/x-chdr', 'htc' => 'text/x-component', 'c' => 'text/x-csrc', 'd' => 'text/x-dsrc', 'diff|patch' => 'text/x-diff', 'hs' => 'text/x-haskell', 'java' => 'text/x-java', 'lhs' => 'text/x-literate-haskell', 'moc' => 'text/x-moc', 'p|pas' => 'text/x-pascal', 'gcd' => 'text/x-pcs-gcd', 'pl|pm' => 'text/x-perl', 'py' => 'text/x-python', 'etx' => 'text/x-setext', 'tcl|tk' => 'text/x-tcl', 'tex|ltx|sty|cls' => 'text/x-tex', 'vcs' => 'text/x-vcalendar', 'vcf' => 'text/x-vcard', '3gp' => 'video/3gpp', 'dl' => 'video/dl', 'dif|dv' => 'video/dv', 'fli' => 'video/fli', 'gl' => 'video/gl', 'mpeg|mpg|mpe' => 'video/mpeg', 'mp4|f4v|f4p' => 'video/mp4', 'flv' => 'video/x-flv', 'ogv' => 'video/ogg', 'qt|mov' => 'video/quicktime', 'mxu' => 'video/vnd.mpegurl', 'lsf|lsx' => 'video/x-la-asf', 'mng' => 'video/x-mng', 'asf|asx' => 'video/x-ms-asf', 'wm' => 'video/x-ms-wm', 'wmv' => 'video/x-ms-wmv', 'wmx' => 'video/x-ms-wmx', 'wvx' => 'video/x-ms-wvx', 'avi' => 'video/x-msvideo', 'movie' => 'video/x-sgi-movie', 'ice' => 'x-conference/x-cooltalk', 'sisx' => 'x-epoc/x-sisx-app', 'vrm|vrml|wrl' => 'x-world/x-vrml', 'xps' => 'application/vnd.ms-xpsdocument', )); } foreach ($mapping as $ext_preg => $mime_match) { if (preg_match('!\.('. $ext_preg .')$!i', $filename)) { return $mime_match; } } return 'application/octet-stream'; } /** * @} End of "defgroup file". */ 4yIEWMgCQCFiyDWjGdkw IgylLIZl1a+i2iZrugYTGcSGKttdxPbXwvgAZQIIBxDjsWx1bqu46ruf1N7CTCIiBhgGwWcTx68n dpBmWfbxnMiuAMp5xAz7vvWv9mWSq2VUxOBII48xyWB079tKNcZGQ1SAkIhyf6wyZsMPdgtTKWC3 KJztpNRLmn/D56ZHLu1ELTMTny4K7JL1dCvf7umkPdHkIlpFlqX73cWf4lhIPDIexWiYw2xMQNcp MDxZnK5kpylLUc1m4mCZ5ZjaCcMexUNhdhh9uxY3UKNPpv0/1CXU+m12RIlbBoXxJIInEZuOeY9i yzpl6tlciNcWIkMsQ7j2r5vtN/vNlMz2lsqZSwkYlnHaMl636O3du5ru9ayVlnqGUpSJJaQjxPaC uW2uM1319mcS9Xfo9WuY1F65ZHiDyK6M7hConlgOb9i1ZVs4HHFu3P7leuQcGX5cu9c3Vy931Dbb O3TunjZI4AAnDtbgsnU+p7OXTdeoNKIAGBcnAMt+6dPzTbB8cDhyXmOp9PlZIXbeOEneoZjtiFqa xLu6vTN5Czp1W4BHljome2OH3OuN1PqZ3VmiDmEczmC3ADvVdv6u26fuK5AxjKUTEHDGQIlh4LmT 3dFBIsJEmBiMcsVqTlm7TH0anVr9Uo1YuQJTfnwBXN+zq9tsrbJWSzkX/D2Kn2ddZ0efa5toSW+2 ahS5UEoiSpBjpLu/A/jgqlO32oCAcEKvEEfcckk5FSG+3FQVdj481VwzN48VaIIROChQFYHBmHeq qVALqFJRUQpdShGP3pgQCrGRIAOQdkADgnEclIBZ/YrJRTsUoWUnHE5nNMCIFpArvbbfbeqIMSxI YsCVwhhiMCO5dzpG1EzE2HycYpMrMcuteTd0ufU4zi23cCDESJaWkszDErxoDrt9R6hUNxbs9H8G smBDviMCRyxXInCqJDT1A54Fwe18PelzkuOMcMJdSApL+zLmgx/FMcoB8/AfgoLux4KS3cow4n78 UoqpRQsgilEEIiICIiAiIgIiICIiApRMEEpgpUFQEz8EZAWOCCwcBvch5+0KASPBSZGRJOZz4JgQ r2wjWQI2CwGIJIBDEjGJccFUDj7FHvQAXxU5BQDi58VDoGZVjEgkcsCqsrY+HP7dyKj71LBu51OQ ZSBLPmgj7lI5eCjsV2D4ZYY5HLHiipEQfBlYAZJg7DLgrCL8XUUwyUgcFYV4aueWT+zNGKigjx4K 4iCqsstVNtp01QlM8ogn4KVcZW2m2jfuqqZEiFkhEyDOHOYfBVtqnt750z+auRiTwwOY7OK6G16d va5xu0NoLtgS4xdnb2lYuoGV+4NswRYQNeDYgM/sCmefoXSyZsw1osyucliaUfxV4uT3oxhMwdC1 ZyIOC3jF4tzd1oWgxkQta9Ubmw3JrIL5HFep2O5jY3wXiaZtJl3Oj7mUbYxORwWfZOcumteo3V0N vtbLpBxGJJ9i4/0/utt+snIzA9VpF8McyPaV0t/bTLYyqmW9QGPM4jkvMS6OBYNG4wOIOli/tWNZ mXLVr6MdxtzXEeoMOJww5rCNtCx7KpEDMSDgP2PmF57Y0na7aJlYbrBwIZmGDBblfWb4WASacOHj 3JjjBLy6E9xMRMJ/NHBadsoelKR+bHFVt3sL8Y5rR325FdB5lwE16ptywT6pCiNjkFshmvIb2+W4 3U7ZZyKz7rdTlOQfDHBaWZ716NejntjPC9ZLFb3T7gDOnjIxkO+Alh3sXWlXGUvLCJlI5RGJ9i36 NfTJV3zgDfIiWiTHTAEExI4GWRdKa25l+Ho+iWgVtMYRk0JDnLgezBdbo+6rvnupl9RnEAMR5QGG Ldq43Sq69zbM7Wz+HKJMBx1DGMSOBxZdnpm03U4Rs82pyxkA2ByMe37Febec169dpdZzw0vrWyMO nU1AY2WjllEHL2rxGP7V6f623Is6lDaR+TbR8x4a5tIjwiy8yQc/BdPXMazLhvc3hXD9qqrEMSM2 wf8ApVe1bYRh7VVllhASJJI8oMiHAwHAE8VX7skylUIRSVICIgBWYqwBU6T7FBRlIiriKuIoimlS x+2CyaVIgoIhE5ZLINUCJDAjEHNWjD34q+nBTPIz0b+VcW9CqRLvJpgscx5ZgcOS2hvPVDxFVc8g 7tE8w5wxxxl3rnxjh2LII8PZ3q+VTDujqAribLN/CcpQIjTXHVpPfEMD3lc2ca7pGUbHkcxLifFa wjiyyAFPO5ZwyiW4q8ucP3ZeaPsP3FRZHb3R0zEqicmeUPZ8wVoGQ4+CvohLCQ8Rh+z3LX7k7o5G 46PbF7KSLYZkgv8A0eIWmapQLSBB5ZL0Q2xB1VTMSMswfaPvUWUmQ/5ioSB/PFgX/tDyk94WptL0 pmuHXB1tVVFbtWw22v5pGB/KGEvASwPgV0tvsOnEaY2yMxnCQEZeIOKm201nK9XJFZAfmrRo9Q9o jn28F2LNntYRw1E8sGWKMIiB0hslzvtnZqa1yK9qTaAMsSewDHwVt9CdgEIfLnInMnh4ALp6IVHQ G1TxsPFhjp7AudvP8IgZz805cWOUe4BY87ttG/HEa05QlppEv4YIJAy1MWeXgqzErIyFUdDswxdn Ix7cFTd2VxEKqnFcJSmObksP/pCtt7pzrlSMJyeUT2Yv7ArZep3wwnp8rIC5iAD5gWJZyHHe2C9F tZxGwE4hhCYAHZGWn7lr6QPQjhrtmDIMwaAMmbksdFrdPvr/AHNwYjuMon71LbY1iZb5uJsrl+7C dp75ny+7BbVGo7kVfkjXWCeLjUW8XWlt6zbdMn5Ixrge53b3ro0xFV905fvFz2RwHuCzY1lu2SAi K45yxkez9uSy0BvgtekGTyl80sT2DgPALcriw71mqzYALDZMgYZnAfiryLeGarTAzmbDlHABBqjV IWVc5iAPFg2o+0ss/Q7PV2t9v/EusI7hLSPcFj2wP6iQl+Vi/bIkn3lPpwg9LB5ysP8A9clO52rb 3+0h1Dp9+zmzWwMQc2OcZeEgvl1FU6pzrsDTgTGQ5EFiPavqm2nq1jkV4z6o6cdn1KzdRH8HdAzi eGsBpjvJx8V39N5sc9uuXFFenZysP5pMFNcT6cTyd1lsb9DXD96WPgCq1y0RMccRieDFe71z5Zrv 9M3VUzt6RMylHUS+TkMB7Cs22sidvdOWPq3WSHc7D4Lz233cNnMTcYP3usx6rCjZ116wZF5GIxLk k48s1brM5TPGHUvaIL5jgudvbmok7Yghu8MtE7zqfULfT2tc5zliIVgyk3cAu99P/Sdu4n+o6zGT DGvaSJEif3pgEEDkPbgtXeSM5cPpfUP0O49TRCyuWFgnCMw2OWoYZ88Vi6n1rf7zc/xJtGqX8OmL RhFjwjFhwXY+tLRVdXsIVRorqiJRhWBGIBywAAB4leVMpa9b+YNj3LzezbLWkzcuxtt2dIkBqI4B lnjbGfmlRInMHSCH5ribfcmqzHCEsxmu1t/QlB9ZxyaRA9i8u2uK9Ou0xyz+uZQEWMQMnBC15bOr fy0Q3ddW4BIFNjxEuTTAIBPb7Vk292xO8rq3VumnORxI/syIxAK6vUehdGtMDsLjVurhqrpadlUz /VmxY/7RW/VLrfJw9u8vDy9+1v2t8qNxA12w+aJwP7R3KYBeru2Met9LEW09V2QMWPzTEXeBPHsX l4xILEYjAjIuvT55n1ee1sUclvRjqgD4LSpd11NrDUdPiFjbfDlteGTY7WVlgiA7swXtaoV9O2Ln 8oc9pXM6DsAJetIYRy70+od8P/TxOEcZd/JcPLi73reImn5dNvZet41cHqO6ndbOcjiSVy7JElZr 7CT8FqTsbLjmVdMSZvVjXPXug6RnieXBUnM+zgqSmXwzWKy6MMMzl2LrNuGvG2/NWlOXYORWIyl+ +O/+ha1l8iX96wm2fNansjpPVcOkLXGiRBbAHsYrWt28XeBI7D9xWp6tnMq36uzKWI5Lrr7p3anr 31uZVmn8gGJyDYurW/wtMAfOB5mydzh7FMNwfmgWLEA8Q/asEiXxzXWbTacOutz1mKajlwOPkpLcO81cKzZgcj25Ba1tBAfgMuK9MelSsiZEARJIHN3bFcvfdO3G2EiImUMyOLLUq+ LjxOk/FZZDUzZrEc1cOY9zN4LtptZXO9UMpi4W1TuJTABEScvlH4Klu6sjYRCWlsjEAH3L08XXOe q9zdxkAHGOmJI45cVqthj4FX9Wwy1ajq4nMq53W5A+f3ArncHLAwXpfpHoMd3ceobuL7WgGUInKy YyccgVxNvuL526dfAnIcATy7F9E2llWy6HESHmlAPN2xZyVi4TL5/GmVdm6ADRrs0vwcGWAXV6pE NM85xPtEj965k77t0bbDLyCbxj/aJbDwXU6iROsyH5jWQPCQ+5JjFS9Yx9GrhL19QBYDPHmuVu9y TOUKsKwS2Ts+C7XSaLP0+6BiYmUQIuCC7SydcLebeyqUZTDCwOOXcpc+MJjyrAJy1OCQeBdZDutz p/xJMMHc/irba81OPThMH96MScMcDIFbd+xtvEDVTEaxGWqI9MMQ5BBwLdik6dV79HPlbbMeacj3 kr0fQL5bXbxMiRC0HWBmxOB9y50eiGNZlZaBMMQIh4s+Lk45di6hgIwEIhoxAAHYMAp91z8O5ZDb 9S2sqpSBBYgjExIykBw+wXFr6l1Tok/T3UDdtgWhaMR2MfxSMjBiCQRkcisn6qxjCbWQlgYzGoEc iufhfvHb96WTPFneE/q2EiNNcmOWTusG565O2s+UwfmQB8VqbnYVkSnQY0j5jEuRFsSxd/b7Vob3 aW1zMRZ6oGJYaT/d/ak0nwX235y2DZWZD9UQKZ4yiR55vkYjMB/zezkuVOJhOUP3SQfDBDqfF34v m6y7uLbmzDSCdQHYQ4Pit9nK3NYERbOxo/Ubqqs/LKWPJgHPuQd3pO1G22YlINZZ5pHs4BZ7QWxf vWyIgtFsRhGOeX3q0unb20PCs9hyRMW9nFvIclvFaNzkYAYLuW9E3zEmIwz+zrQn0rdkkCILeHxU zPlfG/DkyB5KnYfaty/bWVHTYGIwWvKBHgrmfKYs7NcggsUV5NIOMx8FjRUo6kRJUgAfirJRI+XL x4q0QDm/YoAc81s07ecyDGOrmM0vjISW3EXo2lUwPVJD8mHiVnn02gxaLgnEF3wAcjHsDqTCcSzE O5MeHcGWauyUZRB+Q8c8Bx7Vwu1t4rrNZOsa9XRZ3VyNdkTIPhMGIBAdhIEjHtXOtqsonKq2JhZA tKJcEEcF6rbxHlrDQ1h9BbhjEj2qu56fT1auQLQ3tWGsBhKciSIy5hhgmntucbG2kxmPKiRA+5Qf esm4ot210qbo6ZxLEcO8fcsPH4rvnhywl+CPgoc/ipBDh8uI7FBILd4U65DI+OSoWRMi2ubNqLcn LKFAZSghWDvhmqq0Wd+SCRk3uTj8QmCO/uwyyTkQW/FQpRBGIccuCKS748W7VH3IIREUEIpRBCIi AiIgIiIClQrBBLcULN3exA7qze/2KCoHs49yYP8AA5e1SAHbLmVJxwc4ZBMgCW7knIu4wd38c1D+ 7JQ59uY7FBaMiwB4YDiwzwUZk8W7/apDOeXA5eLLa6fsp73eVbasAmyQAOI44+5LwsnLTAD44Dic 8O5HzHP7YL1+9+ljTQLpTgMgRAFmPFy3wXE3PS4U/LKUn44AKTeVu+u9XPBfhlkFYRkQeQzKpKOm TLMAWfkrWcMTMVduBbtLuFJiQSxwGZxbj44qDFi2Hfmig5qwb28VACyVVmchEeIwyAcnEtkEaQAr xj7kA8OQVtRJJOL5lTlpLFb+96rdbsNvsw0YVRDxGUiMAStIZd66O72e3HTNhfF/Xs9Q2ZNpjOTH J3OWazZOLexZ2nWsvRd/t9rCyjcRE4xAnAEONbY4dqzbPdS1ykJMIgYd7fgvP2ylXcZDsZdbp0T6 Gs5zJJPu+5Y2njLZ3dfRPL2eOP0/5dFDeZzJB+c4vzW2NzXPYQ22hpg4y7TmFWvpcrJvVJn/ACnL wK61XS4Ven6zB8TlwxPermbYuejO3r30uLOv+bVr20qtrW+GoEgZFnLLg74CO4nHtf2h/vXpOo7s WdhyAwYAcOxeX3MxbbKfM4dwwT087bXs7/3evj6fXL1/0bMMa4nv9iyCAdjxHgsG1k9TnHSSFmnM gFuz4rperxdo5W8q9O0tkSQFrxOK297IyL8SSWWkumvRi9Xf6bupUmM+EYu3ZiwXoD1TXCJwGGA4 4D8V4qjdSgBHJuPYtwb2Um0ywZhx5lveue2vLcr1Ve78zA8n+LBUs6gIuTLBgQO1cGneMYlz2+Cr feZZHLPl2LHhMrln3++9SZc+UhwVxJxlOZiOJzzW5ps3MxFnPAY/dir2y2W0qNeFt8vmxfHk4wA8 T2rcxOiWfNw1PTJh6db4YkDHxkRgPaqBh+P7EnubLMHAiMojADuGSxuSe7ArcyzcMpnyUEvx7wsb nJXGOCqZWEQVJiFAHDli6l5d/YqZTizJGYdpe1RjmWVgYnNTlYtJ+9ljw/AoLcTE5cFOXxCyo2GP BQ2KsFYRClqKgHL3LNGJUCIWSIDLFAAq4iVIirMAH9yydyMCeKzU1Cc9MTqIzA+9ac7ZGWkccAO1 dija17euJIJsniTiMxyWN9sRuaxenan90MOPBbk9rOuoSMRpOAyf2ZqlQpoqluNUgzCEc9UuDBbe zG4sOq2QlObMC40jkFx861iNOW1gI6pAjngQGWKO1pmcPwXqIV7amJ9WAMSB2hyFrHa7cnXGMa5H 93Hu+wWpvTE+HDPSThKJz4cfwWtbtTV8y9BfVOEcT5eYw9oXJ3kwBIkGY4HL2ham9S6xpQi5Wr1D d+kPRr+c5/h+KR3UnMa8sSSeC051ynI2c8AfvW88phvdF3W//UenGQ0SB9SJDxMeTcV24bcrmdHq L+ryADrswmCSOWA9i5281cLQ24WSiqJM8vLIj3BPUjGJkfygk+CrtbQY22MzkkDwWM8Uw2KKoGHD 5pfErP6MFrbKwyjIS4F/biti2cfSn/ZOPgudvKyVpWBtwew4LPt4E1MccTj8FrRIZzxyW3QwGk8c fBanXlracJMCxrrDylnLs/Bce+OoyJ4nDuXdNsa9vMj55ExHNly/S9SZ/dGZ+5dpjjFcuWhttmDO Nshl8g//AFLehUYbqP7sgMO0YLMK/NENhkB2BZLK2tieQKuVcmBNe3ukc52WE92oge4Lx91kxuJ2 RLS1Fj3let6hIVUSA4kv4kk/FeSnCczOUQfK8iVv14zTbo7m26zsNnTCEqyXAJMS8nIc6gQQ62I/ VewgGjRYeZkWHsBXAr2m53EtdFErawQHAfCOGAOeS6du29XYjb1dHtr3LkyvL+BAwGL4ha8de6Zr pD6m6U2p5Rf8sYzJHjqAW9R9R9JnFjuYN+7YLAfEenIewryI6L1bM7KZzdgT7ogq1GznVdH9RtSw +aBkYHPlIZhP29e1WWveDrnSTWJysrnWWDvE48PKWl7ll/WdKvhIRujWwJOJrkAMyDgQAvFTosnY LdjtZkScWV4MAJRmDFu5au83QEJU212CbycTGETIaQAX4HFP2p8p5XPRt/UO8mN1CG33h3W2BE4E kSMSOGoDHNdn6FuB9eD5yEh3ELyl59LptWnzerOZkCQTHTpETEAYO5fmuv8AQu5MOoWVS/NEN7U2 1/Jx2XPOPl6uj/8ANbiJ5AhW2e4F19gxeMi/tZvcse4Jo64ZcLawR4LU6baf1+6jzkT4fYrjFd62 Pr0TqBYyBEZZseBbvxXzajazs3e8o3ol6tMLJSDsdcDxLYhfRdqZTm4+SOZ7eXguR13pdUdxf1SA 8tlEq7gOYAaX90N4L0/22+L43u57zu8RsZw2857yYB9LCqJxe0vpLf1c1it325tsNllkpSOZdY7p DCEflg7/ANqWZ9mCxLrvtc8JNZjlu1b2yJGnhhh71TeTlOYlLMjtbszWvGwxLx9qgyJzWfK2Yp4c 5hgiIstpCuFUKRjioyvEYrNABY4BZ4DFYrFbexqjZfGuWIm8QcmkQRE+BW3t6iTiMlr7OJFkDyII Piu3Vtz+olhmXbvxb3rF2xK83tre6TsTbZGLd57F6jcWx2m1JjgwaI7Vr9I2gpp9QjzS+C0OtbzX P04nyw+PFWfk0u1/Vuk/+P13a/q36ORvLzLUSccSSuBuLCZErpbq3yyHErjWyeRWNekjHr171Scl rzkrzksEzxXWR3kVnLBb/wBPRql1SuVraIAyL5OzD3lc2RXR6LTbOyc6xgAxOOTHIjtWrxrXb165 2j2szsrZCFU4g8A+D/hxVaKaqZyq9QMA4k2BAwfxd1yJbqZqFUogyiW1lic8MQrb7b3V7WG4hKQm WeWLY55q6XMzh13mLjLpRlREDb6gYxzlHF8MPetbqG3rltpQr+eWD9rhsStOjebncxAj5DU2oRA8 xGZzD4c1gl1Xe2w9G+OiUmY4Z8iVjy5sa8eJXmeo0So3VkZBnLjgMeSwwOA5ZLsdcqFlFW4iP8M+ nMciXIf2Ljxdu5dtekcduq+3mIWtLIY+IxCxyLl0l83eyH4r0erbjx+EVRSWUEK7K2unV69w3YwP bIiP3r0n1bv/AEKYbGvDyseGefuXN+ndhHc2RExImcxICObVl3J4B8+5av1DMWdSsnGeuMgJAZ6X zj4LnWe6vTYiQricp3RB7osSfevVbeisyNoGoAkkNiASSPDFl5/pURUKZyjqIxHLVNy/91l6LVPb xjK0GEJvFszgxbLkeSlzJOGbPK4y3aNt+os0VMCXwyycsFg33RRftDbfUJUvhLIg5OGxW106UJ3G VUh6cXMy4fTybNyzYBW3O+t9OXlAp+UxbByCPbxTyZunj9/o80OnU7WyMaa4jUQIzZ5P/aLkeCiy eqZkMASWHYt26Xlk2OZHfzXPUuF1tvVZ3UlwOwZFQOSsMu5RpUF0KvpifxUenykfimRitBNchzBw 7wtee3MdUpYymSSe3ktqyqyXlEgzh8wWfILDbVvLZkR0wgfzYk+xvvRctP8AT1SIlMDDiVudS6Jd bOq6UxXrpi0SCS+OBHDBbOz2lVMhbaTOcGMCWZ+yOQXQ3Fp3FcZSzi+PsTjCXa8Yecn0AafJcdfF 4uH8Dgr7PbW7Gq83RjOIAlAjHHEHMciuqYrJtoRluaozAlGU4gxIBBBIwI4qLLbZKzfSEYzsNlh1 zmJSMs+IZvYy9PfPQJGMXbuA9q19vtdtR1CMqYxhG2kkxiGDuC7DDEFbG4hrOl8sRHgWOR5rlby9 UmOHM/mdE7f08mFvAE8O7iqbsU7WuN9rQhKcYmRwDSzK1L+nCW+01wJ1zEiMSIgN8vLL8Vb6tqnL pYGQiQfHJZ74XHGXM38dvu3lQRIBxqDEP7VwrIeYghmcEJtd29I28zIemSQBkX4EcVYPI48MH7F0 kxXO3LmHs45KBE8VkmzCIDHFzxx/YoJDsMhkF0k7uQIlZY0A4k5YkKsSCMc+HJvxVoTLtwJBPdyV uexMM1cIQIlIZZDtW1Cw/N7AGC1WlPHlgAkb2w0nDsXLfW7fd1lkb8bbM9AL5uS6yQNcpNbE1tkc x3nktKG7iCHcPwx/BblG9qJ0yIIOYLA/FefbTadnSWXuncSshbGQPysGwLAkSwPIsVvSfTDeVAyM gRMAkeaLaZEd2C0txpgRKP8AhTwAzYEh/exW5spQG2lQx1HzA5jBtUffgpbxLTHWNfqvSt31H/mY CPrj5o5GQLnGRwJB/pXmrK51TlCwGM4kiUTgQRmF9F2dUiMJNYQACSAIhsAY4uceS879XbG6FsN3 Np6vLOyIAct5dQGRw/aunr9udvHsxv68S3u8ypUKV3cRkYopVEMVLFWDce4cEGHj3IKspJwAYYPj x8VJHEHPhxVUEx8C2Y4EIgIww8cQVAQHU4KqlBIHuZ1BTsQuMOPFBChSiAiIoIREQEREBERBb7FP uQDDV7O9SMPHBQAMe9XxOA9nFUcexWEjGQlHAhiDxccUFiGJGbZ55pIjgAMsMfbikiSTIlySXOZf mqkh8Oz28SoAL4e5QASWHFWgY8cCHbB8eA7Eb3oqO3DuXo/ojbG3qnqM4phKQPaRpHxXntJPDPId q9n9C7aUdvu9y4gGERM4AaQZFzwGKzvfy1desep6ht/V2VscH0uHwGBB+5eU33StxLb+rICMSxj3 Z4DP2r1G13e03kL4bWyEpROmyMAWgSGY6gHOHJa9ojPp8DJhIwD8ODfcuEzHbNxh843m3Nc/bise I8rjDPiO/DBb/VRHUWxYrQJLA8sjx5rv2jl3UdS5Jx44lSdUiZHEnEnPE5koBx960pxf3K4VQrhG olS5JfIHhwUKQo1IyB/ZwW7urbP0W1LNCqMonjqOuUj3FitIAjBbRjX/AC+JlPzzslEQ7BGJEj3k spV6VhvoFsYWQ4kAnsORXRssG32gjU7hog/etPbD/l5ROEoOCO7FZdxqsgIwx1TDez9q5XnaS9JX qkk02314220n8XT6XROe3G5rtkbg7ROIccCujbPc2RjbdIV6HaoYnJsT+CxdMgNttQLCHGJ8VjGr cGy+V49ODj0gwDcC+ZKxttbdsdGtNNZ4efW44z3cvfWEAgfNMsPHitC7a6Ya4SdmBicC5yI5jFbv UhEaJjgSw7GzXMstlOwAYAZBdfTL4xx/vts+y63trMMkZCimILuZHUeDfitm8xEAOMnJ7mwXPhOc piDvHET5PwbtW0RM6ZSInp4jDBdcV45Y1LYuCOIyK1CC66UhHhmcCMjj8VqWQD/eta/C2SsDKQ4W amoWTbLMpOoxkRyVthNavCc4xHbkVkEb7pxrgHnNhGIW3s6oT2rN5uHN1ubfp99NesmNdtrxAkCZ xh7Qz9y5Zma6eN4w0t5ZXsKhRBrL5j+JL8o5gAZjv9i45zfmsm5jIX2RmdUoyMSeDgtgsbDNbkmH K5zhZhnzUYvhxyV66J2kAA6ScZcFn3tUa/TMcgDH2f0q5mcHjcW/DXCvFYwyuGVZZOIKyNwdRRTO +wVwxMvs5Xodv0HbeWJEpsAZTk4D8RGI4d6zd5qslvR50xjzUZZN8V6a/o22rGk0E/1okgrm73ol 1FB3VQkaB82oNKHbyIUnslXxrlmcdMtUIn8pliCCQWLju4qtUw2iR7j2qZARqkOcxj3A/isD+C0j aD/sWQLDTaJeWXzDIrYjHhw4rFFoxdZBn9yiIWauAOeCxaJAcfFUsYTbkMlnAAGo5YknuWlGYtuM zliAsVrXqnb1iW6jg+IYLs2iyVo0FnYHj71zNnWTuozJ8oLPwXV3N8KddgDmIJBzD8Fy3zmOk6K3 zhbfDbufTpwBGGo812tlqJEtRc4A5+1ef2cZTEZE+eWJkc13dl6sQI+wtw7VjY7Ovbpore/SYkYS GUuzStSiuUiLD/gv5YjPnir7jby3EBKNweDPA5P7VpRt3NNZqLaYtIH8DyxSZRqb/rc42TrorZ/L PWxGGAYDL2rh7i+3cWeaXlP5cojwWe6wXbiw8yWWhdXZZP0qz5QCZN+K66yL2VlqmdFPyDAz5ns7 FWwWwGMnbgrfpbIREnOk5F1Rp+pGD6oyzBWuEdzpch+n05EM63a5jUe3Jae1aFURzz7lsRnELnjq M18j6EvD4hTtJD0J+PwWndvIyMqgPzAA9jOfeFfb26YTHPj4K+NwZ5dHZkebw+9a+73k/X9OBaEc CP3jxf4KNtcQ4zdlp22/xZFhjOWPfh7lJ6+bwl2dBw0TwLMtuqQLLmm1q6/D4LNTf5/tyS+ur5Ny wE4DtVq6xGGn2ntVKL6r4aqpCUeJ7eRHBZgWPfktTTE56sZ5U0jWOxTcwL8grYOtbe2iFU5Hl8Uq 5cHqc5WR9OOcsyuZu66tvs5whmWBObkn8FvWSM5mfeypbVC2JEgCJZx4KTbFnwVbpde4s0RgIQOk GTxcY8GcY4rvV7fdxyjRLtYx92krmdKb1LTy0xHvXcjNiO1lq3lVY17wY+jRhx1EH2iKyUnfWH0z GqI4vOcwwHayvK0RgT3up2InZZpPykCUzxZz5fxUGSvZTzlCqXHKQDcOJdaXV/pzbb3aWCFFdd5x rsrcHUMRgwBB712gRKUvYPBSCcR7Elsucj5T1Paorm_state = array(); * module_load_include('inc', 'node', 'node.pages'); * $node = array('type' => 'story'); * $form_state['values']['title'] = 'My node'; * $form_state['values']['body'] = 'This is the body text!'; * $form_state['values']['name'] = 'robo-user'; * $form_state['values']['op'] = t('Save'); * drupal_execute('story_node_form', $form_state, (object)$node); * @endcode */ function drupal_execute($form_id, &$form_state) { $args = func_get_args(); // Make sure $form_state is passed around by reference. $args[1] = &$form_state; $form = call_user_func_array('drupal_retrieve_form', $args); $form['#post'] = $form_state['values']; // Reset form validation. $form_state['must_validate'] = TRUE; form_set_error(NULL, '', TRUE); drupal_prepare_form($form_id, $form, $form_state); drupal_process_form($form_id, $form, $form_state); } /** * Retrieves the structured array that defines a given form. * * @param $form_id * The unique string identifying the desired form. If a function * with that name exists, it is called to build the form array. * Modules that need to generate the same form (or very similar forms) * using different $form_ids can implement hook_forms(), which maps * different $form_id values to the proper form constructor function. * @param $form_state * A keyed array containing the current state of the form. * @param ... * Any additional arguments needed by the unique form constructor * function. Generally, these are any arguments passed into the * drupal_get_form() or drupal_execute() functions after the first * argument. If a module implements hook_forms(), it can examine * these additional arguments and conditionally return different * builder functions as well. */ function drupal_retrieve_form($form_id, &$form_state) { static $forms; // We save two copies of the incoming arguments: one for modules to use // when mapping form ids to constructor functions, and another to pass to // the constructor function itself. We shift out the first argument -- the // $form_id itself -- from the list to pass into the constructor function, // since it's already known. $args = func_get_args(); $saved_args = $args; array_shift($args); if (isset($form_state)) { array_shift($args); } // We first check to see if there's a function named after the $form_id. // If there is, we simply pass the arguments on to it to get the form. if (!function_exists($form_id)) { // In cases where many form_ids need to share a central constructor function, // such as the node editing form, modules can implement hook_forms(). It // maps one or more form_ids to the correct constructor functions. // // We cache the results of that hook to save time, but that only works // for modules that know all their form_ids in advance. (A module that // adds a small 'rate this comment' form to each comment in a list // would need a unique form_id for each one, for example.) // // So, we call the hook if $forms isn't yet populated, OR if it doesn't // yet have an entry for the requested form_id. if (!isset($forms) || !isset($forms[$form_id])) { $forms = module_invoke_all('forms', $form_id, $args); } $form_definition = $forms[$form_id]; if (isset($form_definition['callback arguments'])) { $args = array_merge($form_definition['callback arguments'], $args); } if (isset($form_definition['callback'])) { $callback = $form_definition['callback']; } } array_unshift($args, NULL); $args[0] = &$form_state; // If $callback was returned by a hook_forms() implementation, call it. // Otherwise, call the function named after the form id. $form = call_user_func_array(isset($callback) ? $callback : $form_id, $args); // We store the original function arguments, rather than the final $arg // value, so that form_alter functions can see what was originally // passed to drupal_retrieve_form(). This allows the contents of #parameters // to be saved and passed in at a later date to recreate the form. $form['#parameters'] = $saved_args; return $form; } /** * This function is the heart of form API. The form gets built, validated and in * appropriate cases, submitted. * * @param $form_id * The unique string identifying the current form. * @param $form * An associative array containing the structure of the form. * @param $form_state * A keyed array containing the current state of the form. This * includes the current persistent storage data for the form, and * any data passed along by earlier steps when displaying a * multi-step form. Additional information, like the sanitized $_POST * data, is also accumulated here. */ function drupal_process_form($form_id, &$form, &$form_state) { $form_state['values'] = array(); $form = form_builder($form_id, $form, $form_state); // Only process the form if it is programmed or the form_id coming // from the POST data is set and matches the current form_id. if ((!empty($form['#programmed'])) || (!empty($form['#post']) && (isset($form['#post']['form_id']) && ($form['#post']['form_id'] == $form_id)))) { $form_state['process_input'] = TRUE; drupal_validate_form($form_id, $form, $form_state); // form_clean_id() maintains a cache of element IDs it has seen, // so it can prevent duplicates. We want to be sure we reset that // cache when a form is processed, so scenerios that result in // the form being built behind the scenes and again for the // browser don't increment all the element IDs needlessly. form_clean_id(NULL, TRUE); if ((!empty($form_state['submitted'])) && !form_get_errors() && empty($form_state['rebuild'])) { $form_state['redirect'] = NULL; form_execute_handlers('submit', $form, $form_state); // We'll clear out the cached copies of the form and its stored data // here, as we've finished with them. The in-memory copies are still // here, though. if (variable_get('cache', CACHE_DISABLED) == CACHE_DISABLED && !empty($form_state['values']['form_build_id'])) { cache_clear_all('form_'. $form_state['values']['form_build_id'], 'cache_form'); cache_clear_all('storage_'. $form_state['values']['form_build_id'], 'cache_form'); } // If batches were set in the submit handlers, we process them now, // possibly ending execution. We make sure we do not react to the batch // that is already being processed (if a batch operation performs a // drupal_execute). if ($batch =& batch_get() && !isset($batch['current_set'])) { // The batch uses its own copies of $form and $form_state for // late execution of submit handers and post-batch redirection. $batch['form'] = $form; $batch['form_state'] = $form_state; $batch['progressive'] = !$form['#programmed']; batch_process(); // Execution continues only for programmatic forms. // For 'regular' forms, we get redirected to the batch processing // page. Form redirection will be handled in _batch_finished(), // after the batch is processed. } // If no submit handlers have populated the $form_state['storage'] // bundle, and the $form_state['rebuild'] flag has not been set, // we're finished and should redirect to a new destination page // if one has been set (and a fresh, unpopulated copy of the form // if one hasn't). If the form was called by drupal_execute(), // however, we'll skip this and let the calling function examine // the resulting $form_state bundle itself. if (!$form['#programmed'] && empty($form_state['rebuild']) && empty($form_state['storage'])) { drupal_redirect_form($form, $form_state['redirect']); } } } } /** * Prepares a structured form array by adding required elements, * executing any hook_form_alter functions, and optionally inserting * a validation token to prevent tampering. * * @param $form_id * A unique string identifying the form for validation, submission, * theming, and hook_form_alter functions. * @param $form * An associative array containing the structure of the form. * @param $form_state * A keyed array containing the current state of the form. Passed * in here so that hook_form_alter() calls can use it, as well. */ function drupal_prepare_form($form_id, &$form, &$form_state) { global $user; $form['#type'] = 'form'; $form['#programmed'] = isset($form['#post']); if (isset($form['#build_id'])) { $form['form_build_id'] = array( '#type' => 'hidden', '#value' => $form['#build_id'], '#id' => $form['#build_id'], '#name' => 'form_build_id', ); } // Add a token, based on either #token or form_id, to any form displayed to // authenticated users. This ensures that any submitted form was actually // requested previously by the user and protects against cross site request // forgeries. if (isset($form['#token'])) { if ($form['#token'] === FALSE || $user->uid == 0 || $form['#programmed']) { unset($form['#token']); } else { $form['form_token'] = array('#type' => 'token', '#default_value' => drupal_get_token($form['#token'])); } } else if (isset($user->uid) && $user->uid && !$form['#programmed']) { $form['#token'] = $form_id; $form['form_token'] = array( '#id' => form_clean_id('edit-'. $form_id .'-form-token'), '#type' => 'token', '#default_value' => drupal_get_token($form['#token']), ); } if (isset($form_id)) { $form['form_id'] = array( '#type' => 'hidden', '#value' => $form_id, '#id' => form_clean_id("edit-$form_id"), ); } if (!isset($form['#id'])) { $form['#id'] = form_clean_id($form_id); } $form += _element_info('form'); if (!isset($form['#validate'])) { if (function_exists($form_id .'_validate')) { $form['#validate'] = array($form_id .'_validate'); } } if (!isset($form['#submit'])) { if (function_exists($form_id .'_submit')) { // We set submit here so that it can be altered. $form['#submit'] = array($form_id .'_submit'); } } // Normally, we would call drupal_alter($form_id, $form, $form_state). // However, drupal_alter() normally supports just one byref parameter. Using // the __drupal_alter_by_ref key, we can store any additional parameters // that need to be altered, and they'll be split out into additional params // for the hook_form_alter() implementations. // @todo: Remove this in Drupal 7. $data = &$form; $data['__drupal_alter_by_ref'] = array(&$form_state); drupal_alter('form_'. $form_id, $data); // __drupal_alter_by_ref is unset in the drupal_alter() function, we need // to repopulate it to ensure both calls get the data. $data['__drupal_alter_by_ref'] = array(&$form_state); drupal_alter('form', $data, $form_id); } /** * Validates user-submitted form data from the $form_state using * the validate functions defined in a structured form array. * * @param $form_id * A unique string identifying the form for validation, submission, * theming, and hook_form_alter functions. * @param $form * An associative array containing the structure of the form. * @param $form_state * A keyed array containing the current state of the form. The current * user-submitted data is stored in $form_state['values'], though * form validation functions are passed an explicit copy of the * values for the sake of simplicity. Validation handlers can also * $form_state to pass information on to submit handlers. For example: * $form_state['data_for_submision'] = $data; * This technique is useful when validation requires file parsing, * web service requests, or other expensive requests that should * not be repeated in the submission step. */ function drupal_validate_form($form_id, $form, &$form_state) { static $validated_forms = array(); if (isset($validated_forms[$form_id]) && empty($form_state['must_validate'])) { return; } // If the session token was set by drupal_prepare_form(), ensure that it // matches the current user's session. if (isset($form['#token'])) { if (!drupal_valid_token($form_state['values']['form_token'], $form['#token'])) { // Setting this error will cause the form to fail validation. form_set_error('form_token', t('Validation error, please try again. If this error persists, please contact the site administrator.')); } } _form_validate($form, $form_state, $form_id); $validated_forms[$form_id] = TRUE; } /** * Renders a structured form array into themed HTML. * * @param $form_id * A unique string identifying the form for validation, submission, * theming, and hook_form_alter functions. * @param $form * An associative array containing the structure of the form. * @return * A string containing the themed HTML. */ function drupal_render_form($form_id, &$form) { // Don't override #theme if someone already set it. if (!isset($form['#theme'])) { init_theme(); $registry = theme_get_registry(); if (isset($registry[$form_id])) { $form['#theme'] = $form_id; } } $output = drupal_render($form); return $output; } /** * Redirect the user to a URL after a form has been processed. * * @param $form * An associative array containing the structure of the form. * @param $redirect * An optional value containing the destination path to redirect * to if none is specified by the form. */ function drupal_redirect_form($form, $redirect = NULL) { $goto = NULL; if (isset($redirect)) { $goto = $redirect; } if ($goto !== FALSE && isset($form['#redirect'])) { $goto = $form['#redirect']; } if (!isset($goto) || ($goto !== FALSE)) { if (isset($goto)) { if (is_array($goto)) { call_user_func_array('drupal_goto', $goto); } else { drupal_goto($goto); } } drupal_goto($_GET['q']); } } /** * Performs validation on form elements. First ensures required fields are * completed, #maxlength is not exceeded, and selected options were in the * list of options given to the user. Then calls user-defined validators. * * @param $elements * An associative array containing the structure of the form. * @param $form_state * A keyed array containing the current state of the form. The current * user-submitted data is stored in $form_state['values'], though * form validation functions are passed an explicit copy of the * values for the sake of simplicity. Validation handlers can also * $form_state to pass information on to submit handlers. For example: * $form_state['data_for_submision'] = $data; * This technique is useful when validation requires file parsing, * web service requests, or other expensive requests that should * not be repeated in the submission step. * @param $form_id * A unique string identifying the form for validation, submission, * theming, and hook_form_alter functions. */ function _form_validate($elements, &$form_state, $form_id = NULL) { static $complete_form; // Also used in the installer, pre-database setup. $t = get_t(); // Recurse through all children. foreach (element_children($elements) as $key) { if (isset($elements[$key]) && $elements[$key]) { _form_validate($elements[$key], $form_state); } } // Validate the current input. if (!isset($elements['#validated']) || !$elements['#validated']) { if (isset($elements['#needs_validation'])) { // Make sure a value is passed when the field is required. // A simple call to empty() will not cut it here as some fields, like // checkboxes, can return a valid value of '0'. Instead, check the // length if it's a string, and the item count if it's an array. if ($elements['#required'] && (!count($elements['#value']) || (is_string($elements['#value']) && strlen(trim($elements['#value'])) == 0))) { form_error($elements, $t('!name field is required.', array('!name' => $elements['#title']))); } // Verify that the value is not longer than #maxlength. if (isset($elements['#maxlength']) && drupal_strlen($elements['#value']) > $elements['#maxlength']) { form_error($elements, $t('!name cannot be longer than %max characters but is currently %length characters long.', array('!name' => empty($elements['#title']) ? $elements['#parents'][0] : $elements['#title'], '%max' => $elements['#maxlength'], '%length' => drupal_strlen($elements['#value'])))); } if (isset($elements['#options']) && isset($elements['#value'])) { if ($elements['#type'] == 'select') { $options = form_options_flatten($elements['#options']); } else { $options = $elements['#options']; } if (is_array($elements['#value'])) { $value = $elements['#type'] == 'checkboxes' ? array_keys(array_filter($elements['#value'])) : $elements['#value']; foreach ($value as $v) { if (!isset($options[$v])) { form_error($elements, $t('An illegal choice has been detected. Please contact the site administrator.')); watchdog('form', 'Illegal choice %choice in !name element.', array('%choice' => $v, '!name' => empty($elements['#title']) ? $elements['#parents'][0] : $elements['#title']), WATCHDOG_ERROR); } } } elseif (!isset($options[$elements['#value']])) { form_error($elements, $t('An illegal choice has been detected. Please contact the site administrator.')); watchdog('form', 'Illegal choice %choice in %name element.', array('%choice' => $elements['#value'], '%name' => empty($elements['#title']) ? $elements['#parents'][0] : $elements['#title']), WATCHDOG_ERROR); } } } // Call user-defined form level validators and store a copy of the full // form so that element-specific validators can examine the entire structure // if necessary. if (isset($form_id)) { form_execute_handlers('validate', $elements, $form_state); $complete_form = $elements; } // Call any element-specific validators. These must act on the element // #value data. elseif (isset($elements['#element_validate'])) { foreach ($elements['#element_validate'] as $function) { if (function_exists($function)) { $function($elements, $form_state, $complete_form); } } } $elements['#validated'] = TRUE; } } /** * A helper function used to execute custom validation and submission * handlers for a given form. Button-specific handlers are checked * first. If none exist, the function falls back to form-level handlers. * * @param $type * The type of handler to execute. 'validate' or 'submit' are the * defaults used by Form API. * @param $form * An associative array containing the structure of the form. * @param $form_state * A keyed array containing the current state of the form. If the user * submitted the form by clicking a button with custom handler functions * defined, those handlers will be stored here. */ function form_execute_handlers($type, &$form, &$form_state) { $return = FALSE; if (isset($form_state[$type .'_handlers'])) { $handlers = $form_state[$type .'_handlers']; } elseif (isset($form['#'. $type])) { $handlers = $form['#'. $type]; } else { $handlers = array(); } foreach ($handlers as $function) { if (function_exists($function)) { // Check to see if a previous _submit handler has set a batch, but // make sure we do not react to a batch that is already being processed // (for instance if a batch operation performs a drupal_execute()). if ($type == 'submit' && ($batch =& batch_get()) && !isset($batch['current_set'])) { // Some previous _submit handler has set a batch. We store the call // in a special 'control' batch set, for execution at the correct // time during the batch processing workflow. $batch['sets'][] = array('form_submit' => $function); } else { $function($form, $form_state); } $return = TRUE; } } return $return; } /** * File an error against a form element. * * @param $name * The name of the form element. If the #parents property of your form * element is array('foo', 'bar', 'baz') then you may set an error on 'foo' * or 'foo][bar][baz'. Setting an error on 'foo' sets an error for every * element where the #parents array starts with 'foo'. * @param $message * The error message to present to the user. * @param $reset * Reset the form errors static cache. * @return * Never use the return value of this function, use form_get_errors and * form_get_error instead. */ function form_set_error($name = NULL, $message = '', $reset = FALSE) { static $form = array(); if ($reset) { $form = array(); } if (isset($name) && !isset($form[$name])) { $form[$name] = $message; if ($message) { drupal_set_message($message, 'error'); } } return $form; } /** * Return an associative array of all errors. */ function form_get_errors() { $form = form_set_error(); if (!empty($form)) { return $form; } } /** * Return the error message filed against the form with the specified name. */ function form_get_error($element) { $form = form_set_error(); $key = $element['#parents'][0]; if (isset($form[$key])) { return $form[$key]; } $key = implode('][', $element['#parents']); if (isset($form[$key])) { return $form[$key]; } } /** * Flag an element as having an error. */ function form_error(&$element, $message = '') { form_set_error(implode('][', $element['#parents']), $message); } /** * Walk through the structured form array, adding any required * properties to each element and mapping the incoming $_POST * data to the proper elements. * * @param $form_id * A unique string identifying the form for validation, submission, * theming, and hook_form_alter functions. * @param $form * An associative array containing the structure of the form. * @param $form_state * A keyed array containing the current state of the form. In this * context, it is used to accumulate information about which button * was clicked when the form was submitted, as well as the sanitized * $_POST data. */ function form_builder($form_id, $form, &$form_state) { static $complete_form, $cache; // Initialize as unprocessed. $form['#processed'] = FALSE; // Use element defaults. if ((!empty($form['#type'])) && ($info = _element_info($form['#type']))) { // Overlay $info onto $form, retaining preexisting keys in $form. $form += $info; } if (isset($form['#type']) && $form['#type'] == 'form') { $cache = NULL; $complete_form = $form; if (!empty($form['#programmed'])) { $form_state['submitted'] = TRUE; } } if (isset($form['#input']) && $form['#input']) { _form_builder_handle_input_element($form_id, $form, $form_state, $complete_form); } $form['#defaults_loaded'] = TRUE; // We start off assuming all form elements are in the correct order. $form['#sorted'] = TRUE; // Recurse through all child elements. $count = 0; foreach (element_children($form) as $key) { $form[$key]['#post'] = $form['#post']; $form[$key]['#programmed'] = $form['#programmed']; // Don't squash an existing tree value. if (!isset($form[$key]['#tree'])) { $form[$key]['#tree'] = $form['#tree']; } // Deny access to child elements if parent is denied. if (isset($form['#access']) && !$form['#access']) { $form[$key]['#access'] = FALSE; } // Don't squash existing parents value. if (!isset($form[$key]['#parents'])) { // Check to see if a tree of child elements is present. If so, // continue down the tree if required. $form[$key]['#parents'] = $form[$key]['#tree'] && $form['#tree'] ? array_merge($form['#parents'], array($key)) : array($key); $array_parents = isset($form['#array_parents']) ? $form['#array_parents'] : array(); $array_parents[] = $key; $form[$key]['#array_parents'] = $array_parents; } // Assign a decimal placeholder weight to preserve original array order. if (!isset($form[$key]['#weight'])) { $form[$key]['#weight'] = $count/1000; } else { // If one of the child elements has a weight then we will need to sort // later. unset($form['#sorted']); } $form[$key] = form_builder($form_id, $form[$key], $form_state); $count++; } // The #after_build flag allows any piece of a form to be altered // after normal input parsing has been completed. if (isset($form['#after_build']) && !isset($form['#after_build_done'])) { foreach ($form['#after_build'] as $function) { $form = $function($form, $form_state); $form['#after_build_done'] = TRUE; } } // Now that we've processed everything, we can go back to handle the funky // Internet Explorer button-click scenario. _form_builder_ie_cleanup($form, $form_state); // We shoud keep the buttons array until the IE clean up function // has recognized the submit button so the form has been marked // as submitted. If we already know which button was submitted, // we don't need the array. if (!empty($form_state['submitted'])) { unset($form_state['buttons']); } // If some callback set #cache, we need to flip a static flag so later it // can be found. if (!empty($form['#cache'])) { $cache = $form['#cache']; } // We are on the top form, we can copy back #cache if it's set. if (isset($form['#type']) && $form['#type'] == 'form' && isset($cache)) { $form['#cache'] = TRUE; } return $form; } /** * Populate the #value and #name properties of input elements so they * can be processed and rendered. Also, execute any #process handlers * attached to a specific element. */ function _form_builder_handle_input_element($form_id, &$form, &$form_state, $complete_form) { if (!isset($form['#name'])) { $name = array_shift($form['#parents']); $form['#name'] = $name; if ($form['#type'] == 'file') { // To make it easier to handle $_FILES in file.inc, we place all // file fields in the 'files' array. Also, we do not support // nested file names. $form['#name'] = 'files['. $form['#name'] .']'; } elseif (count($form['#parents'])) { $form['#name'] .= '['. implode('][', $form['#parents']) .']'; } array_unshift($form['#parents'], $name); } if (!isset($form['#id'])) { $form['#id'] = form_clean_id('edit-'. implode('-', $form['#parents'])); } if (!empty($form['#disabled'])) { $form['#attributes']['disabled'] = 'disabled'; } if (!isset($form['#value']) && !array_key_exists('#value', $form)) { $function = !empty($form['#value_callback']) ? $form['#value_callback'] : 'form_type_'. $form['#type'] .'_value'; if (($form['#programmed']) || ((!isset($form['#access']) || $form['#access']) && isset($form['#post']) && (isset($form['#post']['form_id']) && $form['#post']['form_id'] == $form_id))) { $edit = $form['#post']; foreach ($form['#parents'] as $parent) { $edit = isset($edit[$parent]) ? $edit[$parent] : NULL; } if (!$form['#programmed'] || isset($edit)) { // Call #type_value to set the form value; if (function_exists($function)) { $form['#value'] = $function($form, $edit); } if (!isset($form['#value']) && isset($edit)) { $form['#value'] = $edit; } } // Mark all posted values for validation. if (isset($form['#value']) || (isset($form['#required']) && $form['#required'])) { $form['#needs_validation'] = TRUE; } } // Load defaults. if (!isset($form['#value'])) { // Call #type_value without a second argument to request default_value handling. if (function_exists($function)) { $form['#value'] = $function($form); } // Final catch. If we haven't set a value yet, use the explicit default value. // Avoid image buttons (which come with garbage value), so we only get value // for the button actually clicked. if (!isset($form['#value']) && empty($form['#has_garbage_value'])) { $form['#value'] = isset($form['#default_value']) ? $form['#default_value'] : ''; } } } // Determine which button (if any) was clicked to submit the form. // We compare the incoming values with the buttons defined in the form, // and flag the one that matches. We have to do some funky tricks to // deal with Internet Explorer's handling of single-button forms, though. if (!empty($form['#post']) && isset($form['#executes_submit_callback'])) { // First, accumulate a collection of buttons, divided into two bins: // those that execute full submit callbacks and those that only validate. $button_type = $form['#executes_submit_callback'] ? 'submit' : 'button'; $form_state['buttons'][$button_type][] = $form; if (_form_button_was_clicked($form)) { $form_state['submitted'] = $form_state['submitted'] || $form['#executes_submit_callback']; // In most cases, we want to use form_set_value() to manipulate // the global variables. In this special case, we want to make sure that // the value of this element is listed in $form_variables under 'op'. $form_state['values'][$form['#name']] = $form['#value']; $form_state['clicked_button'] = $form; if (isset($form['#validate'])) { $form_state['validate_handlers'] = $form['#validate']; } if (isset($form['#submit'])) { $form_state['submit_handlers'] = $form['#submit']; } } } // Allow for elements to expand to multiple elements, e.g., radios, // checkboxes and files. if (isset($form['#process']) && !$form['#processed']) { foreach ($form['#process'] as $process) { if (function_exists($process)) { $form = $process($form, isset($edit) ? $edit : NULL, $form_state, $complete_form); } } $form['#processed'] = TRUE; } form_set_value($form, $form['#value'], $form_state); } /** * Helper function to handle the sometimes-convoluted logic of button * click detection. * * In Internet Explorer, if ONLY one submit button is present, AND the * enter key is used to submit the form, no form value is sent for it * and we'll never detect a match. That special case is handled by * _form_builder_ie_cleanup(). */ function _form_button_was_clicked($form) { // First detect normal 'vanilla' button clicks. Traditionally, all // standard buttons on a form share the same name (usually 'op'), // and the specific return value is used to determine which was // clicked. This ONLY works as long as $form['#name'] puts the // value at the top level of the tree of $_POST data. if (isset($form['#post'][$form['#name']]) && $form['#post'][$form['#name']] == $form['#value']) { return TRUE; } // When image buttons are clicked, browsers do NOT pass the form element // value in $_POST. Instead they pass an integer representing the // coordinates of the click on the button image. This means that image // buttons MUST have unique $form['#name'] values, but the details of // their $_POST data should be ignored. elseif (!empty($form['#has_garbage_value']) && isset($form['#value']) && $form['#value'] !== '') { return TRUE; } return FALSE; } /** * In IE, if only one submit button is present, AND the enter key is * used to submit the form, no form value is sent for it and our normal * button detection code will never detect a match. We call this * function after all other button-detection is complete to check * for the proper conditions, and treat the single button on the form * as 'clicked' if they are met. */ function _form_builder_ie_cleanup($form, &$form_state) { // Quick check to make sure we're always looking at the full form // and not a sub-element. if (!empty($form['#type']) && $form['#type'] == 'form') { // If we haven't recognized a submission yet, and there's a single // submit button, we know that we've hit the right conditions. Grab // the first one and treat it as the clicked button. if (empty($form_state['submitted']) && !empty($form_state['buttons']['submit']) && empty($form_state['buttons']['button'])) { $button = $form_state['buttons']['submit'][0]; // Set up all the $form_state information that would have been // populated had the button been recognized earlier. $form_state['submitted'] = TRUE; $form_state['submit_handlers'] = empty($button['#submit']) ? NULL : $button['#submit']; $form_state['validate_handlers'] = empty($button['#validate']) ? NULL : $button['#validate']; $form_state['values'][$button['#name']] = $button['#value']; $form_state['clicked_button'] = $button; } } } /** * Helper function to determine the value for an image button form element. * * @param $form * The form element whose value is being populated. * @param $edit * The incoming POST data to populate the form element. If this is FALSE, * the element's default value should be returned. * @return * The data that will appear in the $form_state['values'] collection * for this element. Return nothing to use the default. */ function form_type_image_button_value($form, $edit = FALSE) { if ($edit !== FALSE) { if (!empty($edit)) { // If we're dealing with Mozilla or Opera, we're lucky. It will // return a proper value, and we can get on with things. return $form['#return_value']; } else { // Unfortunately, in IE we never get back a proper value for THIS // form element. Instead, we get back two split values: one for the // X and one for the Y coordinates on which the user clicked the // button. We'll find this element in the #post data, and search // in the same spot for its name, with '_x'. $post = $form['#post']; foreach (split('\[', $form['#name']) as $element_name) { // chop off the ] that may exist. if (substr($element_name, -1) == ']') { $element_name = substr($element_name, 0, -1); } if (!isset($post[$element_name])) { if (isset($post[$element_name .'_x'])) { return $form['#return_value']; } return NULL; } $post = $post[$element_name]; } return $form['#return_value']; } } } /** * Helper function to determine the value for a checkbox form element. * * @param $form * The form element whose value is being populated. * @param $edit * The incoming POST data to populate the form element. If this is FALSE, * the element's default value should be returned. * @return * The data that will appear in the $form_state['values'] collection * for this element. Return nothing to use the default. */ function form_type_checkbox_value($form, $edit = FALSE) { if ($edit !== FALSE) { if (empty($form['#disabled'])) { return !empty($edit) ? $form['#return_value'] : 0; } else { return $form['#default_value']; } } } /** * Helper function to determine the value for a checkboxes form element. * * @param $form * The form element whose value is being populated. * @param $edit * The incoming POST data to populate the form element. If this is FALSE, * the element's default value should be returned. * @return * The data that will appear in the $form_state['values'] collection * for this element. Return nothing to use the default. */ function form_type_checkboxes_value($form, $edit = FALSE) { if ($edit === FALSE) { $value = array(); $form += array('#default_value' => array()); foreach ($form['#default_value'] as $key) { $value[$key] = 1; } return $value; } elseif (!isset($edit)) { return array(); } } /** * Helper function to determine the value for a password_confirm form * element. * * @param $form * The form element whose value is being populated. * @param $edit * The incoming POST data to populate the form element. If this is FALSE, * the element's default value should be returned. * @return * The data that will appear in the $form_state['values'] collection * for this element. Return nothing to use the default. */ function form_type_password_confirm_value($form, $edit = FALSE) { if ($edit === FALSE) { $form += array('#defaulteMn09fLv2buitz3HHxu7KhfJYZQuq5DowDBeKW/Fr01LV8ET1g33a+5QiZcZ8d8ef HBTIjlAQhG/FwDrfyyLXQQKJj+wbZCPRKRMjFja2qnb/AOpeuM79JI3Ze2zx7sjMwIzFPLCvVNCN WkI474iequgjxps3swlgzkwstYEA2qS/rKQFFyPJUaLX9TD7UP8AoObL21FlijyGBjyDKLMACuRB G1/6isd1V/T4THzZcOXucubgPK0MUhl2yQujkp629W3dJ6VR9+1q6PI7Vh5nZYs/IVcyXFX9Wbt2 koKdKyrGdu2XTdIn/iri8iaPtU03ccYnK+nMlYmiyNCIslCAEzYV/ptuX9Nvy1mFleDbnDPWe1d3 g7jNkdtcKvdOzkCeEnXUH0pFZhqksfOnngix/wBwZWX9lIC8qzHd6bHlY+ZD/wAv8Fc59JZvZO6d 6XNw8yLMyWgISROmeK39SCY9Pr4+u/H9Rf0vLXW91lk9NIYUjaTIbY8c27qQA79m0HrHy7qjriex pOUc7PFh4+BPHPM2T2wyq0m+7vjkEAMsg8uxyp/Htrmfqv6eMv7jN7JGkuZuD5KzuA0ipba0Ur/1 FKL0q7V03ff3C4WVBLk/siUjRFZRIhZmAJ27drdC+b8dcj+9yEM0WTO+Qu4D95LZGjXhGrJomob5 aVrmTDtCjoYfcP3eT205uQBjI9hCr2aQWGjOi+3pXq3VzuR3Tu2fhJB3ByxxyUxiHUWF+naH6ba/ Mao7p3eedf28Y/SVrBh8xBtcWrGnyY440x5FZmNwulwTofhXWtI1Qs+xocwdwbIZ8jFAB0HpEa7f mIudf5aSPHR5GO87W1YOux7tz5VsH7ggMUTS75NQzEgAX4C9v/DUiSGRH9U2kjtpYbT+Tb+Kumpl No0PccSKXV7tKnQJT+WxAW2laqRX9eOJ7eoxG1QPHnflXVqVzsaSGZTHtboZhtKtbj+ZWrnM1crH mOJNAGkuNkyDQqOYY0Uo1M+pj5A/bs0UxKybv6Y42tofbWz7flDH7TPEFBd4PWbbcEF5QirrWmka EdYDPOW2qjatwtc29tbKKT0v36vFcQQRx7SSDZXXl760iOSJMfJy2lx3sCgDkixOp11HsrN9SOCM Q4Shp00WLwFh1msbtzvLi5s0X6ZZSI2tdm6hwqWZO2u8s6ocoqEEWhbW3+qtLCyZWrBBDjE+rffK bMFYHczH5dt9KeRIo0REuZWYkIp1N/ZTGWDHRZdoWWTczqti1zw28PL5a16dwZp2lSL9VumNr3sp PVcfiNUjLWgZSXjU+odFXcNKwszeUKy72t/Tsthf81ZuRKWlLxFRGlw8imyi3LhzrWyZ2RkzBdxC sQETkBV8FSevY2n0+ky977arLYRncfiCa18ePkTSho18zsoYmwB3bgdxrddjhVu8wzRv5WY7WJPB CK06DNWN023XVgbg8De1qXJV+hmnYkcsM+15xcvKnUoduV+F618WNKXVog0Ya6yM4Fx7r0krIq+m Wb03IkUcOo+anTPZUMYbyno3a6GsQaz0MlYlHTI501UkcQfdRlZTOjxYylQpAueG0DixrAmymYqz C1r2W/OrD3IPGsbRgBfDnUac5NKYFnzJP26YoUKthe1YPDQU8shlcuQBfkOFJQ0f/9DwCiiigCii igCiiigCiiigCiiigCiiigCiiigCiisztWKmZnwY8l/Tduu3hVrV2sqrqRuE2+mT0f6NEGH2UGQt DNIpdSiht5voH1G1bV3Xf/qft2f2vtnbu3xSxtgqVaaYqGIIsQNl79XVXGxRpEiRRDoQbV9gFWHb wUg8rV+i4/j1quJtuePK7Sz43Jzu29Yi+vsZpzXJtcheRuaVsog3Le8HlWISo6SLnlb2UAi5JFq9 O9nCEZJyxcHf99H7wcANb8dKxiq+At40wKg2+6puZpJF37thcXKm2hABredw+q8XLwkw4+0wY5Cb Tk+ozym53OQbDztXO3XkRU3HE6gcK5cnHW7ra0/a5UODpTkdE61j7tZRJy5OIPuv/wB1J+6msLXP 202l72+NGt/4Vpy+phR2K2yMkeW5A8K0mZkd1AmhXeI2cSL1C+5eBteugOot9tUsqMb21rz8/Dvr nMHbi5Nrx1NLlz5+VjuPRcSTMGyH6RcADh8RWpKPG93hO8cBfma69wttB7jWM0Ksb7bnxrxf8d1n B6PyrDkMXu864ssMuEXSWPaARYK4F1dNTtb/AMtYcmZkGSJ5opCBt3jjYDktbNLBQNb0x2EWK6Vx fx4bcanT8srU0fb8vJxc1p0iZ9xO3cdpGuhB1rpcz6k7jnIDk4yyTAAepuF7X52FY6ovJbmnBC8F rlf46dpjQ6V5YUSc9O3cpZppNgUu24cwNfC1Vwp3KPKOXMTNu/qa62PG1dAdrMempCqNCBat/ja6 Gd67jy95lWBMeCMRY0rLviiQgrt4O7kXZ618vdsoglYchn3XFybAVngLYj7qAy21F+VZ/G+w3I16 9wzZAfUWVfBVXT7CdK2Pb8X6hmRZ8ftOXkrOuxMnaQh28Qh8rsLeNKdvE2143qYPq3uPY8tG/wCo TqscivjYbMTEyrpYgnaqsp+Wud62SlI1Vp6s1WTkZwk2ZWLMkqCzxyCxWx8tjXT9kyMeH6egbuUn /Tos/uLLLk7PU/TxIr39MkeaTI29P4aryvqH/rEYiyPTklNpYGBDSop0aF5Bo1j1bqwPrSBk7L2T FgUsyQfu8gWvb9xK7ghf/wBEke6sZtWIhmlCeso6uf6amfOnTsfchKwspaeB0Vje26OSISx+n8y+ Torc/TXbRj95gaTuH7kZWLMjNEhEQ3IwkZCT5kZSmx0SuC7L9eR4/bwuY7tJCBGsgLbmCcFYKdro 21fMvRXafSH1fD3zu2J2+LHWMxmbJk2g842VVtb7fxVxe9YaNrbJq8rtWD20/wDThnzS2T1p5I4P TkMYsQ63PO69X+Wup7bmd+GGe1duyYpzvLwMCXX0Cw/9u5YqUn2fq7+v8Fc1lfUCxwpkOqs5YSQE AI0ka3jeOPdwdLeTy79+7/l1k4X17jx5MuVBkOWVl35k4UkA7Q0BBVekHd8u/Z5amWuo6my7z9F9 qzu9tl9w9fFgyGWZDCVCvvBEvl3FGR9jf/UWqMbBwv8AqeN+7D5WGGWP99KRJi+q6kR3UbXKnb52 XpetSv1h2uaOeCeSSbISXaJhkiNFjEnqLpGv9S2n6dO/1h2uTfBgzOs0kymJi6mJYnk2yBrgel59 2/fTPkmDvcj6cw5MlUy8XcCWUTRP1Mi4/phti/8ArepKnCufljxMGaWN+1CMR4MYhzIYvV6/T9PZ M5LemqLt29NdJgfSPc0zMbuOR3IRvEF3pApO8LchWZz5eqt9NjNBBOI54UxvRdUi9JekkEk7t9iu 7q2baOrc6m1VPwc9n5GRDk50ayY5sE/btO5X02kjTcu5doVOnf11z7d87emE+S3co8VncwuPNC3S 3qCJtzdIK7miVvP+Wtn9b4vYc3Ax5u5ZMa5GIu6KJAzSEvGLJOI79Pzfqba89buuAqmFsNszEE0U qCcoqxyRNdZIbDp3+R4/K1YacvqW0dz0qLHnftEWX2fNkQSshLzqYIiQC8sscYBkTpX+X+esfL74 mP8A+4n7YUcsZP30xtGC6bt8RIBLfN0o22uOz/rf6tmVn7ciYx6gs29ZGG7iFR7xrH+BdvRXMZHd /quWD0psoNFZtyM5Y3I12cl/k8tFS71wZ3VN93b67mnlaOHtkU8CQj0zIzkGVNBOFvdtoPkaqsH6 o7tk4yz5eEMqUZEcZjb/ANtFHGvg6bPS2s39R2ZPT6XWuJ//AC7Ix2T9vjpBlwuds1t7kHzDfa2v 4PKtU5f1fkySySSMZUtdFmBKEkk3ZDZOm9dFxuIgjsj0aPvv0z20yGfB/f4bSWniWNA8D3ZVm39c eUgbybPkby1vZMzt8uRh7MyfJiyYy22aAsilQVid5laJOhfk9Pfs8leI4/1KmMWxVLLiTyRy5DIf 1QYwRtjZr7NTWa31dkw45THylnhmZQsc53zxPreQS26b3rNuKxVZHqH/AOYdqx5CvdJ4cjIhMogg WLpmjP6ZUNL+rEepmjRdy/PWk7V9SYWTlOYophm47MMXPMw2IP8A66Doba3UsorzrvXfWys1ZPV9 Z/TVHkJDNdTuG1uXCsnsnce24ay5GTNLFmR7f2oiEbqW4s7rJo1vIq/mrS4ntbZN6k9R7l9YS5eb NFCQmMHY+syFAY9gHqXI9RmZ22x//pK5mTuP1b9TSJmdggyYe3LIkMmTD0WkA2kyyRlPLe+2rO4/ UPYFVciWLIV22PH6zq0jQsoDowBG0dG0xp5KjH/3P7dgdpn7B27Cf9vIkqY4do9sRlO4SKqrdmU/ jZ+msVTWUpNNp6s0T5mRgd1OLkz+p+3YwI/mXaG62/xMb1vO3/Unb45snt2WonwliZpJ0QbmNydj 36T5rbq8+ycybNnkkncCWS7SPoBc6s+3834azux5sIdh6iN6aFkjdd5Y6MxbhvbaPKa9CWJZzby4 Oqxe6YUcsWZthmgl3meKUXjS67VZEF1faun5aTtuD2+STPyu29y/bpirujwwrhRdbbFe5DKx1476 y+690+nsx3hyMaCLChhWSLHgAiWN3QEudvVt6fLu89V40/7PEwWwnxpMEOcplnKq0qN0PFJcdPm/ qtWEw0bHE7pnxSYmXkZeG6ySH1YopS0sKoSiyTRstgmi7a3/AHSN83tsGTGMXuNz6s0cMqvCGW5k 2lTvX1ImbyrWj7Nmdhw5IMXN+mceeGaN3iyBkPMZJgGIjaTRVv8AJuTprMyH7Sexz9w7TA0PcD6M c+NMnp9BYKoKKNt9jbPUT9LI+b9Sjaa7ZM5MOH6CHdMPKHaskLlqJciGIWOkJEihg6butujzVo8z tf1msMebmShXliEsMRkIZx/6ca8N48+38tel9u7nk5H7nNTFK5eA3p5MSbQJGNpNsbptTgf6a1o0 +s+zieaDMxhklMmdVmQtH+2ZnuUO+8O11Z+pfJWHbMG66SYXY+4/9PxGx5kCZayk4quwl9Q6epGH Unasl23O1PKudPbvkPcIGlQsMiKCTc2LBe3rbQFfajN1eesrvXZsaSaY4cSpGgP7ZI1ST9RrdSyw 7QyMOndtpMaDJlZ+55ZixseIbcpwFWZLA2iZY/lb5mao3OdBB2v093uOTuEkIxVbPXHjlfuFgTPA Oh3lk6Du3Dd6iq0b0n1L2ebs0Ob3PsmJj5fZc8Me99qcWuGFnmgdb7fxvHt8/Wtcn2/6hk7RgYmQ UAxC7LgZMLevLHDutFHPvAKRFX2qvl9P/NXZ4H1N20djyO6w5O1dz40+A20xQzsTuO1QG2Oxu3m8 1cW2p6o61PMO093h+h+5Y2X2bMGT2zMB/amVSQY/K0UtutJID+bqXqr1ftn112nv/bZciFduVjts MYIP6lukxt+YfiX8teId1wzOJl9Mx4cribGcFUEUqafpk9LL/wCStZjMnZ5/3uazTmQeoJYbhWYM eY6fVU1qydlKcCsKUe9Z3do8wBZC3pY6tLLkqBs9NtPURCd3S560rzH6r+pP2s/oQyCTH3FN5XRl YDaVHGwNa6D64hkwH9OUmaQGO85CsoB4G3Tqv4a5juecuUUdpUYndtKm5Av7q1Svcw11LpO7xY+R tQl2YNqOVxoWrByM0xR42Q1iC77l3E3GliTUJ2xc0StipJkNEgaRoxfbubau+3It01sf/wCX31oj RY8fZ8t3VPVUiIsAJAD5h03/AMVd0lZ9vUwzTZGR+4lDiRYUbbticEaDg6aVs5XMePGw/WY6htBf 4L1Vre4dpzMBmhy/Ujz8a6y4c6MjogF91m+UVrMfJmiYupItfQ+J4HWtRDjsJOigSXcTEWkBGu4j YhP52H+msXIkmgW+YNdx2ka2I8Nuq1qZszI2q4nf1TcOI9FseZXmTWE2VKh3o7FyxLX1BPjrU2sq 1wb3Bli/dRn01YynpY36Qp3seHTwqhJXyYu5bm1aMHcfxNKprBwJ3jXIytrNIqMFbiNz9INvEVnd owZsiPLab1YoJY9hlC72DK4NtmlbVepH1yJ22WSHGmCyBHRDtYcQNwOmhFUQZKY+U8t0lZrt6smr C3Lwuazxh9ughaPH/dytJHd52RFUKCNBEGZv8z1qu5RGGUseqOVtySFQhdbeb01J2ij1KszkycnL UhmMu+SQ7i4XQeweFa45DG6jmxJI4n40hlHC2gFgL2FVi5N7253oVV7mRvlYCBQFY/DgPvvVmJCY pneQXMKbrX+ZhtUfa1Vl8cRBVUmUalyTY+AC0/qGLDJGhnfXjwT/AOY1Rnp1Nx9OyP8A9YjBFiiS m4/LG2tajEnZWsxuraN8a2H0zKX7ibi5THyGJPgImrRhzcezlyqNoyq6r0MicqUKeXY2gOpINYxI vcCxp5r773vuAJqustnRIOOtFFFQoUUUUB//0fAKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAK6 H6RjDdxaQ/Iprnq6L6UkVc3aAbspDEV3+N/91fU5c7/2rHdXFhY+4eNCmxuvA8qS6kWJsSOft8DU ep1bRbTS9/7K/Qbj4zLNxtoQB41O4gX2/CoSRgjR2A3WN7ai3gxvsv8ANS2dwxk1HALc6Vdw2ofc /C1r/d7Ki7WFv+6oJWx3WAtbU86HVdpC2JPGx0qOwHVrKLjhQT06H2gVUG0A23PhYipV+kqFtpr8 akssFgJ1HhrajRrEEggcPbVYZzZdpI5WIqTuub3Fh43pIHLkkC+vhUHcdbaUKW2ngpA1J4ffSEka 3sAL38ajZYGIuDt586QgDUnTnrT7gQApGvt1tSBgSOoEHQaaD3mudtTaGI04Uwvz4cqruqm5F+XD n9tMz2127vutXKyybThDhtTtPDjTG99OF6p9QWN/LxPA603qALYC/gOdqxtNKzJ12m4seJJqbKba 60l7kE+0Xov+W5HGstIuSywB1sSeZqQATp8eVV+pwYaAacKRZeN+Z0ubViEyosKLf2/9taxpe2Yc 0hlmjV2PM+Huq71l1JPTyNL6m4+Hga5upuSYcHHiZf28KrIbKlh1Esdo/jW3+s4Isnu+Thbj6eII sRbG2mPGsRGn5lao+nIhm9/7djSW9NshJHAvbZF+qxPwSsLMyZMzKyMtwS2RLJM2lrmRi39tcnVb /Y6T9vqzVp2PtYv+lrbx8a63/b/BxMb6rgfHUq7pIjG51BjYWIrQgNbRbeFdJ9EK6fVeENQC5UfZ bX7azy0W23hF429y6HLPgwlgqgnYW2AsWC3J3WuedWQ4OEmnoqUbVlIuLjxvV88ZWaRbAEO41Ouj Gk2kA3ZR7BWFSu1FdnL9Rf2+JG3RAgF76KNPdTkwbTGyII2NythY+wi1VHkN1z7PCoNuJaxvbSrs qJZ1EPfYBsM0PrLGoGyV3IsBbSzVlD6njZXxo+3YYRkYbhAN+qn5mJNclGYxpc1djem2SLXJ2sOP iKzalew3W7nQfXGfMve8nFU7EMeOXKgAsTBGeo865hZj6YW/DxrffXSFPqOYsNJMfEkU+wwIv8Vr nF2AMCOOtSta7U4NWnc/UyP3s20IXG0UhnZrnSx4VVZN3l48bU4ZALbb38asLojOUVOsLcUTx4Vj SY2NJffGrX8RWYGS9tq38aVnUEkgX92lWF2Lk1TdrwCb+iNeGlMe3YJG0wi3htFbAsD/AMKkkW9v tp7D3NPJ2nAPCED4Csc9lxVYOhKMCCNthqDet41tbDWq9opBPc1nd8bI7kkYkMZkjFhKVsx97CtO Ow5YBYSISOGhFdSU14/bRsJ0AqJR0K35ODycXKhJDi5tYkEnTwqhXngAYKVvztXaz4wZiQgN6xps NHsHQG/K1a2phXfVJnKvkb4yWLNK1gxJNrCszF7xLDFMpPVJD6I3C+n5fw1vT22FrD0gNOXGpTtU e2xQe0kVnYi7/H6mm7d36XDkYsvrRspGxiRZvldfzCtz276wmgx3xZ4xPCz6x2Yna2ujHqurjdTx 9phUhtgrIjw4442UKOo8QKj4kxvRscL6/nx8Z3xcaUZbSSSXAJTcy2Vm/MtcvP3abJTKGTiCZ5GO 2Vrgrubc24AhWbwaujx02BlP8axpMVS97AG97CsrhSnBd/kxMDv/ANQ47rFiKwx0W2MrAD07eUqf ZV+f3j6q7i2W+Tt35MaJL6ZCjpN7jb8x+asoRAAf2VcqKB7DwqPjQ3GnxX+oZIjGX2pIBY+7SwUC tnh9lyIoJJZ8wh30ZBputxJvWdBZVsvL+NWOxYEA3J4jlWLV6FTNFlJNllYH3ShD0GQl7X00BNqs g7RO8PpMxWMfIBYa862UMID7rW9x51siQq8/sHKsxHQ1L7mmxfp7AgjJMQLcdxFyK12Z22DddUGh 5Vv8jIZY9Ra5Pv8AsFamZyRZlsPAaVqqfYhgYuT3Psky5fZCEzAylWKJINDfyyBk0NdHlfX/APuj PsGV3CKMsosPTiAsTfqVVIvWhuy6ge/xqMjIeTbbRlFjYXua2qzqjMx1G7x9TfV/cjkRd07mkqSK Y5xHHGpdR8jOsYbb8a5sbrAC9xw4Vn5e5ibk3PEf31gkW6SBuGgHtrSUaIkopLm7Hbw05VhSOLnp FZMgk1NtOduFYskTbrAfCtJMtYNx9M52JiZjfuxEiOukksZk2kclC8N1djD33tsEnq4+ZixSbg5Z cWTzfi5615zilopCw0NrVnx5TtfcCQPHUVqDN0pO4yfqqNd8iZ8JZgS/pYRBY/mLWrgO9dzl7nmN M9rDRCI1jNv5U0q15S9xt5HWtbIGLXIPxrLRrj65KjeimKmltWXVnYBxrJzeho4B/wAlFUj8x6m+ 9qjCiEmTGG0UHc38q9R/hVU0hlleQ8XYt9pqNQidTcfTOmXlP+HDyT/+zNaThW++mVZn7iy2Hp4M 7EnX5bW++tXn4hw8j0i6yKVV0dLWKuAw4e+o4wFrbxBQ9yA3wpKdRdD7NfspOVvCkFCiiioAoooo D//S8AooooAooooAooooAooooAooooAooooAooooAroPpMgZjsbWC8TyrnwbGu2+k8SE4DT3AdmO /QcBw416fiVnmUdMnH5Fo4n5wb31o1K72HiDYnSh51NlXcV4kiw0Pv8AGnEaEAOdAQRwHH7an0oy Cwc3BtxB4/Cvsy+h8uCr1ATcKd3IcjfX2UyMzC+zr1Avpb76cxRDpZgDz1N/tFSI4fKGUHle5Onh TIhCktYAACwvsNhr7arWU7etkXUXF7m/wq2+KNTtJGpuLHWmLYqmzKCLWAKjWme5GV+umt5APA9R JpP3BFwpuDoD/cKsXIxEZS0A8ALbrfDWnOdGgO2MkAXAAA/sp7iMFQlcnp3nTWw6QL8qtG9gbwyH XTja1MuWu0bYyQ3AG4J8RwqGzgDuQENwFwR9wFXHchAWaTp9I9PEHnSy4c9rGOxI01Aq45LqN0hD E8gjH+FU/uixsAdNQbW/jRwayMuO5IUqFJ4bm0+Nqhol3HqW/DTX7qYSFluykkW5bR95pS3XbYyg /PdbfBQb1htFSJWAG1iDz/7XqdijgwYjQaW9+hoIBJstidNTQjMAQR1A3uDpWLPJoYKo6btccNBw +FSUWwJ3Mb3vexH3Ul5SbKOg30v/ANr1O4hibrf2A3v7RWDSLAsRIO25/Dc1IUWusYsOZJ51SzEg 3YXI0I1/tpRYAMJPcthesNGi8pHe6hLcOf8AClUIAQQoseQHOqyylQzSE30uLf2VDAkbN7N7WOtv hWBJYXUCygG54Wv/AAqSwvoLEceFUBTe/VwsDx+NT0i3mva17caY6lk3/wBOSiFu6Z7Gwwe35Dhj rZ5h+2jt/ilrSCYkdPD79BW2w2XH+l+6TEhf32VjYS3PFYg2VJw/wdNaa43EnnzUWrjVJ2s3nMHS 37ar3HEwBJLeFuJtXUfQcbz/AFXgmNWfYxd2UEgAakm3CuYhmKSJKhsYiGUm1gQbjjxrtvpr6i7r n93gORklMZZY1EECrBGzu4szJCqK+1Q7dVc+dtVcLDR04UpW5mvyvpmbHzZpO85mP2qBpJXRZXEm Qyl3KmPGiLP1fm2Vy7Mb6ae/3++s/v5yY+6ZcMO0xfv5mlDAb928p5/Nbb8ta1mAJFwTciyk3t7a nHSySbac9EXkdZhKPIF7HQGo1txvrcUpc8AfZUBtCAfeK6bUcy1dx/tNdr9Kdy+kkxBh927QZ81N zDMVdLG9t7l+n8K9NcMpIrP7Z3DOw5pDg5EmNJLGytJEQCQAWAa/5q58tJq4Zvjttfc77/cfsTyt h96MsWPCuCI39VgHeVLGOKKMdTuQ7flWvNFsT7/416n9eQzZ30R2jucrGSXGaMySNqSJFMbMSb8S Fryo+w+2sUTSyW1k3K6jEHTla4JqFBuLmxHtoJuxHLQ3Pso3cweeprTIvI225I5nhSlTa1SzrpxJ 5UrMDw40yMAFJsAfjU/zamkBDGwFMOYPGpkpBBB42pSvPj91Objn9tKb8+PKrAYhFh7qdeFFApBJ EZL1AQcxVhopAkjYPDWgRix0vTg61PDSqQr22N7aGlK3FhVjCosKBioLaEVLLrwqR00E+OppBOgA E+yrQot40gIFhxpw1Ggh4zyAqwa6nWqQwpww/wCFZ2+C+5cthVskll5bgL3OvGscHkNedS55+Ug6 +731l0TZZZjzShr6bfHj/CsCUFrkDqPAHnWZJZtyqpI47ibn32rEdbag3J41a1gNuDGKta50txFV uAeHxq9l+ZTf31DKGXh1VqCSzXOoc7eNvgKpkhAcIsfuLEXPurYGJW1sPaKxpo/TAuARcgEnxqpG W56mtli6iNCQdV93xrGeNTe3Hm1bMxsxu20gjQsefw4VivjspK8vA6WtWoMbo6mF6O0Br3B9tWBG BuvEVaqgHq4eAFPa97Afw+FVpFd2YjKbG/PlVDx8L8qzWF2sdPxA8L0jRW0HxvwrMGq3gwGj1pPT P28KzitluBqKrKi/iBqaQdq8gY6GODImI8qiJfe5sf8ATurCIrZ5C+lhwQnzSFpm+PSv3VhLHc+B o69Ddb6vyb36aQR4feJrjcMVk2+xioJrnZF2uR7T9xrp+yqI+y95a12MQQH3stc/Mu52YWFze3xr G1N+hmtvut5ZVCLkjxqu2tvhV8f6bhuQIvUTraVraDiPjrU2o2rZ9UUEEG3hRVj62bx/jSVl07Gp IoqaisNFP//T8AooooAooooAooooAooooAooooAooooAooooBkRndUUXZiAAPE16J2vFTAw0xnUq 4G5rc7+2uS+m8eOfPJkFyi7k94NdszhCvPTQ3JF/cL19H4NIT5OrweL5l8qnuN6qsSmm0anxFvjU hlYMpX1DbpJF7+wVWxZ1KroebWIPupyWA8CdNTavdJ44K7ySfKq28bHTwH/71XB9iHctz+K17ez2 UhlSTTQjkONqgMyDbqA2thodPdRMQW9Ibco23XqIBP209hYDbckcTfS1Uxl2YsVlN/KC9lPwFMoI YBQOBDKSTr8apCSo3beHAWAPP4VJDqAApNibai/xvrVbCIWBLkAa7dNb+NWCRWvZW8N24N8NKAUW I6rcDoTf7ABTsRa5JN+HD/voYHpMehtou22nv1qVlUEmxtqDc6Xta1CwKocMGZVUcrHS3wokbdow AA4FSedS7jaliBt09MWNhQJNQyILWstwD9lRsIgeoxVQxIPmHHQeNQ6nWwNjpcDjU/KehrMNOI9t R0kr0EKNRc8PhfSoyilCbC7A/NY/31YCbgKbkjRbcKr6WJIYC3BVF9ffRtJ5XJ0LFrD3WrFij3tY OQutgSRcGpN9G0HMdXE1VIWBGoB5Dj91CFlA3Nck3tpoL8taxbQ3JZtO7UhQwJNrkUq8bA3I58Kk ksRuZiAdAbDWobW9yy30vWCjGykluQ0XjUgrtAC3PEaVUujEBeXUTqDT6C2wDTnw4/Gsgbc7HUac wb2prLYBjf2A241WSC20H36W1pWLBSRx4DQa1m3fsaWWkb/uFsf6a7FjAEHJbKz34cHcY8f+mGtF zBGnuua3v1Xux+4Y/bkPT2/CxsY6DRhGJJAP/wBZJWh62+Q2HiNK58f7Z7uTpfWO2Bitmsw0I4mu k7C/7fuHa4hx9VZ2A573CoP8i/6q5tbgX8eNgB/Gtz2qZ/8ArOFI7biJYACTrYMP7BU5f2v0LV5U Ed+DR9/7mso0/ezBgONt5NadmW7MOZPvre/V6BPqju1yR/7xm08C1aE7bnalgDxPOpx5qvQt8Wc9 xbgC44e2oDE6jnyoZrjqYC1J6i3IDa6cBW2pMyi4Ea309tW4m0S3Gp2P7flasWyXuF1NZGKCJBz0 f/wmsWUKCzk9wmwv+pf7ePi2uxw2ZB+aMlx/4a8LBuBX0V9LhZPp3ARhuVoyp8LEkGvn7vGAe3d2 zsB7j0MiWO3sDHb/AKdtc69V5L2fgxzwB8ONKzFRaoAJUi1B0J9uotWgSCfMdagk+FgeJ8ajjz15 ClJFr2v76AsuRz/4VFyAN2nhS7hwuBQLkgX08ONqAcOSDak3+NBNjYmluBrb76AbceNtOFSL8+FV kjQ/ZQL2/hQFpJNrcKm9V7iOHPjU7geFAWX/AO6pv7fhVetr8fGmBNuFASSDpUE/fpRfThS3Bt7O FAyR9w4VNKCBU3FUhNudMDxvw5UvxqQRpfWkMDDhTA+FVBufKrARy+yoCxXsdDb2g60bgzEasPA/ 91LYEAg1BtbW5HI+2kIsiSW5G1uKjjWOeVzqeVXPqdDa2oqk2tfma0qoy2xGF9LWPjS3O0HjbS1O STfh8DUEtbQH33rSqZlmObdQso5anxqlgh6WOo4LzPxrKci2q+y44mqXRXIJFyDpfl4a025IYkiq bi9weqw1sax5Y1JG/cPzcxWaytGCo8x12ty1tx8Kxy0oJG4Aj4X91xWkZcmJqlxcAkX11qsqy9LE XXU29vKsmUbzcKGPAuDa/wAOFJs3KWdfYGvf7dKjRDHeNekMCARe9tfZVYXbfbc8fbWSQuhAO5fE 3GvgDVRDE+Uj+XTWrBZMawOh1qBHu2qDcuQoHDWrWUmzbrX01Gl6sgQpJve22EFyB4jh99INplec wfIKrwS0ai3JRasTZx8R7KyZEaUbuJOuh8aQIQQBe50vrY/Co0bVsG47au3sPdiDoQi397JWgaM6 acuPjrXQYqNH2DufHV41I4gWbzX+FaWSOxVSLdIJNraHWuXVoqbWTGK7geRpp13RxSjUlSrW8Vq1 kBBA4W40JGHx5EB1Rlce7ytSINq3UpjxWngmdbfoASODx2lgpI91xWMVsLmspGaMkA7dwKMRzU8Q arKHUHkaG1YxrUEGr5EsdNfG1VNyPjUdUzacn//U8AooooAooooAooooAooooAooooAooooAoqbH T28KigOg+lYmky5X1sq2PhXXRq6i99sZFrG/92tar6cxpMTBV0OyWa7lt1tOC3FbGaynfK+9iLFb Fvste1fX+PXZxVT65Pm/Isrcj8YLyhIuZbLY2A0LD2c6jYoABJ2tqRqWv7SKxwCRvQSqxACbVVeH 89mtTgz6biOPzXJ9wtXaTiWhEuA0bAAgki1vZ1cKayfOpCA3B33uf5Vv/Gq7SXZ5jsFrbSot7OdV CLaQCzMeB1Iv9lqs9gZoKAXsFVuRPG3sJ0qsz4yPZXtJa5DEtp49NIFHzJutootr8BUDeG9UqqWv YtYafGksF4yIyQpUm/Hgt/g1zUSOUB3IqA6m55f4RVdywusykkG+1rWHsIFURwOoO6xtazOxYnw/ 7GksYMl94VDdQWNlAJufixpfUVRdgCxPDzH4qKT0fUcM63Zb3YEE+y1qnY7btr7BoFCgbvvpkFn6 bAbNX+bptceFLeOIhQhVhrqwFr0qft1brlZHWwvvAv8ACnEcO4vpt11Yki5+NGSQDMQNltfb/dUk 6H1LBibHQC495BqsyNvBjkVUB1Tba3tvVo3PoSDfwNhp9lCyKLsdhAF+AXX48qZlQAs4XdyoIclu JQ2BN7G3OpKqQCAg4jVeQ+PGssqYt1cL6YYX4nZcae2pUbVso231vtsNaUS7NoJLH8Kgn4WpiJCw JJ2jTX+6sMqZAFtwYk+zjp7KjgCdoA8HuPdwq1PSAIkIDcxxN/dVThgDtQaEX4gmsNGpwKqtbhex 1te/2mm3FL7beNrAkW9pqB6zMGYbVtoOf30gVb6Ft1tbAf8AGssTJZYkliLFj/25Vn9nw/8AqPec DAGpnyI4ydLbSwv91ax9xOoZieJ1rofo2Y4vd37m8JI7Vi5GYAwt1JGVj4//AFGWscmKW9Dpx5sl 5Mf6lnly/qDuszXTflSgIdCArFFXh+Fa1R3Hyk38CdK2Wd3B+9o2dnbU7iLHLlQgLMNAsrqNI5EP RI6+Zet61knqq+xuj8PA7v5SL7vtrNFFUniEW7mza6slrXNxcgaj31tu3AJ3HFY+b1sfQ6e3jWnY NpckMdNpt9tbPFO3NxmZr/rxa34WC8KnIsWjsy01T8m3+s9q/Vndb2uZ+f5gh/8ANXLyGzAMdCTo NK6v67jMX1Z3LQAuYpQR4PGh3fdXKSEiRiBe5OtrnjWOL9q9DXI3ut6igIGJ2jTnUAjw91QQwIIu Sdb8aLKAPx8dR/xrocxjYA2tc+GtX4m71UPAkPx/lNUrz1uR/Z7qvxntkJ4m/H+U1i2hpd2fQ30i b/TmDf8ACf4mvJv90+3/ALP6pbJVQEzoUmB/Mv6cn/hWvWPoz/8AhrCv+E8PfXJf7wdu9bteD3NR 1Y8zQuRx2zDT/WlcKv7vqdWvsT8JnkCW1PLSlJABGlhx1qbJuUk314DhTMVXVvmHIeB9tdDJSGvp bTxFNY2vfX21JJbysBz4a0jG5uzXPIc6sshJXwGp4VGt7XsKgkm1ybeJo3jgL/CxoA056geApraW 0pdxItbjzNHUNPuFBJPE2oBtoeVLrU30sRerEEkbcR7/AGCp1Gu0g0immvpr8KPGhUMvjf4UwN6R QtrDieOtSeFudGkCWaxt48Ki1zprUXQGwt/Ggk8RwokoJJIItr41IIpd331JttvxqwJQ1zyNFIDY cKkNf2eyqRssB0te9MutuTcb8qrUgcSam54nl41GpG5j+06EfD7qCRyG73VA3HidOelB0N76HiRS BuFO8XHAeP8AZVZuCAdRx15U7lQLXLE0moXdp7TWkZbFsPjSliLgat7uVSVPH76i5LBtDca6VSSV uENmBs3je1qSym5YhiOP/a1WOzWJU89VNLwuF0Y0ElMlyFLEHaeBuPcQaxyF6h6g43YEXsT7xV8k bMpChGYakn2VQzB7AxkNoSCLj4UImVsGVQw2qbi1lO0/Cq2XqsourcLEqNOOhq5gG0j0/JaxH8pq mT1Bfdfbe3m1F+Rqkkqb1Dcak8LG1re+qWjOhPSCeeh1rJ2MBvcN4Hg27w1pAtxsDcLm1wND7KEK I4wbgIzEalRqPfegoRAdt7yNbhfy6/xrJ7dlnCyTcgwTAxTqRfoPEjh1L5l1rru3/R+R3eJVh9Fn VdqBJ1RnQk7ZrTlUjlXnufqSsu0GlL0ODUMg23AvyNjUrpIrMTtX5heuvy/9sfrGBm39pyJYxrvi AkU+26H/AMNZ5/2v7zNjY+d2SKfL3kpl4mRD+3miceCyNtliP4hU/IvY3tt1Rd/tr3Lt+PB3Ptfd ds+D3QiLIx5B50AN3ja+4SJesX6k/wBrO94xk7h2BT3rs5/pZOP1SKo+WWEde5B52Wpj+gPqeOCX tsnbp4MkusqAJu6fmKup835Q1dn/ALfds+pcbupwO5ZmV2jtkLxzz4+Ywjadh/TWG56dzL+rs+Su F8N2qzrTMValfyPE5MOWFnjmiaF00swKm/ualx0Hr7H0SQFGv4MP/ir7TyO3dt7hGVy8WDKjchiJ ESQE/i1B1rnc3/bb6NzSS/ZsaNuKvEpjYHib7CKi5J1N24mtM+D5GbG2ki49uhBquSM2Guh0PvFf XOL/ALXfQ8DmV+zY8khJPV6jrr+WR2WvI/8Adft2Jmd2nwuz4sWPF2mMJFDAgQMbb5tFA3N1LW62 VnCMutq/c4Xg8aeym3EcDaqiDWZl402PO8E6GORDZ0biDWIbgG395rR0q8H/1fAKKKKAKKKKAKKK KAKKKKAKKKKAKOGtFFAOtmIU8CdPZV0WN6mUsG4WY6njYVSCEA0BuL35g1t/ptd+cWK7tqk3N9K3 x13Xqu7M8lttLW7I6yN8dIhBGLlQABYWtb41Zv2bbrt2cVGguf5RrVq7o1Bj2ITxZgb3P8aoPU5Y byWNipU2+Ar7SUY7HyG8yyzcIVDXRWJsBxOtKZIJuhixZeIFwB7rVEcP7eQ7RtY2sWK/8bUziS/V OQhPUFZdKsCS4MibdsblvzGygX/E9VSyBWu+0C9wdC3+Ym5qoeig4PJrclpGYe+5sKsXILLeONDc 7V0uSP52tQNgZt7Wh3FjxIU3A9hIokRn0lCnbqpkOvwFxao3PGSZWUkX2hjcDT8tDCG6soQuV6pL acfE0INtiJNiCRoShIAA9w1qG9COReLO+gsDceF73qRI9mDBW5KCAB8BQ0jxL1C5FrAKfje1AZEk jEIoudeO3by5laqbex3rGZGOmpCjT3cqqE80guoPIIi6m3PmatVskbmEd2Oiknd9wC2q9gKiZJIb ZBGb2tt3G/hxqxpIlG1509Q/Iil+FKqzS9T9QJvtPSoty6RuqNsKScArrr0KWH28aMDGSBy1lLX8 zN/DaKGJLWjABPUQLf2mhZ4wHUWDHkdBf3C7UCRy4JICg2Nltb+01AJbrYkbdL6EG54c70EoxZXv dRpY7re3ppuJLBGdm0N9CLe+oSMsTvGy97AvY/6ay2aSCIsqH0iFHNrHcf8ANU9G0BzqSB6YPU3w FRZUW0ey6jq4t95qPXm4C4cn5QL29luVZKRuRW9PYA/JTx+01Y77VDHcXPDn9wIFUna5K+o1xzuC 1/ELyqN0G6zAki2oHH2E1hspcGVQGJCji3/bWlEgKlozduAEdj9t6Cysu1E1PDdwA9ltaA43G9lv 4LtAt4XN6waJW8gO2RvcmhJrd9vhGJ9N97ywGZ8p8Xt6hib2kdsiXU/kgrTGS/SGC31ULqbffW1z LRfTfa8djZszJys5ySQSke3EiOn8s22ufJmK92dOPG5+DVrPJDIrooumu067r6FCADowq95Rj2ZV 9TCl6og4PT+JAR1I6Hp6ajtva+5d3mkg7XCcqWJDIUVgNBzQMQXYD5VquCSGzYc4Co7aMdfTlGm/ X/LJU31bdU811LssqqzWHoOkKT3bD3E8fQlIV/cp4Sf+P8tZMKuM3Djbpf1kuCP5FtY1hvjZF5Y3 UAw2Vgo0uxsNb/NZttdH27A7rnZfbYzgSZeP6iKMgRu/p9Q/56+Xbb/mNXPlcJuehqi+5LydJ/uh 24wd0ws5RZMjF9Fza/XD/wDI9ebyFS12Oovyt/2vXsX1z3jHyJZOzY6sO5YLxTyOyAp6bIA6xyPu Xf1qdvT5K887lCqpKksaiT9lDmw71s1/U2zDctuKturjwXxn0Rvlq9z8nNmTcOgFh48PvpL3JHP8 PGrC8L3tIYzw6tV+BGv+mpEDW3Ah1/Eh3D7uFejcu6OSTFj0dWa5CkXDaacOFZePjMMldikgM6jS 4sFLf+DqqrHjSV29T/lxvI1rXG1SV/1VvPp9WnymvZXGLNOv88ETpIB742DVi91lybSPbvosf/8A NYPtQH7daPrTtn/VPpfuWIovJ6Jli8d8X6i2/wAtN9F//wANdvPjEh/0itzlSRwwSSS/01HWOOnO vNOZPQq/Yv8AtPlLfexUEc7n20Nubn9ntrN7vijC7pmYgPTFM4jFtShO5P8AQRWKyAQhw20lijDj Yr1L9vVXoTnJ5yohozbgDzt/30aDzHb8Ln7qg6AObFuBNL1MbkcOBsP7aqUkHvflb3+HxqAbacfc LUo32u3M21tRZtSDYjhRga55gDw8aNwsSzC/gONQb8Sbn31At4VUuoGB4W+/Si48fsqCDx0vQDf/ AIcKsJ6EkYG2n30XuLXpdfHTwFSDytbSm0qcj3JIsNakeJGvs1qtnCgsSSbcKI3D8EIB460S7kdh 9ACdNfCpAO2wHPjSl0B4i9Gh1vc8vCqZGvb+yi5J8Ki45mjdrYUQGIA4G1A5m3OosGtca+NFuqx4 nwqwB+WoseVSNtjqbe2ksAR48qnynwvVA4uOd9L61BtzOvgKncpuDyFISTe7cbac6kEA8PfS7jw0 t4UW/D9t6gBefGtCSAVJte/3CoFhbabW41JsB/ClYWGvjaoZ1IfZxbUDXpqmULuWxJHEW0/jVxGn EAc78arJB6QwBGitx19oNWB0Kp5GjtZtrHkba/bpVEsh+bcnDTaCPhasgky2LbWKHRW5e0UmS7qy Bem+mgBFvhSCFSsGZVRwSLlbXF/f4VU4DM24iy67WI+2rmCXFrq5F7X6Taq5PU3BrXJ0O0m1viOF AYjKVboWwI8vEfC1SI5VsAAjm+pB1Hs0NPKjMdoCyAX6bEMKqbcIxcX09tx8bUJJAMocqxBC6EkW FufKui7BlI8ZxcggOnVjyK21it9VJ04fLXM3QLsJbXgwJNM4kYbInLIR1FefKo1hwVanqWB3/vva 7fsO4yIo19NyStbef6zkz0x27/hxZbxOUiMbSRTaqSzrJA0RXhXiUUvdMZv/AG+VMq8gTuH2Nesp fqHu8LI03pzleBYFT/prk561U9zsoel58M9sj+oe0uD6Pdu8dsbiEOQuXGP/ANXmo3/jrVfU/Zfq PIy9k3ecXNLhXQZEKRuVK3Rj6HSGZT1dNedwfWzDTKxXA57WDj7GrPb6z7Z3CV5s6V2yJLFnlUqe kBV1S3ACs/YnlPyai/00g3J7P9ZYigwKzi42HBy3U35BVYiuji7l9UL2xMiLueThzYDBs2PIyXLO q3jaJI5C+6RpPwrXJ4H1N2rGycfKhyt3oSpL6LSkK207tpHttTy91TJmyskZ22XKkeVlO11Uuxch d2u3WuPNxKzWz7YN05br9zOsgyvr/u8nbO6wzS5MeMJ3wpB6e6WVLmSNo12bk2jZd1q7P7P+37Ll Zzyx5XcO55JkUeqNHIWSZAAm5pP+XsRtq1ymN3vLxVUQZ4O0kgbbAXFm6UPA/hr1HsX112zN7Dux 8KOfuuHsd+3Q7IjI1wpmg3Dq/l/qVh1tWmuTasr3h6I8c/3B7bF23Bi9PDWOPOZJI8ra3qu6LeYG WTz+mWVP0+h68zYEE31Fe9/7od0izvpvDOf9PzYWJiSFMMicIQ7gpsHR1Ku3q214LJcMSL124M1N 3jckux//1vAKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAtSFnUP8t7H2Cuj+nwglba4juNi3F7+Nc/HI GURnS+gtXUfS6Y7QTK7xpKG0ZwW/hXf4inmUnn+TP43Bs51jmuxZpADYKlkOnG51p9gZQh1UgL6b SM51Op0q5yiRtZ2PMlAFHtNjrUiVJIrG+w8JWI4e0A19ho+W2VIYyGjClVtYoNsfDieNKzugNmii jAvYvqbe22u6rVSKVQ52yMt7yOotp8KGWJdzlEt4oosT/NapAllS5KFSEZCzAaC72Pta1MJNBGRu NtToVpv3EUSWQRByRYk3FvYqXpjNkAkAKb62UEH3a0Kn3Fb9wxVo41HiSb6ewCwFMYmYBZGRQTuA VRy9rE1AVn3bla/zg9IA9lKJkiJAYdI0a97D3UDeCTFF6wtvbTWRrbfgGNxVhjiU9DhN3FHsLnx4 saqjlYi5b1GYXtIDwv8ALwpm9a26MMSeGgHwJNWSJ9y14wQrKwDAdIUlVB4E8KSSYIRFJMt21VVu Gv7wDVMizhWEdgWFmZpVtqdRZTTrEno75HSV19p2gCoGyJThptEz2dtSWJI/yg/+WmWddxWOKRwB ZrAKp+3W1UM1pdsSxDS4IQsB7jcVczvER6kryG2qmyR2HjrQqeAiacMSYkQEXJW7Wv46Wq5xNcbi oVhpfUg/Dxqj1YJT+kTIeaozFRblySnDgR7m2ofF2uB/ZUkIhkkv1SMTbqjGn8ONVrDGfncnkALW I99K2VAysRL6ltCynZf++lx5TJKRCihhx2gsfdc9NZZsuMYADAb3At13Nj4dFOiSxoDK3pfmO0E+ ++tVMZGJjlmZCdBGhubfAUjJDCALseYMj2Husayylm5FFyS58VFz7rD5aZJFk4ox4EHQWP21Wgj6 WVr7gRtVWcD2bjpVsZkbQbrW0UKqr8TWGVajHfu6kAB4MdSfZwpWZQ+30g1tQ0lrX+FRMoUl3k6R pobn22H/AApHkgXQKXAsQ1ixPsrBo3uJ2LO7icFO2yLI+dGzRsdqKskZtLjs7HYrr07f/U3LWzz/ AKZ7pmdyh7EdsOX2ntsQaObRWKr+5nIkTcm9nnf/AC1y+LnTGNcRVkgxnmWTIkQ9QUDaxjjuNzqO rjXo/a8D6J7lDBLkfUOVD3DFWzS5AELvEPLEVYyCTZ1L53Zk6K83LyWrbOO2D08VFarxl+YOI+nk gTvHbT+49Nf3MTeojEFRuHl00ar/AKnlfK773HJdYsV5Zn/9u3SUt0neoBG9wNzfir0ftH0P9HZ8 pmg70vcF3q0SRSRo0e1i+3p3M1/J1eWt/k/Rv0wrGTuM0omk1aVp3QNpb+WvMrpc75OjrD6ZPTtb 4FxtRZWldcHjEcMs3ZVj3xerLk7IHZwARjR39MsfmDZHR/lrdIs0Hd/puSKf0ojDh/u0hfbeQyMD eMMAzm34a9K//BPpTIhjx4cqXbGXZQmQrG8lt56g34Vq/I+gu3z5eBlDImU4QjF/0y7iI3QMdlv5 mrVuTcnC7nOvFarTleTTfVH1N9S9h73NjRwQP27PeFcOecpdNoRZukNdluf+aK1uZ9ed3gy+2402 PjsssYGY5iWRQxleM7bOm1NgRmrs+7/RPaO89wk7nlGQZDoqdPp2XZ8y70c7iK1Z/wBsOw5MaDJ9 ZGjBRVV426dxYdXpKedc6pLWTdlZvDRyjfXOZkO8Z7d2suu7euRjOEbbodsoLp/mrp/prt6d3hfL 752Ts+IjWEBxgjs5+ZiUbaq/4t1bDG+gfpDs6S5hwzII0ZpWmZpBtAux2eS/TyWuY+rpsLuv0rH3 Htfa5ExcXSaCVDHJBE2qZKwC6su3q31nkttU1y9YbNcdHP3tQegv2PsEsIxpO34rxBdgQxobL4cL 1rcfsH0Tj5Cx4uNhrkNv9ONGUud6FZFVd17PHu3LXIdgw8HuP0lh/ULZK9umikYtml3ufRJiSTj5 7fJt663uJj9hgzMf9hm4J7llRySKI1RGlZ0aMyw7dY3d1/UXy+fori+bkcKvHOnXozsqUzNoiYx1 MZPqgdsxII+0jCxMZ5nRcbOkkRowC3SrIHj+ToXdWbmfUP1CDkQwwdqn2PtVDm7GKEXu6st0f8la r/8AEZe9/SR7Yv8A99jyhY552/T9WFiksqFAXs6sydVaH/8Alj9RPhOvpwes5O9ZJjubY10uQrLt tXbh+7i3txadO5x5U6321yjT98+le9dyyj3HbhxzSArLEuUjABT0srX18K0h+nu44kWQuT6aKgSY sJY20VtjFQG6jtfy11Un+2vc4omORFOsoQG0KrMhYnqAaM+roP8A6dczl/TjQSSwtnxxvEGYQ5Ak jlNhewSRU6zbprrW7iJX0PPakOYZqFxz/wC7gYbZYAzAnj+kesW/lrD6OY3C/G3OvUO79q7X3bs+ D3/sMUEawNFBnlGCkl4//c+tfpdkuteZTQPBNJA6sJY2KkG6m4Ptrpx33T0aHJxukZmRS3KwA8KU v7bX+NR0k63Ps9tFlC3AsB9ldYOQAE/NbxIFBIGnUbe6h3AHE2P4RS3PAcvE1taGXI11PiTTWA6d tIWbSwvfnS+oW4rrwN+N6ZBbcX4H7OFNuYabQV5m9VLzubjkALVIPE2tVgSWXN+FgOB51IP4gR7S aq3DUgH2cNaYOzAMBx4nS1SAWjb/AMagtre/Djeqx6huXYEcgKnqBuqA/EXpBJWgwYMNNfaaLm2g vUWa5J+F+VA3fbz4VRI17iwNvuqRpY66c70lwL25cfCo0YggA8zrQSWkHx/voDn5rC3O9KS/y2X2 HWpQgXNx7RfhSCDFx7fhU73INhpyHL7ajgt91geQ1pWZmOmpA1toKuBJPvHHUGpNuDaeHOk6lJYm wPBTYge6lCXudb+I1FqQSR2cDT2c6NOK2J4m9KWVbKTY8uYpL66m4twHjVSISdwNgvSfCk3SKxII IAuoK8/bbWhmVvkZT4kVDXYhg5v4E0gSKXNgUG5uJC8QeYOlVkITYaX6iQLWPvq5mW3St111/wC6 sZz5VkUKeAYnWx9tCSNJGjKCx3adAPEVjkSptGjAi173t8Dzq3Y0QKLIJAdNran4Gqtkjn9SNT4H WgbKyrbS4PPjbWk3ud73JK8LnaatLNFdArKRqQvD4A61Q9idwdgTqVII0oQly7bSyltNVuGPxFSr BLtwNuIFrfZSBVkNw3UPH5vZTAIOhyQTqBbgfAeykAsEjKAdNo58/squYBgGsgF9SL3qs71YFh0j UNqKdSdhG27HmP7qgKGjSRm8DwNrU74MaEWHEcDTwlQQHGl768PjWYCpBN/tP99RpMu59zWPhAjh 7tovVUuCQbAk/mBrfK0e24uSOf8AdekkbcGnUdPApYD36VHVPoaV7LqaL9rIugdx8TWyx+zZT437 k5MkDK36Y6hoR5w16dUDsWCsNedbdM/9pgmJZ/RB1aOwbTw3MaxfjUGq8tp1NP3rMnlwMfEysqfK liJCSZEzyKAT/wAsP5BXOOroLsDZuDcjW07lMJuoSyOtzYSaCxrBEIkS4seVr6i1SlYUHet8Sz// 1/AKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAASpBHEV0f0zBlNPJkrdIR5n04/GudXiK7bBixBhJGjs dNSgYXJ416vh0VuSX/aeb5fJt44j92DPkcoWIiSS/mkeQac/bQSsiGO5k8FTeUHxG1arTFgSPphZ A3NpDcjxK61O9WAjec9BuiRA2A8G0FfUPlyEeNYkLF1cRYXF/wDFurJdF2/qxFnbXa7r48qxGWEy bV9SS/m2sxHuOopleKFy8i7XFgsYIJA9u0f+agLkmcAmKCKIHQsxF6h5s0sVScqT+CO97+LWFqQZ 0HFIzIAeoXVT/bR+8JA3xpGCbm7i/wAQNb0wCWx+Ly5Ekm78TG16kJHCQ/QVbisdyT40lywEi6gf MFLA+4GoCSKwO8or6jUR+8gGpIL1Yuu6LGPMb3soty21TJIwYDJlABFhFGCftNI8GCzks8k543Qk hRTk9uQhEMaN4C7k/YCd1JL6FYOKgDLEG28wAbnwOtX78mVldYkVAOZt/DpqXmSNSRZEUdQIAvf2 X3VhJkxubrmFiPkVDb4A3BpIhmWZMq91k9NVPUQVJPusvCgqGT9JdxOjNKxKknW+0VLSoEXcjNu8 ruAt/h/woOagWw0fkiITp4EtQgiiXYV9T1eQUKdo+6mWAlSdtz4OBb77VWM/OIKxwXW9uBvp7RtF G3ucp3OqxD2Lcge9jUZpFoKoOsrHt4RkKbD4UonxZGsZnkAN9ihtvwCgXqpMaBL798hdiCeV/wCY XFX7TCweIIoHBnu5NZZpBv4LFjusY4FrD7uNReSQqxcKq/gVTf7jU7ZAdWReNmN9R8KhXDKVWbhy RTx5kVhs0R+4n3BVidlPzOwA+wC1T60j6LCXB52snxJNVR+uLFEBDG2+a5t7SAulZJRnA9XqHzBA Tr7Xa3T/AIayxLKGOxlLlQeAjRluPe1Wo8Z1tt26b7g6/GhceCI7/TF+emns6jQz7msqhbDVr6fd UNJ9CUkeRja4Go3DmTWfhyLJ/wC3kXbt/p77EnxFq1sbosoWUnb8z7WO2/jxNWsuNBKDiZMLEa7i j7/vGlZddy6aGlaO5vIUSB9+OWhk5tExU38dK6LE+rfqXFACZ37lAgjCZCm4VfB4yjV5fN9Uz4uS 8ORCsyKberEbEj3VnY31h22Swd2ibwkU/wARXktSjf3VPQnyJJ1bf6nquL9asyFe89mg7hcW3IyL cXvwkj3/AP7SsnD+qPpwyzjJxs3s8ZZTjPjSziy2/UD+lI0Xn8u2Py15zj96wpxeHIjk9gYcfca2 UearAcfgb1zfBxPRx4NL5HLXWsno+L9SdpncjF+rJ8UlAQuWIpFDc1Pqxhr/AOOtxjZ3dGe+P9Sd szIyeDxKrfbFN/5a8pjyMdz1hW8QwvVwi7a7AvjRE/ygfwrL+K+l/wBWaXy11o/0PdMNsgwD93JF LLrdoQQhHLRi3KpYxvHIuREFj2ESeoFKlLahuW3bXiawdvj/AKRki3WP6U0icP5WFZa+ui2x+6Z8 SkHp/cuQb6Ws9wafg5cJbXHnUf8AK4uqsvY7tvoTs0rYhx2Ze246sIe3K1se0rNI8i7evcd/T11b 2v6M7L2jMSfHUSZMJDQNMNVBBU2YW9R9u7zVwkXce8xqEi79mIEAVVLRmwHLqSkl7h3p8vGzJe8P Jk4hf9tJJFE2z1F2PYBQDdan4Lptqinrk1/yeN62ceh6FH33OxJJIW+n8/0lkk2SR+lJuXcSrKBI uj/h+WskfUUm1Gbs3cV3mwBijuP5rSm1cGn1L9VAkHvCki22+PFr/Ckk+r/rGIE/9QgYcLtjLofg 1ZXDypQp+lTp/wAjheZX1Z6JF3p8qLLEODkwT48e9VyotisT5drKzhq1uZ2ZO75s2L3eBJx+1EmN nrDZ0Z7xyxa7gxHni/DXGJ9a/V7AN+8xrX2NfHtY+HnqrJ+t/qaSGzdwiiikBHqRwAOpHgWYisvj 5G5aePZfzC5uOHDUM6aT/b6PGxpsHtWSy4mcpiyo50WQKAD6UgVfT3Sxsf6jdVeXf7hdmz+196jO ZtabKxoZpZFuUaVFEE7a280kfqf/AK6vT/p//cDFsnb/AKgnVclLKM8Ltik9rgf0W/8A2dP/ALnd o7f3f6ZbubSRrNgfq4uRcFWVyFaLcPMJdNv566Us1ZN6rVEslejS9mfPbKbkAqeVqRVKXV7rzBU2 H31kuCC0diGvtIA6gb2tasvI7J3aErHNgzb/AMIUu1/Aqt2Ur+Fq96U9D57fnQ1wDEa6ka241O1w eoC3LxFNIkiHY8bIw4q42nT2NS7G8AL62veqSSAD8zHaDe1TvQW0u3vqAoA2bLH2aimEVibG/hTA 3AG00Qke2pJYjReem48qmzeU8aNdpBFveeNTBZJspuTYcr1CsiixI18BaptpwuOdSQRp93hQSQQr C1yRxqRa/wB9vdQL2NSDrY399v7aEAOtiQLEnUNp91A3MOq1uZ8fhQQONuPMipJ4a6+2hCF2gXAA HiTw+FSbEqSb2vaxqBa2l7+yhgOJU+yrAHNtw0NBZgV1AA4Hn8aVWOp22PiaCxXU2CjiTbnSGWUO TtIHAkceAqLLbq6j9gpApOgmJJ1tYGgiUm17cLEga1UjMjtrxJUDhYVDuGUBSx9wqfKOJLEWF+FK WJQXJAPDQ6mrAkVQT8ttNCRqaksOBHCg3v0jW9jpfWgi+gN/hzokR2Kru67tt14GpIKDpuFGl6hb hy7sLcGF7DThUxsZG6wSLcBci9UkgAACb7rj5Ra1Y8t4mub9R5dQv7avLMr3dbBvKRe1Izr1W4eX Qa3oGzFlmQsBIp1NjtIt8NKui9NiovtaxBB+7Wq2jYrtKkAcxqdarMtxYEEaHUa0MSPkepfayF11 AYHUVQE3i+4h+Hjp7b1kll2izgoR8xNhVZ6NbD8x838agmCh4njudSo03DxoXqALILnjrasjaJLO tivNdL/ZVY6TtOhGtxxqk3YK59llCroBqt7/ABpVswv5edxxqxgjHcNSdDxqvaF82u3mKQVMgMb7 ja58rW8PGr1J2HabHmbfdrVa7bezj7aZSDdTY+wigdjJj3AbWe50NqhirSN6MbBhfcbCx8dWpfVA 9jcgR/Ckctu6mK3FyePGo0XcQodiXsW10VjoPhUkY8aXnRd9+ldtyLHjSzbmIYHQaEgaeNI0xJs1 tPKDax8eArMBW6lOa7yKvT1a8rDaeGlavYQxBrLks0rmR9QOkgcfZSswIAsLgWNuJqQemjaUayf/ 0PAKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAkGwNdP2DNeWJcfpaSI9O8kDb7hXL1bDLJHIrobMCOGl deHkfHeV1wcubjXJR190dw2TIjsLtMw0vHoo9l2/+GlGRmkWjhWJfxNdiSfsqYJmECGLGG4rfQ3v f262qxZsywvGi/iPmOvjfhX2E5UrqfIaaxjGMlXo5kYLSTJGGsSNBf76ECWtvLG3U6ru+/SrGiQX eQn1SOJJY/4dpqBuJIJDRCx2toP8V9aGRv3CwixWU30UARpf7OqlEmYr/pxxxlRcPI28gHx3aVBl N2SKTeTrZEXp05MaWMysbMoe4sxZyRfwNhahpewGWZtyS5LEN5o4gQNfdtWhZMJBsEZLi4Jmtw9m 3cad4Xiht1sjf1ArWAPLVqmFvTQH0ysh0FyXa3xAFQk4EaSMANPMIoxxjVTw5eU61MMkDkmJGdSC TtSx/wAzWpZPWyHDRoxsdd2i39tW2mjJVpI2J4gXFqoxAL6e0AKqX82m406GSM7EDqWHSVVNbf30 7NoR6qRKRwFix93VWN60inbH1ovl3MAFP4iqGgLdyizyuw3G4jJVnJPHpThURyRm4OE12YbTMQBb xOu41RBPHvMcs6xMLi0YsxJ8CAT/AKqvsFH6UckjsbFnYjQ/KPmqF06amQzSA3jJiAsLKtxp+EE1 jMryOC7yysNUWS+3/Iopm9dCQESAancT1Ee9jSmSy3ujbuI3X+1tKMklzY8jrteV1H4E6V+6hEkA 9NQAxv8AiYn3vpaqVyZCLR7ip0Z1HD3W0qXaA/8A3IkYAeY6A25VkqcFywxqt5AFYaFmYkfDcac5 CLujR4o7cd38KxTK0oDQ4wFx0NJfbYcSApqFxZGfc0scbBdQvUTf2tuNTqbll75UIO6ON5n4M3Bb /HSqS0xBea8anUDeSbfA2qHhjP8A9zKHYkAKdxNh7qdI8aFWFi9uNgbnwAYmsvaFuYhELBQz2Fr3 3mx940p3eRwPRGxRYW2g3J+NKXUEEQRprfW7W8NfxUzsCN0pU2I2m+0D4firMmiyQsgVW3M7D5Tb 7BWHNOEi2DdHvBsW81x4FauMkK222DX3M5O21vym9Yk4jfcy7pGY7goJCgGsM1JpJIgzFiKrOMTw FbJk2Eq415AcqVowBfQX5VNppctkav8AaEG97H2VfG2dALw5Mie5jWWFU6Dj4VPpiwvzrL411Rr8 9iYe997hOmUWPLcA1Z0f1X3lLErHJ46WrA2C44n3DWrDCU1YWHjWfxL0D5m+iZtF+tu4rpJihh7G /vrIT68nFt2G9xwIbhatJ+33dQN1qf2556/wqfj/AOpk/LX/AEI6RfrxG1bBkD823Cxpj9bqx3ft jbkCdLVzHplQTZQPvo2XsLbidafi7uSPlX+lHSt9cML2xm/KQw09lVP9dztcNjMQRYjdxFc6sLk3 CA1Z6DjwJ52FPxLuPy/9Jt3+ts0gmPEALaXLeBrCP1Z3WUGL0hGhN7akX8axBBv5XPHwqDEANRU/ Cu4/Nj9ptU7/ANwyDuyZLXtutoOkbRZbeFZn/UsnJg/bfuXkxkbd6JdvTDcL7T0hq13b+0NnuBcq l7XFrmwv8xWtzLgy9vxRFEyqHuJTcbmN+lQoGhHz1Xx0lYmBTlvDScFC57QFcmSFZ3x7MhcX3BT5 HA860ud9Zp3GVJsuMY8yMSrKJYmVSd3pq8Dbdi+SNjFv2VjPrcHjx4f3VhzYkclzqda61T6OCLk2 6qZNnnd4ws2Eyr3WfIWI7liynV2jDD9Sxfa8n+FVrTS98MckaRxJkRalpYyQzcNup8tvmSpftcD8 tSLWtr9tWQ4UCCxULbTU3pD6tF/NTpVt+TN3XUSE7QwvbwoBQi4b4kmhVCgC9xwtwphbgDb31DEs VnW9mccOAPGpAGgGt+ZNSBY8Le0U24EW/wCJoJYvlbhYeKnSgOb3C35Xqblvb7DYCmLWsDcD7qGp FAa2gt7PH30wLWO7jyt/wpSdeBYciKFPNltQjZKOGuVN+QvoPvovZtVtfmONG8GxDjjwBpTGLEht 2vzEmhJZYbcf41BFxqBYcvGluFHEe69NxAN+HhaiEgoA0XpPDQcaCIxdW582tTFWI4DXxpQLDVfs Gn31pEJTaNb2b2DSjfe2u8jiSNtqOsaLw9pqT6gFmIHgBrQACD1H4Dj/ABqCdul+HAnj9lFxZd0g Xw0qNy62HUPZa/uqgDZlvdiPEXGlKhIJWzKvIk0zWNwRttxPjS+ctdtLWBPD7aEkrba97kEfMP7a aHcimxYhjzvcf8KnYFJ4MCBqLVIAFyTYH7BQyxCdSeIHzEaj3VSSADwKNx3ePsq7e5uAdORFhVfS 3mHWAbEcL++qGyoFwCbgHm1ztPvpW3g39O78XZSNfbViASrtAAXjpx099VqxDMgUnbpe2tqGBZCj Ddba/wA19Qar3xkC67baHjVxsxJUkcLi1qR0Xbdeq+t7EEUgJ9yLQO25bhra2Njf3GhkSwserm3/ AHVXsIYP6gHsJ1q1QzAm4IOpHAn7KsFfqIVFi4Ia/LnUMoUdQNjztf7xQ4IsNrA8gdbDwpJGMQuB cH+NGEARQLqx+N6NfMDt8TcGoFwqtbXiR7KnWxKizfdUgoystrWsfmanEiapbQ8Nb3rG2pG1953H za8L1YNoYMvB9F/tqBpeSHTdIFuWU8joBSTDYAt9iH7asleyhUNrcCaxvQZhudySfHnUN16NuPBU 8bIgk3XubbeJtWM9ySR0+zhWXIALoLnx14WrFZR4m/LxrLPRxvuf/9HwCiiigCiiigCiiigCiiig CiiigCinkKMQUFvEUlAFFFFAdN2HuM3oPCw3CPUHda1+FbhfWK7x6jltDtVh8SzgVyHbM84cjAgm OTRgLA/bXThZGEdkcMQCnUz3HKvq/F5FbjS61Pl/L49vJujFtP6l0kUkW259NTe5AXd/mY1K4uNc CNfW3C7SSXA9wrEMZDXYRiS+odyzD33vTHGklISO5PE7OGvttXoTPNMRmDO3rCpGxGPJYhdvjfy1 SMvKB2pjMqX8twov9lVjCZNbMANCFYbj/lvWRDDBGwaZQp5AlmNz77UEr1IaXPlYM0CRgDp9QlrD mRaqd+apISZAAfltzHt3GspvSu3qRbhe5G/0wfaQx4VjtlqjFY/ShQ6kxdRt/MTxqCZ6ICrFv/dT DcNGBtwPhprTeoEIXGxi4J0e1r/aKQZk3GFS27gzkAm38tOn72S8kmjHlqx09hNqD1grdsvfd0hh HNvT3H+2ndITf1ZvWAFgI0NvdoRUMZpAVlkIF+F0Uf5VoZQmrySE28sak3P8261Ujc4x7C2jhYCH FYnQ7pBb3WFZJkdgzSvEXXim4gD2nbpVIjnlUzMSkfAmXT7LGnTHxwoYsX/D0EX/AM1A33K0mgO/ coCm3XH1An+Y/wDlpgyyG8EahvEIbt8WNXI2NzAIuel3AAHPpFUvEZ9YwI1FumJdPfvY0E+w37aN 135E19bbdWI9m1DapVcRbGNSSLi7JYfYaeO0d9kcjkC/qOwUfCkeeG41uTxUsBrUCkJIjK+5g6rb gzHUDkEQC320kUKBWMKBWv1MSpIH/lpZJog21U0t5gNwv9oqAZjdCAkR4tbbf31llTLfTlcgFt6W 5NqaQiWF9qR3vwJa1gPAcqaNmbQzPtW11jAAPvPGpnzBC3pxxyEfM5sFJ+NYfY0mJ5bGRukfKtrj +YsFp3bdYpGNwFxuC/xakV82yv5UY3AYA2H3VEj44YNkTRs99EABBv47b1lqCqxCPKqsCiyOTdXY 7rE+61I6TydU+jWttU1koybN0cTbubAKbe4VEgfaXfcjDyiQAG58ADULu7mDNAFOgNuBa9zSGNhb YC/Igir5E3m8rXI4HYLfZegRbeoXYnQBjtF61tZHZFfogEMyXN9ABUqm1dUN76C2tSY1U2kYlhwj XT4XqUjhcM0kbJY6FCWP3VloqaBjGqg7ijjkNDeqxte9wwH4mOlWvtUWHqO1yVRQOHidwqyNbrua Mqo5sQNTWTQixQkbQCxI14kX9lZH7eKOO7AlU0A9po1CKfU2JwuFJ4+AtTiMWBEkgB+cqDr7hUsi porEcbaAWF+dKY4ywsR7b1cREdSXNvEc/wDy0Iuw3aMt4WG4fGsw0JRS0SN1XsV/Dw+2mAVRuI3f l41k7InAAXYFt06W+ylEaJZSQpvekpFaK4Y4nkPRZTqDz2jjxqZsQISUN42HGx1JN9utAWJWdtxc +I10Ou2kyJVZrnTSyru3MAPC50qmehsMBxDMiS5EWOo0OSQZCoHzIqi7OtZZXO7i6pC0suJcscuZ GQC9yzcdvL8dYOBnS4gYxytFfpLqFIsTrvuu7/VWRn93STbFGxARSm+FDGH087eo0lm/k6aQ5EpL U1t3UHqVlv5b218dKGkZyeixUWsv9tVAkcEFybi+unOrSWPGw/KugqvBmW3joRc26xr4cDUWYjy2 XlcipFuS68b6XoJPPh7RwpgRqNc6a7beNMCDc8SOJqr1FLAOPcLGnG0i6nlreiQTZJK34j3UXjJY cwdNKUKDqdt/A1JIA5BveRTBqRrI3SCD7CKkLpw4cqQE29tT1nQkqBr76EldybKALqbn22qQgABQ WvxvrekLaaa+BIqbX0Zbn2H76CSdqroB7bigG3u8Kh32a+Gg4Cluz6jco5gFTf41MssodgCRtQe8 ipt4G3upDewuL/8AbnRtG7ibHmCND8asCUTJtIuzgHkzf9hQJBYKH+zQfbrTBVJG5OHzNxqGNvKp FuB4UEkK0d7AlrcQxuKboNrAqBwHCoVntcixHHhQeFiSByN9NfZajQG3pfVSbacP76gNpZALcTe4 qLXWwa5H4edR1HS4BHIHX40RAaxNxtN9No1N6GbqsTZ7arysKgXvdiBzAtbX+NKCN5LH37r/AMa0 Zeo5sgOxVDczy++qlaS7MwVbD8ZufgKhpOlSiL6YBuxuKA2+IhQFA1LLqPcDbWhGxZAHXXjp5QaE DkBWU+9iB7tKlHDXupDqLBrf2C1LJtaNSklzewNtvwaqZGZQW22u66ixAIpZCWVVB6hdnVwL6e3n Ve+yXLjdyNuq/AjxqLPtLG2nyknX7daAhnszCXQ8Dx5+wVSH2Ib3ZSbbxpw8asuWJAABA1ANx99J I/J1/wAQW1/ZpQq7EkEKCoLIePj99xS70F7La+g3C1SVcIGW5XkOY+2qyxTVx0nRbj+6hUpGElmJ Ou3kTTCSMoS2mugOtG+97C1rWANwai5N7+UmxuuvwtQkIB032m5PAHgKg7gbbLgjivI0bLkAA25a 309tDI2pj0HG3AUz0GJIPp2B8rL48T8KkmPaDEA203t7/G1K+5bX8x83j9lKltgLWBvwPOoajEks ZnYhrKviOQoKhYztYkcA3I3p2jL6A7fE8qrkLINrXA4k/wALUCcwl9DF2tu1IvSzRa7lYAU56tdw Y+HCkZ2UWYEA8Qaw4PQpnB//0vAKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAKKKKAlAWZVHEkAV2+L2 99kZnubKOqVrKAPZeuIHEWNjfjXWwKPRjaUCV7D+o2n+UG9e74Lzc8Xzp20zGXobItjRC0EsItrY beNU.'" size="'. $element['#size'] ."\" />\n"); } /** * Return a themed form element. * * @param element * An associative array containing the properties of the element. * Properties used: title, description, id, required * @param $value * The form element's data. * @return * A string representing the form element. * * @ingroup themeable */ function theme_form_element($element, $value) { // This is also used in the installer, pre-database setup. $t = get_t(); $output = '
*' : ''; if (!empty($element['#title'])) { $title = $element['#title']; if (!empty($element['#id'])) { $output .= ' \n"; } else { $output .= ' \n"; } } $output .= " $value\n"; if (!empty($element['#description'])) { $output .= '
'. $element['#description'] ."
\n"; } $output .= "
\n"; return $output; } /** * Sets a form element's class attribute. * * Adds 'required' and 'error' classes as needed. * * @param &$element * The form element. * @param $name * Array of new class names to be added. */ function _form_set_class(&$element, $class = array()) { if ($element['#required']) { $class[] = 'required'; } if (form_get_error($element)) { $class[] = 'error'; } if (isset($element['#attributes']['class'])) { $class[] = $element['#attributes']['class']; } $element['#attributes']['class'] = implode(' ', $class); } /** * Prepare an HTML ID attribute string for a form item. * * Remove invalid characters and guarantee uniqueness. * * @param $id * The ID to clean. * @param $flush * If set to TRUE, the function will flush and reset the static array * which is built to test the uniqueness of element IDs. This is only * used if a form has completed the validation process. This parameter * should never be set to TRUE if this function is being called to * assign an ID to the #ID element. * @return * The cleaned ID. */ function form_clean_id($id = NULL, $flush = FALSE) { static $seen_ids = array(); if ($flush) { $seen_ids = array(); return; } $id = str_replace(array('][', '_', ' '), '-', $id); // Ensure IDs are unique. The first occurrence is held but left alone. // Subsequent occurrences get a number appended to them. This incrementing // will almost certainly break code that relies on explicit HTML IDs in // forms that appear more than once on the page, but the alternative is // outputting duplicate IDs, which would break JS code and XHTML // validity anyways. For now, it's an acceptable stopgap solution. if (isset($seen_ids[$id])) { $id = $id .'-'. $seen_ids[$id]++; } else { $seen_ids[$id] = 1; } return $id; } /** * @} End of "defgroup form_api". */ /** * @defgroup batch Batch operations * @{ * Functions allowing forms processing to be spread out over several page * requests, thus ensuring that the processing does not get interrupted * because of a PHP timeout, while allowing the user to receive feedback * on the progress of the ongoing operations. * * The API is primarily designed to integrate nicely with the Form API * workflow, but can also be used by non-FAPI scripts (like update.php) * or even simple page callbacks (which should probably be used sparingly). * * Example: * @code * $batch = array( * 'title' => t('Exporting'), * 'operations' => array( * array('my_function_1', array($account->uid, 'story')), * array('my_function_2', array()), * ), * 'finished' => 'my_finished_callback', * 'file' => 'path_to_file_containing_myfunctions', * ); * batch_set($batch); * // Only needed if not inside a form _submit handler. * // Setting redirect in batch_process. * batch_process('node/1'); * @endcode * * Note: if the batch 'title', 'init_message', 'progress_message', or * 'error_message' could contain any user input, it is the responsibility of * the code calling batch_set() to sanitize them first with a function like * check_plain() or filter_xss(). * * Sample batch operations: * @code * // Simple and artificial: load a node of a given type for a given user * function my_function_1($uid, $type, &$context) { * // The $context array gathers batch context information about the execution (read), * // as well as 'return values' for the current operation (write) * // The following keys are provided : * // 'results' (read / write): The array of results gathered so far by * // the batch processing, for the current operation to append its own. * // 'message' (write): A text message displayed in the progress page. * // The following keys allow for multi-step operations : * // 'sandbox' (read / write): An array that can be freely used to * // store persistent data between iterations. It is recommended to * // use this instead of $_SESSION, which is unsafe if the user * // continues browsing in a separate window while the batch is processing. * // 'finished' (write): A float number between 0 and 1 informing * // the processing engine of the completion level for the operation. * // 1 (or no value explicitly set) means the operation is finished * // and the batch processing can continue to the next operation. * * $node = node_load(array('uid' => $uid, 'type' => $type)); * $context['results'][] = $node->nid .' : '. $node->title; * $context['message'] = $node->title; * } * * // More advanced example: multi-step operation - load all nodes, five by five * function my_function_2(&$context) { * if (empty($context['sandbox'])) { * $context['sandbox']['progress'] = 0; * $context['sandbox']['current_node'] = 0; * $context['sandbox']['max'] = db_result(db_query('SELECT COUNT(DISTINCT nid) FROM {node}')); * } * $limit = 5; * $result = db_query_range("SELECT nid FROM {node} WHERE nid > %d ORDER BY nid ASC", $context['sandbox']['current_node'], 0, $limit); * while ($row = db_fetch_array($result)) { * $node = node_load($row['nid'], NULL, TRUE); * $context['results'][] = $node->nid .' : '. $node->title; * $context['sandbox']['progress']++; * $context['sandbox']['current_node'] = $node->nid; * $context['message'] = $node->title; * } * if ($context['sandbox']['progress'] != $context['sandbox']['max']) { * $context['finished'] = $context['sandbox']['progress'] / $context['sandbox']['max']; * } * } * @endcode * * Sample 'finished' callback: * @code * function batch_test_finished($success, $results, $operations) { * if ($success) { * $message = format_plural(count($results), 'One post processed.', '@count posts processed.'); * } * else { * $message = t('Finished with an error.'); * } * drupal_set_message($message); * // Providing data for the redirected page is done through $_SESSION. * foreach ($results as $result) { * $items[] = t('Loaded node %title.', array('%title' => $result)); * } * $_SESSION['my_batch_results'] = $items; * } * @endcode */ /** * Opens a new batch. * * @param $batch * An array defining the batch. The following keys can be used -- only * 'operations' is required, and batch_init() provides default values for * the messages. * - 'operations': Array of function calls to be performed. * Example: * @code * array( * array('my_function_1', array($arg1)), * array('my_function_2', array($arg2_1, $arg2_2)), * ) * @endcode * - 'title': Title for the progress page. Only safe strings should be passed. * Defaults to t('Processing'). * - 'init_message': Message displayed while the processing is initialized. * Defaults to t('Initializing.'). * - 'progress_message': Message displayed while processing the batch. * Available placeholders are @current, @remaining, @total, @percentage, * @estimate and @elapsed. Defaults to t('Completed @current of @total.'). * - 'error_message': Message displayed if an error occurred while processing * the batch. Defaults to t('An error has occurred.'). * - 'finished': Name of a function to be executed after the batch has * completed. This should be used to perform any result massaging that * may be needed, and possibly save data in $_SESSION for display after * final page redirection. * - 'file': Path to the file containing the definitions of the * 'operations' and 'finished' functions, for instance if they don't * reside in the main .module file. The path should be relative to * base_path(), and thus should be built using drupal_get_path(). * * Operations are added as new batch sets. Batch sets are used to ensure * clean code independence, ensuring that several batches submitted by * different parts of the code (core / contrib modules) can be processed * correctly while not interfering or having to cope with each other. Each * batch set gets to specify its own UI messages, operates on its own set * of operations and results, and triggers its own 'finished' callback. * Batch sets are processed sequentially, with the progress bar starting * fresh for every new set. */ function batch_set($batch_definition) { if ($batch_definition) { $batch =& batch_get(); // Initialize the batch if (empty($batch)) { $batch = array( 'sets' => array(), ); } $init = array( 'sandbox' => array(), 'results' => array(), 'success' => FALSE, ); // Use get_t() to allow batches at install time. $t = get_t(); $defaults = array( 'title' => $t('Processing'), 'init_message' => $t('Initializing.'), 'progress_message' => $t('Remaining @remaining of @total.'), 'error_message' => $t('An error has occurred.'), ); $batch_set = $init + $batch_definition + $defaults; // Tweak init_message to avoid the bottom of the page flickering down after init phase. $batch_set['init_message'] .= '
 '; $batch_set['total'] = count($batch_set['operations']); // If the batch is being processed (meaning we are executing a stored submit handler), // insert the new set after the current one. if (isset($batch['current_set'])) { // array_insert does not exist... $slice1 = array_slice($batch['sets'], 0, $batch['current_set'] + 1); $slice2 = array_slice($batch['sets'], $batch['current_set'] + 1); $batch['sets'] = array_merge($slice1, array($batch_set), $slice2); } else { $batch['sets'][] = $batch_set; } } } /** * Processes the batch. * * Unless the batch has been marked with 'progressive' = FALSE, the function * issues a drupal_goto and thus ends page execution. * * This function is not needed in form submit handlers; Form API takes care * of batches that were set during form submission. * * @param $redirect * (optional) Path to redirect to when the batch has finished processing. * @param $url * (optional - should only be used for separate scripts like update.php) * URL of the batch processing page. */ function batch_process($redirect = NULL, $url = NULL) { $batch =& batch_get(); if (isset($batch)) { // Add process information $url = isset($url) ? $url : 'batch'; $process_info = array( 'current_set' => 0, 'progressive' => TRUE, 'url' => isset($url) ? $url : 'batch', 'source_page' => $_GET['q'], 'redirect' => $redirect, ); $batch += $process_info; if ($batch['progressive']) { // Clear the way for the drupal_goto redirection to the batch processing // page, by saving and unsetting the 'destination' if any, on both places // drupal_goto looks for it. if (isset($_REQUEST['destination'])) { $batch['destination'] = $_REQUEST['destination']; unset($_REQUEST['destination']); } elseif (isset($_REQUEST['edit']['destination'])) { $batch['destination'] = $_REQUEST['edit']['destination']; unset($_REQUEST['edit']['destination']); } // Initiate db storage in order to get a batch id. We have to provide // at least an empty string for the (not null) 'token' column. db_query("INSERT INTO {batch} (token, timestamp) VALUES ('', %d)", time()); $batch['id'] = db_last_insert_id('batch', 'bid'); // Now that we have a batch id, we can generate the redirection link in // the generic error message. $t = get_t(); $batch['error_message'] = $t('Please continue to the error page', array('@error_url' => url($url, array('query' => array('id' => $batch['id'], 'op' => 'finished'))))); // Actually store the batch data and the token generated form the batch id. db_query("UPDATE {batch} SET token = '%s', batch = '%s' WHERE bid = %d", drupal_get_token($batch['id']), serialize($batch), $batch['id']); drupal_goto($batch['url'], 'op=start&id='. $batch['id']); } else { // Non-progressive execution: bypass the whole progressbar workflow // and execute the batch in one pass. require_once './includes/batch.inc'; _batch_process(); } } } /** * Retrieves the current batch. */ function &batch_get() { static $batch = array(); return $batch; } /** * @} End of "defgroup batch". */