TweetFollow Us on Twitter

Password
Volume Number:7
Issue Number:7
Column Tag:C Workshop
Related Info: Dialog Manager

Password Dialogs

By Bill Schilit, New York, NY

Note: Source code files accompanying article are located on MacTech CD-ROM or source code disks.

Making a Password Dialog

Bill Schilit has been programming the Macintosh since the days of the 128K. He co-authored Macintosh Kermit, and the CAP Appletalk-Unix File Server. Bill is currently a graduate student at Columbia University’s Computer Science department.

This article describes how to program a dialog with a non-displaying “password” field. In this type of dialog, when the user types in his or her password all they see are bullet characters (“•”) -- because you never know who may be looking over your shoulder.

The password field of the dialog must handle delete, backspace, and replacement of the text selection. Basically, even though you can’t see the characters being entered you want it to act like a normal Text Edit field. One nice solution to the problem is to create an offscreen TE field to hold the plain text password while the dialog TE field holds the bullets.

The Login Dialog

In the program below, LoginDialog() is called to display the dialog box, it returns the user name and password entered by the user. The filter procedure, LoginFilter() does the real work here: it checks the name and password lengths, keeps the offscreen TE record up to date, and exchanges the password character with a bullet.

LoginDialog() first loads the dialog from the resource file and then calls SetPort() to set the GrafPort to the dialog window. SetPort is required for TENew() a few lines below, since TextEdit remembers the GrafPort for you. The destination and view rectangles we supply to TENew() are outside of the dialog window, so we never actually see this TE field. After creating the invisible text edit field, a pointer to it is stored in the dialog window via SetWRefCon() so that the filter procedure has access to it.

The rest of LoginDialog() is fairly standard. The procedure loops until the user types the OK button at which point the user name and password fields are copied for the caller. Within the dialog loop the OK button is enabled or disabled -- if the password and username have some type in then OK is enabled, otherwise it is disabled.

Figure 1. Password Dialog Box

The Login Filter

LoginFilter() is the standard filter procedure called by our modal dialog. If you remember your Inside Mac then you know that returning TRUE from the filter proc means we have handled the event, and the item number is in itemHit. Returning FALSE lets ModalDialog process the event. Our filter proc is only concerned with keyboard events, so the first line in procedure LoginFilter causes a return on all other types of events.

The next task in LoginFilter() is to handle the characters tab and return (tab moves to the next field and return is the same as the default button). The filter returns here if either of these characters was typed.

The filter procedure now does the work of checking field lengths and setting those bullets. The dialog’s text edit handle and the editField tell us which field is getting type in and how large the current edit record is. We first check that adding the character will not push us past the password or user name size limit, if so the filter gives a beep and ignores the character. Notice that the auxiliary routine we call to check the length of the text edit field given the new character is smart about checking for deletes, backspace, and selection replacements.

When the character is destined for the password item we do our final manipulations. The handle to our invisible text edit record is fetched from the dialog refCon, and the selection (and insertion point) are set to be exactly the same as in the password field. TEKey() is called to insert the character into our invisible text edit. Now, unless the character is a delete or backspace, the character in the event record is replaced by a bullet. We return to ModalDialog telling it to handle the event with the now obscured character for the password field. When the dialog is complete, the password is available from the invisible text edit field.

LOGIN DIALOG.C

/*
 * Login Dialog.c - Dialog for User Login.
 *
 * Copyright (c) 1988 by Bill Schilit.
 *
 * Edit History:
 *
 *  April 23, 1988      Schilit    Created
 *  May 9, 1988         Schilit    Clean up
 *
 */

/* Includes MacHeaders */

#include “Login Dialog.h”

/* Prototypes */

static int 
TELengthCheck(TEPtr te,char c,int maxLen);

static void
TECpyText(TEHandle teH,Ptr p);

pascal Byte 
LoginFilter(DialogPtr dPtr,
        EventRecord *ePtr,short *iHit);

/*
 * LDialogStg contains the global vars used 
 * by the filter proc and user item procs in
 * our login dialog. A pointer to the 
 * LDialogStg is stored in the window refcon
 * of the dialog window.
 */

typedef struct {
    TEHandle passTeH;
} LDialogStg, *LDialogStgPtr;

