Projet

Général

Profil

Paste
Télécharger (31,7 ko) Statistiques
| Branche: | Révision:

root / drupal7 / sites / all / modules / captcha / captcha.module @ ac1bc5de

1 85ad3d82 Assos Assos
<?php
2
3
/**
4
 * @file
5
 * This module enables basic CAPTCHA functionality:
6
 * administrators can add a CAPTCHA to desired forms that users without
7
 * the 'skip CAPTCHA' permission (typically anonymous visitors) have
8
 * to solve.
9
 */
10
11
/**
12
 * Constants for CAPTCHA persistence.
13
 * TODO: change these integers to strings because the CAPTCHA settings form saves them as strings in the variables table anyway?
14
 */
15
16
// Always add a CAPTCHA (even on every page of a multipage workflow).
17
define('CAPTCHA_PERSISTENCE_SHOW_ALWAYS', 0);
18
// Only one CAPTCHA has to be solved per form instance/multi-step workflow.
19
define('CAPTCHA_PERSISTENCE_SKIP_ONCE_SUCCESSFUL_PER_FORM_INSTANCE', 1);
20
// Once the user answered correctly for a CAPTCHA on a certain form type,
21
// no more CAPTCHAs will be offered anymore for that form.
22
define('CAPTCHA_PERSISTENCE_SKIP_ONCE_SUCCESSFUL_PER_FORM_TYPE', 2);
23
// Once the user answered correctly for a CAPTCHA on the site,
24
// no more CAPTCHAs will be offered anymore.
25
define('CAPTCHA_PERSISTENCE_SKIP_ONCE_SUCCESSFUL', 3);
26
27
define('CAPTCHA_STATUS_UNSOLVED', 0);
28
define('CAPTCHA_STATUS_SOLVED', 1);
29
define('CAPTCHA_STATUS_EXAMPLE', 2);
30
31
define('CAPTCHA_DEFAULT_VALIDATION_CASE_SENSITIVE', 0);
32
define('CAPTCHA_DEFAULT_VALIDATION_CASE_INSENSITIVE', 1);
33
34
/**
35
 * Implementation of hook_help().
36
 */
37
function captcha_help($path, $arg) {
38
  switch ($path) {
39
    case 'admin/help#captcha':
40
      $output = '<p>' . t('"CAPTCHA" is an acronym for "Completely Automated Public Turing test to tell Computers and Humans Apart". It is typically a challenge-response test to determine whether the user is human. The CAPTCHA module is a tool to fight automated submission by malicious users (spamming) of for example comments forms, user registration forms, guestbook forms, etc. You can extend the desired forms with an additional challenge, which should be easy for a human to solve correctly, but hard enough to keep automated scripts and spam bots out.') . '</p>';
41
      $output .= '<p>' . t('Note that the CAPTCHA module interacts with page caching (see <a href="!performancesettings">performance settings</a>). Because the challenge should be unique for each generated form, the caching of the page it appears on is prevented. Make sure that these forms do not appear on too many pages or you will lose much caching efficiency. For example, if you put a CAPTCHA on the user login block, which typically appears on each page for anonymous visitors, caching will practically be disabled. The comment submission forms are another example. In this case you should set the <em>Location of comment submission form</em> to <em>Display on separate page</em> in the comment settings of the relevant <a href="!contenttypes">content types</a> for better caching efficiency.',
42
        array(
43
          '!performancesettings' => url('admin/config/development/performance'),
44
          '!contenttypes' => url('admin/structure/types'),
45
        )
46
      ) . '</p>';
47
      $output .= '<p>' . t('CAPTCHA is a trademark of Carnegie Mellon University.') . '</p>';
48
      return $output;
49 ac1bc5de Assos Assos
50 85ad3d82 Assos Assos
    case 'admin/config/people/captcha':
51
    case 'admin/config/people/captcha/captcha':
52
    case 'admin/config/people/captcha/captcha/settings':
53
      $output = '<p>' . t('A CAPTCHA can be added to virtually each Drupal form. Some default forms are already provided in the form list, but arbitrary forms can be easily added and managed when the option <em>Add CAPTCHA administration links to forms</em> is enabled.') . '</p>';
54
      $output .= '<p>' . t('Users with the <em>Skip CAPTCHA</em> <a href="@perm">permission</a> won\'t be offered a challenge. Be sure to grant this permission to the trusted users (e.g. site administrators). If you want to test a protected form, be sure to do it as a user without the <em>Skip CAPTCHA</em> permission (e.g. as anonymous user).', array('@perm' => url('admin/people/permissions'))) . '</p>';
55
      return $output;
56
  }
57
}
58
59
/**
60 ac1bc5de Assos Assos
 * Implements of hook_menu().
61 85ad3d82 Assos Assos
 */
