Skip to content
GitLab
Switch branch/tag
Find file Normal viewHistoryPermalink
theme.inc 6.14 KB
Newer Older
Dries Buytaert's avatar
   
Dries Buytaert committed
1 
<?php
Kjartan Mannes's avatar
- added the CVS keyword $Id$ to all files to make future version tracking    
Kjartan Mannes committed
2 
// $Id$
Dries Buytaert's avatar
Huge update - I don't have time to write everything down but the directory  
Dries Buytaert committed
3
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
4 
class BaseTheme {
Dries Buytaert's avatar
   
Dries Buytaert committed
5
6
7
8
9
10
11
12
13
14
15 

  function header() {
    $output .= "<html><head><title>". variable_get(site_name, "drupal") ."</title></head><body>";
    $output .= "<table border=\"0\" cellspacing=\"4\" cellpadding=\"4\"><tr><td valign=\"top\" width=\"170\">";

    print $output;
    $this->box(t("Navigation"), implode("<br />", link_page())); $this->user("all", $this); theme_blocks("all", $this);
    print "</td><td valgin=\"top\">";

  }
Dries Buytaert's avatar
   
Dries Buytaert committed
16
17 
  function links($links, $delimiter = " | ") {
    return implode($delimiter, $links);
Dries Buytaert's avatar
   
Dries Buytaert committed
18 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
19
Dries Buytaert's avatar
   
Dries Buytaert committed
20
21 
  function image($name) {
    return "misc/$name";
Dries Buytaert's avatar
   
Dries Buytaert committed
22 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
23
Dries Buytaert's avatar
   
Dries Buytaert committed
24 
  function user($region) {
Dries Buytaert's avatar
   
Dries Buytaert committed
25
26
27
28
29 
    global $user;

    if ($user->uid) {
      // Display account settings:
Dries Buytaert's avatar
   
Dries Buytaert committed
30
31 
      $output .= "<div width=\"125\">\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
32
33
34 
      foreach (module_list() as $name) {
        if (module_hook($name, "link")) {
          $links = module_invoke($name, "link", "menu");
Dries Buytaert's avatar
   
Dries Buytaert committed
35
36
37 
          foreach ($links as $link) {
            $output .= "$link<br />\n";
          }
Dries Buytaert's avatar
   
Dries Buytaert committed
38
39
40
41 
        }
      }

      if (user_access("access administration pages")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
42
43 
        $output .= "<br />\n";
        $output .= "<a href=\"admin.php\">". strtr(t("administer %a"), array("%a" => variable_get("site_name", "drupal"))) ."</a><BR>\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
44
45 
      }
Dries Buytaert's avatar
   
Dries Buytaert committed
46
47 
      $output .= "</div>";
Dries Buytaert's avatar
   
Dries Buytaert committed
48 
      $this->box($user->name, $output, $region);
Dries Buytaert's avatar
   
Dries Buytaert committed
49
50
51
52
53
54
55
56
57
58
59 
    }
    else {
      $output .= "<div align=\"center\">\n";
      $output .= " <form action=\"module.php?mod=user&op=login\" method=\"post\">\n";
      $output .= "  <b>". t("Username") .":</b><br /><input name=\"edit[name]\" size=\"15\"><p />\n";
      $output .= "  <b>". t("Password") .":</b><br /><input name=\"edit[pass]\" size=\"15\" TYPE=\"password\"><br />\n";
      $output .= "  <input type=\"submit\" value=\"". t("Log in") ."\"><br />\n";
      if (variable_get("account_register", 1)) $output .= "  <a href=\"module.php?mod=user\">". t("REGISTER") ."</a>\n";
      $output .= " </form>\n";
      $output .= "</div>\n";
Dries Buytaert's avatar
   
Dries Buytaert committed
60
61
62
63
64
65
66
67
68
69
70 
      $this->box(t("Log in"), $output, $region);
    }
  }

  function node($node, $main) {
    $output .= "<b>". check_output($node->title) ."</b> by ". format_name($node) ."<br />";
    if ($main && $node->teaser) {
      $output .= strip_tags(check_output($node->teaser, 1));
    }
    else {
      $output .= check_output($node->body, 1);
Dries Buytaert's avatar
   
Dries Buytaert committed
71 
    }
Dries Buytaert's avatar
   
Dries Buytaert committed
72
73
74
75
76
77 
    if ($main) {
      $output .= "<br />[ ". $this->links(link_node($node)) ." ]";
    }
    $output .= "<hr />";

    print $output;
Dries Buytaert's avatar
   
Dries Buytaert committed
78
79 
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
80
Kjartan Mannes's avatar
comment.inc    
Kjartan Mannes committed
81 
  function comment_controls($threshold = 1, $mode = 3, $order = 1) {
Dries Buytaert's avatar
   
Dries Buytaert committed
82
83
84
85
86
87
88
89 
    global $user, $id;

    $output .= form_item(t("Comment viewing options"), comment_mode($mode) . comment_order($order) . comment_threshold($threshold) ." <input type=\"submit\" name=\"op\" value=\"". t("Update settings") ."\" />", t("Select your prefered way to display the comments and click 'Update settings' to active your changes."));

    if (user_access("post comment")) {
      $output .= form_item(t("Add a comment"), "<input type=\"submit\" name=\"op\" value=\"". t("Add comment") ."\" />", t("Click 'Add comment' to start a new thread in the discussion."));
    }
Kjartan Mannes's avatar
comment.inc    
Kjartan Mannes committed
90
91
92 
    return $output;
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
93
94
95
96
97
98
99
100
101
102
103
104 
  function comment($comment, $link = 0) {
    $output .= "<a name=\"$comment->cid\"></a>";
    $output .= "<div style=\"border: 1px solid; padding: 10px;\">";
    $output .= "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\">";
    $output .= " <tr><td><div style=\"font-size: 110%; font-weight: bold;\">". check_output($comment->subject) ."</div></td><td align=\"right\" rowspan=\"2\" valign=\"top\">". comment_moderation($comment) ."</td></tr>";
    $output .= " <tr><td><div style=\"margin-left: 10px; padding-bottom: 10px; font-size: 90%;\">". sprintf(t("by %s on %s"), format_name($comment), format_date($comment->timestamp)) ."</div></td></tr>";
    $output .= " <tr><td colspan=\"2\">". check_output($comment->comment, 1) ."</td></tr>";
    $output .= " <tr><td align=\"right\" colspan=\"2\">$link</td></tr>";
    $output .= "</table>";
    $output .= "</div><br />";
    print $output;
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
105
106
107
108
109
110
111
112
113
114
115
116 

  function box($subject, $content, $region = "main") {
    $output .= "<b>". check_output($subject) ."</b><br />". check_output($content) ."<p />";
    print $output;
  }

  function footer() {
    $output .= "</td></tr></table>";
    $output .= "</body></html>";
    print $output;
  }
Kjartan Mannes's avatar
Changes    
Kjartan Mannes committed
117
118 
}
Dries Buytaert's avatar
   
Dries Buytaert committed
119 
function theme_init() {
Dries Buytaert's avatar
   
Dries Buytaert committed
120
121
122 
  global $user, $themes;

  if ($user->theme && file_exists($themes[$user->theme][0])) {
Dries Buytaert's avatar
   
Dries Buytaert committed
123 
    include_once $themes[$user->theme][0];
Dries Buytaert's avatar
   
Dries Buytaert committed
124
125 
  }
  else {
Dries Buytaert's avatar
   
Dries Buytaert committed
126 
    include_once $themes[variable_get("theme_default", key($themes))][0];
Dries Buytaert's avatar
   
Dries Buytaert committed
127
128
129
130 
  }
  return new Theme();
}
Dries Buytaert's avatar
   
Dries Buytaert committed
131 
function theme_blocks($region, &$theme) {
Kjartan Mannes's avatar
- added a path field to the blocks. Its a regexp to define which pages you    
Kjartan Mannes committed
132 
  global $id, $PHP_SELF, $REQUEST_URI, $user;
Dries Buytaert's avatar
   
Dries Buytaert committed
133
Dries Buytaert's avatar
   
Dries Buytaert committed
134 
  switch (strrchr($PHP_SELF, "/")) {
Dries Buytaert's avatar
   
Dries Buytaert committed
135 
    case "/node.php":
Dries Buytaert's avatar
   
Dries Buytaert committed
136 
      if ($region != "left") {
Dries Buytaert's avatar
   
Dries Buytaert committed
137 
        if ($user->uid) $node = db_fetch_object(db_query("SELECT * FROM node WHERE nid = '$id'"));
Dries Buytaert's avatar
   
Dries Buytaert committed
138 
        if ($node->status == node_status("queued")) theme_moderation_results($theme, $node, $region);
Dries Buytaert's avatar
   
Dries Buytaert committed
139 
      }
Kjartan Mannes's avatar
- added a path field to the blocks. Its a regexp to define which pages you    
Kjartan Mannes committed
140
141 
    default:
      if ($user->uid) $result = db_query("SELECT * FROM blocks b LEFT JOIN layout l ON b.name = l.block WHERE (b.status = 2 OR (b.status = 1 AND l.uid = '$user->uid'))". (($region == "left" OR $region == "right") ? ($region == "left" ? " AND b.region = 0" : " AND b.region = 1") : "") ." AND (b.path = '' OR '". strrchr($REQUEST_URI, "/") ."' RLIKE b.path) ORDER BY weight");
Dries Buytaert's avatar
   
Dries Buytaert committed
142 
      else $result = db_query("SELECT * FROM blocks WHERE status = 2". (($region == "left" OR $region == "right") ? ($region == "left" ? " AND region = 0" : " AND region = 1") : "") ." ORDER BY weight");
Dries Buytaert's avatar
   
Dries Buytaert committed
143 
      while ($result && ($block = db_fetch_object($result))) {
Dries Buytaert's avatar
   
Dries Buytaert committed
144 
        $blocks = module_invoke($block->module, "block");
Kjartan Mannes's avatar
- blocks will now show up again if 'Enabled: always'    
Kjartan Mannes committed
145 
        if ($blocks[$block->delta]["content"])
Dries Buytaert's avatar
   
Dries Buytaert committed
146 
          $theme->box(t($blocks[$block->delta]["subject"]), $blocks[$block->delta]["content"], $region);
Dries Buytaert's avatar
   
Dries Buytaert committed
147
148 
      }
      break;
Dries Buytaert's avatar
   
Dries Buytaert committed
149
150
151 
  }
}
Dries Buytaert's avatar
   
Dries Buytaert committed
152 
function theme_moderation_results(&$theme, $node, $region) {
Dries Buytaert's avatar
- Changed field_set(), field_get() and field_merge() to use ',' and    
Dries Buytaert committed
153 
  foreach (explode(",", $node->users) as $vote) {
Dries Buytaert's avatar
   
Dries Buytaert committed
154 
    if ($vote) {
Dries Buytaert's avatar
- Changed field_set(), field_get() and field_merge() to use ',' and    
Dries Buytaert committed
155 
      $data = explode("=", $vote);
Dries Buytaert's avatar
   
Dries Buytaert committed
156
157 
      $account = user_load(array("uid" => $data[0]));
      $output .= format_name($account) ." voted '$data[1]'.<br />";
Dries Buytaert's avatar
   
Dries Buytaert committed
158
159 
    }
  }
Dries Buytaert's avatar
   
Dries Buytaert committed
160
Steven Wittens's avatar
Update of the box function in themes to allow a difference in...    
Steven Wittens committed
161 
  $theme->box(t("Moderation results"), ($output ? $output : t("This node has not been moderated yet.")), $region);
Dries Buytaert's avatar
   
Dries Buytaert committed
162 
}
Kjartan Mannes's avatar
- added a path field to the blocks. Its a regexp to define which pages you    
Kjartan Mannes committed
163
Dries Buytaert's avatar
   
Dries Buytaert committed
164 
?>