text.module 8.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161
  1. <?php
  2. /**
  3. * @file
  4. * Defines simple text field types.
  5. */
  6. use Drupal\Core\Url;
  7. use Drupal\Component\Utility\Html;
  8. use Drupal\Component\Utility\Unicode;
  9. use Drupal\Core\Routing\RouteMatchInterface;
  10. use Drupal\filter\Entity\FilterFormat;
  11. /**
  12. * Implements hook_help().
  13. */
  14. function text_help($route_name, RouteMatchInterface $route_match) {
  15. switch ($route_name) {
  16. case 'help.page.text':
  17. $output = '';
  18. $output .= '<h3>' . t('About') . '</h3>';
  19. $output .= '<p>' . t('The Text module allows you to create short and long text fields with optional summaries. See the <a href=":field">Field module help</a> and the <a href=":field_ui">Field UI help</a> pages for general information on fields and how to create and manage them. For more information, see the <a href=":text_documentation">online documentation for the Text module</a>.', [':field' => Url::fromRoute('help.page', ['name' => 'field'])->toString(), ':field_ui' => (\Drupal::moduleHandler()->moduleExists('field_ui')) ? Url::fromRoute('help.page', ['name' => 'field_ui'])->toString() : '#', ':text_documentation' => 'https://www.drupal.org/documentation/modules/text']) . '</p>';
  20. $output .= '<h3>' . t('Uses') . '</h3>';
  21. $output .= '<dl>';
  22. $output .= '<dt>' . t('Managing and displaying text fields') . '</dt>';
  23. $output .= '<dd>' . t('The <em>settings</em> and <em>display</em> of the text field can be configured separately. See the <a href=":field_ui">Field UI help</a> for more information on how to manage fields and their display.', [':field_ui' => (\Drupal::moduleHandler()->moduleExists('field_ui')) ? Url::fromRoute('help.page', ['name' => 'field_ui'])->toString() : '#']) . '</dd>';
  24. $output .= '<dt>' . t('Creating short text fields') . '</dt>';
  25. $output .= '<dd>' . t('If you choose <em>Text (plain)</em> or <em>Text (formatted)</em> as the field type on the <em>Manage fields</em> page, then a field with a single row is displayed. You can change the maximum text length in the <em>Field settings</em> when you set up the field.') . '</dd>';
  26. $output .= '<dt>' . t('Creating long text fields') . '</dt>';
  27. $output .= '<dd>' . t('If you choose <em>Text (plain, long)</em>, <em>Text (formatted, long)</em>, or <em>Text (formatted, long, with summary)</em> on the <em>Manage fields</em> page, then users can insert text of unlimited length. On the <em>Manage form display</em> page, you can set the number of rows that are displayed to users.') . '</dd>';
  28. $output .= '<dt>' . t('Trimming the text length') . '</dt>';
  29. $output .= '<dd>' . t('On the <em>Manage display</em> page you can choose to display a trimmed version of the text, and if so, where to cut off the text.') . '</dd>';
  30. $output .= '<dt>' . t('Displaying summaries instead of trimmed text') . '</dt>';
  31. $output .= '<dd>' . t('As an alternative to using a trimmed version of the text, you can enter a separate summary by choosing the <em>Text (formatted, long, with summary)</em> field type on the <em>Manage fields</em> page. Even when <em>Summary input</em> is enabled, and summaries are provided, you can display <em>trimmed</em> text nonetheless by choosing the appropriate format on the <em>Manage display</em> page.') . '</dd>';
  32. $output .= '<dt>' . t('Using text formats and editors') . '</dt>';
  33. $output .= '<dd>' . t('If you choose <em>Text (plain)</em> or <em>Text (plain, long)</em> you restrict the input to <em>Plain text</em> only. If you choose <em>Text (formatted)</em>, <em>Text (formatted, long)</em>, or <em>Text (formatted, long with summary)</em> you allow users to write formatted text. Which options are available to individual users depends on the settings on the <a href=":formats">Text formats and editors page</a>.', [':formats' => Url::fromRoute('filter.admin_overview')->toString()]) . '</dd>';
  34. $output .= '</dl>';
  35. return $output;
  36. }
  37. }
  38. /**
  39. * Generates a trimmed, formatted version of a text field value.
  40. *
  41. * If the end of the summary is not indicated using the <!--break--> delimiter
  42. * then we generate the summary automatically, trying to end it at a sensible
  43. * place such as the end of a paragraph, a line break, or the end of a sentence
  44. * (in that order of preference).
  45. *
  46. * @param $text
  47. * The content for which a summary will be generated.
  48. * @param $format
  49. * The format of the content. If the line break filter is present then we
  50. * treat newlines embedded in $text as line breaks. If the htmlcorrector
  51. * filter is present, it will be run on the generated summary (if different
  52. * from the incoming $text).
  53. * @param $size
  54. * The desired character length of the summary. If omitted, the default value
  55. * will be used. Ignored if the special delimiter is present in $text.
  56. *
  57. * @return
  58. * The generated summary.
  59. */
  60. function text_summary($text, $format = NULL, $size = NULL) {
  61. if (!isset($size)) {
  62. $size = \Drupal::config('text.settings')->get('default_summary_length');
  63. }
  64. // Find where the delimiter is in the body
  65. $delimiter = strpos($text, '<!--break-->');
  66. // If the size is zero, and there is no delimiter, the entire body is the summary.
  67. if ($size == 0 && $delimiter === FALSE) {
  68. return $text;
  69. }
  70. // If a valid delimiter has been specified, use it to chop off the summary.
  71. if ($delimiter !== FALSE) {
  72. return substr($text, 0, $delimiter);
  73. }
  74. // Retrieve the filters of the specified text format, if any.
  75. if (isset($format)) {
  76. $filter_format = FilterFormat::load($format);
  77. // If the specified format does not exist, return nothing. $text is already
  78. // filtered text, but the remainder of this function will not be able to
  79. // ensure a sane and secure summary.
  80. if (!$filter_format || !($filters = $filter_format->filters())) {
  81. return '';
  82. }
  83. }
  84. // If we have a short body, the entire body is the summary.
  85. if (mb_strlen($text) <= $size) {
  86. return $text;
  87. }
  88. // If the delimiter has not been specified, try to split at paragraph or
  89. // sentence boundaries.
  90. // The summary may not be longer than maximum length specified. Initial slice.
  91. $summary = Unicode::truncate($text, $size);
  92. // Store the actual length of the UTF8 string -- which might not be the same
  93. // as $size.
  94. $max_rpos = strlen($summary);
  95. // How much to cut off the end of the summary so that it doesn't end in the
  96. // middle of a paragraph, sentence, or word.
  97. // Initialize it to maximum in order to find the minimum.
  98. $min_rpos = $max_rpos;
  99. // Store the reverse of the summary. We use strpos on the reversed needle and
  100. // haystack for speed and convenience.
  101. $reversed = strrev($summary);
  102. // Build an array of arrays of break points grouped by preference.
  103. $break_points = [];
  104. // A paragraph near the end of sliced summary is most preferable.
  105. $break_points[] = ['</p>' => 0];
  106. // If no complete paragraph then treat line breaks as paragraphs.
  107. $line_breaks = ['<br />' => 6, '<br>' => 4];
  108. // Newline only indicates a line break if line break converter
  109. // filter is present.
  110. if (isset($format) && $filters->has('filter_autop') && $filters->get('filter_autop')->status) {
  111. $line_breaks["\n"] = 1;
  112. }
  113. $break_points[] = $line_breaks;
  114. // If the first paragraph is too long, split at the end of a sentence.
  115. $break_points[] = ['. ' => 1, '! ' => 1, '? ' => 1, '。' => 0, '؟ ' => 1];
  116. // Iterate over the groups of break points until a break point is found.
  117. foreach ($break_points as $points) {
  118. // Look for each break point, starting at the end of the summary.
  119. foreach ($points as $point => $offset) {
  120. // The summary is already reversed, but the break point isn't.
  121. $rpos = strpos($reversed, strrev($point));
  122. if ($rpos !== FALSE) {
  123. $min_rpos = min($rpos + $offset, $min_rpos);
  124. }
  125. }
  126. // If a break point was found in this group, slice and stop searching.
  127. if ($min_rpos !== $max_rpos) {
  128. // Don't slice with length 0. Length must be <0 to slice from RHS.
  129. $summary = ($min_rpos === 0) ? $summary : substr($summary, 0, 0 - $min_rpos);
  130. break;
  131. }
  132. }
  133. // If the htmlcorrector filter is present, apply it to the generated summary.
  134. if (isset($format) && $filters->has('filter_htmlcorrector') && $filters->get('filter_htmlcorrector')->status) {
  135. $summary = Html::normalize($summary);
  136. }
  137. return $summary;
  138. }