62
function captcha_menu() {
63
  $items = array();
64 ac1bc5de Assos Assos
  // Main configuration page of the basic CAPTCHA module.
65 85ad3d82 Assos Assos
  $items['admin/config/people/captcha'] = array(
66
    'title' => 'CAPTCHA',
67
    'description' => 'Administer how and where CAPTCHAs are used.',
68
    'file' => 'captcha.admin.inc',
69
    'page callback' => 'drupal_get_form',
70
    'page arguments' => array('captcha_admin_settings'),
71
    'access arguments' => array('administer CAPTCHA settings'),
72
    'type' => MENU_NORMAL_ITEM,
73
  );
74 ac1bc5de Assos Assos
  // The default local task (needed when other modules want to offer,
75
  // alternative CAPTCHA types and their own configuration page as local task).
76 85ad3d82 Assos Assos
  $items['admin/config/people/captcha/captcha'] = array(
77
    'title' => 'CAPTCHA',
78
    'access arguments' => array('administer CAPTCHA settings'),
79
    'type' => MENU_DEFAULT_LOCAL_TASK,
80
    'weight' => -20,
81
  );
82
  $items['admin/config/people/captcha/captcha/settings'] = array(
83
    'title' => 'General settings',
84
    'access arguments' => array('administer CAPTCHA settings'),
85
    'type' => MENU_DEFAULT_LOCAL_TASK,
86
    'weight' => 0,
87
  );
88
  $items['admin/config/people/captcha/captcha/examples'] = array(
89
    'title' => 'Examples',
90
    'description' => 'An overview of the available challenge types with examples.',
91
    'file' => 'captcha.admin.inc',
92
    'page callback' => 'drupal_get_form',
93
    'page arguments' => array('captcha_examples', 6, 7),
94
    'access arguments' => array('administer CAPTCHA settings'),
95
    'type' => MENU_LOCAL_TASK,
96
    'weight' => 5,
97
  );
98
  $items['admin/config/people/captcha/captcha/captcha_point'] = array(
99
    'title' => 'CAPTCHA point administration',
100
    'file' => 'captcha.admin.inc',
101
    'page callback' => 'captcha_point_admin',
102
    'page arguments' => array(6, 7),
103
    'access arguments' => array('administer CAPTCHA settings'),
104
    'type' => MENU_CALLBACK,
105
  );
106
  return $items;
107
}
108
109
/**
110 ac1bc5de Assos Assos
 * Implements of hook_permission().
111 85ad3d82 Assos Assos
 */
112
function captcha_permission() {
113
  return array(
114
    'administer CAPTCHA settings' => array(
115
      'title' => t('Administer CAPTCHA settings'),
116
    ),
117
    'skip CAPTCHA' => array(
118
      'title' => t('Skip CAPTCHA'),
119
      'description' => t('Users with this permission will not be offered a CAPTCHA.'),
120
    ),
121
  );
122
}
123
124
/**
125 ac1bc5de Assos Assos
 * Implements of hook_theme().
126 85ad3d82 Assos Assos
 */
127
function captcha_theme() {
128
  return array(
129
    'captcha_admin_settings_captcha_points' => array(
130
      'render element' => 'form',
131
    ),
132
    'captcha' => array(
133
      'render element' => 'element',
134
    ),
135
  );
136
}
137
138
/**
139 ac1bc5de Assos Assos
 * Implements of hook_cron().
140 85ad3d82 Assos Assos
 *
141
 * Remove old entries from captcha_sessions table.
142
 */
143
function captcha_cron() {
144
  // Remove challenges older than 1 day.
145
  db_delete('captcha_sessions')
146 ac1bc5de Assos Assos
    ->condition('timestamp', REQUEST_TIME - 60 * 60 * 24, '<')
147 85ad3d82 Assos Assos
    ->execute();
148
}
149
150
/**
151 ac1bc5de Assos Assos
 * Implements of hook_element_info().
152 85ad3d82 Assos Assos
 */
153
function captcha_element_info() {
154
  // Define the CAPTCHA form element with default properties.
155
  $captcha_element = array(
156
    '#input' => TRUE,
157
    '#process' => array('captcha_element_process'),
158 ac1bc5de Assos Assos
    // The type of challenge: e.g. 'default', 'none', 'captcha/Math', 'image_captcha/Image'.
159 85ad3d82 Assos Assos
    '#captcha_type' => 'default',
160
    '#default_value' => '',
161
    // CAPTCHA in admin mode: presolve the CAPTCHA and always show it (despite previous successful responses).
162
    '#captcha_admin_mode' => FALSE,
163
    // The default CAPTCHA validation function.
164
    // TODO: should this be a single string or an array of strings (combined in OR fashion)?
165
    '#captcha_validate' => 'captcha_validate_strict_equality',
166
  );
167
  // Override the default CAPTCHA validation function for case insensitive validation.
168
  // TODO: shouldn't this be done somewhere else, e.g. in form_alter?
169
  if (CAPTCHA_DEFAULT_VALIDATION_CASE_INSENSITIVE == variable_get('captcha_default_validation', CAPTCHA_DEFAULT_VALIDATION_CASE_INSENSITIVE)) {
170
    $captcha_element['#captcha_validate'] = 'captcha_validate_case_insensitive_equality';
171
  }
172
  return array('captcha' => $captcha_element);
173
}
174
175
/**
176
 * Process callback for CAPTCHA form element.
177
 */