/*
 * static Byte 
 *  LoginFilter(DialogPtr theDialog,
 *              EventRecord *theEvent,
 *              int *itemHit);
 *
 * Modal dialog filter to echo bullet 
 * (‘\245’) instead of the user’s password
 * and to limit the number of characters in
 * both the user name and password edit
 * records.
 */

static pascal Byte
LoginFilter(theDialog,theEvent,itemHit)
DialogPtr theDialog;
EventRecord *theEvent;
short *itemHit;
{
    register char c;
    int field,tooBig;
    TEPtr tePtr;
    LDialogStg *ldStg;
    
    /* we’re only interested in keyboard 
     * events. If not a key, let modal 
     * process as usual
     */
     
    if (theEvent->what != keyDown && 
        theEvent->what != autoKey)
            return(false);
    
    /* fetch the character from the
     * event message 
     */    

    c = theEvent->message & charCodeMask;
    
    /* Check for CR and convert to OK button.
     * Check for TAB and let it pass.
     */
     
    if (c == CR) {
        *itemHit = OK;
        return(true);
    }
    
    if (c == ‘\t’)
        return(false);

    /* make sure the edit text item is one
     * we are interested in and check to see
     * if the length is not too large.
     */
     
    field = 
      ((DialogPeek) theDialog)->editField+1;
    
    tePtr = 
      *(((DialogPeek) theDialog)->textH);

    /* User is typing in the nameItem -- 
     * our only interest is the size 
     */
    
    if (field == nameItem) {
        tooBig = 
          TELengthCheck(tePtr,c,MAXNAME);

     /* give a beep if too big, and return
      * TRUE to ignore the event.
      */
      
        if (tooBig)
            SysBeep(1);   
        return(tooBig);   
    }
    
    /* If typing into the password, check the
     * size, then diddle the character so 
     * bullet (\245) shows up instead of what
     * the user typed.
     */
     
    if (field == passwdItem) {
        if (TELengthCheck(tePtr,c,MAXPWD)) {
            SysBeep(1);
            return(true);
        }
        
   /* Insert the char into our private
     * password text edit record. First
     * set the text selection so action
     * mimicks exactly what user is 
     * selecting and typing in passwdItem
     * text edit field.
     */
    
        ldStg = (LDialogStg *) 
          GetWRefCon(theDialog);
          
        if (ldStg == 0)
            return(false);
            
        TESetSelect(tePtr->selStart,
                    tePtr->selEnd,
                    ldStg->passTeH);
                    
        TEKey(c,ldStg->passTeH);
    
        /* unless BS or DEL, replace the
         * password character with bullet 
         */

        if (c != DEL && c != BS)
            theEvent->message = ‘\245’ | 
            (theEvent->message & 
              ~charCodeMask);
        return(false);       /* return ok */
    }
    
    return(false);           /* all other items */
    
}    

/*
 * static int 
 * TELengthCheck(tePtr te,char c,int maxLen)
 *
 * Check that adding character c to the text
 * edit te does not cause more than maxLen
 * chars in the text edit item:
 *
 * 1) If delete or backspace then length will
 *    decrease so ok.
 * 2) If a selection range of 1 or more chars 
 *    then same as above.
 * 3) Finally just check the length of the 
 *    edit item. 
 *
 *
 * Returns: FALSE if OK, TRUE if too large.
 *
 */
 
static int
TELengthCheck(te,c,maxLen)
TEPtr te;
char c;
int maxLen;
{

   /* this char a del or bs */
   /*  if so, does not increase */
 
    if (c == DEL || c == BS)
        return(false);       

    /* selected a region? */
    /* if so, then does not increase */
    
    if (te->selStart < 
        te->selEnd)           
        return(false);      
   
   /* else will insert, check length */
      
    if (te->teLength < maxLen) 
        return(false);
    
    return(true);
}

/*
 * static void TECpyText(TEHandle teH,Ptr p)
 *
 * Fetch the text from the text edit handle
 * and store as a pascal string in Ptr p.
 *
 * NB: This only works if the TE text is less
 * than 255 characters (a pascal string 
 * limit) so be careful.
 *
 */
 
static void
TECpyText(teH,p)
TEHandle teH;
Ptr p;
{
    p[0] = (unsigned char) (*teH)->teLength;
    BlockMove(*(*teH)->hText,&p[1],p[0]);
}

