pages/Login.nsi
author Dan Fuhry <dan@enanocms.org>
Sat, 21 Aug 2010 18:20:18 -0400
changeset 11 b62383876fdb
parent 10 014d58335b6d
permissions -rw-r--r--
Merged from accidental split
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
     1
Page custom CredentialsCreate CredentialsLeave " - Admin login"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
     2
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
     3
Function CredentialsCreate
10
014d58335b6d Changed behavior of the entire database selection process. A real "upgrade"/"don't touch the database" option was added, and the old options unconditionally delete the database.
Dan Fuhry <dan@enanocms.org>
parents: 2
diff changeset
     4
  IntCmp $skip_install 0 +2
014d58335b6d Changed behavior of the entire database selection process. A real "upgrade"/"don't touch the database" option was added, and the old options unconditionally delete the database.
Dan Fuhry <dan@enanocms.org>
parents: 2
diff changeset
     5
    Abort
014d58335b6d Changed behavior of the entire database selection process. A real "upgrade"/"don't touch the database" option was added, and the old options unconditionally delete the database.
Dan Fuhry <dan@enanocms.org>
parents: 2
diff changeset
     6
  
0
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
     7
  !insertmacro XPUI_HEADER_TEXT "Create administrator" "Enter your desired username and password for administering your site."
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
     8
  !insertmacro XPUI_INSTALLOPTIONS_EXTRACT_AS "pages\Login.ini" "Login.ini"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
     9
  !insertmacro XPUI_INSTALLOPTIONS_DISPLAY "Login.ini"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    10
FunctionEnd
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    11
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    12
Function CredentialsLeave
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    13
  StrCmp $XPUI_ABORTED "1" 0 +2
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    14
    Return
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    15
  
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    16
  ReadIniStr $enano_user "$PLUGINSDIR\Login.ini" "Field 1" "State"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    17
  StrCmp $enano_user "" 0 +3
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    18
    MessageBox MB_OK|MB_ICONEXCLAMATION "Please enter a username."
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    19
    Abort
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    20
  
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    21
  ReadIniStr $enano_password "$PLUGINSDIR\Login.ini" "Field 2" "State"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    22
  Strlen $0 $enano_password
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    23
  IntCmp $0 6    +3  0  +3
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    24
    MessageBox MB_OK|MB_ICONEXCLAMATION "Please enter a password that is at least six characters long."
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    25
    Abort
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    26
    
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    27
  ReadIniStr $0 "$PLUGINSDIR\Login.ini" "Field 3" "State"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    28
  StrCmp $0 $enano_password +3
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    29
    MessageBox MB_OK|MB_ICONEXCLAMATION "The passwords you entered do not match. Please enter them again."
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    30
    Abort
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    31
    
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    32
  ReadIniStr $admin_email "$PLUGINSDIR\Login.ini" "Field 4" "State"
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    33
  StrCmp $admin_email "" 0 +3
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    34
    MessageBox MB_OK|MB_ICONEXCLAMATION "Please enter your e-mail address."
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    35
    Abort
2
0c0d5dadfca3 Added LockWindow calls to all custom page exit paths to smooth transitions
Dan
parents: 0
diff changeset
    36
    
0c0d5dadfca3 Added LockWindow calls to all custom page exit paths to smooth transitions
Dan
parents: 0
diff changeset
    37
  LockWindow on
0
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    38
FunctionEnd
67e1cc6cd929 First commit. It's working!
Dan
parents:
diff changeset
    39