178
function captcha_element_process($element, &$form_state, $complete_form) {
179
180
  module_load_include('inc', 'captcha');
181
182
  // Add Javascript for general CAPTCHA functionality.
183
  drupal_add_js(drupal_get_path('module', 'captcha') . '/captcha.js');
184
185
  // Prevent caching of the page with CAPTCHA elements.
186
  // This needs to be done even if the CAPTCHA will be ommitted later:
187
  // other untrusted users should not get a cached page when
188
  // the current untrusted user can skip the current CAPTCHA.
189
  global $conf;
190
  $conf['cache'] = FALSE;
191
192
  // Get the form ID of the form we are currently processing (which is not
193
  // necessary the same form that is submitted (if any).
194
  $this_form_id = $complete_form['form_id']['#value'];
195
196
  // Get the CAPTCHA session ID.
197
  // If there is a submitted form: try to retrieve and reuse the
198
  // CAPTCHA session ID from the posted data.
199
  list($posted_form_id, $posted_captcha_sid) = _captcha_get_posted_captcha_info($element, $form_state, $this_form_id);
200
  if ($this_form_id == $posted_form_id && isset($posted_captcha_sid)) {
201
    $captcha_sid = $posted_captcha_sid;
202
  }
203
  else {
204
    // Generate a new CAPTCHA session if we could not reuse one from a posted form.
205
    $captcha_sid = _captcha_generate_captcha_session($this_form_id, CAPTCHA_STATUS_UNSOLVED);
206
  }
207
208
  // Store CAPTCHA session ID as hidden field.
209
  // Strictly speaking, it is not necessary to send the CAPTCHA session id
210
  // with the form, as the one time CAPTCHA token (see lower) is enough.
211
  // However, we still send it along, because it can help debugging
212
  // problems on live sites with only access to the markup.
213
  $element['captcha_sid'] = array(
214
    '#type' => 'hidden',
215
    '#value' => $captcha_sid,
216
  );
217
218 66b5cbf6 Assos Assos
  $captcha_token = db_select('captcha_sessions', 'c')
219
    ->fields('c', array('token'))
220 85ad3d82 Assos Assos
    ->condition('csid', $captcha_sid)
221 66b5cbf6 Assos Assos
    ->execute()
222
    ->fetchField();
223
  if (!isset($captcha_token) && !$form_state['submitted']) {
224
    // Additional one-time CAPTCHA token: store in database and send with form.
225
    $captcha_token = md5(mt_rand());
226
    db_update('captcha_sessions')
227
      ->fields(array('token' => $captcha_token))
228
      ->condition('csid', $captcha_sid)
229
      ->execute();
230
  }
231
232 85ad3d82 Assos Assos
  $element['captcha_token'] = array(
233
    '#type' => 'hidden',
234
    '#value' => $captcha_token,
235
  );
236
237
  // Get implementing module and challenge for CAPTCHA.
238
  list($captcha_type_module, $captcha_type_challenge) = _captcha_parse_captcha_type($element['#captcha_type']);
239
240
  // Store CAPTCHA information for further processing in
241
  // - $form_state['captcha_info'], which survives a form rebuild (e.g. node
242
  //   preview), useful in _captcha_get_posted_captcha_info().
243
  // - $element['#captcha_info'], for post processing functions that do not
244
  //   receive a $form_state argument (e.g. the pre_render callback).
245
  $form_state['captcha_info'] = array(
246
    'this_form_id' => $this_form_id,
247
    'posted_form_id' => $posted_form_id,
248
    'captcha_sid' => $captcha_sid,
249
    'module' => $captcha_type_module,
250
    'captcha_type' => $captcha_type_challenge,
251
  );
252
  $element['#captcha_info'] = array(
253
    'form_id' => $this_form_id,
254
    'captcha_sid' => $captcha_sid,
255
  );
256
257
  if (_captcha_required_for_user($captcha_sid, $this_form_id) || $element['#captcha_admin_mode']) {
258
    // Generate a CAPTCHA and its solution
259
    // (note that the CAPTCHA session ID is given as third argument).
260
    $captcha = module_invoke($captcha_type_module, 'captcha', 'generate', $captcha_type_challenge, $captcha_sid);
261
    if (!isset($captcha['form']) || !isset($captcha['solution'])) {
262
      // The selected module did not return what we expected: log about it and quit.
263
      watchdog('CAPTCHA',
264
        'CAPTCHA problem: unexpected result from hook_captcha() of module %module when trying to retrieve challenge type %type for form %form_id.',
265 ac1bc5de Assos Assos
        array(
266
          '%type' => $captcha_type_challenge,
267
          '%module' => $captcha_type_module,
268
          '%form_id' => $this_form_id,
269
        ),
270 85ad3d82 Assos Assos
        WATCHDOG_ERROR);
271
      return $element;
272
    }
273
    // Add form elements from challenge as children to CAPTCHA form element.
274
    $element['captcha_widgets'] = $captcha['form'];
275
276
    // Add a validation callback for the CAPTCHA form element (when not in admin mode).
277
    if (!$element['#captcha_admin_mode']) {
278
      $element['#element_validate'] = array('captcha_validate');
279
    }
280
281
    // Set a custom CAPTCHA validate function if requested.
282
    if (isset($captcha['captcha_validate'])) {
283
      $element['#captcha_validate'] = $captcha['captcha_validate'];
284
    }
285
286
    // Set the theme function.
287
    $element['#theme'] = 'captcha';
288
289
    // Add pre_render callback for additional CAPTCHA processing.
290
    if (!isset($element['#pre_render'])) {
291
      $element['#pre_render'] = array();
292
    }
293
    $element['#pre_render'][] = 'captcha_pre_render_process';
294
295
    // Store the solution in the #captcha_info array.
296
    $element['#captcha_info']['solution'] = $captcha['solution'];
297
298
    // Make sure we can use a top level form value $form_state['values']['captcha_response'], even if the form has #tree=true.
299
    $element['#tree'] = FALSE;
300
301
  }
302
303
  return $element;
304
}
305
306
/**
307
 * Theme function for a CAPTCHA element.
308
 *
309
 * Render it in a fieldset if a description of the CAPTCHA
310
 * is available. Render it as is otherwise.
311
 */
