';
$output .= '' . t('Analysis') . '
';
$output .= theme_keyword_stats_report($analysis);
$output .= '';
// initialize kw data array for javascript
if (is_array($analysis['analysis'])) {
foreach ($analysis['analysis'] AS $kw => $v) {
$site_kw[$v['term']] = array(
'kid' => (int)$v['kid'],
'priority' => (int)$v['priority'],
'value' => (int)$v['value'],
'page_count' => (int)$v['page_count'],
);
}
}
}
$site_priority_options = kwresearch_get_priority_options();
drupal_add_js(
array('kwresearch' => array(
'form' => 'admin_keyword_stats',
'analyze_path' => base_path() . 'admin/content/kwresearch/keyword_report/',
'keyword_edit_path' => base_path() . 'admin/content/kwresearch/keyword_list/edit/',
'return_destination' => 'admin/content/kwresearch/keyword_report/' . $keyword,
'toggle_site_keyword_callback' => base_path() . 'kwresearch/toggle_site_keyword_js',
'module_path' => base_path() . drupal_get_path('module', 'kwresearch'),
'enable_site_keyword_tool' => user_access('kwresearch admin site keywords'),
'site_keywords_data' => $site_kw,
'site_priority_options' => $site_priority_options,
)),
'setting');
return $output;
}
/**
* Generates main keyword research report
*
* @param $form_state
* @param analysis struc $analysis
* @param bool $ajax
*/
function kwresearch_stats_report_form($form_state, $analysis, $ajax = FALSE) {
$form['pre_inputs'] = array(
'#type' => 'markup',
'#value' => ''
);
$form['kwresearch_keyword'] = array(
'#type' => 'textfield',
'#title' => t('Keyword'),
'#default_value' => ($analysis && $analysis['inputs']['keyword'])?$analysis['inputs']['keyword']:'',
);
$form['options'] = array(
'#type' => 'fieldset',
'#title' => t('Options'),
'#collapsible' => TRUE,
'#collapsed' => TRUE,
);
$form_e = kwresearch_stats_report_params_form_elements($analysis);
$form['options'] = array_merge($form['options'], $form_e);
$form['post_inputs'] = array(
'#type' => 'markup',
'#value' => '
'
);
if ($ajax) {
$submit_btn = l(t('Submit'), base_path() . 'kwresearch/analyze_js', array('attributes' => array('id' => 'kwresearch-submit-button', 'class' => "contentanalysis-analyze-content contentanalysis-button", "onclick" => "kwresearch_analyze(); return (false);")));
$back_btn = l(t('Back'), base_path() . '#', array('attributes' => array('class' => "contentanalysis-analyze-content contentanalysis-button", "onclick" => "contentanalysis_back(); return (false);")));
$form['submit'] = array(
'#type' => 'markup',
'#value' => '' . $submit_btn . ' ' . $back_btn . '
'
);
}
else {
$form['submit'] = array(
'#type' => 'submit',
'#value' => 'Submit',
);
}
return $form;
}
/**
* returns stats report paramter options form fields array
* @param analysis struc $analysis
*/
function kwresearch_stats_report_params_form_elements($analysis = NULL) {
$defvals = $analysis['inputs'];
$form['kwresearch_include_misspellings'] = array(
'#type' => 'checkbox',
'#title' => t('Include misspellings'),
//'#description' => t('You will need a Scribe SEO API Key to enable analysis. Get your API key here.'),
'#default_value' => (!is_null($defvals['kwresearch_include_misspellings']))?$defvals['kwresearch_include_misspellings']:variable_get('kwresearch_include_misspellings', FALSE),
);
$form['kwresearch_include_plurals'] = array(
'#type' => 'checkbox',
'#title' => t('Include plurals'),
//'#description' => t('You will need a Scribe SEO API Key to enable analysis. Get your API key here.'),
'#default_value' => (!is_null($defvals['kwresearch_include_plurals']))?$defvals['kwresearch_include_plurals']:variable_get('kwresearch_include_plurals', TRUE),
);
$form['kwresearch_adult_filter'] = array(
'#type' => 'select',
'#title' => t('Adult filter'),
'#options' => array(
'off' => t('Off'),
'remove_dubious' => t('Remove Dubious'),
'remove_offensive' => t('Remove Offensive'),
'adult_only' => t('Adult Only'),
),
//'#description' => t('You will need a Scribe SEO API Key to enable analysis. Get your API key here.'),
'#default_value' => ($defvals['kwresearch_adult_filter'])?$defvals['kwresearch_adult_filter']:variable_get('kwresearch_adult_filter', 'remove_dubious'),
);
return $form;
}
/**
* Stats report form submit handler.
* @param unknown_type $form
* @param unknown_type $form_state
*/
function kwresearch_stats_report_form_submit($form, &$form_state) {
//echo "setags_extract_tags_submit($form, &$form_state)";
//print_r($form_state['values']);
$analysis = array();
$analysis['inputs'] = array(
'keyword' => $form_state['values']['kwresearch_keyword'],
'kwresearch_include_misspellings' => $form_state['values']['kwresearch_include_misspellings'],
'kwresearch_include_plurals' => $form_state['values']['kwresearch_include_plurals'],
'kwresearch_adult_filter' => $form_state['values']['kwresearch_adult_filter'],
);
$params = array(
'wordtracker' => array(
'type' => 'all',
'include_misspellings' => $analysis['inputs']['kwresearch_include_misspellings'],
'include_plurals' => $analysis['inputs']['kwresearch_include_plurals'],
'kwresearch_adult_filter' => $analysis['inputs']['kwresearch_adult_filter'],
),
);
$analysis['analysis'] = kwresearch_get_keyword_stats_data($form_state['values']['kwresearch_keyword'], $msgs, $params);
if (!empty($msgs)) {
$analysis['messages'] = $msgs;
}
$_SESSION['kwresearch']['analysis'] = $analysis;
return;
}
/**
* Themes keyword stats report
* @param unknown_type $analysis
*/
function theme_keyword_stats_report($analysis) {
//dsm(func_get_args());
if (!$analysis['analysis']) {
if (!is_array($analysis['inputs']['keyword'])) {
$kws = explode(',', $analysis['inputs']['keyword']);
}
else {
$kws = is_array($analysis['inputs']['keyword']);
}
foreach ($kws AS $kw) {
$analysis['analysis'][$kw] = array(
'wordtracker_count' => 'NA'
);
}
}
$meta = $analysis['analysis']['_meta'];
unset($analysis['analysis']['_meta']);
$def_values = kwresearch_get_report_data_options_defaults();
$data_options = variable_get('kwresearch_stats_report_data_options', $def_values);
$column_th = kwresearch_get_report_data_options('stats', TRUE);
// remove page priority column if no pid is given
if (!$analysis['inputs']['pid']) {
unset($column_th['page_priority']);
unset($data_options['page_priority']);
}
$def_values = kwresearch_get_report_links_options_defaults();
$links_options = variable_get('kwresearch_stats_report_links_options', $def_values);
$hdrs[] = t('Keyword');
if(is_array($data_options)) {
foreach ($data_options AS $k => $v) {
if ($v) {
$hdrs[] = $column_th[$k];
}
}
}
$sources = module_invoke_all('kwresearch_sources');
$hdrs[] = t('More tools');
$rows = array();
if (is_array($analysis['analysis']) && !empty($analysis['analysis'])) {
foreach ($analysis['analysis'] as $keyword => $values) {
$row = array();
$row[] = kwresearch_format_report_data_value(array('term' => $keyword));
foreach ($data_options AS $k => $v) {
if ($v) {
$values['_meta'] = $meta;
if (!$r = kwresearch_format_report_data_value($values, $keyword, $k)) {
if (is_array($sources)) {
foreach ($sources AS $aid => $source) {
if ($source['stats_report_values_callback'] && ($r = call_user_func($source['stats_report_values_callback'], $values, $keyword, $k))) {
break;
}
}
}
}
$row[] = $r;
}
}
$links = '';
foreach ($links_options AS $k => $v) {
if ($v) {
$links .= (($links)? '':'') . kwresearch_format_report_links_value($values, $keyword, $k);
}
}
$links .= '';
$row[] = $links;
if ($analysis['inputs']['operations']) {
$ops = l(t('stats'), 'admin/content/kwresearch/keyword_report/' . $keyword);
//$ops .= ' | ' . l(t('edit'),'admin/content/kwresearch/keyword_list/edit/' . $values['kid'], array('query' => 'destination=admin/content/kwresearch/keyword_report/' . $keyword));
$ops .= ' | ' . l(t('edit'), 'admin/content/kwresearch/keyword_list/edit/' . $values['kid'], array('attributes' => array('target' => '_blank')));
//$row[] = $ops;
}
$rows[] = array(
'data' => $row,
'id' => 'kid-' . $values['kid'],
);
}
}
$attr = array(
'id' => 'kwresearch-result-table-' . check_plain(str_replace(' ', '-', $analysis['inputs']['keyword'])),
'class' => 'kwresearch-result-table'
);
$output = '";
return $output;
}
/**
* enables all values by default
*/
function kwresearch_get_report_data_options_defaults() {
$options = kwresearch_get_report_data_options();
$def_values = array();
foreach ($options AS $k => $v) {
$def_values[$k] = $k;
}
return $def_values;
}
/**
* returns data options for reports
*/
function kwresearch_get_report_links_options($th = FALSE) {
$options = array(
//'google_serp' => ($th)?t('Google SERP'):t('Google search engine results page'),
//'yahoo_serp' => ($th)?t('Yahoo! SERP'):t('Yahoo! search engine results page'),
//'bing_serp' => ($th)?t('Bing SERP'):t('Bing search engine results page'),
'google_sb_kw_tool' => ($th)?t('G kw tool'):t('Google Search-based keyword tool'),
'google_trends' => ($th)?t('G trends'):t('Google trends'),
//'google_traffic_estimator' => ($th)?t('G t est'):t('Google traffic estimator'),
'google_insights' => ($th)?t('G Ins'):t('Google Insights for Search'),
'gorank_related' => ($th)?t('GR Rel'):t('goRank Related keywords lookup tool'),
'keyworddiscovery' => ($th)?t('KWD'):t('KeywordDiscovery tool'),
);
return $options;
}
/**
* enables all values by default
*/
function kwresearch_get_report_links_options_defaults() {
$options = kwresearch_get_report_links_options();
$def_values = array();
$block = array('google_serp', '');
foreach ($options AS $k => $v) {
$def_values[$k] = $k;
}
return $def_values;
}
function kwresearch_format_report_links_value($value, $keyword, $type = 'term') {
$labels = kwresearch_get_report_links_options();
$icons_path = base_path() . drupal_get_path('module', 'kwresearch') . '/icons/';
switch ($type) {
case 'google_trends':
$img = '![' . $labels[$type] . '](' . $icons_path . 'google_trends.png)
';
$output = l($img, 'http://www.google.com/trends?ctab=0&date=all&geo=US&q=' . $keyword . '%2C+' . kwresearch_pluralize($keyword), array('attributes' => array('target' => $type, title => $labels[$type]), 'html' => TRUE));
break;
case 'google_traffic_estimator':
$img = '![' . $labels[$type] . '](' . $icons_path . 'google_traffic_estimator.png)
';
$output = l($img, 'https://adwords.google.com/select/TrafficEstimatorSandbox?currency=USD&language=en&save=save&keywords=' . $keyword . '%0A%22' . $keyword . '%22%0A[test] %0A' . kwresearch_pluralize($keyword) . '%0A%22' . kwresearch_pluralize($keyword) . ' %22%0A[' . kwresearch_pluralize($keyword) . ']', array('attributes' => array('target' => $type, title => $labels[$type]), 'html' => TRUE));
break;
case 'google_sb_kw_tool':
$img = '![' . $labels[$type] . '](' . $icons_path . 'google_search_based_kw_tool.png)
';
$output = l($img, 'http://www.google.com/sktool/#keywords?spm=true&q=' . $keyword, array('attributes' => array('target' => $type, title => $labels[$type]), 'html' => TRUE));
break;
case 'google_insights':
$img = '![' . $labels[$type] . '](' . $icons_path . 'google_insights_for_search.png)
';
$output = l($img, 'http://www.google.com/insights/search/#cat&q=' . $keyword . '%2C+' . kwresearch_pluralize($keyword), array('attributes' => array('target' => $type, title => $labels[$type]), 'html' => TRUE));
break;
case 'gorank_related':
$img = '![' . $labels[$type] . '](' . $icons_path . 'gorank_related_kws.png)
';
$output = l($img, 'http://www.gorank.com/seotools/ontology/index.php?keywords=' . $keyword, array('attributes' => array('target' => $type, title => $labels[$type]), 'html' => TRUE));
break;
case 'keyworddiscovery':
$img = '![' . $labels[$type] . '](' . $icons_path . 'trellian_search_term_suggestion.png)
';
$output = l($img, 'http://www.keyworddiscovery.com/search.html?query=' . $keyword, array('attributes' => array('target' => $type, title => $labels[$type]), 'html' => TRUE));
break;
}
return $output;
}
function kwresearch_pluralize($keyword) {
return $keyword . 's';
}