/*
 * LoginDialog(char *uName,*uPassword)
 *
 * Perform a login dialog and return the user
 * name and password in uName and uPassword.
 *
 * The dialog has a special filter procedure
 * which echos bullet characters in the
 * password field.
 * 
 * The length of the username and password
 *  are limited to MAXNAME and MAXPWD.
 * 
 * Note: we do not issue ParamText() since 
 * this affects other dialogs on the screen.
 * 
 */
 
LoginDialog(uName,uPasswd)
char *uName,*uPasswd;
{
    DialogPtr d;
    short itemHit;
    Rect aRect;
    int theKind;
    Handle nameHdl,okHdl;
    Boolean okOK = false;
    LDialogStg LDStg;
    

    d = GetNewDialog(LOGIN_DLOG,
                     (Ptr) 0,(Ptr) -1);
                     
    if (d == 0)
        return;
  
    /* make it the current port */          
  
    SetPort(d);         
    
    /* Make an offscreen rect for the text
     * edit to hold the plain text of the
     * entered password.
     * 
     * The dialog edit text for the password
     * will get “•” for each character typed.
     */
     
    SetRect(&aRect,0,0,1,1);
    OffsetRect(&aRect,
                d->portRect.right,
                d->portRect.bottom);
    
    LDStg.passTeH = TENew(&aRect,&aRect);
    
    /* Set the window data to be a pointer
     * to storage needed by filter procedure.
     */
     
    SetWRefCon(d,(long) &LDStg);
  /* Get handles for Name field and 
     * OK Button 
     */
        
    GetDItem(d,nameItem,&theKind,
             &nameHdl,&aRect);
    GetDItem(d,okItem,&theKind,
             &okHdl,&aRect);
    
    ShowWindow(d);
    
    while (!(okOK && itemHit == okItem)) {
        
        /* Set okOK to true if password and
         * name fields both have more than
         * one character. Enable/Disable the
         * OK button accordingly.
         */
         
        GetIText(nameHdl,uName);
        okOK = 
          (*LDStg.passTeH)->teLength > 0 &&
           uName[0] > 0;
                
        HiliteControl((ControlHandle) okHdl,
                      okOK ? 0 : 255);
        
        ModalDialog(LoginFilter,&itemHit);
    }
    
    /* Store the password and username
     *  for the caller then clean up.
     */
    
    TECpyText(LDStg.passTeH,uPasswd);
    GetIText(nameHdl,uName);

    DisposDialog(d);    
    TEDispose(LDStg.passTeH);
}

LOGIN MAIN.C

/*
 * Login Main.c - Main for Login Example.
 * This program built under LSC 3.0
 * Copyright (c) 1988 by Bill Schilit.
 * Edit History:
 *  April 23, 1988     Schilit    Created
 *  May 9, 1988        Schilit    Clean up
 */

/* MacHeaders included */

#include “Login Dialog.h”

#define ALERTID 128

main()
{    
    char User[255];
    char Password[255];
    
    InitGraf(&thePort);
    InitFonts();
    InitWindows();
    InitMenus();
    TEInit();
    InitDialogs(0);
    FlushEvents(everyEvent,0);
    InitCursor();
            
    /* Show the login dialog box and
     * repeat until the user types
     * the matching password.
     */
     
    for (;;) {
    
        /* Call LoginDialog to get user name 
         * and password.
         */
        
        LoginDialog(User,Password);
        
        /* Compare the entered password with
         * “swordfish” -- case doesn’t matter
         *  -- and exit if a match.
         */
         
        if (EqualString(Password,
                        “\pSwordFish”,
                        false,false))
            ExitToShell();
            
        /* No match, show our alert box with
         * a hint, and repeat the process.
         */
         
        ParamText(User,0,0,0);
        Alert(ALERTID,(ProcPtr) 0);
    }
}
LOGIN DIALOG.H

/*
 * Login Dialog.h - Definitions for 
 *                   Login Dialog.
 * This program built under LSC 3.0
 * Copyright (c) 1988 by Bill Schilit.
 * Edit History:
 *    April 23, 1988     Schilit   Created
 *    May 9, 1988        Schilit   Clean up
 */


#define LOGIN_DLOG 256

enum {           /* DITL for LOGIN_DLOG */
    okItem=1,    /* OK button */
    nameItem,    /* edit text name */
    passwdItem,  /* edit text password */
    myIconItem   /* the icon */
};

enum {           /* ASCII definitions */
    CR = 0x0d,
    DEL = 0x7f,
    BS = 0x08
};


  /* max chars in a password */
  