312
function theme_captcha($variables) {
313
  $element = $variables['element'];
314
  if (!empty($element['#description']) && isset($element['captcha_widgets'])) {
315
    $fieldset = array(
316
      '#type' => 'fieldset',
317
      '#title' => t('CAPTCHA'),
318
      '#description' => $element['#description'],
319
      '#children' => drupal_render_children($element),
320
      '#attributes' => array('class' => array('captcha')),
321
    );
322
    return theme('fieldset', array('element' => $fieldset));
323
  }
324
  else {
325
    return '<div class="captcha">' . drupal_render_children($element) . '</div>';
326
  }
327
}
328
329
/**
330 ac1bc5de Assos Assos
 * Implements of hook_form_alter().
331 85ad3d82 Assos Assos
 *
332
 * This function adds a CAPTCHA to forms for untrusted users if needed and adds
333
 * CAPTCHA administration links for site administrators if this option is enabled.
334
 */
335
function captcha_form_alter(&$form, &$form_state, $form_id) {
336
337
  if (!user_access('skip CAPTCHA')) {
338
    // Visitor does not have permission to skip CAPTCHAs.
339
    module_load_include('inc', 'captcha');
340
341
    // Get CAPTCHA type and module for given form_id.
342
    $captcha_point = captcha_get_form_id_setting($form_id);
343 ac1bc5de Assos Assos
    if ($captcha_point && !empty($captcha_point->captcha_type)) {
344 85ad3d82 Assos Assos
      module_load_include('inc', 'captcha');
345
      // Build CAPTCHA form element.
346
      $captcha_element = array(
347
        '#type' => 'captcha',
348
        '#captcha_type' => $captcha_point->module . '/' . $captcha_point->captcha_type,
349
      );
350
      // Add a CAPTCHA description if required.
351
      if (variable_get('captcha_add_captcha_description', TRUE)) {
352
        $captcha_element['#description'] = _captcha_get_description();
353
      }
354
355
      // Get placement in form and insert in form.
356
      $captcha_placement = _captcha_get_captcha_placement($form_id, $form);
357
      _captcha_insert_captcha_element($form, $captcha_placement, $captcha_element);
358
    }
359
  }
360 66b5cbf6 Assos Assos
  elseif (
361
    variable_get('captcha_administration_mode', FALSE)
362
    && user_access('administer CAPTCHA settings')
363
    && (arg(0) != 'admin' || variable_get('captcha_allow_on_admin_pages', FALSE))
364 85ad3d82 Assos Assos
  ) {
365
    // Add CAPTCHA administration tools.
366
    module_load_include('inc', 'captcha');
367
368
    $captcha_point = captcha_get_form_id_setting($form_id);
369 ac1bc5de Assos Assos
    // For administrators: show CAPTCHA info and offer link to configure it.
370 85ad3d82 Assos Assos
    $captcha_element = array(
371
      '#type' => 'fieldset',
372
      '#title' => t('CAPTCHA'),
373
      '#collapsible' => TRUE,
374
      '#collapsed' => TRUE,
375
      '#attributes' => array('class' => array('captcha-admin-links')),
376
    );
377
    if ($captcha_point !== NULL && $captcha_point->captcha_type) {
378
      $captcha_element['#title'] = t('CAPTCHA: challenge "@type" enabled', array('@type' => $captcha_point->captcha_type));
379
      $captcha_element['#description'] = t('Untrusted users will see a CAPTCHA here (<a href="@settings">general CAPTCHA settings</a>).',
380
        array('@settings' => url('admin/config/people/captcha'))
381
      );
382
      $captcha_element['challenge'] = array(
383
        '#type' => 'item',
384
        '#title' => t('Enabled challenge'),
385
        '#markup' => t('%type by module %module (<a href="@change">change</a>, <a href="@disable">disable</a>)', array(
386
          '%type' => $captcha_point->captcha_type,
387
          '%module' => $captcha_point->module,
388
          '@change' => url("admin/config/people/captcha/captcha/captcha_point/$form_id", array('query' => drupal_get_destination())),
389
          '@disable' => url("admin/config/people/captcha/captcha/captcha_point/$form_id/disable", array('query' => drupal_get_destination())),
390
        )),
391
      );
392
      // Add an example challenge with solution.
393
      // This does not work with the reCAPTCHA and Egglue challenges as
394
      // discussed in http://drupal.org/node/487032 and
395
      // http://drupal.org/node/525586. As a temporary workaround, we
396
      // blacklist the reCAPTCHA and Egglue challenges and do not show
397
      // an example challenge.
398
      // TODO: Once the issues mentioned above are fixed, this workaround
399
      // should be removed.
400
      if ($captcha_point->module != 'recaptcha' && $captcha_point->module != 'egglue_captcha') {
401
        $captcha_element['example'] = array(
402
          '#type' => 'fieldset',
403
          '#title' => t('Example'),
404
          '#description' => t('This is a pre-solved, non-blocking example of this challenge.'),
405
        );
406
        $captcha_element['example']['example_captcha'] = array(
407
          '#type' => 'captcha',
408
          '#captcha_type' => $captcha_point->module . '/' . $captcha_point->captcha_type,
409
          '#captcha_admin_mode' => TRUE,
410
        );
411
      }
412
    }
413
    else {
414
      $captcha_element['#title'] = t('CAPTCHA: no challenge enabled');
415
      $captcha_element['add_captcha'] = array(
416
        '#markup' => l(t('Place a CAPTCHA here for untrusted users.'), "admin/config/people/captcha/captcha/captcha_point/$form_id", array('query' => drupal_get_destination()))
417
      );
418
419
    }
420
    // Get placement in form and insert in form.
421
    $captcha_placement = _captcha_get_captcha_placement($form_id, $form);
422
    _captcha_insert_captcha_element($form, $captcha_placement, $captcha_element);
423
424
  }
425
426
  // Add a warning about caching on the Perfomance settings page.
427
  if ($form_id == 'system_performance_settings') {
428 ac1bc5de Assos Assos
    $icon = theme(
429
      'image',
430
      array(
431
        'path' => 'misc/watchdog-warning.png',
432
        'width' => 18,
433
        'height' => 18,
434
        'alt' => t('warning'),
435
        'title' => t('warning'),
436
      )
437
    );
438 85ad3d82 Assos Assos
    $form['caching']['captcha'] = array(
439
      '#type' => 'item',
440
      '#title' => t('CAPTCHA'),
441
      '#markup' => t('!icon The CAPTCHA module will disable the caching of pages that contain a CAPTCHA element.', array(
442
        '!icon' => '<span class="icon">' . $icon . '</span>')
443
      ),
444
      '#attributes' => array('class' => array('warning')),
445
    );
446
  }
447
448
}
449
450
/**
451
 * CAPTCHA validation function to tests strict equality.
452 ac1bc5de Assos Assos
 *
453
 * @param string $solution
454
 *   the solution of the test.
455
 *
456
 * @param string $response
457
 *   the response to the test.
458
 *
459
 * @return bool
460
 *   TRUE when equal (ignoring spaces), FALSE otherwise.
461 85ad3d82 Assos Assos
 */
462
function captcha_validate_strict_equality($solution, $response) {
463
  return $solution === $response;
464
}
465
466
/**
467
 * CAPTCHA validation function to tests case insensitive equality.
468 ac1bc5de Assos Assos
 *
469
 * @param string $solution
470
 *   the solution of the test.
471
 *
472
 * @param string $response
473
 *   the response to the test.
474
 *
475
 * @return bool
476
 *   TRUE when equal (ignoring spaces), FALSE otherwise.
477 85ad3d82 Assos Assos
 */
478
function captcha_validate_case_insensitive_equality($solution, $response) {
479
  return drupal_strtolower($solution) === drupal_strtolower($response);
480
}
481
482
/**
483
 * CAPTCHA validation function to tests equality while ignoring spaces.
484 ac1bc5de Assos Assos
 *
485
 * @param string $solution
486
 *   the solution of the test.
487
 *
488
 * @param string $response
489
 *   the response to the test.
490
 *
491
 * @return bool
492
 *   TRUE when equal (ignoring spaces), FALSE otherwise.
493 85ad3d82 Assos Assos
 */
494
function captcha_validate_ignore_spaces($solution, $response) {
495
  return preg_replace('/\s/', '', $solution) === preg_replace('/\s/', '', $response);
496
}
497
498
/**
499
 * CAPTCHA validation function to tests case insensitive equality while ignoring spaces.
500 ac1bc5de Assos Assos
 *
501
 * @param string $solution
502
 *   the solution of the test.
503
 *
504
 * @param string $response
505
 *   the response to the test.
506
 *
507
 * @return bool
508
 *   TRUE when equal (ignoring spaces), FALSE otherwise.
509 85ad3d82 Assos Assos
 */