#define MAXPWD 10    

  /* max chars in a user name */
  
#define MAXNAME 12   

/* PROTOTYPES */

LoginDialog(char *uName,char *uPasswd);

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

OmniGraffle 7.3 - Create diagrams, flow...
OmniGraffle helps you draw beautiful diagrams, family trees, flow charts, org charts, layouts, and (mathematically speaking) any other directed or non-directed graphs. We've had people use Graffle to... Read more
OmniGraffle Pro 7.3 - Create diagrams, f...
OmniGraffle Pro helps you draw beautiful diagrams, family trees, flow charts, org charts, layouts, and (mathematically speaking) any other directed or non-directed graphs. We've had people use... Read more
DEVONthink Pro 2.9.11 - Knowledge base,...
DEVONthink Pro is your essential assistant for today's world, where almost everything is digital. From shopping receipts to important research papers, your life often fills your hard drive in the... Read more
DiskCatalogMaker 6.8.1 - Catalog your di...
DiskCatalogMaker is a simple disk management tool which catalogs disks. Simple, light-weight, and fast Finder-like intuitive look and feel Super-fast search algorithm Can compress catalog data for... Read more
Tunnelblick 3.7.0 - GUI for OpenVPN.
Tunnelblick is a free, open source graphic user interface for OpenVPN on OS X. It provides easy control of OpenVPN client and/or server connections. It comes as a ready-to-use application with all... Read more
Adobe Dreamweaver CC 2017 17.0.2.9391 -...
Dreamweaver CC 2017 is available as part of Adobe Creative Cloud for as little as $19.99/month (or $9.99/month if you're a previous Dreamweaver customer). Adobe Dreamweaver CC 2017 allows you to... Read more
Adobe Animate CC 2017 16.2.0 - Advanced...
Animate CC 2017 is available as part of Adobe Creative Cloud for as little as $19.99/month (or $9.99/month if you're a previous Flash Professional customer). Animate CC 2017 (was Flash CC) lets you... Read more
A Better Finder Rename 10.15 - File, pho...
A Better Finder Rename is the most complete renaming solution available on the market today. That's why, since 1996, tens of thousands of hobbyists, professionals and businesses depend on A Better... Read more
Creative Kit 1.1 - $149.99
Creative Kit 2016--made exclusively for Mac users--is your ticket to the most amazing images you've ever created. With a variety of powerful tools at your fingertips, you'll not only repair and fine-... Read more
iMazing 2.2.3 - Complete iOS device mana...
iMazing (was DiskAid) is the ultimate iOS device manager with capabilities far beyond what iTunes offers. With iMazing and your iOS device (iPhone, iPad, or iPod), you can: Copy music to and from... Read more

Power Rangers: Legacy Wars beginner...
Rita Repulsa is back, but this time she's invading your mobile phone in Power Rangers: Legacy Wars. What looks to be a straightforward beat 'em up is actually a tough-as-nails multiplayer strategy game that requires some deft tactical maneuvering.... | Read more »
Hearthstone celebrates the upcoming Jour...
Hearthstone gets a new expansion, Journey to Un'Goro, in a little over a week, and they'll be welcoming the Year of the Mammoth, the next season, at the same time. There's a lot to be excited about, so Blizzard is celebrating in kind. Players will... | Read more »
4 smart and stylish puzzle games like Ty...
TypeShift launched a little over a week ago, offering some puzzling new challenges for word nerds equipped with an iOS device. Created by Zach Gage, the mind behind Spelltower, TypeShift boasts, like its predecessor, a sleak design and some very... | Read more »
The best deals on the App Store this wee...
Deals, deals, deals. We're all about a good bargain here on 148Apps, and luckily this was another fine week in App Store discounts. There's a big board game sale happening right now, and a few fine indies are still discounted through the weekend.... | Read more »
The best new games we played this week
It's been quite the week, but now that all of that business is out of the way, it's time to hunker down with some of the excellent games that were released over the past few days. There's a fair few to help you relax in your down time or if you're... | Read more »
Orphan Black: The Game (Games)
Orphan Black: The Game 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Dive into a dark and twisted puzzle-adventure that retells the pivotal events of Orphan Black. | Read more »
The Elder Scrolls: Legends is now availa...
| Read more »
Ticket to Earth beginner's guide: H...
Robot Circus launched Ticket to Earth as part of the App Store's indie games event last week. If you're not quite digging the space operatics Mass Effect: Andromeda is serving up, you'll be pleased to know that there's a surprising alternative on... | Read more »
Leap to victory in Nexx Studios new plat...
You’re always a hop, skip, and a jump away from a fiery death in Temple Jump, a new platformer-cum-endless runner from Nexx Studio. It’s out now on both iOS and Android if you’re an adventurer seeking treasure in a crumbling, pixel-laden temple. | Read more »
Failbetter Games details changes coming...
Sunless Sea, Failbetter Games' dark and gloomy sea explorer, sets sail for the iPad tomorrow. Ahead of the game's launch, Failbetter took to Twitter to discuss what will be different in the mobile version of the game. Many of the changes make... | Read more »

Price Scanner via MacPrices.net

Is Apple Planning An iPhone Based Modular Doc...
Today’s more powerful and larger-screened smartphones and phablets are becoming the default anchor computing device for more and more users computing devices, but even a five or six inch panel is not... Read more
Razer Launches New Razer Blade Pro World’s Fi...
Razer, the gaming and high performance hardware specialists, have announced the new Razer Blade Pro laptop — the first laptop to be qualified for THX Mobile Certification, an accreditation reserved... Read more
Gro CRM’s Apple Small Business Mac And iOS CR...
Gro Software, developers of the Mac CRM software for small business and enterprise, are included in FinancesOnline 2017 CRM Rising Stars and Great User Experience lists by business software review... Read more
Deal alert! 15-inch and 13-inch MacBook Pros...
B&H Photo has the new 2016 15″ and 13″ Apple MacBook Pros in stock today and on sale for up to $200 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 15″ 2.7GHz Touch Bar... Read more
Save up to $420 on a new MacBook Pro with App...
Apple is offering Certified Refurbished 2016 15″ and 13″ MacBook Pros, including some Touch Bar models, for up to $420 off original MSRP. An Apple one-year warranty is included with each model, and... Read more
12-inch 1.2GHz Retina MacBooks on sale for $1...
B&H has 12″ 1.2GHz Retina MacBooks on sale for up to $200 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 12″ 1.2GHz Space Gray Retina MacBook: $1449 $150 off MSRP - 12″ 1.... Read more
Is A New 10.5-inch iPad Still Coming In April...
There was no sign or mention of a long-rumored and much anticipated 10.5-inch iPad Pro in Apple’s product announcements last week. The exciting iPad news was release of an upgraded iPad Air with a... Read more
T-Mobile’s Premium Device Protection Now Incl...
Good news for T-Mobile customers who love their iPhones and iPads. The “Un-carrier” has become the first national wireless company to give customers AppleCare Services at zero additional cost as part... Read more
FileWave Ensures Support for Latest Apple OS...
FileWave multi-platform device management providers announced support for Apple’s release yesterday of iOS 10.3, macOS Sierra 10.12.4, and tvOS 11.2. FileWave has a history of providing zero-day... Read more
Use Apple’s Education discount to save up to...
Purchase a new Mac or iPad using Apple’s Education Store and take up to $300 off MSRP. All teachers, students, and staff of any educational institution qualify for the discount. Shipping is free: -... Read more

Jobs Board

Fulltime aan de slag als shopmanager in een h...
Ben jij helemaal gek van Apple -producten en vind je het helemaal super om fulltime shopmanager te zijn in een jonge en hippe elektronicazaak? Wil jij werken in Read more
Desktop Analyst - *Apple* Products - Montef...
…technology to improve patient care. JOB RESPONSIBILITIES: Provide day-to-day support for Apple Hardware and Software in the environment based on the team's support Read more
*Apple* Mobile Master - Best Buy (United Sta...
**493168BR** **Job Title:** Apple Mobile Master **Location Number:** 000827-Denton-Store **Job Description:** **What does a Best Buy Apple Mobile Master do?** At Read more
Fulltime aan de slag als shopmanager in een h...
Ben jij helemaal gek van Apple -producten en vind je het helemaal super om fulltime shopmanager te zijn in een jonge en hippe elektronicazaak? Wil jij werken in Read more
*Apple* Mobile Master - Best Buy (United Sta...
**492889BR** **Job Title:** Apple Mobile Master **Location Number:** 000886-Norwalk-Store **Job Description:** **What does a Best Buy Apple Mobile Master do?** Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.