510
function captcha_validate_case_insensitive_ignore_spaces($solution, $response) {
511
  return preg_replace('/\s/', '', drupal_strtolower($solution)) === preg_replace('/\s/', '', drupal_strtolower($response));
512
}
513
514
/**
515 ac1bc5de Assos Assos
 * Helper function for getting the posted CAPTCHA info (posted form_id and CAPTCHA sessions ID) from a form in case it is posted.
516 85ad3d82 Assos Assos
 *
517
 * This function hides the form processing mess for several use cases an
518
 * browser bug workarounds.
519
 * For example: $element['#post'] can typically be used to get the posted
520
 * form_id and captcha_sid, but in the case of node preview situations
521
 * (with correct CAPTCHA response) that does not work and we can get them from
522
 * $form_state['clicked_button']['#post'].
523
 * However with Internet Explorer 7, the latter does not work either when
524
 * submitting the forms (with only one text field) with the enter key
525
 * (see http://drupal.org/node/534168), in which case we also have to check
526
 * $form_state['buttons']['button']['0']['#post'].
527
 *
528
 * @todo for Drupal 7 version: is this IE7 workaround still needed?
529
 *
530 ac1bc5de Assos Assos
 * @param array $element
531
 *   the CAPTCHA element.
532
 *
533
 * @param array $form_state
534
 *   the form state structure to extract the info from.
535
 *
536
 * @param string $this_form_id
537
 *   the form ID of the form we are currently processing
538 85ad3d82 Assos Assos
 *     (which is not necessarily the form that was posted).
539
 *
540 ac1bc5de Assos Assos
 * @return array
541
 *   an array with $posted_form_id and $post_captcha_sid (with NULL values
542 85ad3d82 Assos Assos
 *     if the values could not be found, e.g. for a fresh form).
543
 */
544
function _captcha_get_posted_captcha_info($element, $form_state, $this_form_id) {
545
  if ($form_state['submitted'] && isset($form_state['captcha_info'])) {
546
    // We are handling (or rebuilding) an already submitted form,
547
    // so we already determined the posted form ID and CAPTCHA session ID
548
    // for this form (from before submitting). Reuse this info.
549
    $posted_form_id = $form_state['captcha_info']['posted_form_id'];
550
    $posted_captcha_sid = $form_state['captcha_info']['captcha_sid'];
551
  }
552
  else {
553
    // We have to determine the posted form ID and CAPTCHA session ID
554
    // from the post data.
555
    // Because we possibly use raw post data here,
556
    // we should be extra cautious and filter this data.
557 ac1bc5de Assos Assos
    $posted_form_id = isset($form_state['input']['form_id']) ? preg_replace("/[^a-z0-9_]/", "", (string) $form_state['input']['form_id']) : NULL;
558
    $posted_captcha_sid = isset($form_state['input']['captcha_sid']) ? (int) $form_state['input']['captcha_sid'] : NULL;
559
    $posted_captcha_token = isset($form_state['input']['captcha_token']) ? preg_replace("/[^a-zA-Z0-9]/", "", (string) $form_state['input']['captcha_token']) : NULL;
560 85ad3d82 Assos Assos
561
    if ($posted_form_id == $this_form_id) {
562
      // Check if the posted CAPTCHA token is valid for the posted CAPTCHA
563
      // session ID. Note that we could just check the validity of the CAPTCHA
564
      // token and extract the CAPTCHA session ID from that (without looking at
565
      // the actual posted CAPTCHA session ID). However, here we check both
566
      // the posted CAPTCHA token and session ID: it is a bit more stringent
567
      // and the database query should also be more efficient (because there is
568
      // an index on the CAPTCHA session ID).
569
      if ($posted_captcha_sid != NULL) {
570
        $expected_captcha_token = db_query(
571
          "SELECT token FROM {captcha_sessions} WHERE csid = :csid",
572
          array(':csid' => $posted_captcha_sid)
573
        )->fetchField();
574
        if ($expected_captcha_token !== $posted_captcha_token) {
575
          drupal_set_message(t('CAPTCHA session reuse attack detected.'), 'error');
576
          // Invalidate the CAPTCHA session.
577
          $posted_captcha_sid = NULL;
578
        }
579
        // Invalidate CAPTCHA token to avoid reuse.
580
        db_update('captcha_sessions')
581
          ->fields(array('token' => NULL))
582
          ->condition('csid', $posted_captcha_sid);
583
      }
584
    }
585
    else {
586
      // The CAPTCHA session ID is specific to the posted form.
587
      // Return NULL, so a new session will be generated for this other form.
588
      $posted_captcha_sid = NULL;
589
    }
590
  }
591
  return array($posted_form_id, $posted_captcha_sid);
592
}
593
594
/**
595
 * CAPTCHA validation handler.
596
 *
597
 * This function is placed in the main captcha.module file to make sure that
598
 * it is available (even for cached forms, which don't fire
599
 * captcha_form_alter(), and subsequently don't include additional include
600
 * files).
601
 */
602
function captcha_validate($element, &$form_state) {
603
604
  $captcha_info = $form_state['captcha_info'];
605
  $form_id = $captcha_info['this_form_id'];
606
607
  // Get CAPTCHA response.
608
  $captcha_response = $form_state['values']['captcha_response'];
609
610
  // Get CAPTCHA session from CAPTCHA info
611
  // TODO: is this correct in all cases: see comment and code in previous revisions?
612
  $csid = $captcha_info['captcha_sid'];
613
614
  $solution = db_query(
615
    'SELECT solution FROM {captcha_sessions} WHERE csid = :csid',
616
    array(':csid' => $csid)
617
    )
618
    ->fetchField();
619
620
  // @todo: what is the result when there is no entry for the captcha_session? in D6 it was FALSE, what in D7?
621
  if ($solution === FALSE) {
622
    // Unknown challenge_id.
623
    // TODO: this probably never happens anymore now that there is detection
624
    // for CAPTCHA session reuse attacks in _captcha_get_posted_captcha_info().
625
    form_set_error('captcha', t('CAPTCHA validation error: unknown CAPTCHA session ID. Contact the site administrator if this problem persists.'));
626
    watchdog('CAPTCHA',
627
      'CAPTCHA validation error: unknown CAPTCHA session ID (%csid).',
628
      array('%csid' => var_export($csid, TRUE)),
629
      WATCHDOG_ERROR);
630
  }
631
  else {
632
    // Get CAPTCHA validate function or fall back on strict equality.
633
    $captcha_validate = $element['#captcha_validate'];
634
    if (!function_exists($captcha_validate)) {
635 ac1bc5de Assos Assos
      $captcha_validate = 'captcha_validate_strict_equality';
636 85ad3d82 Assos Assos
    }
637
    // Check the response with the CAPTCHA validation function.
638
    // Apart from the traditional expected $solution and received $response,
639
    // we also provide the CAPTCHA $element and $form_state arrays for more advanced use cases.
640
    if ($captcha_validate($solution, $captcha_response, $element, $form_state)) {
641
      // Correct answer.
642
643
      // Store form_id in session (but only if it is useful to do so, avoid setting stuff in session unnecessarily).
644
      $captcha_persistence = variable_get('captcha_persistence', CAPTCHA_PERSISTENCE_SKIP_ONCE_SUCCESSFUL_PER_FORM_INSTANCE);
645
      if ($captcha_persistence == CAPTCHA_PERSISTENCE_SKIP_ONCE_SUCCESSFUL || $captcha_persistence == CAPTCHA_PERSISTENCE_SKIP_ONCE_SUCCESSFUL_PER_FORM_TYPE) {
646
        $_SESSION['captcha_success_form_ids'][$form_id] = $form_id;
647
      }
648
649
      // Record success.
650
      db_update('captcha_sessions')
651
        ->condition('csid', $csid)
652
        ->fields(array('status' => CAPTCHA_STATUS_SOLVED))
653
        ->expression('attempts', 'attempts + 1')
654
        ->execute();
655
    }
656
    else {
657
      // Wrong answer.
658
      db_update('captcha_sessions')
659
        ->condition('csid', $csid)
660
        ->expression('attempts', 'attempts + 1')
661
        ->execute();
662 ac1bc5de Assos Assos
      // Set form error.
663 85ad3d82 Assos Assos
      form_set_error('captcha_response', t('The answer you entered for the CAPTCHA was not correct.'));
664 ac1bc5de Assos Assos
      // Update wrong response counter.
665 85ad3d82 Assos Assos
      if (variable_get('captcha_enable_stats', FALSE)) {
666
        variable_set('captcha_wrong_response_counter', variable_get('captcha_wrong_response_counter', 0) + 1);
667
      }
668 ac1bc5de Assos Assos
      // Log to watchdog if needed.
669 85ad3d82 Assos Assos
      if (variable_get('captcha_log_wrong_responses', FALSE)) {
670
        watchdog('CAPTCHA',
671
          '%form_id post blocked by CAPTCHA module: challenge %challenge (by module %module), user answered "@response", but the solution was "@solution".',
672 ac1bc5de Assos Assos
          array(
673
            '%form_id' => $form_id,
674 85ad3d82 Assos Assos
            '@response' => $captcha_response, '@solution' => $solution,
675
            '%challenge' => $captcha_info['captcha_type'], '%module' => $captcha_info['module'],
676
          ),
677
          WATCHDOG_NOTICE);
678
      }
679
    }
680
  }
681
}
682
683
/**
684
 * Pre-render callback for additional processing of a CAPTCHA form element.
685
 *
686
 * This encompasses tasks that should happen after the general FAPI processing
687
 * (building, submission and validation) but before rendering (e.g. storing the solution).
688
 *
689 ac1bc5de Assos Assos
 * @param array $element
690
 *   the CAPTCHA form element
691
 *
692
 * @return array
693
 *   the manipulated element
694 85ad3d82 Assos Assos
 */
695
function captcha_pre_render_process($element) {
696
  module_load_include('inc', 'captcha');
697
698
  // Get form and CAPTCHA information.
699
  $captcha_info = $element['#captcha_info'];
700
  $form_id = $captcha_info['form_id'];
701 ac1bc5de Assos Assos
  $captcha_sid = (int) ($captcha_info['captcha_sid']);
702 85ad3d82 Assos Assos
  // Check if CAPTCHA is still required.
703
  // This check is done in a first phase during the element processing
704
  // (@see captcha_process), but it is also done here for better support
705
  // of multi-page forms. Take previewing a node submission for example:
706
  // when the challenge is solved correctely on preview, the form is still
707
  // not completely submitted, but the CAPTCHA can be skipped.
708
  if (_captcha_required_for_user($captcha_sid, $form_id) || $element['#captcha_admin_mode']) {
709
    // Update captcha_sessions table: store the solution of the generated CAPTCHA.
710
    _captcha_update_captcha_session($captcha_sid, $captcha_info['solution']);
711
712
    // Handle the response field if it is available and if it is a textfield.
713
    if (isset($element['captcha_widgets']['captcha_response']['#type']) && $element['captcha_widgets']['captcha_response']['#type'] == 'textfield') {
714
      // Before rendering: presolve an admin mode challenge or
715
      // empty the value of the captcha_response form item.
716
      $value = $element['#captcha_admin_mode'] ? $captcha_info['solution'] : '';
717
      $element['captcha_widgets']['captcha_response']['#value'] = $value;
718
    }
719
  }
720
  else {
721
    // Remove CAPTCHA widgets from form.
722
    unset($element['captcha_widgets']);
723
  }
724
725
  return $element;
726
}
727
728
/**
729
 * Default implementation of hook_captcha().
730
 */
731
function captcha_captcha($op, $captcha_type = '') {
732
  switch ($op) {
733
    case 'list':
734
      return array('Math');
735
736
    case 'generate':
737
      if ($captcha_type == 'Math') {
738
        $result = array();
739
        $answer = mt_rand(1, 20);
740
        $x = mt_rand(1, $answer);
741
        $y = $answer - $x;
742
        $result['solution'] = "$answer";
743
        // Build challenge widget.
744
        // Note that we also use t() for the math challenge itself. This makes
745
        // it possible to 'rephrase' the challenge a bit through localization
746
        // or string overrides.
747
        $result['form']['captcha_response'] = array(
748
          '#type' => 'textfield',
749
          '#title' => t('Math question'),
750
          '#description' => t('Solve this simple math problem and enter the result. E.g. for 1+3, enter 4.'),
751
          '#field_prefix' => t('@x + @y = ', array('@x' => $x, '@y' => $y)),
752
          '#size' => 4,
753
          '#maxlength' => 2,
754
          '#required' => TRUE,
755
        );
756
        return $result;
757
      }
758
      elseif ($captcha_type == 'Test') {
759
        // This challenge is not visible through the administrative interface
760
        // as it is not listed in captcha_captcha('list'),
761
        // but it is meant for debugging and testing purposes.
762
        // TODO for Drupal 7 version: This should be done with a mock module,
763
        // but Drupal 6 does not support this (mock modules can not be hidden).
764
        $result = array(
765
          'solution' => 'Test 123',
766
          'form' => array(),
767
        );
768
        $result['form']['captcha_response'] = array(
769
          '#type' => 'textfield',
770
          '#title' => t('Test one two three'),
771
          '#required' => TRUE,
772
        );
773
        return $result;
774
      }
775
      break;
776
  }
777
}
778
779
/**
780 ac1bc5de Assos Assos
 * Implements hook_modules_enabled().
781 85ad3d82 Assos Assos
 */
782
function captcha_modules_enabled() {
783
  // When new modules are enabled: clear the CAPTCHA placement cache, so that
784
  // new hook_captcha_placement_map hooks can be triggered.
785
  variable_del('captcha_placement_map_cache');
786
}